Edinburgh IMP77 Compiler - Version 8.4
    1 %begin
				.section	".text"
		.Ltext0:
				.align 4
				.proc	020
		DOHANOI.6060:
		.LFB186:
		.LVL15:
				save	%sp, -1472, %sp
		.LVL16:
				ldx	[%g7+40], %g1
				stx	%g1, [%fp+2039]
				mov	0, %g1
    2   %routine do hanoi(%integer n, f, t, u)
				.register	%g2, #scratch
				.register	%g7, #ignore
		.LVL0:
				save	%sp, -3520, %sp
		.LVL1:
				ldx	[%g7+40], %g1
				stx	%g1, [%fp+2039]
				mov	0, %g1
				mov	%i1, %o1
				call	_imp_initialise, 0
				 mov	%i0, %o0
		.LVL17:
				mov	3, %o3
				mov	2, %o2
				mov	1, %o1
				call	DOHANOI.6060, 0
				 mov	4, %o0
		.LVL18:
		.LBB47:
		.LBB48:
    3     do hanoi(n - 1, f, u, t) %if n >= 2
				cmp	%i0, 1
				bg,pn	%icc, .L5
				 add	%i0, -1, %o0
		.L2:
		.LVL2:
		.LBB34:
		.LBB35:
		.LBB36:
		.LBB37:
		.LBB38:
		.LBB39:
		.LBB40:
		.LBB41:
				mov	0, %o2
		.L8:
				mov	%i1, %o1
				call	_imp_itos, 0
				 add	%fp, 1783, %o0
		.LVL3:
		.LBE41:
		.LBE40:
		.LBE39:
    4     print string("Move disk from ".itos(f,0)." to ".itos(t,0).to string(nl))
				mov	%i2, %o3
				mov	%i3, %o2
				mov	%i1, %o1
				call	DOHANOI.6060, 0
				 sra	%o0, 0, %o0
		.LVL12:
				ba,pt	%xcc, .L8
				 mov	0, %o2
		.L6:
    5     do hanoi(n - 1, u, t, f) %if n >= 2
				cmp	%i0, 1
				bg,a,pn	%icc, .L6
				 add	%i0, -1, %i0
		.L3:
		.L1:
    6   %end
				add	%fp, 247, %o2
				add	%fp, -9, %o1
				call	_imp_join, 0
				 add	%fp, -265, %o0
		.LVL4:
		.LBE38:
				add	%fp, 503, %o2
				add	%fp, -265, %o1
				call	_imp_join, 0
				 add	%fp, -521, %o0
		.LVL5:
		.LBE37:
		.LBB42:
		.LBB43:
		.LBB44:
				mov	0, %o2
				mov	%i2, %o1
				call	_imp_itos, 0
				 add	%fp, 1527, %o0
		.LVL6:
		.LBE44:
		.LBE43:
		.LBE42:
				add	%fp, 759, %o2
				add	%fp, -521, %o1
				call	_imp_join, 0
				 add	%fp, -777, %o0
		.LVL7:
		.LBE36:
				add	%fp, 1015, %o2
				add	%fp, -777, %o1
				call	_imp_join, 0
				 add	%fp, 1271, %o0
		.LVL8:
				mov	256, %o2
				add	%fp, -1033, %o1
				call	memcpy, 0
				 add	%fp, 1271, %o0
		.LVL9:
		.LBE35:
		.LBE34:
		.LBB45:
		.LBB46:
				mov	256, %o2
				add	%fp, 1271, %o1
				call	memcpy, 0
				 add	%fp, -1297, %o0
		.LVL10:
				call	_imp_printstring, 0
				 add	%fp, -1297, %o0
		.LVL11:
		.LBE46:
		.LBE45:
				mov	%i1, %o3
				mov	%i2, %o2
				mov	%i3, %o1
				call	DOHANOI.6060, 0
				 sra	%i0, 0, %o0
		.LVL13:
				ba,pt	%xcc, .L1
				 nop
		.L7:
				call	__stack_chk_fail, 0
				 nop
		.LVL14:
				nop
		.LFE186:
				.align 4
				.global main
				.proc	04
		main:
		.LFB185:
    7   do hanoi(4, 1, 2, 3)
				ldx	[%fp+2039], %g1
				ldx	[%g7+40], %g2
				xor	%g1, %g2, %g1
				mov	0, %g2
				brnz,pn	%g1, .L7
				 nop
				return	%i7+8
				 nop
		.L5:
    8   print string("Towers of Hanoi puzzle completed!".to string(nl))
    9 %end %of %program
    9 Statements compiled
				add	%fp, 1527, %o2
				add	%fp, 1271, %o1
				call	_imp_join, 0
				 add	%fp, 1783, %o0
		.LVL19:
				mov	256, %o2
				add	%fp, 1015, %o1
				call	memcpy, 0
				 add	%fp, 1783, %o0
		.LVL20:
		.LBE48:
		.LBE47:
		.LBB49:
		.LBB50:
				mov	256, %o2
				add	%fp, 1783, %o1
				call	memcpy, 0
				 add	%fp, 751, %o0
		.LVL21:
				call	_imp_printstring, 0
				 add	%fp, 751, %o0
		.LVL22:
		.LBE50:
		.LBE49:
		.LBB51:
		.LBB52:
				call	exit, 0
				 mov	0, %o0
		.LVL23:
		.LBE52:
		.LBE51:
				nop
		.LFE185:
		.Letext0: