~ chicken-r7rs (master) d648ff153939e822a3ffd65c72254d6bbe07e484
commit d648ff153939e822a3ffd65c72254d6bbe07e484
Author: Evan Hanson <evhan@foldling.org>
AuthorDate: Sat Jul 9 15:13:52 2016 +1200
Commit: Evan Hanson <evhan@foldling.org>
CommitDate: Sat Jul 9 15:13:52 2016 +1200
Fix some incorrect "(except ...)" imports in scheme.base
diff --git a/scheme.base.scm b/scheme.base.scm
index 01176c3..21f9989 100644
--- a/scheme.base.scm
+++ b/scheme.base.scm
@@ -1,12 +1,11 @@
(module scheme.base ()
-(import (rename (except chicken modulo quotient remainder
- vector-copy!
- with-exception-handler)
+(import (rename (except chicken vector-copy! with-exception-handler)
(features feature-keywords)))
(import (except scheme syntax-rules cond-expand
- assoc list-set! list-tail member
+ assoc member list-tail
+ modulo quotient remainder
char=? char<? char>? char<=? char>=?
string=? string<? string>? string<=? string>=?
string-copy string->list vector->list vector-fill!))
Trap