Edinburgh IMP77 Compiler - Version 8.4
    1 %begin
		.Ltext0:
				.align	2
				.global	main
		main:
		.LFB185:
		.LVL0:
				sub	sp, sp, #2656
				stp	x29, x30, [sp]
				add	x29, sp, 0
				stp	x19, x20, [sp, 16]
				stp	x21, x22, [sp, 32]
				stp	x23, x24, [sp, 48]
				str	x25, [sp, 64]
				adrp	x2, :got:__stack_chk_guard
				ldr	x2, [x2, #:got_lo12:__stack_chk_guard]
				ldr	x3, [x2]
				str	x3, [x29, 2648]
				mov	x3,0
    2 %real i,j
				bl	_imp_initialise
		.LVL1:
    3 %on %event 1 %start
				mov	w1, 1
				adrp	x0, :got:_imp_event
				ldr	x0, [x0, #:got_lo12:_imp_event]
				add	x0, x0, 536
				bl	__sigsetjmp
		.LVL2:
				cbnz	w0, .L3
		.LVL3:
				mov	w1, 2
				adrp	x0, :got:_imp_event
				ldr	x0, [x0, #:got_lo12:_imp_event]
				bl	_imp_on_event_enter
		.LVL4:
				cbz	x0, .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
				fmov	s0, 4.0e+0
				adrp	x0, .LC5
				ldr	d3, [x0, #:lo12:.LC5]
		.L4:
		.LDL1:
		.LDL2:
		.LDL3:
		.LVL5:
				fadd	s1, s0, s0
		.LVL6:
				fcvt	d2, s1
				fcmpe	d2, d3
				bmi	.L5
				fmov	s0, s1
		.LVL7:
   10 %repeat
				fcmpe	s1, s0
				ble	.L5
   11 printstring("FAIL")
?access
   12 %stop
				add	x20, x29, 1112
				mov	x21, 256
				mov	x2, x21
				adrp	x1, .LANCHOR0
				add	x1, x1, :lo12:.LANCHOR0
				mov	x0, x20
				bl	memcpy
		.LVL9:
				add	x19, x29, 344
				mov	x2, x21
				mov	x1, x20
				mov	x0, x19
				bl	memcpy
		.LVL10:
				add	x20, x29, 1624
				mov	x2, x21
				mov	x1, x19
				mov	x0, x20
				bl	memcpy
		.LVL11:
		.LBE30:
		.LBB31:
		.LBB32:
				add	x19, x29, 80
				mov	x2, x21
				mov	x1, x20
				mov	x0, x19
				bl	memcpy
		.LVL12:
				mov	x0, x19
				bl	_imp_printstring
		.LVL13:
		.LBE32:
		.LBE31:
		.LBB33:
		.LBB34:
				mov	w0, 0
				bl	exit
		.LVL14:
		.L3:
		.LBE34:
		.LBE33:
		.LBB35:
				adrp	x22, .LANCHOR0
				add	x22, x22, :lo12:.LANCHOR0
				add	x21, x29, 1112
				mov	x19, 256
				mov	x2, x19
				add	x1, x22, x19
				mov	x0, x21
				bl	memcpy
		.LVL15:
				add	x20, x29, 600
				mov	x2, x19
				mov	x1, x21
				mov	x0, x20
				bl	memcpy
		.LVL16:
				add	x23, x29, 1880
				mov	x2, x19
				mov	x1, x20
				mov	x0, x23
				bl	memcpy
		.LVL17:
		.LBE35:
		.LBB36:
		.LBB37:
				add	x20, x29, 80
				mov	x2, x19
				mov	x1, x23
				mov	x0, x20
				bl	memcpy
		.LVL18:
				mov	x0, x20
				bl	_imp_printstring
		.LVL19:
		.LBE37:
		.LBE36:
		.LBB38:
		.LBB39:
				adrp	x23, :got:_imp_event
				ldr	x23, [x23, #:got_lo12:_imp_event]
		.LBE39:
		.LBE38:
   13 trap:
   14 printstring("event trapped ")
				b	.L4
		.LVL8:
		.L5:
		.LBB30:
   15 write(eventinf>>8,5); write(eventinf&255,5)
				ldr	w0, [x23, 8]
				mov	w1, 5
				lsr	w0, w0, 8
				bl	_imp_writeint
		.LVL20:
   16 newline
				mov	w1, 5
				ldrb	w0, [x23, 8]
				bl	_imp_writeint
		.LVL21:
		.LBB40:
		.LBB41:
				bl	_imp_newline
		.LVL22:
		.LBE41:
		.LBE40:
		.LBB42:
   17 printstring("Line of failure =")
				mov	x2, x19
				add	x1, x22, 512
				mov	x0, x21
				bl	memcpy
		.LVL23:
				add	x25, x29, 856
				mov	x2, x19
				mov	x1, x21
				mov	x0, x25
				bl	memcpy
		.LVL24:
				add	x24, x29, 2136
				mov	x2, x19
				mov	x1, x25
				mov	x0, x24
				bl	memcpy
		.LVL25:
		.LBE42:
		.LBB43:
		.LBB44:
				mov	x2, x19
				mov	x1, x24
				mov	x0, x20
				bl	memcpy
		.LVL26:
				mov	x0, x20
				bl	_imp_printstring
		.LVL27:
		.LBE44:
		.LBE43:
   18 write(eventline,4)
				mov	w1, 4
				ldr	w0, [x23, 524]
				bl	_imp_writeint
		.LVL28:
		.LBB45:
		.LBB46:
				bl	_imp_newline
		.LVL29:
		.LBE46:
		.LBE45:
		.LBB47:
   19 newline
   20 printstring("Test OK")
				mov	x2, x19
				add	x1, x22, 768
				mov	x0, x21
				bl	memcpy
		.LVL30:
				add	x22, x29, 1368
				mov	x2, x19
				mov	x1, x21
				mov	x0, x22
				bl	memcpy
		.LVL31:
				add	x21, x29, 2392
				mov	x2, x19
				mov	x1, x22
				mov	x0, x21
				bl	memcpy
		.LVL32:
		.LBE47:
		.LBB48:
		.LBB49:
				mov	x2, x19
				mov	x1, x21
				mov	x0, x20
				bl	memcpy
		.LVL33:
				mov	x0, x20
				bl	_imp_printstring
		.LVL34:
		.LBE49:
		.LBE48:
		.LBB50:
		.LBB51:
				mov	w0, 0
				bl	exit
		.LVL35:
		.LBE51:
		.LBE50:
		.LFE185:
				.section	.rodata.cst8,"aM",@progbits,8
				.align	3
		.LC5:
				.word	-1998362383
				.word	1055193269
				.section	.rodata
				.align	3
				.set	.LANCHOR0,. + 0
		.LC0:
				.byte	12
				.string	"Oflow missed"
				.zero	242
		.LC2:
				.byte	14
				.string	"event trapped "
				.zero	240
		.LC3:
				.byte	17
				.string	"Line of failure ="
				.zero	237
		.LC4:
				.byte	7
				.string	"Test OK"
				.zero	247
		.Letext0:
   21 %endofprogram
   22 Statements compiled