6502/VolksForth
1
0
Fork 0
mirror of https://github.com/forth-ev/VolksForth.git synced 2024-11-26 02:49:17 +00:00
Code Issues Projects Releases Wiki Activity

Add prelimtest.fth to run-vf-tests.fth. Adapt prelimtest.fth to PETSCII.

Browse Source
This commit is contained in:
Philip Zembrod 2020-06-28 16:05:55 +02:00
parent ab4f8de981
commit dc5d2044be
2 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
6502/C64/tests/prelimtest.fth
View File

@ -161,7 +161,7 @@ TST5 45 = ?~ Error #44: testing I
TST6 5 = ?~ Error #45: testing LEAVE
: TST7 ( -- n1 n2 ) 123 >R 234 R> ;
TST7 NEGATE + 111 = ?~ Error #46: testing >R R>
: TST8 ( -- ch ) [CHAR] A ;
: TST8 ( -- ch ) [CHAR] a ; \ vf: s/A/a/
TST8 65 = ?~ Error #47: testing [CHAR]
: TST9 ( -- ) [CHAR] s [CHAR] s [CHAR] a [CHAR] P 4 0 DO EMIT LOOP ;
TST9 .MSG( #22: testing EMIT) CR

2
6502/C64/tests/run-vf-tests.fth
View File

@ -3,6 +3,8 @@
include ans-shim.fth
include prelimtest.fth
include tester.fth
\ 1 verbose !