begin

  ! Interestingly enough you *can* initialise records in Imp77, but
  ! although it *looks* like an integer is being assigned to the first
  ! field, I believe it is actually assigning an address and may be
  ! related to the special case of assigning 0 to a record.

  ! It would be really interesting to see what happens on a traditional
  ! imp77 compiler implementation.  I may try this in the Vax emulator.

  recordformat same(integer i, j)
  ownrecord(same)array or(0:3) = 42, 3, 17, 11
  constrecord(same)array cr(0:3) = 142, 13, 117, 111

  recordformat mixed(real r, integer i)
! %ownrecord(mixed)%array orm(0:3) = 42, 3.1415, 17, 2.123
!                                        ^ causes an error.  This is a significant clue.
  ownrecord(same)array orm2(0:3) = 42, 3, 17, 11
  constrecord(same)array cr2(0:3) = 142, 13, 117, 111

endofprogram