hence/examples/testforth.fth

12 lines
261 B
Forth
Raw Normal View History

2023-03-23 16:59:10 +00:00
: test 40 2 + ;
: meep 32 ;
: morp 4875 8748 debug ;
: zeep 8777 debug ;
: borg debug ;
2023-03-23 16:59:10 +00:00
2023-04-03 09:42:45 +00:00
42 42 = debug if 69 . else 420 . then cr
2023-04-04 12:07:21 +00:00
1 debug if 32 . cr else then
2023-03-31 12:36:00 +00:00
2023-04-04 12:07:21 +00:00
test debug test debug space ." Hello world!" cr space space ." Hello world!" cr
2023-04-04 18:22:36 +00:00
morp meep morp meep