Edinburgh IMP77 Compiler - Version 8.4
    1 ! test with ./i2c --stdout --cstrings --icode --perms noperms.inc fndef.imp
		.Ltext0:
				.globl	next_free_bound_index
				.bss
				.align 4
		next_free_bound_index:
				.zero	4
				.comm	_lb,384,32
				.comm	_ub,384,32
				.globl	XYZ
		XYZ:
		.LFB189:
    2
    3 %external %integer %fn xyz(%integer p,q)
				pushl	%ebp
				movl	%esp, %ebp
				call	__x86.get_pc_thunk.ax
				addl	$_GLOBAL_OFFSET_TABLE_, %eax
    4   %result = p+q
				movl	8(%ebp), %edx
				movl	12(%ebp), %eax
				addl	%edx, %eax
    5 %end
				popl	%ebp
				ret
		.LFE189:
				.section	.text.__x86.get_pc_thunk.ax,"axG",@progbits,__x86.get_pc_thunk.ax,comdat
				.globl	__x86.get_pc_thunk.ax
				.hidden	__x86.get_pc_thunk.ax
		__x86.get_pc_thunk.ax:
		.LFB190:
				movl	(%esp), %eax
				ret
		.LFE190:
		.Letext0:
    6
    7 %endoffile
    4 Statements compiled