Move test/tester.fs to lib/tester.fs

2024-12-25 21:58:22 +01:00 · 2021-01-16 18:52:47 +09:00 · 2021-01-16 18:52:47 +09:00 · 01d43af26e
commit 01d43af26e
parent b54b0e99a5
3 changed files with 12 additions and 1 deletions
--- a/lib/core.fs
+++ b/lib/core.fs
@ -9,3 +9,13 @@ defined? roll [unless]
        dup 0<= if drop else swap >r 1- recurse r> swap then
    ;
 [then]
+
+
+\ Ignore test codes. lib/tester.fs will redefine this when
+\ running tests.
+: T{
+    begin
+        word throw
+        s" }T" streq if exit then
+    again
+;
--- a/test/tester.fs
+++ b/test/tester.fs
--- a/runtests.fs
+++ b/runtests.fs
@ -6,7 +6,8 @@

 ." Running PlanckForth test programs" cr

-include test/tester.fs
+include lib/tester.fs
+
 include test/core.fs
 include test/coreplustest.fs