Merge pull request #3 from nineties/move_tester

Move test/tester.fs to lib/tester.fs
2025-01-13 08:01:10 +01:00 · 2021-01-16 19:02:32 +09:00 · 2021-01-16 19:02:32 +09:00 · 5e8e9f978d
commit 5e8e9f978d
parent 3d2d523605 01d43af26e
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/utilities.fs
 include test/errorreport.fs