Edinburgh IMP77 Compiler - Version 8.4
    1 %externalroutine toplev
		.Ltext0:
				.globl	TOPLEV
		TOPLEV:
		.LFB185:
		.L2:
		.L3:
		.LVL0:
				jmp	.L2
		.LFE185:
		.Letext0:
    2   %longreal lr1
    3   %integer i, i1 = 1, i2 = 2, i3 = 3
    4
    5   i = i1 %if i2 = i3
    6 %comment  i = i1 %if i2 = i3
    7   i = i1 %while i2 = i3
    8 %comment  i = i1 %while i2 = i3
    9   i = i1 %until i2 = i3
   10 %comment  i = i1 %until i2 = i3
   11   i = i1 %unless i2 = i3
   12 %comment  i = i1 %unless i2 = i3
   13   i = i1 %for i2 = i3, 1, i1
   14 %comment  i = i1 %for i2 = i3, 1, i1
   15
   16 %comment
   17   i = i1 %and i1 = i2 %if i2 = i3
   18 %comment  i = i1 %and i1 = i2 %if i2 = i3
   19   i = i1 %and i1 = i2 %while i2 = i3
   20 %comment  i = i1 %and i1 = i2 %while i2 = i3
   21   i = i1 %and i1 = i2 %until i2 = i3
   22 %comment  i = i1 %and i1 = i2 %until i2 = i3
   23   i = i1 %and i1 = i2 %unless i2 = i3
   24 %comment  i = i1 %and i1 = i2 %unless i2 = i3
   25   i = i1 %and i1 = i2 %for i2 = i3, 1, i1
   26 %comment  i = i1 %and i1 = i2 %for i2 = i3, 1, i1
   27
   28 %end
?LR1 unused
   29 %endoffile
   15 Statements compiled