Edinburgh IMP77 Compiler - Version 8.4
    1 %begin
		.Ltext0:
		_imp_EVENTNO:
		.LFB1:
				pushl	%ebp
				movl	%esp, %ebp
				call	__x86.get_pc_thunk.ax
				addl	$_GLOBAL_OFFSET_TABLE_, %eax
				movl	_imp_event@GOT(%eax), %eax
				movl	(%eax), %eax
				popl	%ebp
				ret
		.LFE1:
		_imp_SELECTINPUT:
		.LFB93:
				pushl	%ebp
				movl	%esp, %ebp
				pushl	%ebx
				subl	$4, %esp
				call	__x86.get_pc_thunk.ax
				addl	$_GLOBAL_OFFSET_TABLE_, %eax
				cmpl	$0, 8(%ebp)
				js	.L6
				movl	_imp_InStream@GOT(%eax), %edx
				movl	8(%ebp), %ecx
				movl	%ecx, (%edx)
				movl	_imp_infile@GOT(%eax), %ecx
				movl	8(%ebp), %edx
				imull	$276, %edx, %edx
				addl	%ecx, %edx
				addl	$4, %edx
				movl	(%edx), %ecx
				movl	_imp_InFile@GOT(%eax), %edx
				movl	%ecx, (%edx)
				subl	$12, %esp
				leal	__PRETTY_FUNCTION__.5621@GOTOFF(%eax), %edx
				pushl	%edx
				movl	%eax, %ebx
				call	check_instream@PLT
				addl	$16, %esp
				jmp	.L3
		.L6:
				nop
		.L3:
				movl	-4(%ebp), %ebx
				leave
				ret
		.LFE93:
		LOAD.6022:
		.LFB190:
				leal	4(%esp), %ecx
				andl	$-16, %esp
				pushl	-4(%ecx)
				pushl	%ebp
				movl	%esp, %ebp
				pushl	%edi
				pushl	%esi
				pushl	%ebx
				pushl	%ecx
				subl	$5880, %esp
				call	__x86.get_pc_thunk.si
				addl	$_GLOBAL_OFFSET_TABLE_, %esi
				movl	%esi, -5872(%ebp)
				movl	%ecx, %eax
				movl	4(%eax), %edx
				movl	%edx, -5868(%ebp)
				movl	%gs:20, %ebx
				movl	%ebx, -28(%ebp)
				xorl	%ebx, %ebx
				leal	8(%ebp), %edx
				movl	%edx, -32(%ebp)
				subl	$8, %esp
				pushl	-5868(%ebp)
				pushl	(%eax)
				movl	%esi, %ebx
				call	_imp_initialise@PLT
				addl	$16, %esp
    2 !%externalstring(255)%fnspec itos(%integer i,n)
    3 !%externalroutinespec openinput(%integer stream, %string(255) filename)
    4 !%externalroutinespec openoutput(%integer stream, %string(255) filename)
    5
    6 %routinespec load
    7 %routinespec nextch
    8 %routinespec find(%integer x)
    9 %routinespec monitor(%integer n)
   10 %constinteger marker=16_ffffc000
   11 %conststring(1) snl = "
				leal	-288(%ebp), %edx
				movl	$0, %eax
				movl	$64, %ecx
				movl	%edx, %edi
				rep stosl
				movb	$1, -288(%ebp)
				movb	$10, -287(%ebp)
   12 "
   13 %ownshortintegerarray st(0:10000)=%c
				leal	-5764(%ebp), %edx
				movl	$0, %eax
				movl	$17, %ecx
				movl	%edx, %edi
				rep stosl
				movl	%esi, %ebx
				leal	ST.6030@GOTOFF(%ebx), %eax
				movl	%eax, -5764(%ebp)
				movl	$2, -5760(%ebp)
   14    -1,4,'d','e','f',-1,
   15    0,4,'v','a','l',-2,
   16    6,7,'u','p','d','a','t','e',-3,
   17    12,4,'b','i','n',-4,
   18    21,4,'d','e','c',-5,
   19    27,4,'b','a','r',-6,
   20    0(9962)
   21 %owninteger e=33, s=39
   22 %integer a, w, w1, h, p, f, c, q, e0, f0, h0, r
   23 %string(63) filename
   24 %switch mcm(1:6)
   25
   26   %on %event {0,} 9 %start
				subl	$8, %esp
				pushl	$1
				movl	%esi, %ebx
				movl	_imp_event@GOT(%ebx), %eax
				leal	532(%eax), %eax
				pushl	%eax
				call	__sigsetjmp@PLT
				addl	$16, %esp
				testl	%eax, %eax
				jne	.L17
		.LBB141:
				movl	$9, -3904(%ebp)
				movl	$0, -5840(%ebp)
		.LBB142:
				movl	$0, -5836(%ebp)
				jmp	.L18
		.L19:
				movl	-5836(%ebp), %eax
				movl	-3904(%ebp,%eax,4), %eax
				movl	$1, %edx
				movl	%eax, %ecx
				sall	%cl, %edx
				movl	%edx, %eax
				orl	%eax, -5840(%ebp)
				addl	$1, -5836(%ebp)
		.L18:
				cmpl	$0, -5836(%ebp)
				je	.L19
		.LBE142:
				movl	-5840(%ebp), %eax
		.LBE141:
				subl	$8, %esp
				pushl	%eax
				movl	-5872(%ebp), %ebx
				movl	_imp_event@GOT(%ebx), %eax
				pushl	%eax
				call	_imp_on_event_enter@PLT
				addl	$16, %esp
				testl	%eax, %eax
				jne	.L205
		.L17:
				nop
		.L20:
   27     %if eventno{event_event} = 9 %then %start
				call	_imp_EVENTNO
				cmpl	$9, %eax
				jne	.L206
				nop
		.L22:
		.LBB143:
		.LBB144:
		.LBB145:
		.LBB146:
   28       select input(0)
				subl	$12, %esp
				pushl	$0
				call	_imp_SELECTINPUT
				addl	$16, %esp
   29       ->start
				jmp	.L59
		.L206:
   30     %finish %else print string(snl."GPM terminated".snl)
				leal	-3904(%ebp), %eax
				movl	-5872(%ebp), %ebx
				leal	.LC0@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-3904(%ebp), %edx
		.LBE146:
				leal	-5440(%ebp), %eax
				subl	$4, %esp
				pushl	%edx
				leal	-320(%ebp), %edx
				addl	$32, %edx
				pushl	%edx
				pushl	%eax
				movl	%ebx, %edi
				movl	%edi, %ebx
				call	_imp_join@PLT
				addl	$12, %esp
				leal	-5440(%ebp), %edx
		.LBE145:
				leal	-5696(%ebp), %eax
				subl	$4, %esp
				leal	-320(%ebp), %ecx
				addl	$32, %ecx
				pushl	%ecx
				pushl	%edx
				pushl	%eax
				movl	%edi, -5872(%ebp)
				movl	%edi, %ebx
				call	_imp_join@PLT
				addl	$12, %esp
				leal	-5696(%ebp), %edx
		.LBE144:
				leal	-3904(%ebp), %eax
				movl	%edx, %esi
				movl	$64, %edx
				movl	%eax, %edi
				movl	%edx, %ecx
				rep movsl
				leal	-3904(%ebp), %edx
				leal	-576(%ebp), %eax
				movl	%edx, %esi
				movl	$64, %edx
				movl	%eax, %edi
				movl	%edx, %ecx
				rep movsl
		.LBE143:
		.LBB147:
		.LBB148:
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-576(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				movl	-5872(%ebp), %edi
				movl	%edi, %ebx
				call	_imp_printstring@PLT
				addl	$256, %esp
				movl	$0, -5780(%ebp)
		.LBE148:
		.LBE147:
		.LBB149:
		.LBB150:
				subl	$12, %esp
				pushl	-5780(%ebp)
				movl	%edi, %ebx
				call	exit@PLT
		.L205:
		.LBE150:
		.LBE149:
   31     %stop
   32   %finish
   33
   34    a=0
				movl	$0, %eax
				movl	%eax, -296(%ebp)
   35    w=0
				movl	$0, %eax
				movl	%eax, -304(%ebp)
   36    w1=0
				movl	$0, %eax
				movl	%eax, -320(%ebp)
   37    h=0
				movl	$0, %eax
				movl	%eax, -292(%ebp)
   38    p=0
				movl	$0, %eax
				movl	%eax, -312(%ebp)
   39    f=0
				movl	$0, %eax
				movl	%eax, -316(%ebp)
   40    c=0
				movl	$0, %eax
				movl	%eax, -300(%ebp)
   41    q=1
				movl	$1, -5844(%ebp)
		.L23:
		.L59:
   42
   43 start:nextch
				leal	-320(%ebp), %eax
				movl	%eax, %ecx
				call	NEXTCH.6024
   44    %if a='@' %then %start
				movl	-296(%ebp), %eax
				cmpl	$64, %eax
				jne	.L207
				nop
		.L25:
   45      read(filename)
				leal	-3392(%ebp), %eax
				subl	$8, %esp
				movl	-5872(%ebp), %edi
				movl	%edi, %ebx
				leal	.LC24@GOTOFF(%ebx), %edx
				pushl	%edx
				pushl	%eax
				movl	%edi, %ebx
				call	_imp_c2istr@PLT
				addl	$12, %esp
				movl	%edi, %ebx
				movl	_imp_current_line@GOT(%ebx), %eax
				movl	(%eax), %eax
				testl	%eax, %eax
				je	.L26
				movl	-5872(%ebp), %eax
				movl	_imp_current_line@GOT(%eax), %eax
				movl	(%eax), %eax
				movl	%eax, -5876(%ebp)
				jmp	.L27
		.L26:
				movl	$45, -5876(%ebp)
		.L27:
				movl	-5872(%ebp), %eax
				movl	_imp_current_file@GOT(%eax), %eax
				movl	(%eax), %eax
				testl	%eax, %eax
				je	.L28
				movl	-5872(%ebp), %ebx
				movl	_imp_current_file@GOT(%ebx), %eax
				movl	(%eax), %edx
				leal	-3136(%ebp), %eax
				subl	$8, %esp
				pushl	%edx
				pushl	%eax
				call	_imp_c2istr@PLT
				addl	$12, %esp
				jmp	.L29
		.L28:
		.LBB151:
				leal	-3904(%ebp), %eax
				movl	-5872(%ebp), %ecx
				leal	.LC1@GOTOFF(%ecx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-5184(%ebp), %eax
				leal	-3904(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.LBE151:
				leal	-3136(%ebp), %eax
				leal	-5184(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.L29:
				pushl	$0
				pushl	$0
				pushl	$0
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-3392(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				pushl	-5876(%ebp)
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-3136(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				movl	-5872(%ebp), %esi
				movl	%esi, %ebx
				call	_signal_event@PLT
				addl	$528, %esp
				movl	$1, -5776(%ebp)
		.LBB152:
		.LBB153:
				subl	$12, %esp
				pushl	-5776(%ebp)
				movl	%esi, %ebx
				call	exit@PLT
		.L207:
		.LBE153:
		.LBE152:
   46      openinput(1,filename)
   47      select input(1)
   48      ->start ; %finish
   49    %if a='/' %then %start
				movl	-296(%ebp), %eax
				cmpl	$47, %eax
				jne	.L208
				nop
		.L31:
   50      read(filename)
				leal	-2880(%ebp), %eax
				subl	$8, %esp
				movl	-5872(%ebp), %esi
				leal	.LC24@GOTOFF(%esi), %edx
				pushl	%edx
				pushl	%eax
				movl	%esi, %ebx
				call	_imp_c2istr@PLT
				addl	$12, %esp
				movl	_imp_current_line@GOT(%esi), %eax
				movl	(%eax), %eax
				testl	%eax, %eax
				je	.L32
				movl	-5872(%ebp), %eax
				movl	_imp_current_line@GOT(%eax), %eax
				movl	(%eax), %eax
				movl	%eax, -5880(%ebp)
				jmp	.L33
		.L32:
				movl	$50, -5880(%ebp)
		.L33:
				movl	-5872(%ebp), %eax
				movl	_imp_current_file@GOT(%eax), %eax
				movl	(%eax), %eax
				testl	%eax, %eax
				je	.L34
				movl	-5872(%ebp), %ebx
				movl	_imp_current_file@GOT(%ebx), %eax
				movl	(%eax), %edx
				leal	-2624(%ebp), %eax
				subl	$8, %esp
				pushl	%edx
				pushl	%eax
				call	_imp_c2istr@PLT
				addl	$12, %esp
				jmp	.L35
		.L34:
		.LBB154:
				leal	-3904(%ebp), %eax
				movl	-5872(%ebp), %edi
				leal	.LC1@GOTOFF(%edi), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-4928(%ebp), %eax
				leal	-3904(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.LBE154:
				leal	-2624(%ebp), %eax
				leal	-4928(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.L35:
				pushl	$0
				pushl	$0
				pushl	$0
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-2880(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				pushl	-5880(%ebp)
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-2624(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				movl	-5872(%ebp), %edi
				movl	%edi, %ebx
				call	_signal_event@PLT
				addl	$528, %esp
				movl	$1, -5772(%ebp)
		.LBB155:
		.LBB156:
				subl	$12, %esp
				pushl	-5772(%ebp)
				movl	%edi, %ebx
				call	exit@PLT
		.L208:
		.LBE156:
		.LBE155:
   51      openoutput(1,filename)
   52      select output(1)
   53      ->start ; %finish
   54    %if a='<' %then q=q+1 %and ->q2
				movl	-296(%ebp), %eax
				cmpl	$60, %eax
				jne	.L209
				addl	$1, -5844(%ebp)
				jmp	.L60
		.L209:
				nop
		.L37:
   55    %if a='$' %then ->fn
				movl	-296(%ebp), %eax
				cmpl	$36, %eax
				je	.L210
				nop
		.L40:
				nop
		.L41:
   56    %if a=',' %then ->next item
				movl	-296(%ebp), %eax
				cmpl	$44, %eax
				je	.L211
				nop
		.L43:
				nop
		.L44:
   57    %if a=';' %then ->apply
				movl	-296(%ebp), %eax
				cmpl	$59, %eax
				je	.L212
				nop
		.L46:
				nop
		.L47:
   58    %if a='#' %then ->load arg
				movl	-296(%ebp), %eax
				cmpl	$35, %eax
				je	.L213
				nop
		.L49:
				nop
		.L50:
   59    %if a=marker %then ->endfn
				movl	-296(%ebp), %eax
				cmpl	$-16384, %eax
				je	.L214
				nop
		.L52:
				nop
		.L53:
   60    %if a='>' %then ->exit
				movl	-296(%ebp), %eax
				cmpl	$62, %eax
				je	.L215
		.L55:
				nop
				jmp	.L57
		.L218:
				nop
		.L56:
		.LBB164:
   61 copy:load
				leal	-320(%ebp), %eax
				movl	%eax, %ecx
				call	LOAD.6022
   62    %if q=1 %then ->start
				cmpl	$1, -5844(%ebp)
				jne	.L216
				jmp	.L59
		.L38:
		.L216:
				nop
		.L60:
   63 q2:nextch
				leal	-320(%ebp), %eax
				movl	%eax, %ecx
				call	NEXTCH.6024
   64    %if a='<' %then q=q+1 %and ->copy
				movl	-296(%ebp), %eax
				cmpl	$60, %eax
				jne	.L217
				addl	$1, -5844(%ebp)
				jmp	.L57
		.L217:
				nop
		.L62:
   65    %if a#'>' %then ->copy
				nop
				jmp	.L57
		.L220:
				movl	-296(%ebp), %eax
				cmpl	$62, %eax
				jne	.L218
				nop
		.L64:
   66    q=q-1
				subl	$1, -5844(%ebp)
   67    %if q=1 %then ->start %else ->copy
				cmpl	$1, -5844(%ebp)
				jne	.L219
				jmp	.L59
		.L219:
				nop
		.L66:
				jmp	.L57
		.L210:
   68 fn:st(s)=h
				movl	-5872(%ebp), %esi
				movl	S.6033@GOTOFF(%esi), %eax
				movl	-292(%ebp), %edx
				movw	%dx, ST.6030@GOTOFF(%esi,%eax,2)
   69    st(s+1)=f
				movl	S.6033@GOTOFF(%esi), %eax
				addl	$1, %eax
				movl	-316(%ebp), %edx
				movw	%dx, ST.6030@GOTOFF(%esi,%eax,2)
   70    st(s+2)=0
				movl	S.6033@GOTOFF(%esi), %eax
				addl	$2, %eax
				movw	$0, ST.6030@GOTOFF(%esi,%eax,2)
   71    st(s+3)=0
				movl	S.6033@GOTOFF(%esi), %eax
				addl	$3, %eax
				movw	$0, ST.6030@GOTOFF(%esi,%eax,2)
   72    h=s+3
				movl	S.6033@GOTOFF(%esi), %eax
				addl	$3, %eax
				movl	%eax, -292(%ebp)
   73    f=s+1
				movl	S.6033@GOTOFF(%esi), %eax
				addl	$1, %eax
				movl	%eax, -316(%ebp)
   74    s=s+4
				movl	S.6033@GOTOFF(%esi), %eax
				addl	$4, %eax
				movl	%eax, S.6033@GOTOFF(%esi)
   75    ->start
				jmp	.L59
		.L211:
   76
   77 next item:%if h=0 %then ->copy
				nop
				jmp	.L57
		.L222:
				movl	-292(%ebp), %eax
				testl	%eax, %eax
				je	.L220
				nop
		.L68:
   78    st(h)=s-h-st(h)
				movl	-5872(%ebp), %edi
				movl	S.6033@GOTOFF(%edi), %eax
				movl	%eax, %edx
				movl	-292(%ebp), %eax
				subl	%eax, %edx
				movl	-292(%ebp), %eax
				movzwl	ST.6030@GOTOFF(%edi,%eax,2), %eax
				subl	%eax, %edx
				movl	%edx, %eax
				movl	%eax, %edx
				movl	-292(%ebp), %eax
				movw	%dx, ST.6030@GOTOFF(%edi,%eax,2)
   79    st(s)=0
				movl	S.6033@GOTOFF(%edi), %eax
				movw	$0, ST.6030@GOTOFF(%edi,%eax,2)
   80    h=s
				movl	S.6033@GOTOFF(%edi), %eax
				movl	%eax, -292(%ebp)
   81    s=s+1
				movl	S.6033@GOTOFF(%edi), %eax
				addl	$1, %eax
				movl	%eax, S.6033@GOTOFF(%edi)
   82    ->start
				jmp	.L59
		.L212:
   83
   84 apply:%if p>f %then monitor(1)
				movl	-312(%ebp), %edx
				movl	-316(%ebp), %eax
				cmpl	%eax, %edx
				jle	.L221
				subl	$12, %esp
				leal	-320(%ebp), %eax
				pushl	$1
				movl	%eax, %ecx
				call	MONITOR.6028
				addl	$16, %esp
				jmp	.L70
		.L221:
				nop
		.L70:
   85    %if h=0 %then ->copy
				nop
				jmp	.L57
		.L226:
				movl	-292(%ebp), %eax
				testl	%eax, %eax
				je	.L222
				nop
		.L72:
   86    st(h)=s-h
				movl	-5872(%ebp), %ebx
				movl	S.6033@GOTOFF(%ebx), %eax
				movl	%eax, %edx
				movl	-292(%ebp), %eax
				subl	%eax, %edx
				movl	%edx, %eax
				movl	%eax, %edx
				movl	-292(%ebp), %eax
				movw	%dx, ST.6030@GOTOFF(%ebx,%eax,2)
   87    st(s)=marker
				movl	S.6033@GOTOFF(%ebx), %eax
				movw	$-16384, ST.6030@GOTOFF(%ebx,%eax,2)
   88    h0=st(f-1)
				movl	-316(%ebp), %eax
				subl	$1, %eax
				movzwl	ST.6030@GOTOFF(%ebx,%eax,2), %eax
				cwtl
				movl	%eax, -5832(%ebp)
   89    f0=st(f)
				movl	-316(%ebp), %eax
				movzwl	ST.6030@GOTOFF(%ebx,%eax,2), %eax
				cwtl
				movl	%eax, -5828(%ebp)
   90    st(f-1)=s-f+2
				movl	S.6033@GOTOFF(%ebx), %eax
				movl	%eax, %edx
				movl	-316(%ebp), %eax
				subl	%eax, %edx
				movl	%edx, %eax
				leal	2(%eax), %edx
				movl	-316(%ebp), %eax
				subl	$1, %eax
				movw	%dx, ST.6030@GOTOFF(%ebx,%eax,2)
   91    st(f)=p
				movl	-312(%ebp), %eax
				movl	%eax, %edx
				movl	-316(%ebp), %eax
				movw	%dx, ST.6030@GOTOFF(%ebx,%eax,2)
   92    st(f+1)=c
				movl	-316(%ebp), %eax
				addl	$1, %eax
				movl	-300(%ebp), %edx
				movw	%dx, ST.6030@GOTOFF(%ebx,%eax,2)
   93    p=f
				movl	-316(%ebp), %eax
				movl	%eax, -312(%ebp)
   94    f=f0
				movl	-5828(%ebp), %eax
				movl	%eax, -316(%ebp)
   95    h=h0
				movl	-5832(%ebp), %eax
				movl	%eax, -292(%ebp)
   96    s=s+1
				movl	S.6033@GOTOFF(%ebx), %eax
				addl	$1, %eax
				movl	%eax, S.6033@GOTOFF(%ebx)
   97    %unless h=0 %then st(h)=st(h)+st(p-1)
				movl	-292(%ebp), %eax
				testl	%eax, %eax
				je	.L223
				movl	-292(%ebp), %eax
				movl	-5872(%ebp), %ecx
				movzwl	ST.6030@GOTOFF(%ecx,%eax,2), %eax
				movl	%eax, %edx
				movl	-312(%ebp), %eax
				subl	$1, %eax
				movzwl	ST.6030@GOTOFF(%ecx,%eax,2), %eax
				addl	%edx, %eax
				movl	%eax, %edx
				movl	-292(%ebp), %eax
				movw	%dx, ST.6030@GOTOFF(%ecx,%eax,2)
				jmp	.L74
		.L223:
				nop
		.L74:
   98    find(p+2)
				movl	-312(%ebp), %eax
				leal	2(%eax), %edx
				subl	$12, %esp
				leal	-320(%ebp), %eax
				pushl	%edx
				movl	%eax, %ecx
				call	FIND.6026
				addl	$16, %esp
   99    %if st(w)<0 %then ->mcm(-st(w))
				movl	-304(%ebp), %eax
				movl	-5872(%ebp), %esi
				movzwl	ST.6030@GOTOFF(%esi,%eax,2), %eax
				testw	%ax, %ax
				jns	.L224
				movl	$99, -5824(%ebp)
				movl	-5872(%ebp), %ecx
				leal	.LC25@GOTOFF(%ecx), %eax
				movl	%eax, -5820(%ebp)
				movl	-304(%ebp), %eax
				movzwl	ST.6030@GOTOFF(%ecx,%eax,2), %eax
				cwtl
				negl	%eax
				movl	%eax, -5816(%ebp)
				nop
		.L77:
				nop
		.L76:
  100    c=w+1
				movl	-304(%ebp), %eax
				addl	$1, %eax
				movl	%eax, -300(%ebp)
  101    ->start
				jmp	.L59
		.L213:
  102
  103 loadarg:%if p=0 %then %start
				movl	-312(%ebp), %eax
				testl	%eax, %eax
				jne	.L225
				nop
		.L79:
  104      %if h=0 %then ->copy %else monitor(2)
				nop
		.L57:
				movl	-292(%ebp), %eax
				testl	%eax, %eax
				je	.L226
				nop
		.L81:
				subl	$12, %esp
				leal	-320(%ebp), %eax
				pushl	$2
				movl	%eax, %ecx
				call	MONITOR.6028
				addl	$16, %esp
				jmp	.L79
		.L225:
  105      %finish
  106    nextch
				leal	-320(%ebp), %eax
				movl	%eax, %ecx
				call	NEXTCH.6024
  107    w=p+2
				movl	-312(%ebp), %eax
				addl	$2, %eax
				movl	%eax, -304(%ebp)
  108    %if a<'0' %then monitor(3)
				movl	-296(%ebp), %eax
				cmpl	$47, %eax
				jg	.L227
				subl	$12, %esp
				leal	-320(%ebp), %eax
				pushl	$3
				movl	%eax, %ecx
				call	MONITOR.6028
				addl	$16, %esp
				jmp	.L83
		.L227:
				nop
		.L83:
  109    %if a>'0' %then %start
				movl	-296(%ebp), %eax
				cmpl	$48, %eax
				jle	.L228
		.LBB157:
				nop
				jmp	.L95
		.L229:
		.LBB160:
  110      %for r=0,1,a-'0'-1 %cycle
				movl	-296(%ebp), %eax
				subl	$49, %eax
				movl	%eax, -5804(%ebp)
		.LBB158:
				movl	-5804(%ebp), %eax
				movl	%eax, -5800(%ebp)
				movl	-5800(%ebp), %eax
				xorl	$1, %eax
				shrl	$31, %eax
				movzbl	%al, %eax
		.LBE158:
				testl	%eax, %eax
				je	.L86
				leal	-2368(%ebp), %eax
				subl	$8, %esp
				movl	-5872(%ebp), %edi
				movl	%edi, %ebx
				leal	.LC26@GOTOFF(%ebx), %edx
				pushl	%edx
				pushl	%eax
				movl	%edi, %ebx
				call	_imp_c2istr@PLT
				addl	$12, %esp
				movl	%edi, %ebx
				movl	_imp_current_line@GOT(%ebx), %eax
				movl	(%eax), %eax
				testl	%eax, %eax
				je	.L87
				movl	-5872(%ebp), %eax
				movl	_imp_current_line@GOT(%eax), %eax
				movl	(%eax), %eax
				movl	%eax, -5884(%ebp)
				jmp	.L88
		.L87:
				movl	$110, -5884(%ebp)
		.L88:
				movl	-5872(%ebp), %eax
				movl	_imp_current_file@GOT(%eax), %eax
				movl	(%eax), %eax
				testl	%eax, %eax
				je	.L89
				movl	-5872(%ebp), %ebx
				movl	_imp_current_file@GOT(%ebx), %eax
				movl	(%eax), %edx
				leal	-2112(%ebp), %eax
				subl	$8, %esp
				pushl	%edx
				pushl	%eax
				call	_imp_c2istr@PLT
				addl	$12, %esp
				jmp	.L90
		.L89:
		.LBB159:
				leal	-3904(%ebp), %eax
				movl	-5872(%ebp), %ecx
				leal	.LC1@GOTOFF(%ecx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-4672(%ebp), %eax
				leal	-3904(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.LBE159:
				leal	-2112(%ebp), %eax
				leal	-4672(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.L90:
				pushl	$0
				pushl	$1
				pushl	$5
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-2368(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				pushl	-5884(%ebp)
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-2112(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				movl	-5872(%ebp), %ebx
				call	_signal_event@PLT
				addl	$528, %esp
		.L86:
				movl	$-1, %eax
				movl	%eax, -308(%ebp)
		.L91:
				movl	-308(%ebp), %eax
				cmpl	-5804(%ebp), %eax
				je	.L229
				movl	-308(%ebp), %eax
				addl	$1, %eax
				movl	%eax, -308(%ebp)
				nop
		.L95:
		.LBE160:
		.LBB161:
  111      w=w+st(w)
				movl	-304(%ebp), %eax
				movl	-5872(%ebp), %edi
				movzwl	ST.6030@GOTOFF(%edi,%eax,2), %eax
				cwtl
				movl	-304(%ebp), %edx
				addl	%edx, %eax
				movl	%eax, -304(%ebp)
  112      %if st(w)=marker %then monitor(4)
				movl	-304(%ebp), %eax
				movzwl	ST.6030@GOTOFF(%edi,%eax,2), %eax
				cmpw	$-16384, %ax
				jne	.L230
				subl	$12, %esp
				leal	-320(%ebp), %eax
				pushl	$4
				movl	%eax, %ecx
				call	MONITOR.6028
				addl	$16, %esp
				jmp	.L91
		.L230:
				nop
		.L94:
  113      %repeat
				jmp	.L91
		.L85:
		.L228:
		.LBE157:
  114      %finish
  115    %for r=1,1,st(w)-1 %cycle
				movl	-304(%ebp), %eax
				movl	-5872(%ebp), %edi
				movzwl	ST.6030@GOTOFF(%edi,%eax,2), %eax
				cwtl
				subl	$1, %eax
				movl	%eax, -5796(%ebp)
		.LBB162:
				movl	-5796(%ebp), %eax
				subl	$1, %eax
				movl	%eax, -5792(%ebp)
				movl	-5792(%ebp), %eax
				xorl	$1, %eax
				shrl	$31, %eax
				movzbl	%al, %eax
		.LBE162:
				testl	%eax, %eax
				je	.L96
				leal	-1856(%ebp), %eax
				subl	$8, %esp
				movl	-5872(%ebp), %esi
				leal	.LC27@GOTOFF(%esi), %edx
				pushl	%edx
				pushl	%eax
				movl	%esi, %ebx
				call	_imp_c2istr@PLT
				addl	$12, %esp
				movl	_imp_current_line@GOT(%esi), %eax
				movl	(%eax), %eax
				testl	%eax, %eax
				je	.L97
				movl	-5872(%ebp), %eax
				movl	_imp_current_line@GOT(%eax), %eax
				movl	(%eax), %eax
				movl	%eax, -5888(%ebp)
				jmp	.L98
		.L97:
				movl	$115, -5888(%ebp)
		.L98:
				movl	-5872(%ebp), %eax
				movl	_imp_current_file@GOT(%eax), %eax
				movl	(%eax), %eax
				testl	%eax, %eax
				je	.L99
				movl	-5872(%ebp), %ebx
				movl	_imp_current_file@GOT(%ebx), %eax
				movl	(%eax), %edx
				leal	-1600(%ebp), %eax
				subl	$8, %esp
				pushl	%edx
				pushl	%eax
				call	_imp_c2istr@PLT
				addl	$12, %esp
				jmp	.L100
		.L99:
		.LBB163:
				leal	-3904(%ebp), %eax
				movl	-5872(%ebp), %esi
				leal	.LC1@GOTOFF(%esi), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-4416(%ebp), %eax
				leal	-3904(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.LBE163:
				leal	-1600(%ebp), %eax
				leal	-4416(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.L100:
				pushl	$0
				pushl	$1
				pushl	$5
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-1856(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				pushl	-5888(%ebp)
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-1600(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				movl	-5872(%ebp), %ebx
				call	_signal_event@PLT
				addl	$528, %esp
		.L96:
				movl	$0, %eax
				movl	%eax, -308(%ebp)
		.L101:
				movl	-308(%ebp), %eax
				cmpl	-5796(%ebp), %eax
				je	.L231
				movl	-308(%ebp), %eax
				addl	$1, %eax
				movl	%eax, -308(%ebp)
				nop
		.L103:
		.LBE161:
  116    a=st(w+r)
				movl	-304(%ebp), %edx
				movl	-308(%ebp), %eax
				addl	%edx, %eax
				movl	-5872(%ebp), %ecx
				movzwl	ST.6030@GOTOFF(%ecx,%eax,2), %eax
				cwtl
				movl	%eax, -296(%ebp)
  117    load
				leal	-320(%ebp), %eax
				movl	%eax, %ecx
				call	LOAD.6022
  118    %repeat
				jmp	.L101
		.L231:
  119    ->start
				jmp	.L59
		.L214:
  120
  121 endfn:%if f>p %then monitor(5)
				movl	-316(%ebp), %edx
				movl	-312(%ebp), %eax
				cmpl	%eax, %edx
				jle	.L232
				subl	$12, %esp
				leal	-320(%ebp), %eax
				pushl	$5
				movl	%eax, %ecx
				call	MONITOR.6028
				addl	$16, %esp
				jmp	.L105
		.L232:
				nop
		.L105:
  122    st(s)=e
				movl	-5872(%ebp), %ecx
				movl	E.6032@GOTOFF(%ecx), %edx
				movl	S.6033@GOTOFF(%ecx), %eax
				movw	%dx, ST.6030@GOTOFF(%ecx,%eax,2)
  123    a=s
				movl	S.6033@GOTOFF(%ecx), %eax
				movl	%eax, -296(%ebp)
		.L106:
  124    %while st(a)>=p-1+st(p-1) %cycle
				movl	-296(%ebp), %eax
				movl	-5872(%ebp), %esi
				movzwl	ST.6030@GOTOFF(%esi,%eax,2), %eax
				cwtl
				movl	-312(%ebp), %edx
				leal	-1(%edx), %ecx
				movl	-312(%ebp), %edx
				subl	$1, %edx
				movzwl	ST.6030@GOTOFF(%esi,%edx,2), %edx
				movswl	%dx, %edx
				addl	%ecx, %edx
				cmpl	%edx, %eax
				jl	.L233
				nop
		.L108:
  125      e0=st(a)
				movl	-296(%ebp), %eax
				movl	-5872(%ebp), %edi
				movzwl	ST.6030@GOTOFF(%edi,%eax,2), %eax
				cwtl
				movl	%eax, -5784(%ebp)
  126      st(a)=e0-st(p-1)
				movl	-5784(%ebp), %eax
				movl	%eax, %edx
				movl	-312(%ebp), %eax
				subl	$1, %eax
				movzwl	ST.6030@GOTOFF(%edi,%eax,2), %eax
				subl	%eax, %edx
				movl	-296(%ebp), %eax
				movw	%dx, ST.6030@GOTOFF(%edi,%eax,2)
  127      a=e0
				movl	-5784(%ebp), %eax
				movl	%eax, -296(%ebp)
  128   %repeat
				jmp	.L106
		.L233:
  129    w=st(a)
				movl	-296(%ebp), %eax
				movl	-5872(%ebp), %edi
				movzwl	ST.6030@GOTOFF(%edi,%eax,2), %eax
				cwtl
				movl	%eax, -304(%ebp)
		.L109:
  130    w=st(w) %while w>p-1
				movl	-312(%ebp), %eax
				leal	-1(%eax), %edx
				movl	-304(%ebp), %eax
				cmpl	%edx, %eax
				jle	.L234
				movl	-304(%ebp), %eax
				movl	-5872(%ebp), %esi
				movzwl	ST.6030@GOTOFF(%esi,%eax,2), %eax
				cwtl
				movl	%eax, -304(%ebp)
				jmp	.L109
		.L234:
				nop
		.L111:
  131    st(a)=w
				movl	-296(%ebp), %eax
				movl	-304(%ebp), %edx
				movl	-5872(%ebp), %edi
				movw	%dx, ST.6030@GOTOFF(%edi,%eax,2)
  132    e=st(s)
				movl	S.6033@GOTOFF(%edi), %eax
				movzwl	ST.6030@GOTOFF(%edi,%eax,2), %eax
				cwtl
				movl	%eax, E.6032@GOTOFF(%edi)
  133    %unless h=0 %then %start
				movl	-292(%ebp), %eax
				testl	%eax, %eax
				je	.L235
				nop
		.L116:
  134      %if h>p %then h=h-st(p-1) %else st(h)=st(h)-st(p-1)
				movl	-292(%ebp), %edx
				movl	-312(%ebp), %eax
				cmpl	%eax, %edx
				jle	.L236
				movl	-312(%ebp), %eax
				subl	$1, %eax
				movl	-5872(%ebp), %ecx
				movzwl	ST.6030@GOTOFF(%ecx,%eax,2), %eax
				cwtl
				movl	-292(%ebp), %edx
				subl	%eax, %edx
				movl	%edx, %eax
				movl	%eax, -292(%ebp)
				jmp	.L116
		.L236:
				nop
		.L115:
				movl	-292(%ebp), %eax
				movl	-5872(%ebp), %ecx
				movzwl	ST.6030@GOTOFF(%ecx,%eax,2), %eax
				movl	%eax, %edx
				movl	-312(%ebp), %eax
				subl	$1, %eax
				movzwl	ST.6030@GOTOFF(%ecx,%eax,2), %eax
				subl	%eax, %edx
				movl	%edx, %eax
				movl	%eax, %edx
				movl	-292(%ebp), %eax
				movw	%dx, ST.6030@GOTOFF(%ecx,%eax,2)
				jmp	.L116
		.L113:
		.L235:
  135      %finish
  136    a=p-1
				movl	-312(%ebp), %eax
				subl	$1, %eax
				movl	%eax, -296(%ebp)
  137    w=a+st(p-1)
				movl	-312(%ebp), %eax
				subl	$1, %eax
				movl	-5872(%ebp), %ebx
				movzwl	ST.6030@GOTOFF(%ebx,%eax,2), %eax
				movswl	%ax, %edx
				movl	-296(%ebp), %eax
				addl	%edx, %eax
				movl	%eax, -304(%ebp)
  138    c=st(p+1)
				movl	-312(%ebp), %eax
				addl	$1, %eax
				movzwl	ST.6030@GOTOFF(%ebx,%eax,2), %eax
				cwtl
				movl	%eax, -300(%ebp)
  139    s=s-st(p-1)
				movl	S.6033@GOTOFF(%ebx), %edx
				movl	-312(%ebp), %eax
				subl	$1, %eax
				movzwl	ST.6030@GOTOFF(%ebx,%eax,2), %eax
				cwtl
				subl	%eax, %edx
				movl	%edx, %eax
				movl	%eax, S.6033@GOTOFF(%ebx)
  140    p=st(p)
				movl	-312(%ebp), %eax
				movzwl	ST.6030@GOTOFF(%ebx,%eax,2), %eax
				cwtl
				movl	%eax, -312(%ebp)
		.L117:
  141    st(a)=st(w) %and a=a+1 %and w=w+1 %while a#s
				movl	-296(%ebp), %edx
				movl	-5872(%ebp), %eax
				movl	S.6033@GOTOFF(%eax), %eax
				cmpl	%eax, %edx
				je	.L237
				movl	-296(%ebp), %eax
				movl	-304(%ebp), %edx
				movl	-5872(%ebp), %ecx
				movzwl	ST.6030@GOTOFF(%ecx,%edx,2), %edx
				movw	%dx, ST.6030@GOTOFF(%ecx,%eax,2)
				movl	-296(%ebp), %eax
				addl	$1, %eax
				movl	%eax, -296(%ebp)
				movl	-304(%ebp), %eax
				addl	$1, %eax
				movl	%eax, -304(%ebp)
				jmp	.L117
		.L237:
				nop
		.L119:
  142    ->start
				jmp	.L59
		.L215:
  143
  144 exit:%unless c=h=0 %then monitor(8)
				movl	-292(%ebp), %eax
				movl	%eax, -5788(%ebp)
				movl	-300(%ebp), %eax
				cmpl	%eax, -5788(%ebp)
				jne	.L238
				cmpl	$0, -5788(%ebp)
				je	.L239
		.LBE164:
				jmp	.L121
		.L238:
		.LBB165:
				nop
		.L121:
		.LBE165:
				subl	$12, %esp
				leal	-320(%ebp), %eax
				pushl	$8
				movl	%eax, %ecx
				call	MONITOR.6028
				addl	$16, %esp
				jmp	.L122
		.L239:
		.LBB166:
				nop
		.L122:
				movl	$0, -5768(%ebp)
		.LBE166:
		.LBB167:
		.LBB168:
				subl	$12, %esp
				pushl	-5768(%ebp)
				movl	-5872(%ebp), %ebx
				call	exit@PLT
		.L123:
		.LBE168:
		.LBE167:
  145    %stop
  146
  147 mcm(1):! def
  148    %unless h=0 %then st(h)=st(h)-st(p-1)+6
				movl	-292(%ebp), %eax
				testl	%eax, %eax
				je	.L240
				movl	-292(%ebp), %eax
				movl	-5872(%ebp), %ebx
				movzwl	ST.6030@GOTOFF(%ebx,%eax,2), %eax
				movl	%eax, %edx
				movl	-312(%ebp), %eax
				subl	$1, %eax
				movzwl	ST.6030@GOTOFF(%ebx,%eax,2), %eax
				subl	%eax, %edx
				movl	%edx, %eax
				addl	$6, %eax
				movl	%eax, %edx
				movl	-292(%ebp), %eax
				movw	%dx, ST.6030@GOTOFF(%ebx,%eax,2)
				jmp	.L126
		.L240:
				nop
		.L126:
  149    st(p-1)=6
				movl	-312(%ebp), %eax
				subl	$1, %eax
				movl	-5872(%ebp), %ecx
				movw	$6, ST.6030@GOTOFF(%ecx,%eax,2)
  150    st(p+5)=e
				movl	E.6032@GOTOFF(%ecx), %edx
				movl	-312(%ebp), %eax
				addl	$5, %eax
				movw	%dx, ST.6030@GOTOFF(%ecx,%eax,2)
  151    e=p+5
				movl	-312(%ebp), %eax
				addl	$5, %eax
				movl	%eax, E.6032@GOTOFF(%ecx)
  152    ->endfn
				jmp	.L53
		.L127:
  153
  154 mcm(2):! val
  155    find(p+6)
				movl	-312(%ebp), %eax
				leal	6(%eax), %edx
				subl	$12, %esp
				leal	-320(%ebp), %eax
				pushl	%edx
				movl	%eax, %ecx
				call	FIND.6026
				addl	$16, %esp
		.L128:
  156    a=st(w+1) %and w=w+1 %and load %while st(w+1)#marker
				movl	-304(%ebp), %eax
				addl	$1, %eax
				movl	-5872(%ebp), %edi
				movzwl	ST.6030@GOTOFF(%edi,%eax,2), %eax
				cmpw	$-16384, %ax
				je	.L241
				movl	-304(%ebp), %eax
				addl	$1, %eax
				movl	-5872(%ebp), %esi
				movzwl	ST.6030@GOTOFF(%esi,%eax,2), %eax
				cwtl
				movl	%eax, -296(%ebp)
				movl	-304(%ebp), %eax
				addl	$1, %eax
				movl	%eax, -304(%ebp)
				leal	-320(%ebp), %eax
				movl	%eax, %ecx
				call	LOAD.6022
				jmp	.L128
		.L241:
				nop
		.L130:
  157    ->endfn
				jmp	.L53
		.L131:
  158
  159 mcm(3):! update
  160    find(p+9)
				movl	-312(%ebp), %eax
				leal	9(%eax), %edx
				subl	$12, %esp
				leal	-320(%ebp), %eax
				pushl	%edx
				movl	%eax, %ecx
				call	FIND.6026
				addl	$16, %esp
  161    a=p+9+st(p+9)
				movl	-312(%ebp), %eax
				leal	9(%eax), %edx
				movl	-312(%ebp), %eax
				addl	$9, %eax
				movl	-5872(%ebp), %esi
				movzwl	ST.6030@GOTOFF(%esi,%eax,2), %eax
				cwtl
				addl	%edx, %eax
				movl	%eax, -296(%ebp)
  162    %if st(a)>st(w) %then monitor(9)
				movl	-296(%ebp), %eax
				movzwl	ST.6030@GOTOFF(%esi,%eax,2), %edx
				movl	-304(%ebp), %eax
				movzwl	ST.6030@GOTOFF(%esi,%eax,2), %eax
				cmpw	%ax, %dx
				jle	.L242
				subl	$12, %esp
				leal	-320(%ebp), %eax
				pushl	$9
				movl	%eax, %ecx
				call	MONITOR.6028
				addl	$16, %esp
				jmp	.L133
		.L242:
				nop
		.L133:
		.LBB169:
  163    %for r=1,1,st(a) %cycle
				movl	-296(%ebp), %eax
				movl	-5872(%ebp), %ecx
				movzwl	ST.6030@GOTOFF(%ecx,%eax,2), %eax
				cwtl
				movl	%eax, -5812(%ebp)
		.LBB170:
				movl	-5812(%ebp), %eax
				subl	$1, %eax
				movl	%eax, -5808(%ebp)
				movl	-5808(%ebp), %eax
				xorl	$1, %eax
				shrl	$31, %eax
				movzbl	%al, %eax
		.LBE170:
				testl	%eax, %eax
				je	.L134
				leal	-1344(%ebp), %eax
				subl	$8, %esp
				movl	-5872(%ebp), %esi
				movl	%esi, %ebx
				leal	.LC28@GOTOFF(%ebx), %edx
				pushl	%edx
				pushl	%eax
				movl	%esi, %ebx
				call	_imp_c2istr@PLT
				addl	$12, %esp
				movl	%esi, %ebx
				movl	_imp_current_line@GOT(%ebx), %eax
				movl	(%eax), %eax
				testl	%eax, %eax
				je	.L135
				movl	-5872(%ebp), %eax
				movl	_imp_current_line@GOT(%eax), %eax
				movl	(%eax), %eax
				movl	%eax, -5892(%ebp)
				jmp	.L136
		.L135:
				movl	$163, -5892(%ebp)
		.L136:
				movl	-5872(%ebp), %eax
				movl	_imp_current_file@GOT(%eax), %eax
				movl	(%eax), %eax
				testl	%eax, %eax
				je	.L137
				movl	-5872(%ebp), %ebx
				movl	_imp_current_file@GOT(%ebx), %eax
				movl	(%eax), %edx
				leal	-1088(%ebp), %eax
				subl	$8, %esp
				pushl	%edx
				pushl	%eax
				call	_imp_c2istr@PLT
				addl	$12, %esp
				jmp	.L138
		.L137:
		.LBB171:
				leal	-3904(%ebp), %eax
				movl	-5872(%ebp), %edi
				leal	.LC1@GOTOFF(%edi), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-4160(%ebp), %eax
				leal	-3904(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.LBE171:
				leal	-1088(%ebp), %eax
				leal	-4160(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.L138:
				pushl	$0
				pushl	$1
				pushl	$5
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-1344(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				pushl	-5892(%ebp)
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-1088(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				movl	-5872(%ebp), %ebx
				call	_signal_event@PLT
				addl	$528, %esp
		.L134:
				movl	$0, %eax
				movl	%eax, -308(%ebp)
		.L139:
				movl	-308(%ebp), %eax
				cmpl	-5812(%ebp), %eax
				je	.L243
				movl	-308(%ebp), %eax
				addl	$1, %eax
				movl	%eax, -308(%ebp)
				nop
		.L141:
		.LBE169:
  164    st(w+r)=st(a+r)
				movl	-296(%ebp), %eax
				movl	-308(%ebp), %edx
				addl	%edx, %eax
				movl	-304(%ebp), %ecx
				movl	-308(%ebp), %edx
				addl	%ecx, %edx
				movl	-5872(%ebp), %edi
				movzwl	ST.6030@GOTOFF(%edi,%eax,2), %eax
				movw	%ax, ST.6030@GOTOFF(%edi,%edx,2)
  165    %repeat
				jmp	.L139
		.L243:
  166    ->endfn
				jmp	.L53
		.L142:
  167
  168 mcm(4):! bin
  169    w=0
				movl	$0, %eax
				movl	%eax, -304(%ebp)
  170    %if st(p+7)='+' %or st(p+7)='-' %then a=p+8 %else a=p+7
				movl	-312(%ebp), %eax
				addl	$7, %eax
				movl	-5872(%ebp), %esi
				movzwl	ST.6030@GOTOFF(%esi,%eax,2), %eax
				cmpw	$43, %ax
				je	.L244
				movl	-312(%ebp), %eax
				addl	$7, %eax
				movl	-5872(%ebp), %ecx
				movzwl	ST.6030@GOTOFF(%ecx,%eax,2), %eax
				cmpw	$45, %ax
				jne	.L245
				jmp	.L144
		.L244:
				nop
		.L144:
				movl	-312(%ebp), %eax
				addl	$8, %eax
				movl	%eax, -296(%ebp)
				jmp	.L153
		.L245:
				nop
		.L145:
				movl	-312(%ebp), %eax
				addl	$7, %eax
				movl	%eax, -296(%ebp)
		.L146:
		.L147:
		.L153:
  171    %while st(a)#marker %cycle
				movl	-296(%ebp), %eax
				movl	-5872(%ebp), %edi
				movzwl	ST.6030@GOTOFF(%edi,%eax,2), %eax
				cmpw	$-16384, %ax
				je	.L246
		.LBB172:
				nop
		.L149:
  172      %unless '0'<=st(a)<='9' %then monitor(10)
				movl	-296(%ebp), %eax
				movl	-5872(%ebp), %esi
				movzwl	ST.6030@GOTOFF(%esi,%eax,2), %eax
				movw	%ax, -5850(%ebp)
				cmpw	$47, -5850(%ebp)
				jle	.L247
				cmpw	$57, -5850(%ebp)
				jle	.L248
		.LBE172:
				jmp	.L151
		.L247:
		.LBB173:
				nop
		.L151:
		.LBE173:
				subl	$12, %esp
				leal	-320(%ebp), %eax
				pushl	$10
				movl	%eax, %ecx
				call	MONITOR.6028
				addl	$16, %esp
				jmp	.L152
		.L248:
		.LBB174:
				nop
		.L152:
		.LBE174:
  173      w=10*w+st(a)-'0'
				movl	-304(%ebp), %edx
				movl	%edx, %eax
				sall	$2, %eax
				addl	%edx, %eax
				addl	%eax, %eax
				movl	%eax, %edx
				movl	-296(%ebp), %eax
				movl	-5872(%ebp), %ecx
				movzwl	ST.6030@GOTOFF(%ecx,%eax,2), %eax
				cwtl
				addl	%edx, %eax
				subl	$48, %eax
				movl	%eax, -304(%ebp)
  174      a=a+1
				movl	-296(%ebp), %eax
				addl	$1, %eax
				movl	%eax, -296(%ebp)
  175      %repeat
				jmp	.L153
		.L246:
  176    %if st(p+7)='-' %then st(s)=-w %else st(s)=w
				movl	-312(%ebp), %eax
				addl	$7, %eax
				movl	-5872(%ebp), %edi
				movzwl	ST.6030@GOTOFF(%edi,%eax,2), %eax
				cmpw	$45, %ax
				jne	.L249
				movl	-304(%ebp), %eax
				negl	%eax
				movl	%eax, %edx
				movl	-5872(%ebp), %esi
				movl	S.6033@GOTOFF(%esi), %eax
				movw	%dx, ST.6030@GOTOFF(%esi,%eax,2)
				jmp	.L156
		.L249:
				nop
		.L155:
				movl	-5872(%ebp), %ecx
				movl	S.6033@GOTOFF(%ecx), %eax
				movl	-304(%ebp), %edx
				movw	%dx, ST.6030@GOTOFF(%ecx,%eax,2)
		.L156:
  177    s=s+1
				movl	-5872(%ebp), %edi
				movl	S.6033@GOTOFF(%edi), %eax
				addl	$1, %eax
				movl	%eax, S.6033@GOTOFF(%edi)
  178    ->endfn
				jmp	.L53
		.L157:
  179
  180 mcm(5):! dec
  181    w=st(p+7)
				movl	-312(%ebp), %eax
				addl	$7, %eax
				movl	-5872(%ebp), %esi
				movzwl	ST.6030@GOTOFF(%esi,%eax,2), %eax
				cwtl
				movl	%eax, -304(%ebp)
  182    %if w<0 %then w=-w %and a='-' %and load
				movl	-304(%ebp), %eax
				testl	%eax, %eax
				jns	.L250
				movl	-304(%ebp), %eax
				negl	%eax
				movl	%eax, -304(%ebp)
				movl	$45, %eax
				movl	%eax, -296(%ebp)
				leal	-320(%ebp), %eax
				movl	%eax, %ecx
				call	LOAD.6022
				jmp	.L159
		.L250:
				nop
		.L159:
  183    r=1
				movl	$1, %eax
				movl	%eax, -308(%ebp)
		.L160:
  184    r=10*r %while 10*r<=w
				movl	-308(%ebp), %edx
				movl	%edx, %eax
				sall	$2, %eax
				addl	%edx, %eax
				addl	%eax, %eax
				movl	%eax, %edx
				movl	-304(%ebp), %eax
				cmpl	%edx, %eax
				jge	.L161
				jmp	.L162
		.L161:
				movl	-308(%ebp), %edx
				movl	%edx, %eax
				sall	$2, %eax
				addl	%edx, %eax
				addl	%eax, %eax
				movl	%eax, -308(%ebp)
				jmp	.L160
		.L162:
		.L163:
  185    a=w//r+'0' %and load %and w=w-r*(a-'0')%and r=r//10 %while r>=1
				movl	-308(%ebp), %eax
				testl	%eax, %eax
				jle	.L251
				movl	-304(%ebp), %eax
				movl	-308(%ebp), %ebx
				cltd
				idivl	%ebx
				addl	$48, %eax
				movl	%eax, -296(%ebp)
				leal	-320(%ebp), %eax
				movl	%eax, %ecx
				call	LOAD.6022
				movl	-296(%ebp), %eax
				leal	-48(%eax), %edx
				movl	-308(%ebp), %eax
				imull	%edx, %eax
				movl	-304(%ebp), %edx
				subl	%eax, %edx
				movl	%edx, %eax
				movl	%eax, -304(%ebp)
				movl	-308(%ebp), %ecx
				movl	$1717986919, %edx
				movl	%ecx, %eax
				imull	%edx
				sarl	$2, %edx
				movl	%ecx, %eax
				sarl	$31, %eax
				subl	%eax, %edx
				movl	%edx, %eax
				movl	%eax, -308(%ebp)
				jmp	.L162
		.L251:
				nop
		.L165:
  186    ->endfn
				jmp	.L53
		.L166:
  187
  188 mcm(6):! bar
  189    w=st(p+9)
				movl	-312(%ebp), %eax
				addl	$9, %eax
				movl	-5872(%ebp), %edi
				movzwl	ST.6030@GOTOFF(%edi,%eax,2), %eax
				cwtl
				movl	%eax, -304(%ebp)
  190    a=st(p+11)
				movl	-312(%ebp), %eax
				addl	$11, %eax
				movzwl	ST.6030@GOTOFF(%edi,%eax,2), %eax
				cwtl
				movl	%eax, -296(%ebp)
  191    %if st(p+7)='+' %then a=w+a
				movl	-312(%ebp), %eax
				addl	$7, %eax
				movzwl	ST.6030@GOTOFF(%edi,%eax,2), %eax
				cmpw	$43, %ax
				jne	.L252
				movl	-296(%ebp), %eax
				movl	-304(%ebp), %edx
				addl	%edx, %eax
				movl	%eax, -296(%ebp)
				jmp	.L168
		.L252:
				nop
		.L168:
  192    %if st(p+7)='-' %then a=w-a
				movl	-312(%ebp), %eax
				addl	$7, %eax
				movl	-5872(%ebp), %ecx
				movzwl	ST.6030@GOTOFF(%ecx,%eax,2), %eax
				cmpw	$45, %ax
				jne	.L253
				movl	-296(%ebp), %eax
				movl	-304(%ebp), %edx
				subl	%eax, %edx
				movl	%edx, %eax
				movl	%eax, -296(%ebp)
				jmp	.L170
		.L253:
				nop
		.L170:
  193    %if st(p+7)='*' %then a=w*a
				movl	-312(%ebp), %eax
				addl	$7, %eax
				movl	-5872(%ebp), %edi
				movzwl	ST.6030@GOTOFF(%edi,%eax,2), %eax
				cmpw	$42, %ax
				jne	.L254
				movl	-296(%ebp), %eax
				movl	-304(%ebp), %edx
				imull	%edx, %eax
				movl	%eax, -296(%ebp)
				jmp	.L172
		.L254:
				nop
		.L172:
  194    %if st(p+7)='/' %then a=w//a
				movl	-312(%ebp), %eax
				addl	$7, %eax
				movl	-5872(%ebp), %esi
				movzwl	ST.6030@GOTOFF(%esi,%eax,2), %eax
				cmpw	$47, %ax
				jne	.L255
				movl	-296(%ebp), %ebx
				movl	-304(%ebp), %eax
				cltd
				idivl	%ebx
				movl	%eax, -296(%ebp)
				jmp	.L174
		.L255:
				nop
		.L174:
  195    %if st(p+7)='r' %then a=w-w//a*a
				movl	-312(%ebp), %eax
				addl	$7, %eax
				movl	-5872(%ebp), %ecx
				movzwl	ST.6030@GOTOFF(%ecx,%eax,2), %eax
				cmpw	$114, %ax
				jne	.L256
				movl	-296(%ebp), %ecx
				movl	-304(%ebp), %eax
				cltd
				idivl	%ecx
				movl	%edx, %eax
				movl	%eax, -296(%ebp)
				jmp	.L176
		.L256:
				nop
		.L176:
  196    load
				leal	-320(%ebp), %eax
				movl	%eax, %ecx
				call	LOAD.6022
  197    ->endfn
				jmp	.L53
		.L193:
				cmpl	$6, -5816(%ebp)
				jle	.L178
		.L177:
				movl	-5872(%ebp), %eax
				movl	_imp_current_line@GOT(%eax), %eax
				movl	(%eax), %eax
				testl	%eax, %eax
				je	.L179
				movl	-5872(%ebp), %eax
				movl	_imp_current_line@GOT(%eax), %eax
				movl	(%eax), %eax
				movl	%eax, -5896(%ebp)
				jmp	.L180
		.L179:
				movl	$317, -5896(%ebp)
		.L180:
				movl	-5872(%ebp), %eax
				movl	_imp_current_file@GOT(%eax), %eax
				movl	(%eax), %eax
				testl	%eax, %eax
				je	.L181
				movl	-5872(%ebp), %ebx
				movl	_imp_current_file@GOT(%ebx), %eax
				movl	(%eax), %edx
				leal	-832(%ebp), %eax
				subl	$8, %esp
				pushl	%edx
				pushl	%eax
				call	_imp_c2istr@PLT
				addl	$12, %esp
				jmp	.L182
		.L181:
		.LBB175:
				leal	-3904(%ebp), %eax
				movl	-5872(%ebp), %edi
				leal	.LC1@GOTOFF(%edi), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-3648(%ebp), %eax
				leal	-3904(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.LBE175:
				leal	-832(%ebp), %eax
				leal	-3648(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.L182:
				pushl	-5824(%ebp)
				pushl	-5820(%ebp)
				pushl	-5816(%ebp)
				movl	-5872(%ebp), %ebx
				leal	.LC29@GOTOFF(%ebx), %eax
				pushl	%eax
				pushl	-5816(%ebp)
				pushl	$3
				pushl	$6
				pushl	-5896(%ebp)
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-832(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_signal_eventf@PLT
				addl	$288, %esp
		.L178:
				movl	-5816(%ebp), %eax
				subl	$1, %eax
				movl	-5872(%ebp), %esi
				movl	MCM.6050@GOTOFF(%esi,%eax,4), %eax
				nop
				jmp	*%eax
		.LFE189:
		NEXTCH.6024:
		.LFB191:
  198
  199 {------------------------------------------------------------------------------}
  200
  201 %routine load
				pushl	%ebp
				movl	%esp, %ebp
				pushl	%ebx
				subl	$36, %esp
				call	__x86.get_pc_thunk.ax
				addl	$_GLOBAL_OFFSET_TABLE_, %eax
				movl	%ecx, %edx
				movl	%ecx, -28(%ebp)
				movl	%gs:20, %ebx
				movl	%ebx, -12(%ebp)
				xorl	%ebx, %ebx
  202    %if h=0 %then print symbol(a) %else st(s)=a %and s=s+1
				movl	28(%edx), %ecx
				testl	%ecx, %ecx
				jne	.L14
				movl	24(%edx), %edx
				movsbl	%dl, %edx
				movb	%dl, -13(%ebp)
		.LBB139:
		.LBB140:
				movsbl	-13(%ebp), %edx
				subl	$12, %esp
				pushl	%edx
				movl	%eax, %ebx
				call	_imp_printsymbol@PLT
				addl	$16, %esp
		.LBE140:
		.LBE139:
				jmp	.L10
		.L14:
				nop
		.L9:
				movl	24(%edx), %ecx
				movl	S.6033@GOTOFF(%eax), %edx
				movw	%cx, ST.6030@GOTOFF(%eax,%edx,2)
				movl	S.6033@GOTOFF(%eax), %edx
				addl	$1, %edx
				movl	%edx, S.6033@GOTOFF(%eax)
		.L10:
  203 %end
				nop
				movl	-12(%ebp), %eax
				xorl	%gs:20, %eax
				je	.L12
				call	__stack_chk_fail_local
		.L12:
				movl	-4(%ebp), %ebx
				leave
				ret
		.LFE190:
				.section	.rodata
				.align 4
		.LC24:
				.string	"READ fails - cannot determine type of parameter"
		.LC25:
				.string	"test-in/gpm.imp"
				.align 4
		.LC26:
				.string	"Illegal cycle R = 0, 1, A - 48 - 1"
				.align 4
		.LC27:
				.string	"Illegal cycle R = 1, 1, ST[W] - 1"
		.LC28:
				.string	"Illegal cycle R = 1, 1, ST[A]"
				.align 4
		.LC29:
				.string	"->MCM(%d) out of bounds at %s line %d"
				.align 32
		.LC0:
				.byte	14
				.string	"GPM terminated"
				.zero	240
				.align 32
		.LC1:
				.byte	15
				.string	"test-in/gpm.imp"
				.zero	239
				.globl	main
		main:
		.LFB189:
  204
  205 {------------------------------------------------------------------------------}
  206
  207 %routine nextch
				pushl	%ebp
				movl	%esp, %ebp
				pushl	%ebx
				subl	$36, %esp
				call	__x86.get_pc_thunk.dx
				addl	$_GLOBAL_OFFSET_TABLE_, %edx
				movl	%ecx, %eax
				movl	%ecx, -28(%ebp)
				movl	%gs:20, %ebx
				movl	%ebx, -12(%ebp)
				xorl	%ebx, %ebx
  208    %if c=0 %then read symbol(a) %else a=st(c) %and c=c+1
				movl	20(%eax), %ecx
				testl	%ecx, %ecx
				jne	.L264
				addl	$24, %eax
				movl	%eax, -16(%ebp)
		.LBB176:
		.LBB177:
				subl	$12, %esp
				pushl	-16(%ebp)
				movl	%edx, %ebx
				call	_imp_readsymbol@PLT
				addl	$16, %esp
		.LBE177:
		.LBE176:
				jmp	.L260
		.L264:
				nop
		.L259:
				movl	20(%eax), %ecx
				movzwl	ST.6030@GOTOFF(%edx,%ecx,2), %edx
				movswl	%dx, %edx
				movl	%edx, 24(%eax)
				movl	20(%eax), %edx
				addl	$1, %edx
				movl	%edx, 20(%eax)
		.L260:
  209 %end
				nop
				movl	-12(%ebp), %eax
				xorl	%gs:20, %eax
				je	.L262
				call	__stack_chk_fail_local
		.L262:
				movl	-4(%ebp), %ebx
				leave
				ret
		.LFE191:
				.section	.rodata
				.align 4
		.LC30:
				.string	"Illegal cycle R = 0, 1, ST[W] - 1"
		FIND.6026:
		.LFB192:
  210
  211 {------------------------------------------------------------------------------}
  212
  213 %routine find(%integer x)
				pushl	%ebp
				movl	%esp, %ebp
				pushl	%edi
				pushl	%esi
				pushl	%ebx
				subl	$1068, %esp
				call	__x86.get_pc_thunk.bx
				addl	$_GLOBAL_OFFSET_TABLE_, %ebx
				movl	%ecx, %edi
				movl	%edi, -1072(%ebp)
				movl	%ecx, -1068(%ebp)
				movl	%gs:20, %eax
				movl	%eax, -28(%ebp)
				xorl	%eax, %eax
  214    a=e
				movl	E.6032@GOTOFF(%ebx), %eax
				movl	%eax, 24(%edi)
  215    w=x
				movl	8(%ebp), %eax
				movl	%eax, 16(%edi)
		.L266:
		.LBB178:
  216 again: %for r=0,1,st(w)-1 %cycle
				movl	-1072(%ebp), %eax
				movl	16(%eax), %eax
				movzwl	ST.6030@GOTOFF(%ebx,%eax,2), %eax
				cwtl
				subl	$1, %eax
				movl	%eax, -1060(%ebp)
		.LBB179:
				movl	-1060(%ebp), %eax
				movl	%eax, -1056(%ebp)
				movl	-1056(%ebp), %eax
				xorl	$1, %eax
				shrl	$31, %eax
				movzbl	%al, %eax
		.LBE179:
				testl	%eax, %eax
				je	.L267
				leal	-540(%ebp), %eax
				subl	$8, %esp
				leal	.LC30@GOTOFF(%ebx), %edx
				pushl	%edx
				pushl	%eax
				call	_imp_c2istr@PLT
				addl	$12, %esp
				movl	_imp_current_line@GOT(%ebx), %eax
				movl	(%eax), %eax
				testl	%eax, %eax
				je	.L268
				movl	_imp_current_line@GOT(%ebx), %eax
				movl	(%eax), %eax
				movl	%eax, -1076(%ebp)
				jmp	.L269
		.L268:
				movl	$216, -1076(%ebp)
		.L269:
				movl	_imp_current_file@GOT(%ebx), %eax
				movl	(%eax), %eax
				testl	%eax, %eax
				je	.L270
				movl	_imp_current_file@GOT(%ebx), %eax
				movl	(%eax), %edx
				leal	-284(%ebp), %eax
				subl	$8, %esp
				pushl	%edx
				pushl	%eax
				call	_imp_c2istr@PLT
				addl	$12, %esp
				jmp	.L271
		.L270:
		.LBB180:
				leal	-1052(%ebp), %eax
				leal	.LC1@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-796(%ebp), %eax
				leal	-1052(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.LBE180:
				leal	-284(%ebp), %eax
				leal	-796(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.L271:
				pushl	$0
				pushl	$1
				pushl	$5
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-540(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				pushl	-1076(%ebp)
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-284(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_signal_event@PLT
				addl	$528, %esp
		.L267:
				movl	$-1, %eax
				movl	-1072(%ebp), %edi
				movl	%eax, 12(%edi)
		.L272:
				movl	-1072(%ebp), %eax
				movl	12(%eax), %eax
				cmpl	-1060(%ebp), %eax
				je	.L284
				movl	-1072(%ebp), %esi
				movl	12(%esi), %eax
				addl	$1, %eax
				movl	%eax, 12(%esi)
				nop
		.L274:
		.LBE178:
?Non-local
  217       %if st(w+r)#st(a+r+1) %then ->next
				movl	16(%esi), %edx
				movl	12(%esi), %eax
				addl	%edx, %eax
				movzwl	ST.6030@GOTOFF(%ebx,%eax,2), %edx
				movl	24(%esi), %eax
				movl	12(%esi), %ecx
				addl	%ecx, %eax
				addl	$1, %eax
				movzwl	ST.6030@GOTOFF(%ebx,%eax,2), %eax
				cmpw	%ax, %dx
				jne	.L285
				nop
		.L276:
				nop
		.L277:
		.LBE181:
  218    %repeat
				jmp	.L272
		.L284:
  219    w=a+1+st(w)
				movl	-1072(%ebp), %ecx
				movl	24(%ecx), %eax
				leal	1(%eax), %edx
				movl	16(%ecx), %eax
				movzwl	ST.6030@GOTOFF(%ebx,%eax,2), %eax
				cwtl
				addl	%edx, %eax
				movl	%eax, 16(%ecx)
  220    %return
				jmp	.L265
		.L285:
		.LBB181:
  221 next:a=st(a)
				movl	-1072(%ebp), %edx
				movl	24(%edx), %eax
				movzwl	ST.6030@GOTOFF(%ebx,%eax,2), %eax
				cwtl
				movl	%eax, 24(%edx)
  222    ->again %unless a<0
				movl	24(%edx), %eax
				testl	%eax, %eax
				js	.L286
				jmp	.L266
		.L286:
				nop
		.L280:
  223    monitor(7)
				subl	$12, %esp
				pushl	$7
				movl	-1072(%ebp), %ecx
				call	MONITOR.6028
				addl	$16, %esp
  224 %end
				nop
		.L265:
				movl	-28(%ebp), %eax
				xorl	%gs:20, %eax
				je	.L281
				call	__stack_chk_fail_local
		.L281:
				leal	-12(%ebp), %esp
				popl	%ebx
				popl	%esi
				popl	%edi
				popl	%ebp
				ret
		.LFE192:
				.section	.rodata
		.LC31:
				.string	"Illegal cycle K = 1, 1, L"
				.align 32
		.LC23:
				.byte	19
				.string	"...    (incomplete)"
				.zero	235
		ITEM.6201:
		.LFB194:
  225
  226 {------------------------------------------------------------------------------}
  227
  228 %routine monitor(%integer n)
				pushl	%ebp
				movl	%esp, %ebp
				pushl	%edi
				pushl	%esi
				pushl	%ebx
				subl	$10060, %esp
				call	__x86.get_pc_thunk.bx
				addl	$_GLOBAL_OFFSET_TABLE_, %ebx
				movl	%ecx, -10064(%ebp)
				movl	%ecx, -10060(%ebp)
				movl	%gs:20, %ecx
				movl	%ecx, -28(%ebp)
				xorl	%ecx, %ecx
				leal	8(%ebp), %eax
				movl	%eax, -10048(%ebp)
		.LBB191:
		.LBB192:
		.LBB193:
  229 %routinespec item(%integer x)
  230 %switch fault(1:10)
  231
  232    print string(snl."Monitor : ")
				leal	-284(%ebp), %eax
				leal	.LC2@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-284(%ebp), %ecx
		.LBE193:
				movl	-10064(%ebp), %eax
				leal	32(%eax), %edx
				leal	-284(%ebp), %eax
				subl	$4, %esp
				pushl	%ecx
				pushl	%edx
				pushl	%eax
				call	_imp_join@PLT
				addl	$12, %esp
				leal	-284(%ebp), %edx
		.LBE192:
				leal	-284(%ebp), %eax
				movl	%edx, %esi
				movl	$64, %edx
				movl	%eax, %edi
				movl	%edx, %ecx
				rep movsl
				leal	-284(%ebp), %edx
				leal	-5404(%ebp), %eax
				movl	%edx, %esi
				movl	$64, %edx
				movl	%eax, %edi
				movl	%edx, %ecx
				rep movsl
		.LBE191:
		.LBB194:
		.LBB195:
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-5404(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_imp_printstring@PLT
				addl	$256, %esp
		.LBE195:
		.LBE194:
  233    ->fault(n)
				movl	$233, -10044(%ebp)
				leal	.LC25@GOTOFF(%ebx), %eax
				movl	%eax, -10040(%ebp)
				movl	8(%ebp), %eax
				movl	%eax, -10036(%ebp)
				nop
		.L311:
  234
  235 fault(1):print string("Unmatched semicolon in definition of ")
				leal	-284(%ebp), %eax
				leal	.LC3@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-10012(%ebp), %eax
				leal	-284(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-5148(%ebp), %eax
				leal	-10012(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.LBE196:
		.LBB197:
		.LBB198:
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-5148(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_imp_printstring@PLT
				addl	$256, %esp
		.LBE198:
		.LBE197:
  236    item(p+2)
				movl	-10064(%ebp), %eax
				movl	8(%eax), %eax
				leal	2(%eax), %edx
				subl	$12, %esp
				leal	-10048(%ebp), %eax
				pushl	%edx
				movl	%eax, %ecx
				call	ITEM.6201
				addl	$16, %esp
  237    ->end
				jmp	.L313
		.L314:
		.LBB199:
  238
  239 fault(2):print string("Unquoted # in argument list of ")
				leal	-284(%ebp), %eax
				leal	.LC4@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-9756(%ebp), %eax
				leal	-284(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-4892(%ebp), %eax
				leal	-9756(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.LBE199:
		.LBB200:
		.LBB201:
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-4892(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_imp_printstring@PLT
				addl	$256, %esp
		.LBE201:
		.LBE200:
  240    item(f+2)
				movl	-10064(%ebp), %eax
				movl	4(%eax), %eax
				leal	2(%eax), %edx
				subl	$12, %esp
				leal	-10048(%ebp), %eax
				pushl	%edx
				movl	%eax, %ecx
				call	ITEM.6201
				addl	$16, %esp
  241    ->end
				jmp	.L313
		.L315:
		.LBB202:
  242
  243 fault(3):print string("Impossible argument number in definition of ")
				leal	-284(%ebp), %eax
				leal	.LC5@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-9500(%ebp), %eax
				leal	-284(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-4636(%ebp), %eax
				leal	-9500(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.LBE202:
		.LBB203:
		.LBB204:
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-4636(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_imp_printstring@PLT
				addl	$256, %esp
		.LBE204:
		.LBE203:
  244    item(p+2)
				movl	-10064(%ebp), %eax
				movl	8(%eax), %eax
				leal	2(%eax), %edx
				subl	$12, %esp
				leal	-10048(%ebp), %eax
				pushl	%edx
				movl	%eax, %ecx
				call	ITEM.6201
				addl	$16, %esp
  245    ->end
				jmp	.L313
		.L316:
		.LBB205:
  246
  247 fault(4):print string("No argument ")
				leal	-284(%ebp), %eax
				leal	.LC6@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-9244(%ebp), %eax
				leal	-284(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-4124(%ebp), %eax
				leal	-9244(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.LBE205:
		.LBB206:
		.LBB207:
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-4124(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_imp_printstring@PLT
				addl	$256, %esp
		.LBE207:
		.LBE206:
  248    print symbol(a)
				movl	-10064(%ebp), %eax
				movl	24(%eax), %eax
				movsbl	%al, %eax
				movb	%al, -10049(%ebp)
		.LBB208:
		.LBB209:
				movsbl	-10049(%ebp), %eax
				subl	$12, %esp
				pushl	%eax
				call	_imp_printsymbol@PLT
				addl	$16, %esp
		.LBE209:
		.LBE208:
		.LBB210:
  249    print string(" in call for ")
				leal	-284(%ebp), %eax
				leal	.LC7@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-8988(%ebp), %eax
				leal	-284(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-4380(%ebp), %eax
				leal	-8988(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.LBE210:
		.LBB211:
		.LBB212:
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-4380(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_imp_printstring@PLT
				addl	$256, %esp
		.LBE212:
		.LBE211:
  250    item(p+2)
				movl	-10064(%ebp), %eax
				movl	8(%eax), %eax
				leal	2(%eax), %edx
				subl	$12, %esp
				leal	-10048(%ebp), %eax
				pushl	%edx
				movl	%eax, %ecx
				call	ITEM.6201
				addl	$16, %esp
  251    ->end
				jmp	.L313
		.L317:
		.LBB213:
  252
  253 fault(5):print string("Terminator in ")
				leal	-284(%ebp), %eax
				leal	.LC8@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-8732(%ebp), %eax
				leal	-284(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-3868(%ebp), %eax
				leal	-8732(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.LBE213:
		.LBB214:
		.LBB215:
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-3868(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_imp_printstring@PLT
				addl	$256, %esp
		.LBE215:
		.LBE214:
  254    %if c=0 %then print string("input stream; GPM error ?") %and ->end
				movl	-10064(%ebp), %eax
				movl	20(%eax), %eax
				testl	%eax, %eax
				jne	.L359
		.LBB216:
				leal	-284(%ebp), %eax
				leal	.LC9@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-8476(%ebp), %eax
				leal	-284(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-3612(%ebp), %eax
				leal	-8476(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.LBE216:
		.LBB217:
		.LBB218:
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-3612(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_imp_printstring@PLT
				addl	$256, %esp
		.LBE218:
		.LBE217:
				jmp	.L313
		.L359:
				nop
		.L319:
		.LBB219:
  255    print string("argument list for ")
				leal	-284(%ebp), %eax
				leal	.LC10@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-8220(%ebp), %eax
				leal	-284(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-3100(%ebp), %eax
				leal	-8220(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.LBE219:
		.LBB220:
		.LBB221:
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-3100(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_imp_printstring@PLT
				addl	$256, %esp
		.LBE221:
		.LBE220:
  256    item(f+2)
				movl	-10064(%ebp), %eax
				movl	4(%eax), %eax
				leal	2(%eax), %edx
				subl	$12, %esp
				leal	-10048(%ebp), %eax
				pushl	%edx
				movl	%eax, %ecx
				call	ITEM.6201
				addl	$16, %esp
		.LBB222:
		.LBB223:
		.LBB224:
  257    print string(snl."probably due to semicolon missing from definition of ")
				leal	-284(%ebp), %eax
				leal	.LC11@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-284(%ebp), %ecx
		.LBE224:
				movl	-10064(%ebp), %eax
				leal	32(%eax), %edx
				leal	-284(%ebp), %eax
				subl	$4, %esp
				pushl	%ecx
				pushl	%edx
				pushl	%eax
				call	_imp_join@PLT
				addl	$12, %esp
				leal	-284(%ebp), %edx
		.LBE223:
				leal	-284(%ebp), %eax
				movl	%edx, %esi
				movl	$64, %edx
				movl	%eax, %edi
				movl	%edx, %ecx
				rep movsl
				leal	-284(%ebp), %edx
				leal	-3356(%ebp), %eax
				movl	%edx, %esi
				movl	$64, %edx
				movl	%eax, %edi
				movl	%edx, %ecx
				rep movsl
		.LBE222:
		.LBB225:
		.LBB226:
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-3356(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_imp_printstring@PLT
				addl	$256, %esp
		.LBE226:
		.LBE225:
  258    item(p+2)
				movl	-10064(%ebp), %eax
				movl	8(%eax), %eax
				leal	2(%eax), %edx
				subl	$12, %esp
				leal	-10048(%ebp), %eax
				pushl	%edx
				movl	%eax, %ecx
				call	ITEM.6201
				addl	$16, %esp
  259    ->end
				jmp	.L313
		.L320:
		.LBB227:
  260
  261 fault(6):print string("GPM error?")
				leal	-284(%ebp), %eax
				leal	.LC12@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-7964(%ebp), %eax
				leal	-284(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-2844(%ebp), %eax
				leal	-7964(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.LBE227:
		.LBB228:
		.LBB229:
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-2844(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_imp_printstring@PLT
				addl	$256, %esp
		.LBE229:
		.LBE228:
  262    ->end
				jmp	.L313
		.L321:
		.LBB230:
  263
  264 fault(7):print string("Undefined name ")
				leal	-284(%ebp), %eax
				leal	.LC13@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-7708(%ebp), %eax
				leal	-284(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-2588(%ebp), %eax
				leal	-7708(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.LBE230:
		.LBB231:
		.LBB232:
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-2588(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_imp_printstring@PLT
				addl	$256, %esp
		.LBE232:
		.LBE231:
  265    item(w)
				movl	-10064(%ebp), %eax
				movl	16(%eax), %edx
				subl	$12, %esp
				leal	-10048(%ebp), %eax
				pushl	%edx
				movl	%eax, %ecx
				call	ITEM.6201
				addl	$16, %esp
  266    ->end
				jmp	.L313
		.L322:
		.LBB233:
  267
  268 fault(8):print string("Unmatched >; GPM error ?")
				leal	-284(%ebp), %eax
				leal	.LC14@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-7452(%ebp), %eax
				leal	-284(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-2332(%ebp), %eax
				leal	-7452(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.LBE233:
		.LBB234:
		.LBB235:
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-2332(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_imp_printstring@PLT
				addl	$256, %esp
		.LBE235:
		.LBE234:
  269    ->end
				jmp	.L313
		.L323:
		.LBB236:
  270
  271 fault(9):print string("Update argument too long for ")
				leal	-284(%ebp), %eax
				leal	.LC15@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-7196(%ebp), %eax
				leal	-284(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-2076(%ebp), %eax
				leal	-7196(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.LBE236:
		.LBB237:
		.LBB238:
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-2076(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_imp_printstring@PLT
				addl	$256, %esp
		.LBE238:
		.LBE237:
  272    item(p+9)
				movl	-10064(%ebp), %eax
				movl	8(%eax), %eax
				leal	9(%eax), %edx
				subl	$12, %esp
				leal	-10048(%ebp), %eax
				pushl	%edx
				movl	%eax, %ecx
				call	ITEM.6201
				addl	$16, %esp
  273    ->end
				jmp	.L313
		.L324:
		.LBB239:
  274
  275 fault(10):print string("Non-digit in number ")
				leal	-284(%ebp), %eax
				leal	.LC16@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-6940(%ebp), %eax
				leal	-284(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-1820(%ebp), %eax
				leal	-6940(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.LBE239:
		.LBB240:
		.LBB241:
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-1820(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_imp_printstring@PLT
				addl	$256, %esp
		.L313:
		.LBE241:
		.LBE240:
  276
  277 end:
  278
  279    ! general monitor
  280    w=20
				movl	$20, %eax
				movl	-10064(%ebp), %ecx
				movl	%eax, 16(%ecx)
		.LBB242:
		.LBB243:
		.LBB244:
  281    print string(snl."Current macros are :")
				leal	-284(%ebp), %eax
				leal	.LC17@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-284(%ebp), %ecx
		.LBE244:
				movl	-10064(%ebp), %eax
				leal	32(%eax), %edx
				leal	-284(%ebp), %eax
				subl	$4, %esp
				pushl	%ecx
				pushl	%edx
				pushl	%eax
				call	_imp_join@PLT
				addl	$12, %esp
				leal	-284(%ebp), %edx
		.LBE243:
				leal	-284(%ebp), %eax
				movl	%edx, %esi
				movl	$64, %edx
				movl	%eax, %edi
				movl	%edx, %ecx
				rep movsl
				leal	-284(%ebp), %edx
				leal	-1564(%ebp), %eax
				movl	%edx, %esi
				movl	$64, %edx
				movl	%eax, %edi
				movl	%edx, %ecx
				rep movsl
		.LBE242:
		.LBB245:
		.LBB246:
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-1564(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_imp_printstring@PLT
				addl	$256, %esp
		.L325:
		.LBE246:
		.LBE245:
  282    %while p#0 %or f#0 %cycle
				movl	-10064(%ebp), %eax
				movl	8(%eax), %eax
				testl	%eax, %eax
				jne	.L360
				movl	-10064(%ebp), %eax
				movl	4(%eax), %eax
				testl	%eax, %eax
				je	.L361
				jmp	.L327
		.L360:
				nop
		.L327:
				nop
		.L328:
		.LBB271:
		.LBB272:
  283      %if p>f %then %start
				movl	-10064(%ebp), %eax
				movl	8(%eax), %edx
				movl	4(%eax), %eax
				cmpl	%eax, %edx
				jle	.L362
				nop
		.L330:
  284        w1=p+2
				movl	-10064(%ebp), %esi
				movl	8(%esi), %eax
				addl	$2, %eax
				movl	%eax, (%esi)
  285        p=st(p)
				movl	8(%esi), %eax
				movzwl	ST.6030@GOTOFF(%ebx,%eax,2), %eax
				cwtl
				movl	%esi, -10064(%ebp)
				movl	%eax, 8(%esi)
		.LBB247:
		.LBB248:
		.LBB249:
  286        print string(snl."already entered :  ")
				leal	-284(%ebp), %eax
				leal	.LC18@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-284(%ebp), %ecx
		.LBE249:
				movl	-10064(%ebp), %esi
				leal	32(%esi), %edx
				leal	-284(%ebp), %eax
				subl	$4, %esp
				pushl	%ecx
				pushl	%edx
				pushl	%eax
				call	_imp_join@PLT
				addl	$12, %esp
				leal	-284(%ebp), %edx
		.LBE248:
				leal	-284(%ebp), %eax
				movl	%edx, %esi
				movl	$64, %edx
				movl	%eax, %edi
				movl	%edx, %ecx
				rep movsl
				leal	-284(%ebp), %edx
				leal	-1308(%ebp), %eax
				movl	%edx, %esi
				movl	$64, %edx
				movl	%eax, %edi
				movl	%edx, %ecx
				rep movsl
		.LBE247:
		.LBB250:
		.LBB251:
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-1308(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_imp_printstring@PLT
				addl	$256, %esp
		.LBE251:
		.LBE250:
  287      %finish %else %start
				jmp	.L331
		.L362:
  288        w1=f+2
				movl	-10064(%ebp), %edi
				movl	4(%edi), %eax
				addl	$2, %eax
				movl	%eax, (%edi)
  289        f=st(f)
				movl	4(%edi), %eax
				movzwl	ST.6030@GOTOFF(%ebx,%eax,2), %eax
				cwtl
				movl	%edi, -10064(%ebp)
				movl	%eax, 4(%edi)
		.LBB252:
		.LBB253:
		.LBB254:
  290        print string(snl."not yet entered :  ")
				leal	-284(%ebp), %eax
				leal	.LC19@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-284(%ebp), %ecx
		.LBE254:
				movl	-10064(%ebp), %edi
				leal	32(%edi), %edx
				leal	-284(%ebp), %eax
				subl	$4, %esp
				pushl	%ecx
				pushl	%edx
				pushl	%eax
				call	_imp_join@PLT
				addl	$12, %esp
				leal	-284(%ebp), %edx
		.LBE253:
				leal	-284(%ebp), %eax
				movl	%edx, %esi
				movl	$64, %edx
				movl	%eax, %edi
				movl	%edx, %ecx
				rep movsl
				leal	-284(%ebp), %edx
				leal	-1052(%ebp), %eax
				movl	%edx, %esi
				movl	$64, %edx
				movl	%eax, %edi
				movl	%edx, %ecx
				rep movsl
		.LBE252:
		.LBB255:
		.LBB256:
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-1052(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_imp_printstring@PLT
				addl	$256, %esp
		.L331:
		.LBE256:
		.LBE255:
		.LBB257:
  291      %finish
  292      %for r=1,1,w %cycle
				movl	-10064(%ebp), %eax
				movl	16(%eax), %eax
				movl	%eax, -10032(%ebp)
		.LBB258:
				movl	-10032(%ebp), %eax
				subl	$1, %eax
				movl	%eax, -10028(%ebp)
				movl	-10028(%ebp), %eax
				xorl	$1, %eax
				shrl	$31, %eax
				movzbl	%al, %eax
		.LBE258:
				testl	%eax, %eax
				je	.L332
				leal	-6172(%ebp), %eax
				subl	$8, %esp
				leal	.LC32@GOTOFF(%ebx), %edx
				pushl	%edx
				pushl	%eax
				call	_imp_c2istr@PLT
				addl	$12, %esp
				movl	_imp_current_line@GOT(%ebx), %eax
				movl	(%eax), %eax
				testl	%eax, %eax
				je	.L333
				movl	_imp_current_line@GOT(%ebx), %eax
				movl	(%eax), %eax
				movl	%eax, -10068(%ebp)
				jmp	.L334
		.L333:
				movl	$292, -10068(%ebp)
		.L334:
				movl	_imp_current_file@GOT(%ebx), %eax
				movl	(%eax), %eax
				testl	%eax, %eax
				je	.L335
				movl	_imp_current_file@GOT(%ebx), %eax
				movl	(%eax), %edx
				leal	-5916(%ebp), %eax
				subl	$8, %esp
				pushl	%edx
				pushl	%eax
				call	_imp_c2istr@PLT
				addl	$12, %esp
				jmp	.L336
		.L335:
		.LBB259:
				leal	-284(%ebp), %eax
				leal	.LC1@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-6684(%ebp), %eax
				leal	-284(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.LBE259:
				leal	-5916(%ebp), %eax
				leal	-6684(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.L336:
				pushl	$0
				pushl	$1
				pushl	$5
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-6172(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				pushl	-10068(%ebp)
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-5916(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_signal_event@PLT
				addl	$528, %esp
		.L332:
				movl	$0, %eax
				movl	-10064(%ebp), %ecx
				movl	%eax, 12(%ecx)
		.L337:
				movl	-10064(%ebp), %eax
				movl	12(%eax), %eax
				cmpl	-10032(%ebp), %eax
				je	.L363
				movl	-10064(%ebp), %esi
				movl	12(%esi), %eax
				addl	$1, %eax
				movl	%eax, 12(%esi)
				nop
				jmp	.L339
		.L364:
?Non-local
  293        item(w1)
				movl	(%esi), %edx
				subl	$12, %esp
				leal	-10048(%ebp), %eax
				pushl	%edx
				movl	%eax, %ecx
				call	ITEM.6201
				addl	$16, %esp
  294        %if st(w1)=0 %then %exit
				movl	(%esi), %eax
				movzwl	ST.6030@GOTOFF(%ebx,%eax,2), %eax
				testw	%ax, %ax
				je	.L364
				nop
		.L341:
				nop
				jmp	.L339
		.L365:
  295        w1=w1+st(w1)
				movl	-10064(%ebp), %edi
				movl	(%edi), %eax
				movzwl	ST.6030@GOTOFF(%ebx,%eax,2), %eax
				cwtl
				movl	(%edi), %edx
				addl	%edx, %eax
				movl	%eax, (%edi)
  296        %if st(w1)=marker %then %exit
				movl	(%edi), %eax
				movzwl	ST.6030@GOTOFF(%ebx,%eax,2), %eax
				cmpw	$-16384, %ax
				je	.L365
				nop
		.L343:
				nop
		.L339:
		.LBE257:
  297        %unless w=1 %then %start
				movl	-10064(%ebp), %eax
				movl	16(%eax), %eax
				cmpl	$1, %eax
				je	.L366
		.LBB260:
		.LBB261:
		.LBB262:
				nop
		.L345:
  298          print string(snl."arg".itos(r,1)." :    ")
				leal	-284(%ebp), %eax
				leal	.LC20@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-284(%ebp), %eax
				movl	%eax, -10068(%ebp)
		.LBE262:
		.LBB263:
		.LBB264:
				movl	-10064(%ebp), %eax
				movl	12(%eax), %eax
				movl	%eax, -10024(%ebp)
				movl	$1, -10020(%ebp)
		.LBB265:
		.LBB266:
				leal	-540(%ebp), %eax
				subl	$4, %esp
				pushl	-10020(%ebp)
				pushl	-10024(%ebp)
				pushl	%eax
				call	_imp_itos@PLT
				addl	$12, %esp
		.LBE266:
		.LBE265:
				leal	-284(%ebp), %eax
				leal	-540(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-284(%ebp), %ecx
				movl	%ecx, -10072(%ebp)
		.LBE264:
		.LBB267:
		.LBB268:
				leal	-284(%ebp), %eax
				leal	.LC21@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-284(%ebp), %ecx
		.LBE268:
				movl	-10064(%ebp), %eax
				leal	32(%eax), %edx
				leal	-284(%ebp), %eax
				subl	$4, %esp
				pushl	%ecx
				pushl	%edx
				pushl	%eax
				call	_imp_join@PLT
				addl	$12, %esp
				leal	-284(%ebp), %edx
		.LBE267:
				leal	-284(%ebp), %eax
				subl	$4, %esp
				pushl	-10072(%ebp)
				pushl	%edx
				pushl	%eax
				call	_imp_join@PLT
				addl	$12, %esp
				leal	-284(%ebp), %edx
		.LBE263:
				leal	-284(%ebp), %eax
				subl	$4, %esp
				pushl	-10068(%ebp)
				pushl	%edx
				pushl	%eax
				call	_imp_join@PLT
				addl	$12, %esp
				leal	-284(%ebp), %edx
		.LBE261:
				leal	-284(%ebp), %eax
				movl	%edx, %esi
				movl	$64, %edx
				movl	%eax, %edi
				movl	%edx, %ecx
				rep movsl
				leal	-284(%ebp), %edx
				leal	-796(%ebp), %eax
				movl	%edx, %esi
				movl	$64, %edx
				movl	%eax, %edi
				movl	%edx, %ecx
				rep movsl
		.LBE260:
		.LBB269:
		.LBB270:
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-796(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_imp_printstring@PLT
				addl	$256, %esp
				jmp	.L337
		.L366:
		.LBE270:
		.LBE269:
  299        %finish
  300      %repeat
				jmp	.L337
		.L363:
  301      w=1
				movl	$1, %eax
				movl	-10064(%ebp), %ecx
				movl	%eax, 16(%ecx)
  302      %repeat
				jmp	.L325
		.L361:
  303    print string(snl."End of monitor printing".snl)
				movl	-10064(%ebp), %eax
				leal	32(%eax), %ecx
				movl	%ecx, -10068(%ebp)
		.LBB273:
		.LBB274:
				leal	-284(%ebp), %eax
				leal	.LC22@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-284(%ebp), %edx
		.LBE274:
				movl	-10064(%ebp), %eax
				leal	32(%eax), %ecx
				leal	-284(%ebp), %eax
				subl	$4, %esp
				pushl	%edx
				pushl	%ecx
				pushl	%eax
				call	_imp_join@PLT
				addl	$12, %esp
				leal	-284(%ebp), %edx
		.LBE273:
				leal	-284(%ebp), %eax
				subl	$4, %esp
				pushl	-10068(%ebp)
				pushl	%edx
				pushl	%eax
				call	_imp_join@PLT
				addl	$12, %esp
				leal	-284(%ebp), %edx
		.LBE272:
				leal	-284(%ebp), %eax
				movl	%edx, %esi
				movl	$64, %edx
				movl	%eax, %edi
				movl	%edx, %ecx
				rep movsl
				leal	-284(%ebp), %edx
				leal	-284(%ebp), %eax
				movl	%edx, %esi
				movl	$64, %edx
				movl	%eax, %edi
				movl	%edx, %ecx
				rep movsl
		.LBE271:
		.LBB275:
		.LBB276:
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-284(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_imp_printstring@PLT
				addl	$256, %esp
				movl	$0, -10016(%ebp)
		.LBE276:
		.LBE275:
		.LBB277:
		.LBB278:
				subl	$12, %esp
				pushl	-10016(%ebp)
				call	exit@PLT
		.L355:
		.LBE278:
		.LBE277:
  304    %stop
  305
  306 %routine item(%integer x)
				pushl	%ebp
				movl	%esp, %ebp
				pushl	%edi
				pushl	%esi
				pushl	%ebx
				subl	$1340, %esp
				call	__x86.get_pc_thunk.bx
				addl	$_GLOBAL_OFFSET_TABLE_, %ebx
				movl	%ecx, -1340(%ebp)
				movl	%gs:20, %eax
				movl	%eax, -28(%ebp)
				xorl	%eax, %eax
  307 %integer k,l
  308    %if st(x)=0 %then l=s-x-1 %else l=st(x)-1
				movl	8(%ebp), %eax
				movzwl	ST.6030@GOTOFF(%ebx,%eax,2), %eax
				testw	%ax, %ax
				jne	.L306
				movl	S.6033@GOTOFF(%ebx), %eax
				subl	8(%ebp), %eax
				subl	$1, %eax
				movl	%eax, -1320(%ebp)
				jmp	.L290
		.L306:
				nop
		.L289:
				movl	8(%ebp), %eax
				movzwl	ST.6030@GOTOFF(%ebx,%eax,2), %eax
				cwtl
				subl	$1, %eax
				movl	%eax, -1320(%ebp)
		.L290:
  309    %if l>0 %then %start
				cmpl	$0, -1320(%ebp)
				jle	.L307
		.LBB182:
				nop
				jmp	.L300
		.L308:
		.LBB187:
  310      print symbol(st(x+k)) %for k=1, 1, l
				movl	-1320(%ebp), %eax
				movl	%eax, -1316(%ebp)
		.LBB183:
				movl	-1316(%ebp), %eax
				subl	$1, %eax
				movl	%eax, -1312(%ebp)
				movl	-1312(%ebp), %eax
				xorl	$1, %eax
				shrl	$31, %eax
				movzbl	%al, %eax
		.LBE183:
				testl	%eax, %eax
				je	.L293
				leal	-796(%ebp), %eax
				subl	$8, %esp
				leal	.LC31@GOTOFF(%ebx), %edx
				pushl	%edx
				pushl	%eax
				call	_imp_c2istr@PLT
				addl	$12, %esp
				movl	_imp_current_line@GOT(%ebx), %eax
				movl	(%eax), %eax
				testl	%eax, %eax
				je	.L294
				movl	_imp_current_line@GOT(%ebx), %eax
				movl	(%eax), %eax
				movl	%eax, -1344(%ebp)
				jmp	.L295
		.L294:
				movl	$310, -1344(%ebp)
		.L295:
				movl	_imp_current_file@GOT(%ebx), %eax
				movl	(%eax), %eax
				testl	%eax, %eax
				je	.L296
				movl	_imp_current_file@GOT(%ebx), %eax
				movl	(%eax), %edx
				leal	-540(%ebp), %eax
				subl	$8, %esp
				pushl	%edx
				pushl	%eax
				call	_imp_c2istr@PLT
				addl	$12, %esp
				jmp	.L297
		.L296:
		.LBB184:
				leal	-284(%ebp), %eax
				leal	.LC1@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-1308(%ebp), %eax
				leal	-284(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.LBE184:
				leal	-540(%ebp), %eax
				leal	-1308(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.L297:
				pushl	$0
				pushl	$1
				pushl	$5
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-796(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				pushl	-1344(%ebp)
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-540(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_signal_event@PLT
				addl	$528, %esp
		.L293:
				movl	$0, -1324(%ebp)
		.L298:
				movl	-1324(%ebp), %eax
				cmpl	-1316(%ebp), %eax
				je	.L308
				addl	$1, -1324(%ebp)
				movl	8(%ebp), %edx
				movl	-1324(%ebp), %eax
				addl	%edx, %eax
				movzwl	ST.6030@GOTOFF(%ebx,%eax,2), %eax
				movsbl	%al, %eax
				movb	%al, -1325(%ebp)
		.LBB185:
		.LBB186:
				movsbl	-1325(%ebp), %eax
				subl	$12, %esp
				pushl	%eax
				call	_imp_printsymbol@PLT
				addl	$16, %esp
		.LBE186:
		.LBE185:
				jmp	.L298
		.L292:
		.L307:
		.LBE182:
				nop
		.L300:
		.LBE187:
  311    %finish
  312    %if st(x)=0 %then print string("...    (incomplete)")
				movl	8(%ebp), %eax
				movzwl	ST.6030@GOTOFF(%ebx,%eax,2), %eax
				testw	%ax, %ax
				jne	.L309
		.LBB188:
				leal	-284(%ebp), %eax
				leal	.LC23@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-1052(%ebp), %eax
				leal	-284(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-284(%ebp), %eax
				leal	-1052(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.LBE188:
		.LBB189:
		.LBB190:
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-284(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_imp_printstring@PLT
				addl	$256, %esp
		.LBE190:
		.LBE189:
				nop
		.L302:
  313 %end
				jmp	.L302
		.L309:
				nop
				movl	-28(%ebp), %eax
				xorl	%gs:20, %eax
				je	.L304
				call	__stack_chk_fail_local
		.L304:
				leal	-12(%ebp), %esp
				popl	%ebx
				popl	%esi
				popl	%edi
				popl	%ebp
				ret
		.LFE194:
				.section	.rodata
		.LC32:
				.string	"Illegal cycle R = 1, 1, W"
				.align 4
		.LC33:
				.string	"->FAULT(%d) out of bounds at %s line %d"
				.align 32
		.LC2:
				.byte	10
				.string	"Monitor : "
				.zero	244
				.align 32
		.LC3:
				.byte	37
				.string	"Unmatched semicolon in definition of "
				.zero	217
				.align 32
		.LC4:
				.byte	31
				.string	"Unquoted # in argument list of "
				.zero	223
				.align 32
		.LC5:
				.byte	44
				.string	"Impossible argument number in definition of "
				.zero	210
				.align 32
		.LC6:
				.byte	12
				.string	"No argument "
				.zero	242
				.align 32
		.LC7:
				.byte	13
				.string	" in call for "
				.zero	241
				.align 32
		.LC8:
				.byte	14
				.string	"Terminator in "
				.zero	240
				.align 32
		.LC9:
				.byte	25
				.string	"input stream; GPM error ?"
				.zero	229
				.align 32
		.LC10:
				.byte	18
				.string	"argument list for "
				.zero	236
				.align 32
		.LC11:
				.byte	53
				.string	"probably due to semicolon missing from definition of "
				.zero	201
				.align 32
		.LC12:
				.byte	10
				.string	"GPM error?"
				.zero	244
				.align 32
		.LC13:
				.byte	15
				.string	"Undefined name "
				.zero	239
				.align 32
		.LC14:
				.byte	24
				.string	"Unmatched >; GPM error ?"
				.zero	230
				.align 32
		.LC15:
				.byte	29
				.string	"Update argument too long for "
				.zero	225
				.align 32
		.LC16:
				.byte	20
				.string	"Non-digit in number "
				.zero	234
				.align 32
		.LC17:
				.byte	20
				.string	"Current macros are :"
				.zero	234
				.align 32
		.LC18:
				.byte	19
				.string	"already entered :  "
				.zero	235
				.align 32
		.LC19:
				.byte	19
				.string	"not yet entered :  "
				.zero	235
				.align 32
		.LC20:
				.byte	6
				.string	" :    "
				.zero	248
				.align 32
		.LC21:
				.byte	3
				.string	"arg"
				.zero	251
				.align 32
		.LC22:
				.byte	23
				.string	"End of monitor printing"
				.zero	231
		MONITOR.6028:
		.LFB193:
  314
  315 %end
				cmpl	$0, -10036(%ebp)
				jle	.L347
				jmp	.L355
		.L312:
		.LBB196:
				cmpl	$10, -10036(%ebp)
				jle	.L348
		.L347:
				movl	_imp_current_line@GOT(%ebx), %eax
				movl	(%eax), %eax
				testl	%eax, %eax
				je	.L349
				movl	_imp_current_line@GOT(%ebx), %eax
				movl	(%eax), %eax
				movl	%eax, -10068(%ebp)
				jmp	.L350
		.L349:
				movl	$315, -10068(%ebp)
		.L350:
				movl	_imp_current_file@GOT(%ebx), %eax
				movl	(%eax), %eax
				testl	%eax, %eax
				je	.L351
				movl	_imp_current_file@GOT(%ebx), %eax
				movl	(%eax), %edx
				leal	-5660(%ebp), %eax
				subl	$8, %esp
				pushl	%edx
				pushl	%eax
				call	_imp_c2istr@PLT
				addl	$12, %esp
				jmp	.L352
		.L351:
		.LBB279:
				leal	-284(%ebp), %eax
				leal	.LC1@GOTOFF(%ebx), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
				leal	-6428(%ebp), %eax
				leal	-284(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.LBE279:
				leal	-5660(%ebp), %eax
				leal	-6428(%ebp), %edx
				movl	$64, %ecx
				movl	%eax, %edi
				movl	%edx, %esi
				rep movsl
		.L352:
				pushl	-10044(%ebp)
				pushl	-10040(%ebp)
				pushl	-10036(%ebp)
				leal	.LC33@GOTOFF(%ebx), %eax
				pushl	%eax
				pushl	-10036(%ebp)
				pushl	$3
				pushl	$6
				pushl	-10068(%ebp)
				subl	$256, %esp
				movl	%esp, %eax
				movl	%eax, %edi
				leal	-5660(%ebp), %eax
				movl	$64, %edx
				movl	%eax, %esi
				movl	%edx, %ecx
				rep movsl
				call	_signal_eventf@PLT
				addl	$288, %esp
		.L348:
				movl	-10036(%ebp), %eax
				subl	$1, %eax
				movl	FAULT.6205@GOTOFF(%ebx,%eax,4), %eax
				nop
				jmp	*%eax
		.LFE193:
				.data
				.align 32
		ST.6030:
				.align 4
		S.6033:
				.long	39
				.align 4
		E.6032:
				.long	33
				.section	.data.rel.local,"aw",@progbits
				.align 4
		MCM.6050:
				.long	.L123
				.long	.L127
				.long	.L131
				.long	.L142
				.long	.L157
				.long	.L166
				.section	.rodata
				.align 4
		__PRETTY_FUNCTION__.5621:
				.string	"_imp_SELECTINPUT"
				.section	.data.rel.local
				.align 32
		FAULT.6205:
				.long	.L312
				.long	.L314
				.long	.L315
				.long	.L316
				.long	.L317
				.long	.L320
				.long	.L321
				.long	.L322
				.long	.L323
				.long	.L324
				.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:
		.LFB195:
				movl	(%esp), %eax
				ret
		.LFE195:
				.section	.text.__x86.get_pc_thunk.dx,"axG",@progbits,__x86.get_pc_thunk.dx,comdat
				.globl	__x86.get_pc_thunk.dx
				.hidden	__x86.get_pc_thunk.dx
		__x86.get_pc_thunk.dx:
		.LFB196:
				movl	(%esp), %edx
				ret
		.LFE196:
				.section	.text.__x86.get_pc_thunk.bx,"axG",@progbits,__x86.get_pc_thunk.bx,comdat
				.globl	__x86.get_pc_thunk.bx
				.hidden	__x86.get_pc_thunk.bx
		__x86.get_pc_thunk.bx:
		.LFB197:
				movl	(%esp), %ebx
				ret
		.LFE197:
				.section	.text.__x86.get_pc_thunk.si,"axG",@progbits,__x86.get_pc_thunk.si,comdat
				.globl	__x86.get_pc_thunk.si
				.hidden	__x86.get_pc_thunk.si
		__x86.get_pc_thunk.si:
		.LFB198:
				movl	(%esp), %esi
				ret
		.LFE198:
		.Letext0:
  316
  317 %endofprogram
				cmpl	$0, -5816(%ebp)
				jle	.L177
				jmp	.L193
		.L224:
  257 Statements compiled