added while
This commit is contained in:
13
while_test.sl
Normal file
13
while_test.sl
Normal file
@@ -0,0 +1,13 @@
|
||||
import stdlib/stdlib.sl
|
||||
import stdlib/io.sl
|
||||
|
||||
: main
|
||||
10
|
||||
begin
|
||||
dup 0 >
|
||||
while
|
||||
dup puti cr
|
||||
1 -
|
||||
repeat
|
||||
drop
|
||||
;
|
||||
Reference in New Issue
Block a user