quasiquote/unquote implemented

[scheme.forth.jl.git] / src / scheme.4th

diff --git a/src/scheme.4th b/src/scheme.4th
index 14f1c8e..72d2c9d 100644 (file)
--- a/src/scheme.4th
+++ b/src/scheme.4th
@@ -2021,7 +2021,7 @@ variable gc-stack-depth
     enable-gc
 
     \ Display welcome message
-    welcome-symbol nil cons global-env obj@ eval 2drop
+    \ welcome-symbol nil cons global-env obj@ eval 2drop
 
     begin
         ['] repl-body catch