fix unit tests #321

LIPS-scheme · Apr 5, 2024 · f57c53e · f57c53e
1 parent 31fcb81
commit f57c53e
Show file tree

Hide file tree

Showing 10 changed files with 39 additions and 21 deletions.
diff --git a/dist/lips.cjs b/dist/lips.cjs
diff --git a/dist/lips.esm.js b/dist/lips.esm.js
diff --git a/dist/lips.esm.min.js b/dist/lips.esm.min.js
diff --git a/dist/lips.js b/dist/lips.js
diff --git a/dist/lips.min.js b/dist/lips.min.js
diff --git a/dist/std.min.scm b/dist/std.min.scm
diff --git a/dist/std.scm b/dist/std.scm
diff --git a/dist/std.xcb b/dist/std.xcb
diff --git a/lib/bootstrap.scm b/lib/bootstrap.scm
@@ -771,6 +771,7 @@
          (token lexer.__token__)
          (offset (+ token.col 2))
          (re (regex (string-append "\\n\\s{1," (repr offset) "}") "g")))
+    (print token)
     `(string-append ,@(map (lambda (expr)
                              (if (string? expr)
                                  (begin

diff --git a/src/lips.js b/src/lips.js
@@ -1095,7 +1095,11 @@ class Lexer {
         var found = this.next_token();
         if (found) {
             this._token = this.__input__.substring(this._i, this._next);
-            read_only(this, '__token__', this.token(true));
+            if (!this.__token__) {
+                // handle case when accessing __token__ from the syntax extension
+                // (e.g. string interpolation) as the first expression in a REPL
+                read_only(this, '__token__', this.token(true));
+            }
             return this.token(meta);
         }
         return eof;