summaryrefslogtreecommitdiff
path: root/tiger-compiler/tests/good/escapes_series.tig
blob: d71a013bdc5c0d244d1ff1342daa3bb2582b27db (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
let
    var i := 69
    function print_a_number(k: int) = print_int(k)
    function serial_print(value: int) = (print_a_number(value); print_a_number(i))
    function conditional_print(value: int) = if (value <> 0) then print_a_number(value) else print_a_number(i)
in
    print_a_number(i);
    print("\n");
    serial_print(10);
    print("\n");
    serial_print(i);
    print("\n");
    conditional_print(0);
    print("\n");
    conditional_print(i);
    print("\n");
    conditional_print(68);
    print("\n")
end