Robuuster returns in javascript.

2026-05-28 17:44:53 +02:00
parent 36b8b5de78
commit 6ffc11d2b1
4 changed files with 47 additions and 70 deletions
@@ -37,9 +37,9 @@
  (runtime-eval-macro-function 't "BEE"))
 (unless (and (regexp-match? #rx"getElementById\\(\"t\"\\)" runtime-eval-macro-program)
             (regexp-match? #rx"innerHTML = \"BEE\"" runtime-eval-macro-program)
-             (regexp-match? #rx"return true;" runtime-eval-macro-program))
+             (not (regexp-match? #rx"return true;" runtime-eval-macro-program)))
  (error 'jsmaker-regression
-         "runtime eval inside a user macro should keep use-site lexical bindings, got: ~a"
+         "runtime eval inside a user macro should keep use-site lexical bindings and should not emit an implicit top-level return, got: ~a"
         runtime-eval-macro-program))

 (define-syntax with-id->el/inject
@@ -58,9 +58,9 @@
  (runtime-inject-macro-function 't "BEE"))
 (unless (and (regexp-match? #rx"getElementById\\(\"t\"\\)" runtime-inject-macro-program)
             (regexp-match? #rx"innerHTML = \"BEE\"" runtime-inject-macro-program)
-             (regexp-match? #rx"return true;" runtime-inject-macro-program))
+             (not (regexp-match? #rx"return true;" runtime-inject-macro-program)))
  (error 'jsmaker-regression
-         "runtime inject inside a user macro should keep use-site lexical bindings, got: ~a"
+         "runtime inject inside a user macro should keep use-site lexical bindings and should not emit an implicit top-level return, got: ~a"
         runtime-inject-macro-program))

 (define simple-let-star