stackscript/examples/breakreturncontinue.st at main · justanothercell/stackscript · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
func test do
    1 2 3
    return
    4 5 6
end
test
dump outln
clear

func test2 do
    store x
    1 2 3
    x if "4a" return 5 end
    else "4b" return 5 end
    6 7 8
end
false test2
true test2
dump outln
clear

10 true while
    dup out
    1 - dup 0 >
    swap dup 5 > if
        swap continue
    end
    swap
    " after " out
end
"" outln
dump outln
clear

10 true while
    dup out " " out
    dup 5 < if
        break
    end
    1 - dup 0 >
end  // prints: 10 9 8 7 6 5 4
"" outln
dump outln
clear