summaryrefslogtreecommitdiff
path: root/tiger-compiler/tests/type/lower_than_array.tig
blob: 9e78236b6bd0e2a27754350d3dd6bb9e7b077158 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
let
  type arr = array of int
  var arr1 := arr[5] of 0
  var arr2 := arr[5] of 1
in
  if (arr1 < arr2) then
    print("lower");

  if (arr1 <= arr2) then
    print("lower or equal");

  if (arr1 = arr2) then
    print("equal");

  if (arr1 >= arr2) then
    print("higher or equal");

  if (arr1 > arr2) then
    print("higher")
end