tiger-compiler/tests/llvmtranslate/simple_array_record.tig


1
2
3
4
5
6
7
8

/* an array type and an array variable */
let
  type rectype = {id: int, name: string, level: int}
  type arrtype = array of rectype
  var arr1 : arrtype := arrtype [5] of rectype {id = 1, name = "Jeanjean", level = 1}
in
  arr1[4]
end