Changed PS-LOOP to emit DO* (i.e. normal JS for-loop code) rather than DO. It was...

diff --git a/src/lib/ps-loop.lisp b/src/lib/ps-loop.lisp
index d0b1aa9..d2938d3 100644 (file)
--- a/src/lib/ps-loop.lisp
+++ b/src/lib/ps-loop.lisp
@@ -153,8 +153,8 @@
               ,@(when last-time `((var ,last-guard nil)))
               ,@prologue
               ,@initially
-              (do ,init-step-forms
-                  ,end-test-forms
+              (do* ,init-step-forms
+                   ,end-test-forms
                 ,@(when first-time
                         `((when ,first-guard
                             ,@first-time