(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