~ chicken-r7rs (master) 1a0f3e7a67c0fd09e8b15a2b93e2ade70676989a


commit 1a0f3e7a67c0fd09e8b15a2b93e2ade70676989a
Author:     Evan Hanson <evhan@foldling.org>
AuthorDate: Sun Jul 7 04:56:11 2013 +0000
Commit:     Evan Hanson <evhan@foldling.org>
CommitDate: Sun Jul 7 04:56:11 2013 +0000

    Add scheme.read module

diff --git a/r7rs.setup b/r7rs.setup
index 280f22e..b152b3d 100644
--- a/r7rs.setup
+++ b/r7rs.setup
@@ -4,7 +4,7 @@
 (use make srfi-1)
 
 (define scheme-modules
-  '("process-context" "eval" "cxr" "complex" "inexact" "load" "file"))		;XXX
+  '("process-context" "eval" "cxr" "complex" "inexact" "load" "file" "read"))	;XXX
 
 (make (("r7rs-compile-time.so" ("r7rs-compile-time.scm" "r7rs-compile-time-module.scm")
 	(compile -s -O3 -d1 r7rs-compile-time-module.scm -J -o r7rs-compile-time.so)
diff --git a/scheme.read.scm b/scheme.read.scm
new file mode 100644
index 0000000..6cea019
--- /dev/null
+++ b/scheme.read.scm
@@ -0,0 +1,2 @@
+(module scheme.read (read)
+  (import scheme))
Trap