Edinburgh IMP77 Compiler - Version 8.4
    1 %begin
				NO_APP
		.Ltext0:
				.align	2
		TEST.5987:
		.LFB186:
		.LVL7:
		 		link.w %fp,#-60
		 		move.l %a2,-(%sp)
    2   %routine test(%name param)         ;! ia1         ia2
		.LVL0:
		 		link.w %fp,#0
		 		move.l %a3,-(%sp)
		 		move.l %a2,-(%sp)
		 		move.l 12(%fp),-(%sp)
		 		move.l 8(%fp),-(%sp)
		 		jsr _imp_initialise
		.LVL8:
    3     write(addr(param),0)  ; newline  ;! 2145833816  2145833816    are these the same because it's the address of the
		 		clr.l -(%sp)
		 		move.l 8(%fp),-(%sp)
		 		lea _imp_writeint,%a3
		 		jsr (%a3)
		.LVL1:
		.LBB12:
		.LBB13:
		 		lea _imp_newline,%a2
		 		jsr (%a2)
		.LVL2:
		.LBE13:
		.LBE12:
    4                                       !                           %name param rather than the array it points to?
    5     write(sizeof(param),0); newline  ;! 4           4
		 		clr.l -(%sp)
		 		pea 12.w
		 		jsr (%a3)
		.LVL3:
		.LBB14:
		.LBB15:
		 		jsr (%a2)
		.LVL4:
		.LBE15:
		.LBE14:
    6     write(typeof(param),0); newline  ;! 1           1
		 		clr.l -(%sp)
		 		pea 4.w
		 		jsr (%a3)
		.LVL5:
		.LBB16:
		.LBB17:
		 		jsr (%a2)
		.LVL6:
		.LBE17:
		.LBE16:
    7   %end
		 		lea (24,%sp),%sp
    8
		 		move.l -8(%fp),%a2
		 		move.l -4(%fp),%a3
		 		unlk %fp
		 		rts
		.LFE186:
				.align	2
				.globl	main
		main:
		.LFB185:
    9   %integerarray ia1(3:5)
   10   %integerarray ia2(2:4,3:6)
   11
   12   test(ia1)
		 		pea -12(%fp)
		 		lea TEST.5987,%a2
		 		jsr (%a2)
		.LVL9:
   13   test(ia2)
		 		pea -60(%fp)
		 		jsr (%a2)
		.LVL10:
		.LBB18:
		.LBB19:
		 		clr.l -(%sp)
		 		jsr exit
		.LVL11:
		.LBE19:
		.LBE18:
		.LFE185:
		.Letext0:
   14
   15 %endofprogram
   14 Statements compiled