Edinburgh IMP77 Compiler - Version 8.4
    1 %begin
				.section	".text"
		.Ltext0:
				.align 4
				.global main
				.proc	04
		main:
		.LFB185:
		.LVL0:
				save	%sp, -176, %sp
		.LVL1:
    2   %integerfn fred(%integer i, j, k)
				mov	%i1, %o1
				call	_imp_initialise, 0
				 mov	%i0, %o0
		.LVL2:
		.LBB4:
		.LBB5:
				call	exit, 0
				 mov	0, %o0
		.LVL3:
		.LBE5:
		.LBE4:
				nop
		.LFE185:
		.Letext0:
    3     %result = i+j+k
    4   %end
    5   %integer q
    6   q = fred (1, 2, 3)
    7   q = fred (fred(1, 2, 3), 4, 5)
    8   q = fred (1, fred(2,3,4), 5)
    9   q = fred (1, 2, fred(3,4,5))
   10   q = fred (fred(1,2,3), fred(4,5,6), 7)
   11   q = fred (fred(1,2,3), 4, fred(5,6,7))
   12   q = fred (1, fred(2,3,4), fred(5,6,7))
   13   q = fred (fred(1,2,3), fred(4,5,6), fred(7,8,9))
   14 %endofprogram
   14 Statements compiled