Edinburgh IMP77 Compiler - Version 8.4
    1 %externalinteger external int
		.Ltext0:
				.globl	next_free_bound_index
				.bss
				.align 4
		next_free_bound_index:
				.zero	4
				.comm	_lb,384,32
				.comm	_ub,384,32
				.comm	EXTERNALINT,4,4
		LOCALROUTINE:
		.LFB189:
    2 %externalintegerspec nonlocal external int
    3
    4 %routine local routine   ;! is this exported? (in Imp77)
				pushl	%ebp
				movl	%esp, %ebp
				call	__x86.get_pc_thunk.ax
				addl	$_GLOBAL_OFFSET_TABLE_, %eax
    5   external int = 1
				movl	EXTERNALINT@GOT(%eax), %eax
				movl	$1, (%eax)
    6 %end
				nop
				popl	%ebp
				ret
		.LFE189:
				.globl	EXTERNALRT
		EXTERNALRT:
		.LFB190:
    7
    8 %external %routine external rt
				pushl	%ebp
				movl	%esp, %ebp
				call	__x86.get_pc_thunk.ax
				addl	$_GLOBAL_OFFSET_TABLE_, %eax
    9   local routine
				call	LOCALROUTINE
   10 %end
				nop
				popl	%ebp
				ret
		.LFE190:
				.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:
		.LFB191:
				movl	(%esp), %eax
				ret
		.LFE191:
		.Letext0:
   11
   12 %endoffile
    9 Statements compiled