aboutsummaryrefslogtreecommitdiff
path: root/example/countup.slang
blob: 69e71dbd1907f50c734ba1e98ff605932bdd8a37 (plain)
1
2
3
4
5
6
7
8
9
1 i $

§ incr dup @ 1 + swp $ ;
§ print @ . pop ;
§ withinBounds @ 10 < ;

§ loop i withinBounds if i print i incr loop then else ;

loop