~ chicken-core (chicken-5) 8dd1c237ed6e3fdc4bc58152153bd0b9b05b25b1
commit 8dd1c237ed6e3fdc4bc58152153bd0b9b05b25b1
Author: Evan Hanson <evhan@foldling.org>
AuthorDate: Tue Jan 12 22:44:22 2016 +1300
Commit: Evan Hanson <evhan@foldling.org>
CommitDate: Tue Mar 8 22:52:33 2016 +1300
Add some missing chicken.expand imports
diff --git a/eval.scm b/eval.scm
index c5a4f979..ca1dbe79 100644
--- a/eval.scm
+++ b/eval.scm
@@ -78,6 +78,7 @@
'((chicken . chicken-syntax)
(chicken.data-structures . data-structures)
(chicken.eval . eval)
+ (chicken.expand . expand)
(chicken.extras . extras)
(chicken.files . files)
(chicken.foreign . chicken-ffi-syntax)
diff --git a/modules.scm b/modules.scm
index 22034f18..1bdbaf48 100644
--- a/modules.scm
+++ b/modules.scm
@@ -933,6 +933,7 @@
(##sys#register-module-alias 'r5rs 'scheme)
(##sys#register-module-alias 'data-structures 'chicken.data-structures)
(##sys#register-module-alias 'extras 'chicken.extras)
+(##sys#register-module-alias 'expand 'chicken.expand)
(##sys#register-module-alias 'files 'chicken.files)
(##sys#register-module-alias 'foreign 'chicken.foreign)
(##sys#register-module-alias 'irregex 'chicken.irregex)
diff --git a/srfi-4.scm b/srfi-4.scm
index bc38d5b7..fffdd73f 100644
--- a/srfi-4.scm
+++ b/srfi-4.scm
@@ -27,7 +27,7 @@
(declare
(unit srfi-4)
- (uses extras)
+ (uses expand extras)
(disable-interrupts)
(not inline ##sys#user-print-hook ##sys#number-hash-hook)
(foreign-declare #<<EOF
@@ -79,7 +79,8 @@ EOF
write-u8vector)
(import scheme chicken)
-(import chicken.foreign)
+(import chicken.expand
+ chicken.foreign)
(include "common-declarations.scm")
Trap