summaryrefslogtreecommitdiff
path: root/tiger-compiler/tests/testsuite/good/three_actual_tests_natural.tig
blob: ad41636c9a2f2779d3255aa7afe1b1c66c51fdd0 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
function test_1() = (3 = 3; () )

function test_2() =
  let
    var i := 1
    var j := 1
  in
    j := j + 1;
    i := i * j
  end

function test_3() =
  let
    var i := 1
    var j := 1
  in
    j := j - 1;
    i := i / j
  end