crc/retroforth
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

more tests for words in rx (6 remain w/o tests)

Browse source 
FossilOrigin-Name: 0ae9fc6c65b40b7a116f2dcc2142fb12c0f28e4ac10b6ffa62b7e766fb5435f2
This commit is contained in:
crc 2020-03-11 19:34:10 +00:00
parent 380df6dea7
commit be25e2939c
1 changed files with 10 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
tests/rx.retro
View file

@ -262,17 +262,21 @@ passed
~~~
'prefix:( Testing
[ #1 (#2 #3 ] [ #3 match #1 match ] try
passed
~~~
~~~
'Compiler Testing
[ @Compiler ] [ #0 match ] try
[ 'Compiler d:lookup d:class fetch ] [ &class:data match ] try
passed
~~~
~~~
'Heap Testing
[ Heap ] [ #3 match ] try
passed
~~~
@ -321,6 +325,7 @@ passed
~~~
'Dictionary Testing
[ Dictionary ] [ #2 match ] try
[ 'Dictionary d:lookup d:class fetch ] [ &class:data match ] try
passed
~~~
@ -393,6 +398,7 @@ passed
~~~
'prefix:$ Testing
[ #1 $c #3 ] [ #3 match #99 match #1 match ] try
passed
~~~
@ -410,11 +416,15 @@ passed
~~~
'interpret Testing
[ '#1 interpret ] [ #1 match ] try
[ #1 'n:inc interpret ] [ #2 match ] try
[ #1 #2 'swap interpret ] [ #1 match #2 match ] try
passed
~~~
~~~
'd:lookup Testing
[ 'Compiler d:lookup d:class fetch ] [ &class:data match ] try
passed
~~~