~ 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