From 5c2ea1a903b961c5c0457611c9fc4d7dd91a70d7 Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Wed, 20 May 2015 01:20:32 -0400
Subject: [PATCH] Export (read)

---
 scheme/read.sld | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/scheme/read.sld b/scheme/read.sld
index dbd5c3d4..c5eabe64 100644
--- a/scheme/read.sld
+++ b/scheme/read.sld
@@ -1,9 +1,10 @@
 (define-library (scheme read)
   (import (scheme base))
   (export
-    ;read  ;; what about issues with read/cyc-read in csi???
-    cyc-read ;; try this first, but it needs to go away!!!
+    read  ;; what about issues with read/cyc-read in csi???
+    ;cyc-read ;; try this first, but it needs to go away!!!
     read-all
   )
   (include "../parser.scm")
-  (begin))
+  (begin
+    (define read cyc-read)))