Edinburgh IMP77 Compiler - Version 8.4
    1 !%control x'11111111'
				.section .mdebug.abi32
				.previous
				.nan	legacy
				.module	fp=xx
				.module	nooddspreg
				.abicalls
		$Ltext0:
				.rdata
				.align	2
		$LC0:
				.byte	7
				.ascii	"TEST OK\000"
				.space	247
				.align	2
				.globl	main
				LFB185 = .
    2 %BEGIN
				.set	nomips16
				.set	nomicromips
				.ent	main
		main:
				.frame	$sp,792,$31		# vars= 520, regs= 1/0, args= 256, gp= 8
				.mask	0x80000000,-4
				.fmask	0x00000000,0
				.set	noreorder
				.set	nomacro
				LVL0 = .
				addiu	$sp,$sp,-792
				sw	$31,788($sp)
				lui	$28,%hi(__gnu_local_gp)
				addiu	$28,$28,%lo(__gnu_local_gp)
				.cprestore	256
				lw	$2,%got(__stack_chk_guard)($28)
				lw	$2,0($2)
				sw	$2,780($sp)
    3 %INTEGER COUNT
				lw	$25,%call16(_imp_initialise)($28)
				.reloc	1f,R_MIPS_JALR,_imp_initialise
			1:	jalr	$25
				nop
				LVL1 = .
				lw	$28,256($sp)
				LVL2 = .
				LVL3 = .
				li	$2,257			# 0x101
				LVL4 = .
				LDL1 = .
				addiu	$2,$2,-1
				LVL5 = .
		$L15:
				LBB23 = .
				LBB24 = .
				LBB25 = .
    4 %INTEGER I
    5 %ROUTINE FRED(%INTEGERNAME I,%INTEGER FIRST,STEP,LAST)
    6       %CYCLE I=FIRST,STEP,LAST
    7          COUNT=COUNT+1
    8       %REPEAT
    9 %END
   10       COUNT=0
   11       FRED(I,X'9000',16,X'A000')
				bne	$2,$0,$L15
				addiu	$2,$2,-1
				L3 = .
				LVL6 = .
				LBE25 = .
				LBE24 = .
				LBE23 = .
				LBB26 = .
   12       %IF COUNT=257 %AND I=X'A000' %THEN PRINTSTRING("TEST OK") %C
   13          %ELSE PRINTSTRING("WRONG") %AND %MONITOR
   14 %ENDOFPROGRAM
				lui	$2,%hi($LC0)
				LVL7 = .
				addiu	$2,$2,%lo($LC0)
				addiu	$3,$sp,524
				addiu	$4,$2,256
		$L4:
				lw	$8,0($2)
				lw	$7,4($2)
				lw	$6,8($2)
				lw	$5,12($2)
				sw	$8,0($3)
				sw	$7,4($3)
				sw	$6,8($3)
				sw	$5,12($3)
				addiu	$2,$2,16
				bne	$2,$4,$L4
				addiu	$3,$3,16
				addiu	$2,$sp,524
				addiu	$3,$sp,268
				addiu	$4,$sp,780
		$L5:
				lw	$8,0($2)
				lw	$7,4($2)
				lw	$6,8($2)
				lw	$5,12($2)
				sw	$8,0($3)
				sw	$7,4($3)
				sw	$6,8($3)
				sw	$5,12($3)
				addiu	$2,$2,16
				bne	$2,$4,$L5
				addiu	$3,$3,16
				addiu	$2,$sp,268
				addiu	$3,$sp,524
				move	$4,$3
		$L6:
				lw	$8,0($2)
				lw	$7,4($2)
				lw	$6,8($2)
				lw	$5,12($2)
				sw	$8,0($3)
				sw	$7,4($3)
				sw	$6,8($3)
				sw	$5,12($3)
				addiu	$2,$2,16
				bne	$2,$4,$L6
				addiu	$3,$3,16
				LBE26 = .
				LBB27 = .
				LBB28 = .
				addiu	$2,$sp,540
				addiu	$3,$sp,16
				addiu	$4,$sp,780
		$L7:
				lw	$8,0($2)
				lw	$7,4($2)
				lw	$6,8($2)
				lw	$5,12($2)
				sw	$8,0($3)
				sw	$7,4($3)
				sw	$6,8($3)
				sw	$5,12($3)
				addiu	$2,$2,16
				bne	$2,$4,$L7
				addiu	$3,$3,16
				lw	$4,524($sp)
				lw	$5,528($sp)
				lw	$6,532($sp)
				lw	$7,536($sp)
				lw	$25,%call16(_imp_printstring)($28)
				.reloc	1f,R_MIPS_JALR,_imp_printstring
			1:	jalr	$25
				nop
				LVL8 = .
				lw	$28,256($sp)
				LDL2 = .
				LVL9 = .
				LBE28 = .
				LBE27 = .
				LBB29 = .
				LBB30 = .
				move	$4,$0
				lw	$25,%call16(exit)($28)
				.reloc	1f,R_MIPS_JALR,exit
			1:	jalr	$25
				nop
				LVL10 = .
				LBE30 = .
				LBE29 = .
				.set	macro
				.set	reorder
				.end	main
		$LFE185:
		$Letext0:
   12 Statements compiled