10 lines
232 B
Forth
10 lines
232 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
|
|
|
|
0 if 42 . cr test meep morp zeep borg debug else 69 . cr then
|
|
test debug meep morp zeep borg debug
|