hence/examples/testforth.fth

7 lines
114 B
Forth

: test 40 2 + ;
\ 42 42 = debug if 69 . else 420 . then cr
0 if 42 . cr else 69 . cr then
test debug test debug