hence/examples/testforth.fth

9 lines
131 B
Forth

: test 40 2 + ;
: meep 32 ;
: morp 4875 8748 debug ;
: zeep 8777 debug ;
: borg debug ;
42 42 = debug if 69 . else 420 . then cr