path: root/test/programs/record.cps

RECORD([(INT 1, OFFp 0), (INT 2, OFFp 0)], record,
  SELECT(0, VAR one, record,
    SELECT(1, VAR two, record,
      PRIMOP(+, [VAR one, VAR two], [result], [])
    )
  )
)