Edinburgh IMP77 Compiler - Version 8.4
    1 %begin
				NO_APP
		.Ltext0:
				.align	2
				.globl	main
		main:
		.LFB185:
		.LVL0:
		 		link.w %fp,#0
    2   %routine zero(%integer i)
		 		move.l 12(%fp),-(%sp)
		 		move.l 8(%fp),-(%sp)
		 		jsr _imp_initialise
		.LVL1:
		.LBB6:
		.LBB7:
		 		clr.l -(%sp)
		 		jsr exit
		.LVL2:
		.LBE7:
		.LBE6:
		.LFE185:
		.Letext0:
    3     ! This is actually a Robertson pass1 bug: if (&i != &0) ...
    4     ! == should not be allowed against simple integers
    5     %if i==0 %start
    6     %finish
    7   %end
    8
    9   zero(1)
   10
   11 %endofprogram
    7 Statements compiled