X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?p=scheme.forth.jl.git;a=blobdiff_plain;f=src%2Fscheme.4th;h=abd214ebfd8bd6f265a26aa5d9782886b9cd523d;hp=72d2c9deb95bda37f81c99bad37bef4a2a59fee8;hb=455f839be6ce83f0131de3cc6d3449e9e6b85ca3;hpb=6a5e70c39ecda241347d0b8881fda4aea31dd3cf diff --git a/src/scheme.4th b/src/scheme.4th index 72d2c9d..abd214e 100644 --- a/src/scheme.4th +++ b/src/scheme.4th @@ -1987,8 +1987,7 @@ variable gc-stack-depth include scheme-primitives.4th - s" testing-library.scm" load 2drop - \ s" scheme-library.scm" load 2drop + s" scheme-library.scm" load 2drop \ }}} @@ -2021,7 +2020,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