Edinburgh IMP77 Compiler - Version 8.4
    1 %begin
				NO_APP
		.Ltext0:
				.align	2
				.globl	main
		main:
		.LFB185:
		.LVL0:
		 		link.w %fp,#0
    2   %integer fred, jim, i
		 		move.l 12(%fp),-(%sp)
		 		move.l 8(%fp),-(%sp)
		 		jsr _imp_initialise
		.LVL1:
		 		addq.l #8,%sp
		.L2:
		.LVL2:
		 		jra .L2
		.LFE185:
		.Letext0:
    3 first:
    4   jim = 1
    5   %if jim = 1 %then -> first
    6   jim = 2
    7   %if jim = 2 %then -> second
    8   %for fred = 1, 10, jim %cycle
    9     %if i = 55 %then %continue
   10     %if i = 99 %then %exit
   11     i = i+1
   12   %repeat
   13   %while fred < jim %cycle
   14     %if i = 55 %then %continue
   15     %if i = 99 %then %exit
   16     i = i+1
   17   %repeat
   18   %cycle
   19     %if i = 55 %then %continue
   20     %if i = 99 %then %exit
   21     i = i+1
   22   %repeat %until fred = jim
   23   %cycle
   24     %if i = 55 %then %continue
   25     %if i = 99 %then %exit
   26     i = i+1
   27   %repeat
   28 second:
   29 %endofprogram
   27 Statements compiled