(drak)
2015-03-18: wisp-guile: execute all statements in a chunk. wisp-guile: execute all statements in a chunk.
diff --git a/wisp-reader.w b/wisp-reader.w
--- a/wisp-reader.w
+++ b/wisp-reader.w
@@ -64,9 +64,12 @@ 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 ; : cdr wisp-pending-sexps
+ ; write : cons 'begin pending
+ cons 'begin pending
try-pending
define-language wisp