Edinburgh IMP77 Compiler - Version 8.4
    1 %begin
				.section .mdebug.abi32
				.previous
				.nan	legacy
				.module	fp=xx
				.module	nooddspreg
				.abicalls
		$Ltext0:
				.align	2
				.globl	main
				LFB185 = .
				.set	nomips16
				.set	nomicromips
				.ent	main
		main:
				.frame	$sp,32,$31		# vars= 0, regs= 1/0, args= 16, gp= 8
				.mask	0x80000000,-4
				.fmask	0x00000000,0
				.set	noreorder
				.set	nomacro
				LVL0 = .
				addiu	$sp,$sp,-32
				sw	$31,28($sp)
				lui	$28,%hi(__gnu_local_gp)
				addiu	$28,$28,%lo(__gnu_local_gp)
				.cprestore	16
    2
				lw	$25,%call16(_imp_initialise)($28)
				.reloc	1f,R_MIPS_JALR,_imp_initialise
			1:	jalr	$25
				nop
				LVL1 = .
				lw	$28,16($sp)
				LVL2 = .
				LVL3 = .
				LBB4 = .
				LBB5 = .
				move	$4,$0
				lw	$25,%call16(exit)($28)
				.reloc	1f,R_MIPS_JALR,exit
			1:	jalr	$25
				nop
				LVL4 = .
				LBE5 = .
				LBE4 = .
				.set	macro
				.set	reorder
				.end	main
		$LFE185:
		$Letext0:
    3 ! trying to duplicate crash from pass3.i
    4
    5 %constinteger max ref = 100
    6
    7 %recordformat  reffm(%shortinteger  tag, link, flags, ca)
    8 %recordformat  deffm(%record(deffm)%name  link, %shortinteger proc,ca)
    9 %recordformat  procfm(%record(procfm)%name  link,
   10                       %record(reffm)%name   ref list,
   11                       %record(deffm)%name   def list,
   12                       %shortinteger  base,  ca,
   13                                      static frame, event mask,
   14                                      display reg, event start,
   15                                      event finish, ld base,
   16                                      ld size, vd base,
   17                                      vd size, Me)
   18
   19 %routine phase1
   20 %record(reffm)%array  ref(1:max ref)
   21 %record(procfm)%name  pp, qq
   22   ref(1)_tag = 42
   23 %end
?QQ unused
?PP unused
   24
   25 %endofprogram
?PHASE1 unused
   11 Statements compiled