Miroirs/planckforth
1
0
Fork 0
mirror of https://github.com/nineties/planckforth synced 2024-12-26 21:58:42 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

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

Browse source
This commit is contained in:
Koichi Nakamura 2021-01-16 18:52:47 +09:00
parent b54b0e99a5
commit 01d43af26e
3 changed files with 12 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
lib/core.fs
View file

@ -9,3 +9,13 @@ defined? roll [unless]
dup 0<= if drop else swap >r 1- recurse r> swap then dup 0<= if drop else swap >r 1- recurse r> swap then
; ;
[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
;

0
test/tester.fs → lib/tester.fs
View file

3
runtests.fs
View file

@ -6,7 +6,8 @@
." Running PlanckForth test programs" cr ." Running PlanckForth test programs" cr
include test/tester.fs include lib/tester.fs
include test/core.fs include test/core.fs
include test/coreplustest.fs include test/coreplustest.fs