3 lines
59 B
Forth
3 lines
59 B
Forth
|
|
: ints ( -- )
|
||
|
|
0 begin 1+ dup cr u. dup -1 = until drop ;
|