~ chicken-core (chicken-5) 5b69b574504eb4484809c86ee215806953207bda
commit 5b69b574504eb4484809c86ee215806953207bda Author: felix <felix@call-with-current-continuation.org> AuthorDate: Sat May 12 17:04:34 2012 +0200 Commit: felix <felix@call-with-current-continuation.org> CommitDate: Sat May 12 17:04:34 2012 +0200 strip import specs as well diff --git a/modules.scm b/modules.scm index fd17c627..02a0a2c9 100644 --- a/modules.scm +++ b/modules.scm @@ -666,7 +666,8 @@ (append (module-import-forms cm) (cdr x))))) (for-each (lambda (spec) - (let* ((vs (import-spec spec)) + (let* ((spec (##sys#strip-syntax spec)) + (vs (import-spec spec)) (vsv (car vs)) (vss (cdr vs)) (prims '()))Trap