summaryrefslogtreecommitdiff
path: root/tiger-compiler/tests/llvmtranslate/simple_consecutive_ifs.tig
blob: 6a7399c12c8c20c07923bd8eed61e9d3bebc03d5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
let
    function nothing (a : int) = a := 42
in
    (if 0 then
        nothing(43)
    else
        nothing(44);
    if 1 then
        nothing(45)
    else
        nothing(46))
end