Edinburgh IMP77 Compiler - Version 8.4
    1 %begin
				.section	".text"
		.Ltext0:
				.align 4
				.global main
				.proc	04
		main:
		.LFB185:
				.register	%g2, #scratch
		.LVL0:
				save	%sp, -176, %sp
		.LVL1:
    2   %owninteger      io
				mov	%i1, %o1
				call	_imp_initialise, 0
				 mov	%i0, %o0
		.LVL2:
		.L2:
		.L3:
    3   %integer         i
    4   %integername     in
    5   %externalinteger ie
    6   %integerarray    ia(0:9)
    7   %integerfn       ifn(%integer i)
    8     %result = 1
    9   %end
?I unused
   10   %integerfn       ifn2
   11     %result = 1
   12   %end
   13   %integermap      im(%integer i)
   14     %result ==  io
   15   %end
?I unused
   16   %integermap      im2
   17     %result ==  io
   18   %end
   19   %routine         ir(%integer n)
   20   %end
?N unused
   21   %recordformat    rf(%integer i)
   22   %recordformat    rfa(%integerarray ia(0:9))
   23   %record(rfa)%map   rm
   24     %ownrecord(rfa) orec
   25     %result == orec
   26   %end
   27   %record(rf)%array  rec(0:9)
   28   %switch          sw(0:9)
   29
   30   sw(1):
   31   %comment sw(1):
   32
   33   io = 1
				sethi	%hi(IO.6056), %g1
				mov	1, %g2
				st	%g2, [%g1+%lo(IO.6056)]
		.LVL3:
		.LBB10:
		.LBB11:
				call	exit, 0
				 mov	0, %o0
		.LVL4:
		.LBE11:
		.LBE10:
				nop
		.LFE185:
				.common	IO.6056,4,4
		.Letext0:
   34   %comment io = 1
   35
   36   ie = 1
   37   %comment ie = 1
   38
   39   ia(1) = 1
   40   %comment ia(1) = 1
   41
   42   i = ifn(1)
   43   %comment i = ifn(1)
   44
   45   i = ifn2
   46   %comment i = ifn2
   47
   48   i = im(1)
   49   %comment i = im(1)
   50
   51   in == im(1)
   52   %comment in == im(1)
   53
   54   im(1) = 1
   55   %comment im(1) = 1
   56
   57   im2 = 1
   58   %comment im2 = 1
   59
   60   rec(1)_i = 1
   61   %comment rec(1)_i = 1
   62
   63   ir(1)
   64   %comment ir(1)
   65
   66   in == ia(1)
   67   %comment in == ia(1)
   68
   69   i = ia(1)
   70   %comment i = ia(1)
   71
   72   i = rm_ia(1)
   73   %comment i = rm_ia(1)
   74
   75   in == rm_ia(1)
   76   %comment in = rm_ia(1)
   77
   78 %endofprogram
   44 Statements compiled