Edinburgh IMP77 Compiler - Version 8.4
    1 %begin
				.machinemode zarch
				.machine "zEC12"
		.text
		.Ltext0:
				.section	.rodata.str1.2,"aMS",@progbits,1
				.align	2
		.LC1:
				.string	"Illegal cycle I = 0, 2, 17"
				.section	.rodata
				.align	2
		.LC0:
				.byte	20
				.string	"test-new/forever.imp"
				.zero	234
		.text
				.align	8
		.globl main
		main:
		.LFB185:
		.LVL0:
				stmg	%r6,%r15,48(%r15)
				lay	%r15,-1456(%r15)
				ear	%r1,%a0
				sllg	%r1,%r1,32
				ear	%r1,%a1
				mvc	1448(8,%r15),40(%r1)
    2   %integer i
				brasl	%r14,_imp_initialise@PLT
		.LVL1:
    3   i = 42
    4   %for i = 0, 2, 17 %cycle
    5     %continue %if i <= 4
				lgrl	%r1,_imp_current_file@GOTENT
				ltg	%r3,0(%r1)
				je	.L2
				la	%r2,936(%r15)
				brasl	%r14,_imp_c2istr@PLT
		.LVL2:
		.L3:
				lgrl	%r1,_imp_current_line@GOTENT
				lt	%r11,0(%r1)
				ltr	%r11,%r11
				lhi	%r1,5
				locrne	%r1,%r11
				lr	%r11,%r1
				larl	%r3,.LC1
				la	%r2,1192(%r15)
				brasl	%r14,_imp_c2istr@PLT
		.LVL3:
				mvc	424(256,%r15),936(%r15)
				mvc	168(256,%r15),1192(%r15)
				mvghi	160(%r15),0
				lghi	%r6,1
				lghi	%r5,5
				la	%r4,168(%r15)
				lgfr	%r3,%r11
				la	%r2,424(%r15)
				brasl	%r14,_signal_event@PLT
		.LVL4:
		.L5:
		.L8:
				j	.L5
		.LVL5:
		.L2:
		.LBB6:
				larl	%r1,.LC0
				mvc	1192(256,%r15),0(%r1)
				mvc	680(256,%r15),1192(%r15)
		.LBE6:
				mvc	936(256,%r15),680(%r15)
				j	.L3
		.L6:
		.L7:
		.LFE185:
		.Letext0:
    6     %exit %if i = 5
    7   %repeat
    8 %endofprogram
    8 Statements compiled