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   %integer btrue, bfalse, instring
				lw	$25,%call16(_imp_initialise)($28)
				.reloc	1f,R_MIPS_JALR,_imp_initialise
			1:	jalr	$25
				nop
				LVL1 = .
				lw	$28,16($sp)
				LVL2 = .
				L2 = .
				L3 = .
				L4 = .
				L5 = .
				LVL3 = .
				LBB8 = .
				LBB9 = .
				move	$4,$0
				lw	$25,%call16(exit)($28)
				.reloc	1f,R_MIPS_JALR,exit
			1:	jalr	$25
				nop
				LVL4 = .
				LBE9 = .
				LBE8 = .
				.set	macro
				.set	reorder
				.end	main
		$LFE185:
		$Letext0:
    3   %integer ch, inconst, ptr, obp, res
    4   %integerarray sc('A':'Z')
    5   %bytearray outbuf(0:1000)
    6
    7   %routine getline(%integer ptr)
    8   %end
?PTR unused
    9   %integerfn next non sp(%integer sym)
   10     %result = 'x'
   11   %end
?SYM unused
   12   %switch bip(1:2000)
   13
   14 bip(1013): ! Alias.
   15    ch = next non sp(inconst)
   16    ptr = ptr + 1
   17    %if ch # '"' %then res = bfalse %and -> inc
   18    outbuf(obp) = ' '
   19    obp = obp + 1
   20    outbuf(obp) = '"'
   21    obp = obp + 1
   22    %cycle
   23       %if sc(ptr) = '"' %start
   24          outbuf(obp) = '"' ! instring
   25          %if sc(ptr + 1) # '"' %then %exit
   26          outbuf(obp + 1) = '"' ! instring
   27          obp = obp + 2
   28          ptr = ptr + 2
   29       %finish %else %start
   30          ch = sc(ptr)
   31          outbuf(obp) = ch ! instring
   32          obp = obp + 1
   33          ptr = ptr + 1
   34          getline(ptr) %if ch = nl
   35       %finish
   36    %repeat
   37    ptr = ptr + 1
   38    obp = obp + 1
   39 inc:
   40 %endofprogram
?BTRUE unused
   36 Statements compiled