~ chicken-core (chicken-5) 1545ee13acba6c47a4dc4a2b0ba36451616d5755

commit 1545ee13acba6c47a4dc4a2b0ba36451616d5755
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Fri May 11 13:32:38 2012 +0200
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Fri May 11 13:32:38 2012 +0200

    at least strip module exports

diff --git a/compiler.scm b/compiler.scm
index 8f83feb5..495abf5a 100644
--- a/compiler.scm
+++ b/compiler.scm
@@ -826,7 +826,7 @@
 						  (##sys#syntax-error-hook
 						   'module
 						   "invalid export syntax" exp name))))
-					 (caddr x))))
+					 (##sys#strip-syntax (caddr x)))))
 			       (csyntax compiler-syntax))
 			  (when (##sys#current-module)
 			    (##sys#syntax-error-hook