wisp
 
(Arne Babenhauserheide)
2014-12-25: try at fixing bugs 5 and f (delayed output in REPL).

try at fixing bugs 5 and f (delayed output in REPL).

diff --git a/wisp-reader.w b/wisp-reader.w
--- a/wisp-reader.w
+++ b/wisp-reader.w
@@ -65,9 +65,15 @@ define : read-one-wisp-sexp port env
   define : try-pending
     if : null? wisp-pending-sexps
          wisp-scheme-read-chunk-env
-         let : : sexp : car wisp-pending-sexps
-            set! wisp-pending-sexps : cdr wisp-pending-sexps
-            . sexp
+         let 
+            : sexp : car wisp-pending-sexps
+              pending wisp-pending-sexps
+            set! wisp-pending-sexps : list
+            cond 
+               : null? : cdr pending
+                 . sexp
+               else
+                 append '(begin) pending
   try-pending
 
 define-language wisp