aboutsummaryrefslogtreecommitdiff
path: root/testsuite/runnable/record_construction.elna
blob: 5a3a2543b312849dfbb5b2fed7e0d2c3c34d3493 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
program()
type
  R = record
    x, y: Int
  end

var
  r: R := R{x: 1, y: 2}

begin
  assert(r.x = 1 & r.y = 2)
end.