Edinburgh IMP77 Compiler - Version 8.4
    1 %begin
		.Ltext0:
				.align	1
				.global	main
				.thumb
				.thumb_func
		main:
		.LFB185:
				@ args = 0, pretend = 0, frame = 2320
				@ frame_needed = 0, uses_anonymous_args = 0
		.LVL0:
				push	{r4, r5, r6, r7, r8, r9, lr}
				subw	sp, sp, #2564
				ldr	r4, .L14+8
		.LPIC0:
				add	r4, pc
				ldr	r3, .L14+12
				ldr	r3, [r4, r3]
				ldr	r3, [r3]
				str	r3, [sp, #2556]
    2 %real i,j
				bl	_imp_initialise(PLT)
		.LVL1:
    3 %on %event 1 %start
				ldr	r3, .L14+16
				str	r4, [sp, #240]
				ldr	r0, [r4, r3]
				movs	r1, #1
				add	r0, r0, #536
				bl	__sigsetjmp(PLT)
		.LVL2:
				cmp	r0, #0
				bne	.L3
		.LVL3:
				ldr	r3, .L14+16
				ldr	r2, [sp, #240]
				ldr	r3, [r2, r3]
				str	r3, [sp, #244]
				movs	r1, #2
				mov	r0, r3
				bl	_imp_on_event_enter(PLT)
		.LVL4:
				cbz	r0, .L3
    4      ->trap
    5 %finish
    6 i=2
    7 %cycle
    8 j=i; i=I+I
    9 %if i<00.00001 %or j>=i %then printstring("Oflow missed") %and %stop
				vmov.f32	s15, #4.0e+0
				vldr.64	d5, .L14
		.L4:
		.LDL1:
		.LDL2:
		.LDL3:
		.LVL5:
				vadd.f32	s14, s15, s15
		.LVL6:
				vcvt.f64.f32	d6, s14
				vcmpe.f64	d6, d5
				vmrs	APSR_nzcv, FPSCR
				bmi	.L5
				vmov.f32	s15, s14
		.LVL7:
   10 %repeat
				vcmpe.f32	s14, s15
				vmrs	APSR_nzcv, FPSCR
				ble	.L5
   11 printstring("FAIL")
?access
   12 %stop
				mov	r5, #256
				mov	r2, r5
				ldr	r1, .L14+20
		.LPIC1:
				add	r1, pc
				add	r4, sp, #1020
				mov	r0, r4
				bl	memcpy(PLT)
		.LVL9:
				mov	r2, r5
				mov	r1, r4
				add	r4, sp, #252
				mov	r0, r4
				bl	memcpy(PLT)
		.LVL10:
				mov	r2, r5
				mov	r1, r4
				addw	r4, sp, #1532
				mov	r0, r4
				bl	memcpy(PLT)
		.LVL11:
		.LBE30:
		.LBB31:
		.LBB32:
				movs	r2, #240
				addw	r1, sp, #1548
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL12:
				ldm	r4, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL13:
		.LBE32:
		.LBE31:
		.LBB33:
		.LBB34:
				movs	r0, #0
				bl	exit(PLT)
		.LVL14:
		.L3:
		.LBE34:
		.LBE33:
		.LBB35:
				ldr	r7, .L14+24
		.LPIC2:
				add	r7, pc
				mov	r4, #256
				mov	r2, r4
				adds	r1, r7, r4
				add	r5, sp, #1020
				mov	r0, r5
				bl	memcpy(PLT)
		.LVL15:
				mov	r2, r4
				mov	r1, r5
				add	r6, sp, #508
				mov	r0, r6
				bl	memcpy(PLT)
		.LVL16:
				mov	r2, r4
				mov	r1, r6
				addw	r6, sp, #1788
				mov	r0, r6
				bl	memcpy(PLT)
		.LVL17:
		.LBE35:
		.LBB36:
		.LBB37:
				mov	r8, #240
				mov	r2, r8
				addw	r1, sp, #1804
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL18:
				ldm	r6, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL19:
		.LBE37:
		.LBE36:
		.LBB38:
		.LBB39:
				ldr	r3, .L14+16
				ldr	r2, [sp, #240]
				ldr	r9, [r2, r3]
		.LBE39:
		.LBE38:
   13 trap:
   14 printstring("event trapped ")
				b	.L4
		.LVL8:
		.L5:
		.LBB30:
   15 write(eventinf>>8,5); write(eventinf&255,5)
				ldr	r0, [r9, #8]
				movs	r1, #5
				lsrs	r0, r0, #8
				bl	_imp_writeint(PLT)
		.LVL20:
   16 newline
				movs	r1, #5
				ldrb	r0, [r9, #8]	@ zero_extendqisi2
				bl	_imp_writeint(PLT)
		.LVL21:
		.LBB40:
		.LBB41:
				bl	_imp_newline(PLT)
		.LVL22:
		.LBE41:
		.LBE40:
		.LBB42:
   17 printstring("Line of failure =")
				mov	r2, r4
				add	r1, r7, #512
				mov	r0, r5
				bl	memcpy(PLT)
		.LVL23:
				mov	r2, r4
				mov	r1, r5
				add	r6, sp, #764
				mov	r0, r6
				bl	memcpy(PLT)
		.LVL24:
				mov	r2, r4
				mov	r1, r6
				addw	r6, sp, #2044
				mov	r0, r6
				bl	memcpy(PLT)
		.LVL25:
		.LBE42:
		.LBB43:
		.LBB44:
				mov	r2, r8
				addw	r1, sp, #2060
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL26:
				ldm	r6, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL27:
		.LBE44:
		.LBE43:
   18 write(eventline,4)
				movs	r1, #4
				ldr	r0, [r9, #524]
				bl	_imp_writeint(PLT)
		.LVL28:
		.LBB45:
		.LBB46:
				bl	_imp_newline(PLT)
		.LVL29:
		.LBE46:
		.LBE45:
		.LBB47:
   19 newline
   20 printstring("Test OK")
				mov	r2, r4
				add	r1, r7, #768
				mov	r0, r5
				bl	memcpy(PLT)
		.LVL30:
				mov	r2, r4
				mov	r1, r5
				addw	r5, sp, #1276
				mov	r0, r5
				bl	memcpy(PLT)
		.LVL31:
				mov	r2, r4
				mov	r1, r5
				addw	r4, sp, #2300
				mov	r0, r4
				bl	memcpy(PLT)
		.LVL32:
		.LBE47:
		.LBB48:
		.LBB49:
				mov	r2, r8
				addw	r1, sp, #2316
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL33:
				ldm	r4, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL34:
		.LBE49:
		.LBE48:
		.LBB50:
		.LBB51:
				movs	r0, #0
				bl	exit(PLT)
		.LVL35:
		.L15:
				.align	3
		.L14:
				.word	-1998362383
				.word	1055193269
				.word	_GLOBAL_OFFSET_TABLE_-(.LPIC0+4)
				.word	__stack_chk_guard(GOT)
				.word	_imp_event(GOT)
				.word	.LANCHOR0-(.LPIC1+4)
				.word	.LANCHOR0-(.LPIC2+4)
		.LBE51:
		.LBE50:
		.LFE185:
				.section	.rodata
				.align	2
				.set	.LANCHOR0,. + 0
		.LC0:
				.byte	12
				.ascii	"Oflow missed\000"
				.space	242
		.LC2:
				.byte	14
				.ascii	"event trapped \000"
				.space	240
		.LC3:
				.byte	17
				.ascii	"Line of failure =\000"
				.space	237
		.LC4:
				.byte	7
				.ascii	"Test OK\000"
				.space	247
		.Letext0:
   21 %endofprogram
   22 Statements compiled