Edinburgh IMP77 Compiler - Version 8.4
    1 %realslong
				NO_APP
		.Ltext0:
				.align	2
				.globl	main
		main:
		.LFB185:
    2 %begin
		.LVL0:
		 		link.w %fp,#0
    3   %real r
		 		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:
    4   %integer a, b, i
    5
    6   r = i
    7
    8   r = i * 1
    9
   10   r = i * 1.0
   11
   12   i = INTPT(r)
   13
   14   i = a // b
   15
   16   r = a / b
   17
   18   r = a // b
   19
   20 %endofprogram
   12 Statements compiled