RosettaCodeData/Task/Loops-While/Joy/loops-while.joy

4 lines
63 B
Text
Raw Permalink Normal View History

2013-04-10 21:29:02 -07:00
DEFINE putln == put '\n putch.
1024 [] [dup putln 2 /] while.