summaryrefslogtreecommitdiff
path: root/tiger-compiler/tests/llvmtranslate/record_field_compared_to_int.tig
blob: 41a87efa6acedfadffaf2753765db5e45b95327a (plain)
1
2
3
4
5
6
let
  type  rectype = {name : string, age : int}
  var rec1 : rectype := rectype {name="Nobody", age=1000}
  in
  rec1.age <> 10
end