version	U12.1.00
uid	findsig.tmp.u1-1459048650-0
impl	error
global	252
	0,000001,dloadflag,0
	1,000001,initflag,0
	2,000001,BADflag,0
	3,000001,aflag,0
	4,000001,yydebug,0
	5,000001,Mflag,0
	6,000001,cflag,0
	7,000001,pflag,0
	8,000001,Lflag,0
	9,000001,Pflag,0
	10,000001,Tflag,0
	11,000001,Gflag,0
	12,000001,Vflag,0
	13,000001,Nflag,0
	14,000001,fflag,0
	15,000001,Fflag,0
	16,000001,Rflag,0
	17,000001,OOflag,0
	18,000001,OOOflag,0
	19,000001,Oflag,0
	20,000001,Xflag,0
	21,000001,xflag,0
	22,000001,hflag,0
	23,000001,dbgmsg,0
	24,000001,insrtptr,0
	25,000001,rpt_lvl,0
	26,000001,ifname,0
	27,000001,ofname,0
	28,000001,sigfname,0
	29,000001,optfname,0
	30,000001,actual_ifname,0
	31,000001,ofile,0
	32,000001,sigfile,0
	33,000001,optfile,0
	34,000001,unparse_file,0
	35,000001,optsfile,0
	36,000001,callfile,0
	37,000001,yyline,0
	38,000001,usl_ptr,0
	39,000001,insig,0
	40,000001,entry_nam,0
	41,000001,nil,0
	42,000001,indx_assign,0
	43,000001,indx_passign,0
	44,000001,indx_massign,0
	45,000001,indx_or,0
	46,000001,indx_and,0
	47,000001,indx_not,0
	48,000001,indx_equals,0
	49,000001,indx_less,0
	50,000001,indx_le,0
	51,000001,indx_ge,0
	52,000001,indx_ne,0
	53,000001,indx_greater,0
	54,000001,indx_plus,0
	55,000001,indx_minus,0
	56,000001,indx_times,0
	57,000001,indx_divide,0
	58,000001,indx_mod,0
	59,000001,indx_pconc,0
	60,000001,indx_sconc,0
	61,000001,indx_exp,0
	62,000001,indx_deref,0
	63,000001,indx_subscr,0
	64,000001,indx_New,0
	65,000001,indx_ValueOf,0
	66,000001,indx_First,0
	67,000001,indx_Last,0
	68,000001,indx_Pred,0
	69,000001,indx_Succ,0
	70,000001,indx_Ord,0
	71,000001,indx_OrdInv,0
	72,000001,indx_Card,0
	73,000001,indx_In,0
	74,000001,indx_Out,0
	75,000001,indx_put,0
	76,000001,indx_Callcc,0
	77,000001,indx_size,0
	78,000001,indx_ptr_New,0
	79,000001,indx_init_New,0
	80,000001,indx_empty,0
	81,000001,indx_standard,0
	82,000001,indx_inline,0
	83,000001,pend,0
	84,000001,indx_Boolean,0
	85,000001,indx_Void,0
	86,000001,indx_true,0
	87,000001,indx_false,0
	88,000001,indx_simple,0
	89,000001,indx_Null,0
	90,000001,indx_Mk,0
	91,000001,indx_Integer,0
	92,000001,indx_Array,0
	93,000001,sig_assign,0
	94,000001,sig_equals,0
	95,000001,sig_less,0
	96,000001,sig_greater,0
	97,000001,sig_New,0
	98,000001,sig_const,0
	99,000001,sig_ValueOf,0
	100,000001,sig_pconc,0
	101,000001,sig_sconc,0
	102,000001,sig_Signature,0
	103,000001,val_Boolean,0
	104,000001,val_Integer,0
	105,000001,val_Void,0
	106,000001,var_Void,0
	107,000001,sel_true,0
	108,000001,sel_false,0
	109,000001,id_Boolean,0
	110,000001,id_Integer,0
	111,000001,id_Void,0
	112,000001,id_put,0
	113,000001,id_ValueOf,0
	114,000001,id_New,0
	115,000001,id_size,0
	116,000001,id_Null,0
	117,000001,id_times,0
	118,000001,id_plus,0
	119,000001,appl_Null,0
	120,000001,yyvline,0
	121,000001,stt_table,0
	122,000001,stt_unique_cnt,0
	123,000001,stt_reference_cnt,0
	124,000001,reverse_stt,0
	125,000001,errfile,0
	126,000001,infofile,0
	127,000001,reduce,0
	128,000001,progress,0
	129,000001,debug_file,0
	130,000001,stats,0
	131,000001,nodes,0
	132,000001,ccode_file,0
	133,000001,nodes_file,0
	134,000001,lists_created_file,0
	135,000001,cons_file,0
	136,000001,treefile,0
	137,000001,symfile,0
	138,000001,sym2file,0
	139,000001,nodes_created_file,0
	140,000001,sym2_table,0
	141,000001,line_cnt,0
	142,000001,char_cnt,0
	143,000001,token_cnt,0
	144,000001,reserved_id_cnt,0
	145,000001,reserved_op_cnt,0
	146,000001,numeral_cnt,0
	147,000001,nodes_total_cnt,0
	148,000001,nodes_made_cnt,0
	149,000001,lists_total_cnt,0
	150,000001,lists_made_cnt,0
	151,000001,yyn_switches_cnt,0
	152,000001,yyn_compute_cnt,0
	153,000001,newstate_cnt,0
	154,000001,setstate_cnt,0
	155,000001,backup_cnt,0
	156,000001,default_cnt,0
	157,000001,reduce_cnt,0
	158,000001,errlab_cnt,0
	159,000001,errlab1_cnt,0
	160,000001,defined_id_cnt,0
	161,000001,defined_op_cnt,0
	162,000001,seperator_cnt,0
	163,000001,RIC_table,0
	164,000001,RIC_op_code_cnt,0
	165,000001,RIC_table_entry_cnt,0
	166,000001,comments_cnt,0
	167,000001,sing_quoted_cnt,0
	168,000001,dbl_quoted_cnt,0
	169,000001,infile,0
	170,000001,entry_name,0
	171,000001,yyinfnm,0
	172,000001,addposition,0
	173,000001,inline_cnvt,0
	174,000001,Ginline_cnvt,0
	175,000001,Vinline_cnvt,0
	176,000001,paramstop,0
	177,000001,denseqstop,0
	178,000001,condstop,0
	179,000001,declstop,0
	180,000001,stxtree,0
	181,000001,yystate,0
	182,000001,fn_count,0
	183,000001,scanstk,0
	184,000001,stktop,0
	185,000001,scansavc,0
	186,000001,yydescr,0
	187,000001,has_externs,0
	188,000001,argcnt_from_kind,0
	189,000001,parser_actions_cnt,0
	190,000001,curr_void_decl,0
	191,000001,curr_sig_transp,0
	192,000001,curr_tsig,0
	193,000001,err_node,0
	194,000001,in_sig,0
	195,000001,in_loop,0
	196,000001,linebuf,0
	197,000001,restab,0
	198,000001,cctab,0
	199,000001,tokenlgth,0
	200,000001,yynerrs,0
	201,000001,decl_num,0
	202,000001,decl_nums,0
	203,000001,Outer_arg,0
	204,000001,file_sigs,0
	205,000001,decl_num_in,0
	206,000001,sig_table,0
	207,000001,unique_node_id,0
	208,000001,objfilelist,0
	209,000001,Idtable,0
	210,000001,dump_tree_depth,0
	211,000001,next_pre,0
	212,000001,next_post,0
	213,000001,visited,0
	214,000001,Gfc_list,0
	215,000001,Glevel,0
	216,000001,Gcurrent,0
	217,000001,Goutfile,0
	218,000001,finished_accessible,0
	219,000001,all_fcs,0
	220,000001,all_fcs_tail,0
	221,000001,outer_fc,0
	222,000001,whole_program,0
	223,000001,currect_fcs,0
	224,000001,Vcurrent_func,0
	225,000001,Vcurrent_ar,0
	226,000001,Vstatic_level,0
	227,000001,Vnext_free,0
	228,000001,Vhigh_water,0
	229,000001,Vextent_limited,0
	230,000001,Vallocate_on_stack,0
	231,000001,Vcallcc,0
	232,000001,max_addr_regs,0
	233,000001,max_int_regs,0
	234,000001,n_addr_regs,0
	235,000001,n_int_regs,0
	236,000001,Vcurrent_blocks,0
	237,000001,found_non_vacuous,0
	238,000001,n_vacuous,0
	239,000001,avail_loc,0
	240,000001,compile_fcs,0
	241,000001,sl_available,0
	242,000001,stplinks,0
	243,000001,fld_table,0
	244,000001,surr_loop,0
	245,000001,callcc_call,0
	246,000001,catchsigs,0
	247,000001,Gspcl_to_inline,0
	248,000001,htable,0
	249,000001,NodeTypeName,0
	250,000005,findsig,2
	251,000005,tl_findsig,2

proc findsig
	local	0,001000,p_orig
	local	1,001000,dont_coerce
	local	2,000020,knd
	local	3,000020,status
	local	4,000020,q
	local	5,000020,r
	local	6,000020,all_ok
	local	7,000020,nresult
	local	8,000020,old_may_fail
	local	9,000020,is_void
	local	10,000020,good_element
	local	11,000020,kinds_differ
	local	12,000020,coerce_guards
	local	13,000020,prev_kind
	local	14,000020,curr_kind
	local	15,000020,nelement
	local	16,000020,nguard
	local	17,000020,last_den
	local	18,000020,den_sig
	local	19,000020,par_list
	local	20,000020,arg_list
	local	21,000020,comp_list
	local	22,000020,local_id
	local	23,000020,self_it
	local	24,000020,simple_type
	local	25,000020,len
	local	26,000020,i
	local	27,000020,temp
	local	28,000020,par
	local	29,000020,arg
	local	30,000020,t
	local	31,000020,s
	local	32,000020,vac
	local	33,000020,field_list
	local	34,000020,id_list
	local	35,000020,self_param
	local	36,000020,self_plist
	local	37,000020,Int_param
	local	38,000020,Int_plist
	local	39,000020,In_sig
	local	40,000020,Out_sig
	local	41,000020,sig
	local	42,000020,orig_sig
	local	43,000020,new_sig
	local	44,000020,id_In
	local	45,000020,id_Out
	local	46,000020,Osig
	local	47,000020,Mk_param_list
	local	48,000020,id_New
	local	49,000020,id_ValueOf
	local	50,000020,id_assign
	local	51,000020,re_den_sig
	local	52,000020,vl_field_sig
	local	53,000020,vr_field_sig
	local	54,000020,sel_sig
	local	55,000020,maxlen
	local	56,000000,rpt_err
	local	57,000000,p
	local	58,000000,fix_p
	local	59,000000,findidsig
	local	60,000000,initsig
	local	61,000000,sig_Signature
	local	62,000000,findsig
	local	63,000000,Gflag
	local	64,000000,Gfind_inline
	local	65,000000,find_inline
	local	66,000000,may_fail
	local	67,000000,comp_st
	local	68,000000,val_Void
	local	69,000000,nil
	local	70,000000,dontsubst
	local	71,000000,cn_cons
	local	72,000000,coerce
	local	73,000000,vfree
	local	74,000000,amatch
	local	75,000000,match_delv
	local	76,000000,mknode
	local	77,000000,match_len
	local	78,000000,findapplsig
	local	79,000000,cn_hd_field
	local	80,000000,cn_tl_field
	local	81,000000,lock
	local	82,000000,unlock
	local	83,000000,fixhints
	local	84,000000,chgsig
	local	85,000000,last
	local	86,000000,Nflag
	local	87,000000,iand
	local	88,000000,clear_slink_known
	local	89,000000,sig_structure
	local	90,000000,val_Boolean
	local	91,000000,rpt_dbg
	local	92,000000,dbgmsg
	local	93,000000,findstdecl
	local	94,000000,rpt_err_node
	local	95,000000,MAXSTRLEN
	local	96,000000,on_dontsubst
	local	97,000000,NIL
	local	98,000000,expand_str
	local	99,000000,findmpsig
	local	100,000000,emptylist
	local	101,000000,UNDEFNAME
	local	102,000000,copynode
	local	103,000000,length
	local	104,000000,vacuous_arg
	local	105,000000,mkcompnm
	local	106,000000,indx_New
	local	107,000000,sig_New
	local	108,000000,special
	local	109,000000,init_inline
	local	110,000000,addright
	local	111,000000,indx_ValueOf
	local	112,000000,sig_ValueOf
	local	113,000000,indx_assign
	local	114,000000,sig_assign
	local	115,000000,indx_Mk
	local	116,000000,next_pre
	local	117,000000,first
	local	118,000000,subst
	local	119,000000,tsig_order
	local	120,000000,tsubst
	local	121,000000,self
	local	122,000000,getname
	local	123,000000,spcl_to_inline
	local	124,000000,prefix
	local	125,000000,mklist
	local	126,000000,FALSE1
	local	127,000000,val_Integer
	local	128,000000,indx_equals
	local	129,000000,sig_equals
	local	130,000000,indx_ne
	local	131,000000,indx_First
	local	132,000000,sig_const
	local	133,000000,indx_Last
	local	134,000000,indx_Pred
	local	135,000000,indx_Succ
	local	136,000000,indx_Ord
	local	137,000000,indx_OrdInv
	local	138,000000,indx_Card
	local	139,000000,copylist
	local	140,000000,indx_In
	local	141,000000,indx_Out
	local	142,000000,getcomp
	local	143,000000,inscomp
	local	144,000000,comp_index
	local	145,000000,rpt_err_noe
	con	0,010000,19,146,151,156,144,163,151,147,072,040,160,137,157,162,151,147,040,156,151,154
	con	1,010000,15,146,151,156,144,163,151,147,072,040,160,040,040,156,151,154
	con	2,002000,1,2
	con	3,002000,1,0
	con	4,002000,1,1
	con	5,002000,2,31
	con	6,002000,2,32
	con	7,002000,1,5
	con	8,002000,1,4
	con	9,002000,1,6
	con	10,002000,1,7
	con	11,002000,2,10
	con	12,002000,2,35
	con	13,002000,2,37
	con	14,002000,2,20
	con	15,002000,2,13
	con	16,002000,2,28
	con	17,002000,2,11
	con	18,002000,2,16
	con	19,002000,2,12
	con	20,002000,2,25
	con	21,002000,2,29
	con	22,002000,2,26
	con	23,010000,29,146,151,156,144,163,151,147,072,040,143,141,156,144,040,040,151,156,040,163,171,156,164,141,170,040,164,162,145,145
	con	24,002000,2,27
	con	25,010000,29,146,151,156,144,163,151,147,072,040,040,143,157,162,040,151,156,040,163,171,156,164,141,170,040,164,162,145,145,012
	con	26,002000,2,33
	con	27,010000,24,116,157,040,141,160,160,162,157,160,162,151,141,164,145,040,164,171,160,145,040,146,157,162,040
	con	28,002000,2,34
	con	29,002000,1,8
	con	30,002000,1,3
	con	31,002000,2,46
	con	32,010000,27,120,162,157,144,165,143,164,040,143,157,155,160,157,156,145,156,164,040,156,157,164,040,156,141,155,145,144
	con	33,002000,2,18
	con	34,010000,22,102,141,144,040,165,156,151,157,156,040,146,151,145,154,144,040,156,141,155,145,072,040
	con	35,010000,3,164,157,137
	con	36,010000,3,151,163,137
	con	37,002000,1,9
	con	38,002000,2,47
	con	39,010000,5,146,162,157,155,137
	con	40,002000,2,14
	con	41,002000,2,19
	con	42,002000,2,21
	con	43,002000,2,22
	con	44,002000,2,23
	con	45,002000,2,24
	con	46,002000,2,15
	con	47,010000,38,146,151,156,144,163,151,147,072,040,105,170,164,145,156,163,151,157,156,040,141,162,147,165,155,145,156,164,040,156,157,164,040,141,040,164,171,160,145
	con	48,010000,40,146,151,156,144,163,151,147,040,111,156,040,157,143,143,165,162,163,040,151,156,040,145,170,164,145,156,144,040,141,162,147,165,155,145,156,164,040,163,151,147
	con	49,010000,33,117,165,164,040,157,143,143,165,162,163,040,151,156,040,145,170,164,145,156,144,040,141,162,147,165,155,145,156,164,040,163,151,147
	con	50,002000,2,17
	con	51,010000,42,116,157,156,055,164,171,160,145,040,145,170,160,162,145,163,163,151,157,156,040,151,156,040,162,145,143,157,162,144,040,143,157,156,163,164,162,165,143,164,151,157,156
	con	52,010000,34,116,157,040,126,040,157,160,145,162,141,164,151,157,156,040,151,156,040,162,145,143,157,162,144,040,143,157,155,160,157,156,145,156,164
	con	53,010000,36,116,157,040,116,145,167,040,157,160,145,162,141,164,151,157,156,040,151,156,040,162,145,143,157,162,144,040,143,157,155,160,157,156,145,156,164
	con	54,010000,35,116,157,040,072,075,040,157,160,145,162,141,164,151,157,156,040,151,156,040,162,145,143,157,162,144,040,143,157,155,160,157,156,145,156,164
	con	55,002000,2,38
	con	56,010000,38,146,151,156,144,163,151,147,072,040,122,105,130,124,105,122,116,104,105,106,040,167,151,164,150,157,165,164,040,163,151,147,156,141,164,165,162,145,012
	con	57,010000,32,146,151,156,144,163,151,147,072,040,165,156,153,156,157,167,156,040,145,170,160,162,145,163,163,151,157,156,040,153,151,156,144
	declend
	filen	pass4/findsig.tmp.icn
	line	169
	colm	12
	synt	any
	mark	L1
	line	188
	colm	5
	synt	if
	mark0
	pnull
	var	0
	line	188
	colm	8
	synt	any
	null
	unmark
	var	56
	str	0
	line	188
	colm	28
	synt	any
	invoke	1
	line	188
	colm	5
	synt	endif
	unmark
lab L1
	mark	L2
	pnull
	var	57
	var	58
	var	0
	line	189
	colm	15
	synt	any
	invoke	1
	line	189
	colm	7
	synt	any
	asgn
	unmark
lab L2
	mark	L3
	line	190
	colm	5
	synt	if
	mark0
	pnull
	var	57
	line	190
	colm	8
	synt	any
	null
	unmark
	var	56
	str	1
	line	190
	colm	23
	synt	any
	invoke	1
	line	190
	colm	5
	synt	endif
	unmark
lab L3
	mark	L4
	pnull
	var	3
	pnull
	var	57
	line	192
	colm	17
	synt	any
	field	sig_done
	line	192
	colm	12
	synt	any
	asgn
	unmark
lab L4
	mark	L5
	line	196
	colm	5
	synt	if
	mark0
	pnull
	var	3
	int	2
	line	196
	colm	16
	synt	any
	eqv
	unmark
	mark	L6
	int	3
	line	197
	colm	9
	synt	any
	pret
lab L6
	synt	any
	pfail
	line	196
	colm	5
	synt	endif
	unmark
lab L5
	mark	L7
	line	198
	colm	5
	synt	if
	mark0
	pnull
	var	3
	int	4
	line	198
	colm	16
	synt	any
	eqv
	unmark
	mark	L8
	var	57
	line	199
	colm	9
	synt	any
	pret
lab L8
	synt	any
	pfail
	line	198
	colm	5
	synt	endif
	unmark
lab L7
	mark	L9
	pnull
	var	2
	pnull
	var	57
	line	201
	colm	14
	synt	any
	field	kind
	line	201
	colm	9
	synt	any
	asgn
	unmark
lab L9
	mark	L10
	pnull
	pnull
	var	57
	line	203
	colm	7
	synt	any
	field	sig_done
	int	4
	line	203
	colm	18
	synt	any
	asgn
	unmark
lab L10
	mark	L11
	line	204
	colm	5
	synt	case
	mark0
	var	2
	eret
	mark	L13
	ccase
	int	5
	line	205
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L14
	var	59
	var	57
	line	206
	colm	29
	synt	any
	invoke	1
	line	206
	colm	13
	synt	any
	pret
lab L14
	synt	any
	pfail
	goto	L12
lab L13
	mark	L15
	ccase
	int	6
	line	207
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L16
	var	59
	var	57
	line	208
	colm	29
	synt	any
	invoke	1
	line	208
	colm	13
	synt	any
	pret
lab L16
	synt	any
	pfail
	goto	L12
lab L15
	mark	L17
	ccase
	int	7
	line	209
	colm	10
	synt	any
	eqv
	unmark
	pop
	mark	L18
	var	60
	var	57
	var	61
	line	211
	colm	24
	synt	any
	invoke	2
	unmark
lab L18
	mark	L19
	pnull
	pnull
	var	57
	line	212
	colm	19
	synt	any
	field	sig_done
	int	2
	line	212
	colm	30
	synt	any
	asgn
	unmark
lab L19
	mark	L20
	int	3
	line	213
	colm	17
	synt	any
	pret
lab L20
	synt	any
	pfail
	goto	L12
lab L17
	mark	L21
	ccase
	int	8
	line	215
	colm	10
	synt	any
	eqv
	unmark
	pop
	mark	L22
	var	60
	var	57
	var	61
	line	217
	colm	24
	synt	any
	invoke	2
	unmark
lab L22
	mark	L23
	pnull
	pnull
	var	57
	line	218
	colm	19
	synt	any
	field	sig_done
	int	2
	line	218
	colm	30
	synt	any
	asgn
	unmark
lab L23
	mark	L24
	int	3
	line	219
	colm	17
	synt	any
	pret
lab L24
	synt	any
	pfail
	goto	L12
lab L21
	mark	L25
	ccase
	int	9
	line	221
	colm	10
	synt	any
	eqv
	unmark
	pop
	mark	L26
	var	60
	var	57
	var	61
	line	223
	colm	24
	synt	any
	invoke	2
	unmark
lab L26
	mark	L27
	pnull
	pnull
	var	57
	line	224
	colm	19
	synt	any
	field	sig_done
	int	2
	line	224
	colm	30
	synt	any
	asgn
	unmark
lab L27
	mark	L28
	int	3
	line	225
	colm	17
	synt	any
	pret
lab L28
	synt	any
	pfail
	goto	L12
lab L25
	mark	L29
	ccase
	int	10
	line	227
	colm	10
	synt	any
	eqv
	unmark
	pop
	mark	L30
	var	60
	var	57
	var	61
	line	229
	colm	24
	synt	any
	invoke	2
	unmark
lab L30
	mark	L31
	pnull
	pnull
	var	57
	line	230
	colm	19
	synt	any
	field	sig_done
	int	2
	line	230
	colm	30
	synt	any
	asgn
	unmark
lab L31
	mark	L32
	int	3
	line	231
	colm	17
	synt	any
	pret
lab L32
	synt	any
	pfail
	goto	L12
lab L29
	mark	L33
	ccase
	int	11
	line	233
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L34
	var	60
	var	57
	var	61
	line	235
	colm	24
	synt	any
	invoke	2
	unmark
lab L34
	mark	L35
	pnull
	pnull
	var	57
	line	236
	colm	19
	synt	any
	field	sig_done
	int	2
	line	236
	colm	30
	synt	any
	asgn
	unmark
lab L35
	mark	L36
	int	3
	line	237
	colm	17
	synt	any
	pret
lab L36
	synt	any
	pfail
	goto	L12
lab L33
	mark	L37
	ccase
	int	12
	line	239
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L38
	pnull
	var	4
	pnull
	pnull
	var	57
	line	241
	colm	24
	synt	any
	field	signature
	line	241
	colm	36
	synt	any
	field	fsig_result_sig
	line	241
	colm	19
	synt	any
	asgn
	unmark
lab L38
	line	242
	colm	17
	synt	ifelse
	mark	L39
	pnull
	var	4
	line	242
	colm	21
	synt	any
	null
	unmark
	mark	L41
	line	243
	colm	21
	synt	if
	mark0
	pnull
	pnull
	var	5
	var	62
	pnull
	var	57
	line	243
	colm	41
	synt	any
	field	fc_body
	int	3
	line	243
	colm	38
	synt	any
	invoke	2
	line	243
	colm	28
	synt	any
	asgn
	int	3
	line	243
	colm	55
	synt	any
	numne
	unmark
	mark	L42
	pnull
	pnull
	var	57
	line	244
	colm	27
	synt	any
	field	sig_done
	int	3
	line	244
	colm	38
	synt	any
	numeq
	unmark
lab L42
	mark	L43
	var	5
	line	245
	colm	25
	synt	any
	pret
lab L43
	synt	any
	pfail
	line	243
	colm	21
	synt	endif
	unmark
lab L41
	mark	L44
	line	247
	colm	21
	synt	ifelse
	mark	L45
	pnull
	pnull
	pnull
	var	57
	line	247
	colm	26
	synt	any
	field	fc_body
	line	247
	colm	36
	synt	any
	field	signature
	int	2
	line	247
	colm	48
	synt	any
	numne
	unmark
	mark	L47
	pnull
	pnull
	pnull
	var	57
	line	248
	colm	26
	synt	any
	field	signature
	line	248
	colm	36
	synt	any
	field	fsig_result_sig
	pnull
	pnull
	var	57
	line	248
	colm	57
	synt	any
	field	fc_body
	line	248
	colm	65
	synt	any
	field	signature
	line	248
	colm	53
	synt	any
	asgn
	unmark
lab L47
	line	249
	colm	25
	synt	ifelse
	mark	L48
	pnull
	var	63
	int	3
	line	249
	colm	35
	synt	any
	numne
	unmark
	var	64
	var	57
	line	250
	colm	41
	synt	any
	invoke	1
	goto	L49
lab L48
	var	65
	var	57
	line	252
	colm	40
	synt	any
	invoke	1
lab L49
	line	249
	colm	25
	synt	endifelse
	goto	L46
lab L45
	pnull
	pnull
	pnull
	var	57
	line	255
	colm	27
	synt	any
	field	signature
	line	255
	colm	39
	synt	any
	field	fsig_result_sig
	int	2
	line	255
	colm	57
	synt	any
	asgn
lab L46
	line	247
	colm	21
	synt	endifelse
	unmark
lab L44
	mark	L50
	pnull
	pnull
	var	57
	line	257
	colm	23
	synt	any
	field	sig_done
	int	2
	line	257
	colm	34
	synt	any
	asgn
	unmark
lab L50
	mark	L51
	int	3
	line	258
	colm	21
	synt	any
	pret
lab L51
	synt	any
	pfail
	goto	L40
lab L39
	mark	L52
	pnull
	var	8
	var	66
	line	261
	colm	34
	synt	any
	asgn
	unmark
lab L52
	mark	L53
	line	262
	colm	21
	synt	ifelse
	mark	L54
	pnull
	var	67
	var	68
	var	4
	var	69
	var	69
	line	262
	colm	31
	synt	any
	invoke	4
	int	3
	line	262
	colm	55
	synt	any
	numeq
	unmark
	pnull
	var	9
	int	4
	line	263
	colm	34
	synt	any
	asgn
	goto	L55
lab L54
	pnull
	var	9
	int	3
	line	264
	colm	34
	synt	any
	asgn
lab L55
	line	262
	colm	21
	synt	endifelse
	unmark
lab L53
	mark	L56
	line	266
	colm	21
	synt	if
	mark0
	pnull
	pnull
	pnull
	var	57
	line	266
	colm	27
	synt	any
	field	fc_body
	line	266
	colm	37
	synt	any
	field	kind
	int	13
	line	266
	colm	44
	synt	any
	numeq
	unmark
	mark	L57
	pnull
	pnull
	var	57
	line	267
	colm	27
	synt	any
	field	sig_done
	int	2
	line	267
	colm	38
	synt	any
	asgn
	unmark
lab L57
	mark	L58
	line	268
	colm	25
	synt	ifelse
	mark	L59
	pnull
	var	63
	int	3
	line	268
	colm	35
	synt	any
	numne
	unmark
	var	64
	var	57
	line	269
	colm	41
	synt	any
	invoke	1
	goto	L60
lab L59
	var	65
	var	57
	line	271
	colm	40
	synt	any
	invoke	1
lab L60
	line	268
	colm	25
	synt	endifelse
	unmark
lab L58
	mark	L61
	int	3
	line	273
	colm	25
	synt	any
	pret
lab L61
	synt	any
	pfail
	line	266
	colm	21
	synt	endif
	unmark
lab L56
	mark	L62
	pnull
	var	66
	int	4
	line	275
	colm	30
	synt	any
	asgn
	unmark
lab L62
	mark	L63
	pnull
	var	5
	var	62
	pnull
	var	57
	line	276
	colm	36
	synt	any
	field	fc_body
	var	9
	line	276
	colm	33
	synt	any
	invoke	2
	line	276
	colm	23
	synt	any
	asgn
	unmark
lab L63
	mark	L64
	pnull
	var	66
	var	8
	line	277
	colm	30
	synt	any
	asgn
	unmark
lab L64
	mark	L65
	line	278
	colm	21
	synt	if
	mark0
	pnull
	var	5
	int	3
	line	278
	colm	27
	synt	any
	numne
	unmark
	mark	L66
	pnull
	var	70
	var	71
	var	57
	var	70
	line	279
	colm	45
	synt	any
	invoke	2
	line	279
	colm	35
	synt	any
	asgn
	unmark
lab L66
	mark	L67
	pnull
	pnull
	var	57
	line	280
	colm	27
	synt	any
	field	sig_done
	int	2
	line	280
	colm	38
	synt	any
	asgn
	unmark
lab L67
	mark	L68
	int	3
	line	281
	colm	25
	synt	any
	pret
lab L68
	synt	any
	pfail
	line	278
	colm	21
	synt	endif
	unmark
lab L65
	mark	L69
	line	284
	colm	21
	synt	if
	mark0
	mark	L70
	pnull
	var	4
	int	2
	line	284
	colm	27
	synt	any
	numeq
	line	284
	colm	31
	synt	any
	esusp
	goto	L71
lab L70
	pnull
	pnull
	pnull
	var	57
	line	285
	colm	27
	synt	any
	field	fc_body
	line	285
	colm	37
	synt	any
	field	signature
	int	2
	line	285
	colm	49
	synt	any
	numeq
lab L71
	unmark
	mark	L72
	pnull
	pnull
	var	57
	line	286
	colm	31
	synt	any
	field	sig_done
	int	2
	line	286
	colm	42
	synt	any
	asgn
	unmark
lab L72
	mark	L73
	int	3
	line	287
	colm	29
	synt	any
	pret
lab L73
	synt	any
	pfail
	line	284
	colm	21
	synt	endif
	unmark
lab L69
	mark	L74
	line	289
	colm	21
	synt	if
	mark0
	pnull
	pnull
	var	4
	line	289
	colm	27
	synt	any
	field	kind
	int	7
	line	289
	colm	34
	synt	any
	numeq
	pop
	pnull
	var	9
	int	3
	line	289
	colm	48
	synt	any
	numeq
	pop
	pnull
	pnull
	pnull
	pnull
	var	57
	line	290
	colm	27
	synt	any
	field	fc_body
	line	290
	colm	37
	synt	any
	field	signature
	line	290
	colm	49
	synt	any
	field	kind
	int	7
	line	290
	colm	56
	synt	any
	numne
	unmark
	mark	L75
	pnull
	var	7
	var	72
	pnull
	var	57
	line	292
	colm	49
	synt	any
	field	fc_body
	line	292
	colm	46
	synt	any
	invoke	1
	line	292
	colm	37
	synt	any
	asgn
	unmark
lab L75
	mark	L76
	line	293
	colm	29
	synt	if
	mark0
	pnull
	pnull
	var	5
	var	62
	var	7
	int	3
	line	293
	colm	46
	synt	any
	invoke	2
	line	293
	colm	36
	synt	any
	asgn
	int	3
	line	293
	colm	59
	synt	any
	numne
	unmark
	mark	L77
	pnull
	pnull
	var	57
	line	294
	colm	35
	synt	any
	field	sig_done
	int	3
	line	294
	colm	46
	synt	any
	asgn
	unmark
lab L77
	mark	L78
	var	73
	var	7
	line	295
	colm	38
	synt	any
	invoke	1
	unmark
lab L78
	mark	L79
	var	5
	line	296
	colm	33
	synt	any
	pret
lab L79
	synt	any
	pfail
	line	293
	colm	29
	synt	endif
	unmark
lab L76
	pnull
	pnull
	var	57
	line	298
	colm	31
	synt	any
	field	fc_body
	var	7
	line	298
	colm	41
	synt	any
	asgn
	line	289
	colm	21
	synt	endif
	unmark
lab L74
	mark	L80
	line	300
	colm	21
	synt	if
	mark0
	pnull
	pnull
	var	4
	line	300
	colm	27
	synt	any
	field	kind
	int	10
	line	300
	colm	34
	synt	any
	numeq
	pop
	var	74
	pnull
	pnull
	var	57
	line	301
	colm	34
	synt	any
	field	fc_body
	line	301
	colm	44
	synt	any
	field	signature
	var	4
	line	301
	colm	31
	synt	any
	invoke	2
	pop
	pnull
	var	75
	line	302
	colm	25
	synt	any
	nonnull
	unmark
	mark	L81
	pnull
	var	7
	var	76
	pnull
	int	14
	pnull
	var	57
	line	304
	colm	50
	synt	any
	field	fc_body
	var	69
	var	75
	line	303
	colm	47
	synt	any
	llist	4
	line	303
	colm	46
	synt	any
	invoke	1
	line	303
	colm	37
	synt	any
	asgn
	unmark
lab L81
	mark	L82
	pnull
	pnull
	var	7
	line	307
	colm	37
	synt	any
	field	mp_orig_length
	var	77
	line	307
	colm	54
	synt	any
	asgn
	unmark
lab L82
	mark	L83
	pnull
	pnull
	var	7
	line	308
	colm	37
	synt	any
	field	signature
	var	4
	line	308
	colm	49
	synt	any
	asgn
	unmark
lab L83
	mark	L84
	pnull
	pnull
	var	7
	line	309
	colm	37
	synt	any
	field	sig_done
	int	2
	line	309
	colm	48
	synt	any
	asgn
	unmark
lab L84
	pnull
	pnull
	var	57
	line	310
	colm	31
	synt	any
	field	fc_body
	var	7
	line	310
	colm	41
	synt	any
	asgn
	line	300
	colm	21
	synt	endif
	unmark
lab L80
	mark	L85
	line	314
	colm	21
	synt	if
	mark0
	pnull
	var	67
	pnull
	pnull
	var	57
	line	314
	colm	35
	synt	any
	field	fc_body
	line	314
	colm	45
	synt	any
	field	signature
	pnull
	pnull
	var	57
	line	315
	colm	35
	synt	any
	field	signature
	line	315
	colm	47
	synt	any
	field	fsig_result_sig
	var	69
	var	69
	line	314
	colm	32
	synt	any
	invoke	4
	int	3
	line	316
	colm	43
	synt	any
	numeq
	unmark
	pnull
	pnull
	pnull
	var	57
	line	317
	colm	38
	synt	any
	field	signature
	line	317
	colm	48
	synt	any
	field	fsig_result_sig
	pnull
	pnull
	var	57
	line	317
	colm	69
	synt	any
	field	fc_body
	line	317
	colm	77
	synt	any
	field	signature
	line	317
	colm	65
	synt	any
	asgn
	line	314
	colm	21
	synt	endif
	unmark
lab L85
	mark	L86
	line	319
	colm	21
	synt	ifelse
	mark	L87
	pnull
	var	63
	int	3
	line	319
	colm	31
	synt	any
	numne
	unmark
	var	64
	var	57
	line	320
	colm	37
	synt	any
	invoke	1
	goto	L88
lab L87
	var	65
	var	57
	line	322
	colm	36
	synt	any
	invoke	1
lab L88
	line	319
	colm	21
	synt	endifelse
	unmark
lab L86
	mark	L89
	pnull
	pnull
	var	57
	line	324
	colm	23
	synt	any
	field	sig_done
	int	2
	line	324
	colm	34
	synt	any
	asgn
	unmark
lab L89
	mark	L90
	int	3
	line	325
	colm	21
	synt	any
	pret
lab L90
	synt	any
	pfail
lab L40
	line	242
	colm	17
	synt	endifelse
	goto	L12
lab L37
	mark	L91
	ccase
	int	15
	line	328
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L92
	var	78
	var	57
	line	329
	colm	31
	synt	any
	invoke	1
	line	329
	colm	13
	synt	any
	pret
lab L92
	synt	any
	pfail
	goto	L12
lab L91
	mark	L93
	ccase
	int	16
	line	330
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L94
	pnull
	var	13
	pnull
	int	4
	line	332
	colm	30
	synt	any
	neg
	line	332
	colm	27
	synt	any
	asgn
	unmark
lab L94
	mark	L95
	pnull
	var	8
	var	66
	line	333
	colm	30
	synt	any
	asgn
	unmark
lab L95
	mark	L96
	pnull
	var	10
	var	69
	line	335
	colm	30
	synt	any
	asgn
	unmark
lab L96
	mark	L97
	pnull
	var	6
	int	4
	line	336
	colm	24
	synt	any
	asgn
	unmark
lab L97
	mark	L98
	pnull
	var	11
	int	3
	line	337
	colm	30
	synt	any
	asgn
	unmark
lab L98
	mark	L99
	pnull
	var	12
	int	3
	line	338
	colm	31
	synt	any
	asgn
	unmark
lab L99
	mark	L100
	pnull
	var	27
	pnull
	pnull
	var	57
	line	340
	colm	27
	synt	any
	field	gl_list
	line	340
	colm	36
	synt	any
	field	lh_first
	line	340
	colm	22
	synt	any
	asgn
	unmark
lab L100
	mark	L101
lab L102
	line	341
	colm	17
	synt	while
	mark0
	pnull
	var	27
	line	341
	colm	23
	synt	any
	nonnull
	unmark
	mark	L102
	mark	L105
	pnull
	var	4
	pnull
	var	27
	line	342
	colm	30
	synt	any
	field	cn_hd_field
	line	342
	colm	23
	synt	any
	asgn
	unmark
lab L105
	mark	L106
	line	343
	colm	21
	synt	ifelse
	mark	L107
	pnull
	var	62
	pnull
	var	4
	line	343
	colm	34
	synt	any
	field	ge_element
	var	1
	line	343
	colm	31
	synt	any
	invoke	2
	int	3
	line	343
	colm	60
	synt	any
	numeq
	unmark
	mark	L109
	pnull
	var	10
	var	4
	line	344
	colm	38
	synt	any
	asgn
	unmark
lab L109
	line	345
	colm	25
	synt	if
	mark0
	pnull
	pnull
	pnull
	var	4
	line	345
	colm	31
	synt	any
	field	ge_element
	line	345
	colm	44
	synt	any
	field	signature
	int	2
	line	345
	colm	56
	synt	any
	numne
	unmark
	mark	L110
	pnull
	var	14
	pnull
	pnull
	pnull
	var	4
	line	346
	colm	44
	synt	any
	field	ge_element
	line	346
	colm	57
	synt	any
	field	signature
	line	346
	colm	69
	synt	any
	field	kind
	line	346
	colm	39
	synt	any
	asgn
	unmark
lab L110
	mark	L111
	line	347
	colm	29
	synt	if
	mark0
	pnull
	var	13
	pnull
	int	4
	line	347
	colm	46
	synt	any
	neg
	line	347
	colm	43
	synt	any
	numne
	pop
	pnull
	var	14
	var	13
	line	348
	colm	43
	synt	any
	numne
	unmark
	pnull
	var	11
	int	4
	line	349
	colm	50
	synt	any
	asgn
	line	347
	colm	29
	synt	endif
	unmark
lab L111
	pnull
	var	13
	var	14
	line	351
	colm	39
	synt	any
	asgn
	line	345
	colm	25
	synt	endif
	goto	L108
lab L107
	pnull
	var	6
	int	3
	line	354
	colm	32
	synt	any
	asgn
lab L108
	line	343
	colm	21
	synt	endifelse
	unmark
lab L106
	pnull
	var	27
	pnull
	var	27
	line	356
	colm	33
	synt	any
	field	cn_tl_field
	line	356
	colm	26
	synt	any
	asgn
lab L103
	unmark
	goto	L102
lab L104
	line	341
	colm	17
	synt	endwhile
	unmark
lab L101
	mark	L112
	pnull
	var	66
	int	4
	line	358
	colm	26
	synt	any
	asgn
	unmark
lab L112
	mark	L113
	pnull
	var	27
	pnull
	pnull
	var	57
	line	360
	colm	28
	synt	any
	field	gl_list
	line	360
	colm	37
	synt	any
	field	lh_first
	line	360
	colm	22
	synt	any
	asgn
	unmark
lab L113
	mark	L114
lab L115
	line	361
	colm	17
	synt	while
	mark0
	pnull
	var	27
	line	361
	colm	23
	synt	any
	nonnull
	unmark
	mark	L115
	mark	L118
	pnull
	var	31
	var	79
	line	362
	colm	23
	synt	any
	asgn
	unmark
lab L118
	mark	L119
	line	363
	colm	21
	synt	ifelse
	mark	L120
	pnull
	pnull
	var	4
	var	62
	pnull
	var	31
	line	363
	colm	41
	synt	any
	field	ge_guard
	int	3
	line	363
	colm	38
	synt	any
	invoke	2
	line	363
	colm	28
	synt	any
	asgn
	int	3
	line	363
	colm	56
	synt	any
	numne
	unmark
	pnull
	var	6
	int	3
	line	364
	colm	32
	synt	any
	asgn
	goto	L121
lab L120
	line	365
	colm	28
	synt	if
	mark0
	pnull
	pnull
	pnull
	var	31
	line	365
	colm	34
	synt	any
	field	ge_guard
	line	365
	colm	45
	synt	any
	field	signature
	int	2
	line	365
	colm	57
	synt	any
	numne
	pop
	pnull
	pnull
	pnull
	pnull
	var	31
	line	366
	colm	34
	synt	any
	field	ge_guard
	line	366
	colm	45
	synt	any
	field	signature
	line	366
	colm	57
	synt	any
	field	kind
	int	7
	line	366
	colm	64
	synt	any
	numne
	unmark
	pnull
	var	12
	int	4
	line	367
	colm	50
	synt	any
	asgn
	line	365
	colm	28
	synt	endif
lab L121
	line	363
	colm	21
	synt	endifelse
	unmark
lab L119
	pnull
	var	27
	var	80
	line	369
	colm	26
	synt	any
	asgn
lab L116
	unmark
	goto	L115
lab L117
	line	361
	colm	17
	synt	endwhile
	unmark
lab L114
	mark	L122
	pnull
	var	66
	var	8
	line	371
	colm	26
	synt	any
	asgn
	unmark
lab L122
	mark	L123
	line	372
	colm	17
	synt	if
	mark0
	mark	L124
	pnull
	var	10
	line	372
	colm	22
	synt	any
	null
	line	372
	colm	37
	synt	any
	esusp
	goto	L125
lab L124
	pnull
	var	66
	int	3
	line	372
	colm	49
	synt	any
	numne
	pop
	pnull
	var	6
	int	3
	line	372
	colm	63
	synt	any
	numeq
lab L125
	unmark
	mark	L126
	pnull
	pnull
	var	57
	line	375
	colm	23
	synt	any
	field	sig_done
	int	3
	line	375
	colm	34
	synt	any
	asgn
	unmark
lab L126
	mark	L127
	mark	L128
	var	57
	line	376
	colm	21
	synt	any
	pret
lab L128
	synt	any
	pfail
	unmark
lab L127
	pnull
	line	372
	colm	17
	synt	endif
	unmark
lab L123
	mark	L129
	line	378
	colm	17
	synt	if
	mark0
	mark	L130
	pnull
	var	11
	int	3
	line	378
	colm	36
	synt	any
	numne
	line	378
	colm	42
	synt	any
	esusp
	goto	L131
lab L130
	pnull
	var	12
	int	3
	line	378
	colm	58
	synt	any
	numne
lab L131
	unmark
	line	382
	colm	17
	synt	if
	mark0
	pnull
	var	1
	int	3
	line	382
	colm	34
	synt	any
	numeq
	pop
	pnull
	var	11
	int	3
	line	382
	colm	54
	synt	any
	numne
	unmark
	pnull
	var	10
	var	69
	line	385
	colm	34
	synt	any
	asgn
	line	382
	colm	17
	synt	endif
	line	378
	colm	17
	synt	endif
	unmark
lab L129
	mark	L132
	pnull
	var	27
	pnull
	pnull
	var	57
	line	387
	colm	28
	synt	any
	field	gl_list
	line	387
	colm	37
	synt	any
	field	lh_first
	line	387
	colm	22
	synt	any
	asgn
	unmark
lab L132
	mark	L133
lab L134
	line	388
	colm	17
	synt	while
	mark0
	pnull
	var	27
	line	388
	colm	23
	synt	any
	nonnull
	unmark
	mark	L134
	mark	L137
	pnull
	var	31
	pnull
	var	27
	line	389
	colm	30
	synt	any
	field	cn_hd_field
	line	389
	colm	23
	synt	any
	asgn
	unmark
lab L137
	mark	L138
	line	390
	colm	21
	synt	if
	mark0
	pnull
	var	1
	int	3
	line	390
	colm	37
	synt	any
	numeq
	pop
	pnull
	var	11
	int	3
	line	390
	colm	56
	synt	any
	numne
	pop
	pnull
	pnull
	pnull
	var	31
	line	390
	colm	68
	synt	any
	field	ge_element
	line	390
	colm	81
	synt	any
	field	signature
	line	390
	colm	63
	synt	any
	nonnull
	unmark
	mark	L139
	pnull
	var	15
	var	72
	pnull
	var	31
	line	391
	colm	46
	synt	any
	field	ge_element
	line	391
	colm	43
	synt	any
	invoke	1
	line	391
	colm	34
	synt	any
	asgn
	unmark
lab L139
	line	392
	colm	25
	synt	ifelse
	mark	L140
	pnull
	pnull
	var	15
	line	392
	colm	38
	synt	any
	field	sig_done
	int	3
	line	392
	colm	49
	synt	any
	numeq
	unmark
	line	393
	colm	29
	synt	ifelse
	mark	L142
	pnull
	pnull
	var	4
	var	62
	var	15
	int	3
	line	393
	colm	46
	synt	any
	invoke	2
	line	393
	colm	36
	synt	any
	asgn
	int	3
	line	393
	colm	61
	synt	any
	numeq
	unmark
	mark	L144
	pnull
	var	10
	var	31
	line	394
	colm	46
	synt	any
	asgn
	unmark
lab L144
	pnull
	pnull
	var	31
	line	395
	colm	35
	synt	any
	field	ge_element
	var	15
	line	395
	colm	48
	synt	any
	asgn
	goto	L143
lab L142
	mark	L145
	pnull
	var	6
	int	3
	line	397
	colm	40
	synt	any
	asgn
	unmark
lab L145
	mark	L146
	var	73
	var	15
	line	398
	colm	38
	synt	any
	invoke	1
	unmark
lab L146
	line	399
	colm	33
	synt	if
	mark0
	pnull
	var	66
	int	3
	line	399
	colm	46
	synt	any
	numne
	unmark
	mark	L147
	pnull
	pnull
	var	57
	line	400
	colm	39
	synt	any
	field	sig_done
	int	3
	line	400
	colm	50
	synt	any
	asgn
	unmark
lab L147
	mark	L148
	var	31
	line	401
	colm	37
	synt	any
	pret
lab L148
	synt	any
	pfail
	line	399
	colm	33
	synt	endif
lab L143
	line	393
	colm	29
	synt	endifelse
	goto	L141
lab L140
	pnull
	var	10
	var	31
	line	405
	colm	42
	synt	any
	asgn
lab L141
	line	392
	colm	25
	synt	endifelse
	line	390
	colm	21
	synt	endif
	unmark
lab L138
	mark	L149
	line	408
	colm	21
	synt	if
	mark0
	pnull
	var	12
	int	3
	line	408
	colm	39
	synt	any
	numne
	pop
	pnull
	pnull
	pnull
	var	31
	line	408
	colm	52
	synt	any
	field	ge_guard
	line	408
	colm	63
	synt	any
	field	signature
	line	408
	colm	46
	synt	any
	nonnull
	unmark
	mark	L150
	pnull
	var	16
	var	81
	var	72
	pnull
	var	31
	line	409
	colm	49
	synt	any
	field	ge_guard
	line	409
	colm	46
	synt	any
	invoke	1
	line	409
	colm	39
	synt	any
	invoke	1
	line	409
	colm	32
	synt	any
	asgn
	unmark
lab L150
	line	410
	colm	25
	synt	if
	mark0
	pnull
	pnull
	var	16
	line	410
	colm	36
	synt	any
	field	sig_done
	int	3
	line	410
	colm	47
	synt	any
	numeq
	unmark
	line	411
	colm	29
	synt	ifelse
	mark	L151
	pnull
	pnull
	var	4
	var	62
	var	16
	int	3
	line	411
	colm	46
	synt	any
	invoke	2
	line	411
	colm	36
	synt	any
	asgn
	int	3
	line	411
	colm	59
	synt	any
	numeq
	unmark
	mark	L153
	pnull
	pnull
	var	31
	line	412
	colm	35
	synt	any
	field	ge_guard
	var	16
	line	412
	colm	46
	synt	any
	asgn
	unmark
lab L153
	var	82
	var	16
	line	413
	colm	39
	synt	any
	invoke	1
	goto	L152
lab L151
	mark	L154
	var	73
	var	82
	var	16
	line	415
	colm	45
	synt	any
	invoke	1
	line	415
	colm	38
	synt	any
	invoke	1
	unmark
lab L154
	mark	L155
	pnull
	pnull
	var	57
	line	416
	colm	35
	synt	any
	field	sig_done
	int	3
	line	416
	colm	46
	synt	any
	asgn
	unmark
lab L155
	mark	L156
	var	31
	line	417
	colm	33
	synt	any
	pret
lab L156
	synt	any
	pfail
lab L152
	line	411
	colm	29
	synt	endifelse
	line	410
	colm	25
	synt	endif
	line	408
	colm	21
	synt	endif
	unmark
lab L149
	pnull
	var	27
	pnull
	var	27
	line	419
	colm	33
	synt	any
	field	cn_tl_field
	line	419
	colm	26
	synt	any
	asgn
lab L135
	unmark
	goto	L134
lab L136
	line	388
	colm	17
	synt	endwhile
	unmark
lab L133
	mark	L157
	line	424
	colm	17
	synt	if
	mark0
	pnull
	var	6
	int	3
	line	424
	colm	27
	synt	any
	numeq
	unmark
	pnull
	var	70
	var	71
	var	57
	var	70
	line	427
	colm	41
	synt	any
	invoke	2
	line	427
	colm	31
	synt	any
	asgn
	line	424
	colm	17
	synt	endif
	unmark
lab L157
	mark	L158
	var	60
	var	57
	pnull
	pnull
	var	10
	line	429
	colm	41
	synt	any
	field	ge_element
	line	429
	colm	54
	synt	any
	field	signature
	line	429
	colm	24
	synt	any
	invoke	2
	unmark
lab L158
	mark	L159
	line	430
	colm	17
	synt	if
	mark0
	pnull
	var	1
	int	3
	line	430
	colm	33
	synt	any
	numeq
	unmark
	pnull
	var	27
	pnull
	pnull
	var	57
	line	432
	colm	28
	synt	any
	field	gl_list
	line	432
	colm	38
	synt	any
	field	lh_first
	line	432
	colm	22
	synt	any
	asgn
	line	430
	colm	17
	synt	endif
	unmark
lab L159
	mark	L160
lab L161
	line	433
	colm	17
	synt	while
	mark0
	pnull
	var	27
	line	433
	colm	23
	synt	any
	nonnull
	unmark
	mark	L161
	mark	L164
	pnull
	var	4
	pnull
	var	27
	line	434
	colm	30
	synt	any
	field	cn_hd_field
	line	434
	colm	23
	synt	any
	asgn
	unmark
lab L164
	mark	L165
	pnull
	var	5
	var	83
	pnull
	var	57
	line	435
	colm	37
	synt	any
	field	signature
	pnull
	pnull
	var	4
	line	435
	colm	51
	synt	any
	field	ge_element
	line	435
	colm	64
	synt	any
	field	signature
	line	435
	colm	34
	synt	any
	invoke	2
	line	435
	colm	23
	synt	any
	asgn
	unmark
lab L165
	mark	L166
	line	436
	colm	21
	synt	if
	mark0
	var	5
	pnull
	pnull
	var	57
	line	436
	colm	32
	synt	any
	field	signature
	line	436
	colm	28
	synt	any
	tabmat
	invoke	-1
	unmark
	var	84
	var	57
	var	5
	line	437
	colm	31
	synt	any
	invoke	2
	line	436
	colm	21
	synt	endif
	unmark
lab L166
	pnull
	var	27
	pnull
	var	27
	line	439
	colm	33
	synt	any
	field	cn_tl_field
	line	439
	colm	26
	synt	any
	asgn
lab L162
	unmark
	goto	L161
lab L163
	line	433
	colm	17
	synt	endwhile
	unmark
lab L160
	mark	L167
	pnull
	pnull
	var	57
	line	441
	colm	19
	synt	any
	field	sig_done
	int	2
	line	441
	colm	30
	synt	any
	asgn
	unmark
lab L167
	mark	L168
	int	3
	line	442
	colm	17
	synt	any
	pret
lab L168
	synt	any
	pfail
	goto	L12
lab L93
	mark	L169
	ccase
	int	17
	line	444
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L170
	pnull
	var	17
	var	85
	pnull
	var	57
	line	446
	colm	36
	synt	any
	field	bld_den_seq
	line	446
	colm	33
	synt	any
	invoke	1
	line	446
	colm	26
	synt	any
	asgn
	unmark
lab L170
	mark	L171
	pnull
	var	8
	var	66
	line	447
	colm	30
	synt	any
	asgn
	unmark
lab L171
	mark	L172
	line	448
	colm	17
	synt	if
	mark0
	pnull
	pnull
	var	4
	var	62
	var	17
	int	3
	line	448
	colm	33
	synt	any
	invoke	2
	line	448
	colm	23
	synt	any
	asgn
	int	3
	line	448
	colm	47
	synt	any
	numne
	unmark
	mark	L173
	pnull
	pnull
	var	57
	line	449
	colm	23
	synt	any
	field	sig_done
	int	3
	line	449
	colm	34
	synt	any
	asgn
	unmark
lab L173
	mark	L174
	var	4
	line	450
	colm	21
	synt	any
	pret
lab L174
	synt	any
	pfail
	line	448
	colm	17
	synt	endif
	unmark
lab L172
	mark	L175
	pnull
	var	6
	int	4
	line	452
	colm	24
	synt	any
	asgn
	unmark
lab L175
	mark	L176
	pnull
	var	66
	int	4
	line	453
	colm	26
	synt	any
	asgn
	unmark
lab L176
	mark	L177
	pnull
	var	27
	pnull
	pnull
	var	57
	line	455
	colm	27
	synt	any
	field	bld_declaration_list
	line	455
	colm	49
	synt	any
	field	lf_first
	line	455
	colm	22
	synt	any
	asgn
	unmark
lab L177
	mark	L178
lab L179
	line	456
	colm	17
	synt	while
	mark0
	pnull
	var	27
	line	456
	colm	23
	synt	any
	nonnull
	unmark
	mark	L179
	mark	L182
	pnull
	var	31
	pnull
	var	27
	line	457
	colm	30
	synt	any
	field	cn_hd_field
	line	457
	colm	23
	synt	any
	asgn
	unmark
lab L182
	mark	L183
	line	458
	colm	21
	synt	if
	mark0
	pnull
	pnull
	var	4
	var	62
	pnull
	var	31
	line	458
	colm	40
	synt	any
	field	decl_denotation
	int	3
	line	458
	colm	37
	synt	any
	invoke	2
	line	458
	colm	27
	synt	any
	asgn
	int	3
	line	458
	colm	62
	synt	any
	numne
	unmark
	pnull
	var	6
	int	3
	line	459
	colm	32
	synt	any
	asgn
	line	458
	colm	21
	synt	endif
	unmark
lab L183
	pnull
	var	27
	pnull
	var	27
	line	461
	colm	33
	synt	any
	field	cn_tl_field
	line	461
	colm	26
	synt	any
	asgn
lab L180
	unmark
	goto	L179
lab L181
	line	456
	colm	17
	synt	endwhile
	unmark
lab L178
	mark	L184
	pnull
	var	27
	pnull
	pnull
	var	57
	line	463
	colm	28
	synt	any
	field	bld_den_seq
	line	463
	colm	41
	synt	any
	field	lh_first
	line	463
	colm	22
	synt	any
	asgn
	unmark
lab L184
	mark	L185
lab L186
	line	464
	colm	17
	synt	while
	mark0
	pnull
	var	27
	line	464
	colm	23
	synt	any
	nonnull
	unmark
	mark	L186
	mark	L189
	pnull
	var	31
	pnull
	var	27
	line	465
	colm	30
	synt	any
	field	cn_hd_field
	line	465
	colm	23
	synt	any
	asgn
	unmark
lab L189
	mark	L190
	line	466
	colm	21
	synt	if
	mark0
	pnull
	pnull
	var	4
	var	62
	var	31
	int	4
	line	466
	colm	37
	synt	any
	invoke	2
	line	466
	colm	27
	synt	any
	asgn
	int	3
	line	466
	colm	44
	synt	any
	numne
	unmark
	mark	L191
	pnull
	var	6
	int	3
	line	467
	colm	32
	synt	any
	asgn
	unmark
lab L191
	pnull
	line	466
	colm	21
	synt	endif
	unmark
lab L190
	pnull
	var	27
	pnull
	var	27
	line	469
	colm	33
	synt	any
	field	cn_tl_field
	line	469
	colm	26
	synt	any
	asgn
lab L187
	unmark
	goto	L186
lab L188
	line	464
	colm	17
	synt	endwhile
	unmark
lab L185
	mark	L192
	pnull
	var	66
	var	8
	line	471
	colm	26
	synt	any
	asgn
	unmark
lab L192
	mark	L193
	var	60
	var	57
	pnull
	var	17
	line	472
	colm	37
	synt	any
	field	signature
	line	472
	colm	24
	synt	any
	invoke	2
	unmark
lab L193
	mark	L194
	line	473
	colm	17
	synt	if
	mark0
	mark	L195
	pnull
	var	86
	int	3
	line	473
	colm	27
	synt	any
	numeq
	line	473
	colm	31
	synt	any
	esusp
	goto	L196
lab L195
	pnull
	var	87
	pnull
	var	57
	line	473
	colm	40
	synt	any
	field	bld_flags
	int	18
	line	473
	colm	37
	synt	any
	invoke	2
	int	3
	line	473
	colm	58
	synt	any
	numeq
lab L196
	unmark
	var	88
	pnull
	var	57
	line	475
	colm	41
	synt	any
	field	signature
	line	475
	colm	38
	synt	any
	invoke	1
	line	473
	colm	17
	synt	endif
	unmark
lab L194
	mark	L197
	line	477
	colm	17
	synt	if
	mark0
	pnull
	var	6
	int	3
	line	477
	colm	28
	synt	any
	numeq
	unmark
	pnull
	var	70
	var	71
	var	57
	var	70
	line	478
	colm	41
	synt	any
	invoke	2
	line	478
	colm	31
	synt	any
	asgn
	line	477
	colm	17
	synt	endif
	unmark
lab L197
	mark	L198
	pnull
	pnull
	var	57
	line	479
	colm	19
	synt	any
	field	sig_done
	int	2
	line	479
	colm	30
	synt	any
	asgn
	unmark
lab L198
	mark	L199
	int	3
	line	480
	colm	17
	synt	any
	pret
lab L199
	synt	any
	pfail
	goto	L12
lab L169
	mark	L200
	ccase
	int	19
	line	482
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L201
	pnull
	var	17
	var	85
	pnull
	var	57
	line	484
	colm	36
	synt	any
	field	usl_den_seq
	line	484
	colm	33
	synt	any
	invoke	1
	line	484
	colm	26
	synt	any
	asgn
	unmark
lab L201
	mark	L202
	pnull
	var	8
	var	66
	line	485
	colm	30
	synt	any
	asgn
	unmark
lab L202
	mark	L203
	pnull
	var	27
	pnull
	pnull
	var	57
	line	488
	colm	28
	synt	any
	field	usl_type_list
	line	488
	colm	43
	synt	any
	field	lh_first
	line	488
	colm	22
	synt	any
	asgn
	unmark
lab L203
	mark	L204
lab L205
	line	489
	colm	17
	synt	while
	mark0
	pnull
	var	27
	line	489
	colm	23
	synt	any
	nonnull
	unmark
	mark	L205
	mark	L208
	pnull
	var	31
	pnull
	var	27
	line	490
	colm	30
	synt	any
	field	cn_hd_field
	line	490
	colm	23
	synt	any
	asgn
	unmark
lab L208
	mark	L209
	line	491
	colm	21
	synt	ifelse
	mark	L210
	pnull
	pnull
	var	4
	var	62
	var	31
	int	3
	line	491
	colm	38
	synt	any
	invoke	2
	line	491
	colm	28
	synt	any
	asgn
	int	3
	line	491
	colm	45
	synt	any
	numne
	unmark
	mark	L212
	pnull
	pnull
	var	57
	line	492
	colm	27
	synt	any
	field	sig_done
	int	3
	line	492
	colm	38
	synt	any
	asgn
	unmark
lab L212
	mark	L213
	var	4
	line	493
	colm	25
	synt	any
	pret
lab L213
	synt	any
	pfail
	goto	L211
lab L210
	line	495
	colm	25
	synt	if
	mark0
	pnull
	pnull
	var	31
	line	495
	colm	31
	synt	any
	field	signature
	int	2
	line	495
	colm	43
	synt	any
	numne
	pop
	mark	L214
	pnull
	pnull
	pnull
	var	31
	line	496
	colm	32
	synt	any
	field	signature
	line	496
	colm	44
	synt	any
	field	kind
	int	6
	line	496
	colm	51
	synt	any
	numeq
	line	496
	colm	56
	synt	any
	esusp
	goto	L215
lab L214
	pnull
	pnull
	pnull
	var	31
	line	497
	colm	32
	synt	any
	field	signature
	line	497
	colm	44
	synt	any
	field	kind
	int	5
	line	497
	colm	51
	synt	any
	numeq
lab L215
	unmark
	pnull
	pnull
	var	31
	line	498
	colm	36
	synt	any
	field	signature
	var	89
	pnull
	var	31
	line	498
	colm	67
	synt	any
	field	signature
	line	498
	colm	64
	synt	any
	invoke	1
	line	498
	colm	48
	synt	any
	asgn
	line	495
	colm	25
	synt	endif
lab L211
	line	491
	colm	21
	synt	endifelse
	unmark
lab L209
	pnull
	var	27
	pnull
	var	27
	line	501
	colm	33
	synt	any
	field	cn_tl_field
	line	501
	colm	26
	synt	any
	asgn
lab L206
	unmark
	goto	L205
lab L207
	line	489
	colm	17
	synt	endwhile
	unmark
lab L204
	mark	L216
	line	503
	colm	17
	synt	if
	mark0
	pnull
	pnull
	var	4
	var	62
	var	17
	int	3
	line	503
	colm	33
	synt	any
	invoke	2
	line	503
	colm	23
	synt	any
	asgn
	int	3
	line	503
	colm	47
	synt	any
	numne
	unmark
	mark	L217
	pnull
	pnull
	var	57
	line	504
	colm	23
	synt	any
	field	sig_done
	int	3
	line	504
	colm	34
	synt	any
	asgn
	unmark
lab L217
	mark	L218
	var	4
	line	505
	colm	21
	synt	any
	pret
lab L218
	synt	any
	pfail
	line	503
	colm	17
	synt	endif
	unmark
lab L216
	mark	L219
	pnull
	var	66
	int	4
	line	508
	colm	26
	synt	any
	asgn
	unmark
lab L219
	mark	L220
	pnull
	var	6
	int	4
	line	509
	colm	24
	synt	any
	asgn
	unmark
lab L220
	mark	L221
	pnull
	var	27
	pnull
	var	57
	line	510
	colm	28
	synt	any
	field	usl_den_seq
	line	510
	colm	22
	synt	any
	asgn
	unmark
lab L221
	mark	L222
lab L223
	line	511
	colm	17
	synt	while
	mark0
	pnull
	var	27
	line	511
	colm	23
	synt	any
	nonnull
	unmark
	mark	L223
	mark	L226
	pnull
	var	31
	pnull
	var	27
	line	512
	colm	30
	synt	any
	field	cn_hd_field
	line	512
	colm	23
	synt	any
	asgn
	unmark
lab L226
	mark	L227
	line	513
	colm	21
	synt	if
	mark0
	pnull
	pnull
	var	4
	var	62
	var	31
	int	4
	line	513
	colm	37
	synt	any
	invoke	2
	line	513
	colm	27
	synt	any
	asgn
	int	3
	line	513
	colm	44
	synt	any
	numne
	unmark
	pnull
	var	6
	int	3
	line	514
	colm	32
	synt	any
	asgn
	line	513
	colm	21
	synt	endif
	unmark
lab L227
	pnull
	var	27
	pnull
	var	27
	line	516
	colm	33
	synt	any
	field	cn_tl_field
	line	516
	colm	26
	synt	any
	asgn
lab L224
	unmark
	goto	L223
lab L225
	line	511
	colm	17
	synt	endwhile
	unmark
lab L222
	mark	L228
	pnull
	var	66
	var	8
	line	518
	colm	26
	synt	any
	asgn
	unmark
lab L228
	mark	L229
	var	60
	var	57
	pnull
	var	17
	line	519
	colm	37
	synt	any
	field	signature
	line	519
	colm	24
	synt	any
	invoke	2
	unmark
lab L229
	mark	L230
	line	520
	colm	17
	synt	if
	mark0
	pnull
	var	6
	int	3
	line	520
	colm	28
	synt	any
	numeq
	unmark
	pnull
	var	70
	var	71
	var	57
	var	70
	line	521
	colm	41
	synt	any
	invoke	2
	line	521
	colm	31
	synt	any
	asgn
	line	520
	colm	17
	synt	endif
	unmark
lab L230
	mark	L231
	pnull
	pnull
	var	57
	line	522
	colm	19
	synt	any
	field	sig_done
	int	2
	line	522
	colm	30
	synt	any
	asgn
	unmark
lab L231
	mark	L232
	int	3
	line	523
	colm	17
	synt	any
	pret
lab L232
	synt	any
	pfail
	goto	L12
lab L200
	mark	L233
	ccase
	int	20
	line	525
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L234
	pnull
	pnull
	var	57
	line	527
	colm	19
	synt	any
	field	signature
	var	90
	line	527
	colm	31
	synt	any
	asgn
	unmark
lab L234
	mark	L235
	pnull
	pnull
	var	57
	line	528
	colm	19
	synt	any
	field	sig_done
	int	2
	line	528
	colm	30
	synt	any
	asgn
	unmark
lab L235
	mark	L236
	int	3
	line	529
	colm	17
	synt	any
	pret
lab L236
	synt	any
	pfail
	goto	L12
lab L233
	mark	L237
	ccase
	int	21
	line	531
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L238
	pnull
	var	8
	var	66
	line	534
	colm	30
	synt	any
	asgn
	unmark
lab L238
	mark	L239
	pnull
	var	6
	int	4
	line	535
	colm	24
	synt	any
	asgn
	unmark
lab L239
	mark	L240
	pnull
	var	66
	int	4
	line	536
	colm	26
	synt	any
	asgn
	unmark
lab L240
	mark	L241
	pnull
	var	27
	pnull
	pnull
	var	57
	line	537
	colm	28
	synt	any
	field	gl_list
	line	537
	colm	37
	synt	any
	field	lh_first
	line	537
	colm	22
	synt	any
	asgn
	unmark
lab L241
	mark	L242
lab L243
	line	538
	colm	17
	synt	while
	mark0
	pnull
	var	27
	line	538
	colm	23
	synt	any
	nonnull
	unmark
	mark	L243
	mark	L246
	pnull
	var	31
	pnull
	var	27
	line	539
	colm	30
	synt	any
	field	cn_hd_field
	line	539
	colm	23
	synt	any
	asgn
	unmark
lab L246
	mark	L247
	line	540
	colm	21
	synt	ifelse
	mark	L248
	pnull
	pnull
	var	4
	var	62
	pnull
	var	31
	line	540
	colm	41
	synt	any
	field	ge_guard
	int	3
	line	540
	colm	38
	synt	any
	invoke	2
	line	540
	colm	28
	synt	any
	asgn
	int	3
	line	540
	colm	56
	synt	any
	numne
	unmark
	pnull
	var	6
	int	3
	line	541
	colm	32
	synt	any
	asgn
	goto	L249
lab L248
	mark	L250
	pnull
	var	16
	var	72
	pnull
	var	31
	line	544
	colm	44
	synt	any
	field	ge_guard
	line	544
	colm	41
	synt	any
	invoke	1
	line	544
	colm	32
	synt	any
	asgn
	unmark
lab L250
	line	545
	colm	25
	synt	if
	mark0
	pnull
	pnull
	var	16
	line	545
	colm	36
	synt	any
	field	sig_done
	int	3
	line	545
	colm	47
	synt	any
	numeq
	unmark
	line	546
	colm	29
	synt	ifelse
	mark	L251
	pnull
	pnull
	var	4
	var	62
	var	16
	int	3
	line	546
	colm	46
	synt	any
	invoke	2
	line	546
	colm	36
	synt	any
	asgn
	int	3
	line	546
	colm	59
	synt	any
	numeq
	unmark
	pnull
	pnull
	var	31
	line	547
	colm	35
	synt	any
	field	ge_guard
	var	16
	line	547
	colm	46
	synt	any
	asgn
	goto	L252
lab L251
	mark	L253
	var	73
	var	16
	line	549
	colm	38
	synt	any
	invoke	1
	unmark
lab L253
	mark	L254
	pnull
	pnull
	var	57
	line	550
	colm	35
	synt	any
	field	sig_done
	int	3
	line	550
	colm	46
	synt	any
	asgn
	unmark
lab L254
	mark	L255
	pnull
	var	66
	var	8
	line	551
	colm	42
	synt	any
	asgn
	unmark
lab L255
	mark	L256
	var	31
	line	552
	colm	33
	synt	any
	pret
lab L256
	synt	any
	pfail
lab L252
	line	546
	colm	29
	synt	endifelse
	line	545
	colm	25
	synt	endif
lab L249
	line	540
	colm	21
	synt	endifelse
	unmark
lab L247
	mark	L257
	line	556
	colm	21
	synt	if
	mark0
	pnull
	pnull
	var	4
	var	62
	pnull
	var	31
	line	556
	colm	40
	synt	any
	field	ge_element
	int	4
	line	556
	colm	37
	synt	any
	invoke	2
	line	556
	colm	27
	synt	any
	asgn
	int	3
	line	556
	colm	57
	synt	any
	numne
	unmark
	pnull
	var	6
	int	3
	line	557
	colm	32
	synt	any
	asgn
	line	556
	colm	21
	synt	endif
	unmark
lab L257
	pnull
	var	27
	pnull
	var	27
	line	559
	colm	33
	synt	any
	field	cn_tl_field
	line	559
	colm	26
	synt	any
	asgn
lab L244
	unmark
	goto	L243
lab L245
	line	538
	colm	17
	synt	endwhile
	unmark
lab L242
	mark	L258
	pnull
	var	66
	var	8
	line	561
	colm	26
	synt	any
	asgn
	unmark
lab L258
	mark	L259
	pnull
	pnull
	var	57
	line	562
	colm	19
	synt	any
	field	signature
	var	68
	line	562
	colm	31
	synt	any
	asgn
	unmark
lab L259
	mark	L260
	line	563
	colm	17
	synt	if
	mark0
	pnull
	var	6
	int	3
	line	563
	colm	28
	synt	any
	numeq
	unmark
	pnull
	var	70
	var	71
	var	57
	var	70
	line	564
	colm	41
	synt	any
	invoke	2
	line	564
	colm	31
	synt	any
	asgn
	line	563
	colm	17
	synt	endif
	unmark
lab L260
	mark	L261
	pnull
	pnull
	var	57
	line	565
	colm	19
	synt	any
	field	sig_done
	int	2
	line	565
	colm	30
	synt	any
	asgn
	unmark
lab L261
	mark	L262
	int	3
	line	566
	colm	17
	synt	any
	pret
lab L262
	synt	any
	pfail
	goto	L12
lab L237
	mark	L263
	ccase
	int	22
	line	569
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L264
	var	91
	str	23
	line	571
	colm	24
	synt	any
	invoke	1
	unmark
lab L264
	mark	L265
	int	3
	line	572
	colm	17
	synt	any
	pret
lab L265
	synt	any
	pfail
	goto	L12
lab L263
	mark	L266
	ccase
	int	24
	line	574
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L267
	var	92
	str	25
	line	576
	colm	23
	synt	any
	invoke	1
	unmark
lab L267
	mark	L268
	int	3
	line	577
	colm	17
	synt	any
	pret
lab L268
	synt	any
	pfail
	goto	L12
lab L266
	mark	L269
	ccase
	int	26
	line	579
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L270
	line	52
	colm	5
	synt	if
	mark0
	pnull
	pnull
	var	4
	var	93
	var	57
	line	52
	colm	25
	synt	any
	invoke	1
	line	52
	colm	12
	synt	any
	asgn
	int	3
	line	52
	colm	30
	synt	any
	numne
	unmark
	mark	L271
	pnull
	pnull
	var	57
	line	53
	colm	11
	synt	any
	field	sig_done
	int	3
	line	53
	colm	22
	synt	any
	asgn
	unmark
lab L271
	mark	L272
	var	4
	line	54
	colm	9
	synt	any
	pret
lab L272
	synt	any
	pfail
	line	52
	colm	5
	synt	endif
	unmark
lab L270
	mark	L273
	line	56
	colm	5
	synt	if
	mark0
	pnull
	pnull
	var	57
	line	56
	colm	14
	synt	any
	field	sel_type
	line	56
	colm	9
	synt	any
	null
	unmark
	mark	L274
	line	57
	colm	9
	synt	case
	mark0
	pnull
	var	57
	line	57
	colm	17
	synt	any
	field	kind
	eret
	mark	L276
	ccase
	int	26
	line	58
	colm	15
	synt	any
	eqv
	unmark
	pop
	var	94
	pnull
	str	27
	pnull
	var	57
	line	59
	colm	63
	synt	any
	field	str_string
	line	59
	colm	58
	synt	any
	cat
	var	57
	line	59
	colm	30
	synt	any
	invoke	2
	goto	L275
lab L276
	mark	L277
	ccase
	int	28
	line	60
	colm	15
	synt	any
	eqv
	unmark
	pop
	var	94
	pnull
	str	27
	pnull
	var	57
	line	61
	colm	61
	synt	any
	field	str_string
	line	61
	colm	56
	synt	any
	cat
	var	57
	line	61
	colm	29
	synt	any
	invoke	2
	goto	L275
lab L277
	efail
lab L275
	line	57
	colm	9
	synt	endcase
	unmark
lab L274
	mark	L278
	pnull
	pnull
	var	57
	line	63
	colm	11
	synt	any
	field	signature
	int	2
	line	63
	colm	23
	synt	any
	asgn
	unmark
lab L278
	mark	L279
	pnull
	pnull
	var	57
	line	64
	colm	11
	synt	any
	field	sig_done
	int	2
	line	64
	colm	22
	synt	any
	asgn
	unmark
lab L279
	mark	L280
	int	3
	line	65
	colm	9
	synt	any
	pret
lab L280
	synt	any
	pfail
	line	56
	colm	5
	synt	endif
	unmark
lab L273
	mark	L281
	line	67
	colm	5
	synt	if
	mark0
	pnull
	pnull
	var	4
	var	62
	pnull
	var	57
	line	67
	colm	25
	synt	any
	field	sel_type
	var	1
	line	67
	colm	22
	synt	any
	invoke	2
	line	67
	colm	12
	synt	any
	asgn
	int	3
	line	67
	colm	51
	synt	any
	numne
	unmark
	mark	L282
	pnull
	pnull
	var	57
	line	68
	colm	11
	synt	any
	field	sig_done
	int	3
	line	68
	colm	22
	synt	any
	asgn
	unmark
lab L282
	mark	L283
	var	4
	line	69
	colm	9
	synt	any
	pret
lab L283
	synt	any
	pfail
	line	67
	colm	5
	synt	endif
	unmark
lab L281
	mark	L284
	mark	L285
	pnull
	var	54
	pnull
	pnull
	var	57
	line	76
	colm	22
	synt	any
	field	sel_type
	line	76
	colm	33
	synt	any
	field	signature
	line	76
	colm	17
	synt	any
	asgn
	unmark
lab L285
	mark	L286
	line	77
	colm	9
	synt	if
	mark0
	pnull
	var	54
	int	2
	line	77
	colm	21
	synt	any
	numeq
	unmark
	mark	L287
	pnull
	pnull
	var	57
	line	78
	colm	15
	synt	any
	field	signature
	int	2
	line	78
	colm	27
	synt	any
	asgn
	unmark
lab L287
	mark	L288
	pnull
	pnull
	var	57
	line	79
	colm	15
	synt	any
	field	sig_done
	int	2
	line	79
	colm	26
	synt	any
	asgn
	unmark
lab L288
	mark	L289
	int	3
	line	80
	colm	13
	synt	any
	pret
lab L289
	synt	any
	pfail
	line	77
	colm	9
	synt	endif
	unmark
lab L286
	mark	L290
	line	82
	colm	9
	synt	ifelse
	mark	L291
	pnull
	pnull
	var	54
	line	82
	colm	21
	synt	any
	field	ts_string_max
	pnull
	int	4
	line	82
	colm	39
	synt	any
	neg
	line	82
	colm	37
	synt	any
	numeq
	unmark
	pnull
	var	55
	var	95
	line	83
	colm	20
	synt	any
	asgn
	goto	L292
lab L291
	pnull
	var	55
	pnull
	var	54
	line	85
	colm	31
	synt	any
	field	ts_string_max
	line	85
	colm	20
	synt	any
	asgn
lab L292
	line	82
	colm	9
	synt	endifelse
	unmark
lab L290
	line	87
	colm	9
	synt	if
	mark0
	pnull
	pnull
	var	54
	line	87
	colm	24
	synt	any
	field	ts_string_code
	line	87
	colm	13
	synt	any
	nonnull
	pop
	pnull
	pnull
	var	54
	line	88
	colm	24
	synt	any
	field	ts_element_code
	line	88
	colm	13
	synt	any
	nonnull
	pop
	pnull
	pnull
	pnull
	var	57
	line	89
	colm	17
	synt	any
	field	str_string
	line	89
	colm	13
	synt	any
	size
	var	55
	line	89
	colm	31
	synt	any
	numle
	pop
	pnull
	pnull
	pnull
	var	57
	line	90
	colm	15
	synt	any
	field	sel_type
	line	90
	colm	26
	synt	any
	field	kind
	int	6
	line	90
	colm	33
	synt	any
	numeq
	pop
	pnull
	pnull
	pnull
	var	57
	line	91
	colm	18
	synt	any
	field	sel_type
	line	91
	colm	29
	synt	any
	field	sel_type
	line	91
	colm	13
	synt	any
	null
	unmark
	mark	L293
	line	92
	colm	17
	synt	if
	mark0
	pnull
	pnull
	var	5
	var	96
	pnull
	var	57
	line	92
	colm	42
	synt	any
	field	sel_type
	line	92
	colm	39
	synt	any
	invoke	1
	line	92
	colm	24
	synt	any
	asgn
	var	97
	line	92
	colm	55
	synt	any
	numne
	unmark
	mark	L294
	pnull
	pnull
	var	57
	line	93
	colm	23
	synt	any
	field	sig_done
	int	3
	line	93
	colm	34
	synt	any
	asgn
	unmark
lab L294
	mark	L295
	var	5
	line	94
	colm	21
	synt	any
	pret
lab L295
	synt	any
	pfail
	line	92
	colm	17
	synt	endif
	unmark
lab L293
	mark	L296
	var	60
	var	57
	var	76
	pnull
	int	7
	pnull
	var	57
	line	97
	colm	41
	synt	any
	field	sel_type
	line	97
	colm	35
	synt	any
	llist	2
	line	97
	colm	34
	synt	any
	invoke	1
	line	97
	colm	24
	synt	any
	invoke	2
	unmark
lab L296
	mark	L297
	pnull
	pnull
	var	57
	line	98
	colm	19
	synt	any
	field	sig_done
	int	2
	line	98
	colm	30
	synt	any
	asgn
	unmark
lab L297
	mark	L298
	int	3
	line	99
	colm	17
	synt	any
	pret
lab L298
	synt	any
	pfail
	line	87
	colm	9
	synt	endif
	unmark
lab L284
	mark	L299
	line	102
	colm	5
	synt	if
	mark0
	pnull
	pnull
	var	57
	line	102
	colm	14
	synt	any
	field	str_expansion
	line	102
	colm	9
	synt	any
	null
	unmark
	pnull
	pnull
	var	57
	line	103
	colm	10
	synt	any
	field	str_expansion
	var	98
	var	57
	line	103
	colm	38
	synt	any
	invoke	1
	line	103
	colm	25
	synt	any
	asgn
	line	102
	colm	5
	synt	endif
	unmark
lab L299
	line	105
	colm	5
	synt	ifelse
	mark	L300
	pnull
	pnull
	var	4
	var	62
	pnull
	var	57
	line	105
	colm	25
	synt	any
	field	str_expansion
	var	1
	line	105
	colm	22
	synt	any
	invoke	2
	line	105
	colm	12
	synt	any
	asgn
	int	3
	line	105
	colm	56
	synt	any
	numeq
	unmark
	mark	L302
	var	60
	var	57
	pnull
	pnull
	var	57
	line	106
	colm	22
	synt	any
	field	str_expansion
	line	106
	colm	38
	synt	any
	field	signature
	line	106
	colm	16
	synt	any
	invoke	2
	unmark
lab L302
	mark	L303
	pnull
	pnull
	var	57
	line	107
	colm	11
	synt	any
	field	sig_done
	int	2
	line	107
	colm	22
	synt	any
	asgn
	unmark
lab L303
	mark	L304
	int	3
	line	108
	colm	9
	synt	any
	pret
lab L304
	synt	any
	pfail
	goto	L301
lab L300
	mark	L305
	pnull
	pnull
	var	57
	line	110
	colm	11
	synt	any
	field	sig_done
	int	3
	line	110
	colm	22
	synt	any
	asgn
	unmark
lab L305
	mark	L306
	var	4
	line	111
	colm	9
	synt	any
	pret
lab L306
	synt	any
	pfail
lab L301
	line	105
	colm	5
	synt	endifelse
	goto	L12
lab L269
	mark	L307
	ccase
	int	28
	line	583
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L308
	line	52
	colm	5
	synt	if
	mark0
	pnull
	pnull
	var	4
	var	93
	var	57
	line	52
	colm	25
	synt	any
	invoke	1
	line	52
	colm	12
	synt	any
	asgn
	int	3
	line	52
	colm	30
	synt	any
	numne
	unmark
	mark	L309
	pnull
	pnull
	var	57
	line	53
	colm	11
	synt	any
	field	sig_done
	int	3
	line	53
	colm	22
	synt	any
	asgn
	unmark
lab L309
	mark	L310
	var	4
	line	54
	colm	9
	synt	any
	pret
lab L310
	synt	any
	pfail
	line	52
	colm	5
	synt	endif
	unmark
lab L308
	mark	L311
	line	56
	colm	5
	synt	if
	mark0
	pnull
	pnull
	var	57
	line	56
	colm	14
	synt	any
	field	sel_type
	line	56
	colm	9
	synt	any
	null
	unmark
	mark	L312
	line	57
	colm	9
	synt	case
	mark0
	pnull
	var	57
	line	57
	colm	17
	synt	any
	field	kind
	eret
	mark	L314
	ccase
	int	26
	line	58
	colm	15
	synt	any
	eqv
	unmark
	pop
	var	94
	pnull
	str	27
	pnull
	var	57
	line	59
	colm	63
	synt	any
	field	str_string
	line	59
	colm	58
	synt	any
	cat
	var	57
	line	59
	colm	30
	synt	any
	invoke	2
	goto	L313
lab L314
	mark	L315
	ccase
	int	28
	line	60
	colm	15
	synt	any
	eqv
	unmark
	pop
	var	94
	pnull
	str	27
	pnull
	var	57
	line	61
	colm	61
	synt	any
	field	str_string
	line	61
	colm	56
	synt	any
	cat
	var	57
	line	61
	colm	29
	synt	any
	invoke	2
	goto	L313
lab L315
	efail
lab L313
	line	57
	colm	9
	synt	endcase
	unmark
lab L312
	mark	L316
	pnull
	pnull
	var	57
	line	63
	colm	11
	synt	any
	field	signature
	int	2
	line	63
	colm	23
	synt	any
	asgn
	unmark
lab L316
	mark	L317
	pnull
	pnull
	var	57
	line	64
	colm	11
	synt	any
	field	sig_done
	int	2
	line	64
	colm	22
	synt	any
	asgn
	unmark
lab L317
	mark	L318
	int	3
	line	65
	colm	9
	synt	any
	pret
lab L318
	synt	any
	pfail
	line	56
	colm	5
	synt	endif
	unmark
lab L311
	mark	L319
	line	67
	colm	5
	synt	if
	mark0
	pnull
	pnull
	var	4
	var	62
	pnull
	var	57
	line	67
	colm	25
	synt	any
	field	sel_type
	var	1
	line	67
	colm	22
	synt	any
	invoke	2
	line	67
	colm	12
	synt	any
	asgn
	int	3
	line	67
	colm	51
	synt	any
	numne
	unmark
	mark	L320
	pnull
	pnull
	var	57
	line	68
	colm	11
	synt	any
	field	sig_done
	int	3
	line	68
	colm	22
	synt	any
	asgn
	unmark
lab L320
	mark	L321
	var	4
	line	69
	colm	9
	synt	any
	pret
lab L321
	synt	any
	pfail
	line	67
	colm	5
	synt	endif
	unmark
lab L319
	mark	L322
	mark	L323
	pnull
	var	54
	pnull
	pnull
	var	57
	line	76
	colm	22
	synt	any
	field	sel_type
	line	76
	colm	33
	synt	any
	field	signature
	line	76
	colm	17
	synt	any
	asgn
	unmark
lab L323
	mark	L324
	line	77
	colm	9
	synt	if
	mark0
	pnull
	var	54
	int	2
	line	77
	colm	21
	synt	any
	numeq
	unmark
	mark	L325
	pnull
	pnull
	var	57
	line	78
	colm	15
	synt	any
	field	signature
	int	2
	line	78
	colm	27
	synt	any
	asgn
	unmark
lab L325
	mark	L326
	pnull
	pnull
	var	57
	line	79
	colm	15
	synt	any
	field	sig_done
	int	2
	line	79
	colm	26
	synt	any
	asgn
	unmark
lab L326
	mark	L327
	int	3
	line	80
	colm	13
	synt	any
	pret
lab L327
	synt	any
	pfail
	line	77
	colm	9
	synt	endif
	unmark
lab L324
	mark	L328
	line	82
	colm	9
	synt	ifelse
	mark	L329
	pnull
	pnull
	var	54
	line	82
	colm	21
	synt	any
	field	ts_string_max
	pnull
	int	4
	line	82
	colm	39
	synt	any
	neg
	line	82
	colm	37
	synt	any
	numeq
	unmark
	pnull
	var	55
	var	95
	line	83
	colm	20
	synt	any
	asgn
	goto	L330
lab L329
	pnull
	var	55
	pnull
	var	54
	line	85
	colm	31
	synt	any
	field	ts_string_max
	line	85
	colm	20
	synt	any
	asgn
lab L330
	line	82
	colm	9
	synt	endifelse
	unmark
lab L328
	line	87
	colm	9
	synt	if
	mark0
	pnull
	pnull
	var	54
	line	87
	colm	24
	synt	any
	field	ts_string_code
	line	87
	colm	13
	synt	any
	nonnull
	pop
	pnull
	pnull
	var	54
	line	88
	colm	24
	synt	any
	field	ts_element_code
	line	88
	colm	13
	synt	any
	nonnull
	pop
	pnull
	pnull
	pnull
	var	57
	line	89
	colm	17
	synt	any
	field	str_string
	line	89
	colm	13
	synt	any
	size
	var	55
	line	89
	colm	31
	synt	any
	numle
	pop
	pnull
	pnull
	pnull
	var	57
	line	90
	colm	15
	synt	any
	field	sel_type
	line	90
	colm	26
	synt	any
	field	kind
	int	6
	line	90
	colm	33
	synt	any
	numeq
	pop
	pnull
	pnull
	pnull
	var	57
	line	91
	colm	18
	synt	any
	field	sel_type
	line	91
	colm	29
	synt	any
	field	sel_type
	line	91
	colm	13
	synt	any
	null
	unmark
	mark	L331
	line	92
	colm	17
	synt	if
	mark0
	pnull
	pnull
	var	5
	var	96
	pnull
	var	57
	line	92
	colm	42
	synt	any
	field	sel_type
	line	92
	colm	39
	synt	any
	invoke	1
	line	92
	colm	24
	synt	any
	asgn
	var	97
	line	92
	colm	55
	synt	any
	numne
	unmark
	mark	L332
	pnull
	pnull
	var	57
	line	93
	colm	23
	synt	any
	field	sig_done
	int	3
	line	93
	colm	34
	synt	any
	asgn
	unmark
lab L332
	mark	L333
	var	5
	line	94
	colm	21
	synt	any
	pret
lab L333
	synt	any
	pfail
	line	92
	colm	17
	synt	endif
	unmark
lab L331
	mark	L334
	var	60
	var	57
	var	76
	pnull
	int	7
	pnull
	var	57
	line	97
	colm	41
	synt	any
	field	sel_type
	line	97
	colm	35
	synt	any
	llist	2
	line	97
	colm	34
	synt	any
	invoke	1
	line	97
	colm	24
	synt	any
	invoke	2
	unmark
lab L334
	mark	L335
	pnull
	pnull
	var	57
	line	98
	colm	19
	synt	any
	field	sig_done
	int	2
	line	98
	colm	30
	synt	any
	asgn
	unmark
lab L335
	mark	L336
	int	3
	line	99
	colm	17
	synt	any
	pret
lab L336
	synt	any
	pfail
	line	87
	colm	9
	synt	endif
	unmark
lab L322
	mark	L337
	line	102
	colm	5
	synt	if
	mark0
	pnull
	pnull
	var	57
	line	102
	colm	14
	synt	any
	field	str_expansion
	line	102
	colm	9
	synt	any
	null
	unmark
	pnull
	pnull
	var	57
	line	103
	colm	10
	synt	any
	field	str_expansion
	var	98
	var	57
	line	103
	colm	38
	synt	any
	invoke	1
	line	103
	colm	25
	synt	any
	asgn
	line	102
	colm	5
	synt	endif
	unmark
lab L337
	line	105
	colm	5
	synt	ifelse
	mark	L338
	pnull
	pnull
	var	4
	var	62
	pnull
	var	57
	line	105
	colm	25
	synt	any
	field	str_expansion
	var	1
	line	105
	colm	22
	synt	any
	invoke	2
	line	105
	colm	12
	synt	any
	asgn
	int	3
	line	105
	colm	56
	synt	any
	numeq
	unmark
	mark	L340
	var	60
	var	57
	pnull
	pnull
	var	57
	line	106
	colm	22
	synt	any
	field	str_expansion
	line	106
	colm	38
	synt	any
	field	signature
	line	106
	colm	16
	synt	any
	invoke	2
	unmark
lab L340
	mark	L341
	pnull
	pnull
	var	57
	line	107
	colm	11
	synt	any
	field	sig_done
	int	2
	line	107
	colm	22
	synt	any
	asgn
	unmark
lab L341
	mark	L342
	int	3
	line	108
	colm	9
	synt	any
	pret
lab L342
	synt	any
	pfail
	goto	L339
lab L338
	mark	L343
	pnull
	pnull
	var	57
	line	110
	colm	11
	synt	any
	field	sig_done
	int	3
	line	110
	colm	22
	synt	any
	asgn
	unmark
lab L343
	mark	L344
	var	4
	line	111
	colm	9
	synt	any
	pret
lab L344
	synt	any
	pfail
lab L339
	line	105
	colm	5
	synt	endifelse
	goto	L12
lab L307
	mark	L345
	ccase
	int	14
	line	587
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L346
	var	99
	var	57
	line	589
	colm	33
	synt	any
	invoke	1
	line	589
	colm	17
	synt	any
	pret
lab L346
	synt	any
	pfail
	goto	L12
lab L345
	mark	L347
	ccase
	int	18
	line	591
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L348
	pnull
	var	19
	pnull
	var	57
	line	593
	colm	31
	synt	any
	field	prod_components
	line	593
	colm	26
	synt	any
	asgn
	unmark
lab L348
	mark	L349
	pnull
	var	21
	var	81
	var	100
	line	594
	colm	44
	synt	any
	invoke	0
	line	594
	colm	34
	synt	any
	invoke	1
	line	594
	colm	27
	synt	any
	asgn
	unmark
lab L349
	mark	L350
	line	595
	colm	17
	synt	ifelse
	mark	L351
	pnull
	pnull
	var	57
	line	595
	colm	25
	synt	any
	field	prod_local_type_id
	line	595
	colm	20
	synt	any
	null
	unmark
	pnull
	var	22
	var	76
	pnull
	int	6
	var	101
	line	596
	colm	40
	synt	any
	llist	2
	line	596
	colm	39
	synt	any
	invoke	1
	line	596
	colm	30
	synt	any
	asgn
	goto	L352
lab L351
	pnull
	var	22
	var	102
	pnull
	var	57
	line	597
	colm	45
	synt	any
	field	prod_local_type_id
	line	597
	colm	42
	synt	any
	invoke	1
	line	597
	colm	31
	synt	any
	asgn
lab L352
	line	595
	colm	17
	synt	endifelse
	unmark
lab L350
	mark	L353
	pnull
	var	23
	var	76
	pnull
	int	7
	var	22
	line	598
	colm	35
	synt	any
	llist	2
	line	598
	colm	34
	synt	any
	invoke	1
	line	598
	colm	25
	synt	any
	asgn
	unmark
lab L353
	mark	L354
	pnull
	var	24
	int	4
	line	599
	colm	29
	synt	any
	asgn
	unmark
lab L354
	mark	L355
	pnull
	var	25
	var	103
	var	19
	line	600
	colm	30
	synt	any
	invoke	1
	line	600
	colm	21
	synt	any
	asgn
	unmark
lab L355
	mark	L356
	line	602
	colm	17
	synt	ifelse
	mark	L357
	pnull
	var	63
	int	3
	line	602
	colm	27
	synt	any
	numne
	unmark
	mark	L359
	pnull
	var	25
	int	3
	line	603
	colm	25
	synt	any
	asgn
	unmark
lab L359
	mark	L360
	pnull
	var	27
	pnull
	var	19
	line	604
	colm	37
	synt	any
	field	lh_first
	line	604
	colm	26
	synt	any
	asgn
	unmark
lab L360
lab L361
	line	605
	colm	21
	synt	while
	mark0
	pnull
	var	27
	line	605
	colm	27
	synt	any
	nonnull
	unmark
	mark	L361
	mark	L364
	pnull
	var	31
	pnull
	var	27
	line	606
	colm	34
	synt	any
	field	cn_hd_field
	line	606
	colm	27
	synt	any
	asgn
	unmark
lab L364
	mark	L365
	line	607
	colm	25
	synt	if
	mark0
	pnull
	var	104
	pnull
	var	31
	line	607
	colm	43
	synt	any
	field	par_signature
	line	607
	colm	40
	synt	any
	invoke	1
	int	3
	line	607
	colm	60
	synt	any
	numeq
	unmark
	pnull
	var	25
	dup
	int	4
	line	608
	colm	33
	synt	any
	plus
	asgn
	line	607
	colm	25
	synt	endif
	unmark
lab L365
	pnull
	var	27
	pnull
	var	27
	line	610
	colm	37
	synt	any
	field	cn_tl_field
	line	610
	colm	30
	synt	any
	asgn
lab L362
	unmark
	goto	L361
lab L363
	line	605
	colm	21
	synt	endwhile
	goto	L358
lab L357
	pnull
	var	25
	var	103
	var	19
	line	613
	colm	34
	synt	any
	invoke	1
	line	613
	colm	25
	synt	any
	asgn
lab L358
	line	602
	colm	17
	synt	endifelse
	unmark
lab L356
	mark	L366
	pnull
	var	5
	var	76
	pnull
	int	29
	var	105
	var	106
	line	617
	colm	38
	synt	any
	invoke	1
	var	102
	var	107
	line	618
	colm	38
	synt	any
	invoke	1
	line	616
	colm	29
	synt	any
	llist	3
	line	616
	colm	28
	synt	any
	invoke	1
	line	616
	colm	19
	synt	any
	asgn
	unmark
lab L366
	mark	L367
	pnull
	pnull
	pnull
	var	5
	line	619
	colm	18
	synt	any
	field	tsc_signature
	line	619
	colm	33
	synt	any
	field	fsig_special
	var	108
	int	4
	var	25
	line	619
	colm	59
	synt	any
	invoke	2
	line	619
	colm	48
	synt	any
	asgn
	unmark
lab L367
	mark	L368
	var	109
	var	5
	line	620
	colm	28
	synt	any
	invoke	1
	unmark
lab L368
	mark	L369
	var	110
	var	21
	var	5
	line	621
	colm	25
	synt	any
	invoke	2
	unmark
lab L369
	mark	L370
	pnull
	var	5
	var	76
	pnull
	int	29
	var	105
	var	111
	line	623
	colm	38
	synt	any
	invoke	1
	var	102
	var	112
	line	624
	colm	38
	synt	any
	invoke	1
	line	622
	colm	29
	synt	any
	llist	3
	line	622
	colm	28
	synt	any
	invoke	1
	line	622
	colm	19
	synt	any
	asgn
	unmark
lab L370
	mark	L371
	pnull
	pnull
	pnull
	var	5
	line	625
	colm	19
	synt	any
	field	tsc_signature
	line	625
	colm	35
	synt	any
	field	fsig_special
	var	108
	int	30
	var	25
	line	625
	colm	60
	synt	any
	invoke	2
	line	625
	colm	50
	synt	any
	asgn
	unmark
lab L371
	mark	L372
	var	109
	var	5
	line	626
	colm	28
	synt	any
	invoke	1
	unmark
lab L372
	mark	L373
	var	110
	var	21
	var	5
	line	627
	colm	25
	synt	any
	invoke	2
	unmark
lab L373
	mark	L374
	pnull
	var	5
	var	76
	pnull
	int	29
	var	105
	var	113
	line	629
	colm	37
	synt	any
	invoke	1
	var	102
	var	114
	line	630
	colm	37
	synt	any
	invoke	1
	line	628
	colm	28
	synt	any
	llist	3
	line	628
	colm	27
	synt	any
	invoke	1
	line	628
	colm	19
	synt	any
	numeq
	unmark
lab L374
	mark	L375
	pnull
	pnull
	pnull
	var	5
	line	631
	colm	19
	synt	any
	field	tsc_signature
	line	631
	colm	35
	synt	any
	field	fsig_special
	var	108
	int	2
	var	25
	line	631
	colm	61
	synt	any
	invoke	2
	line	631
	colm	50
	synt	any
	asgn
	unmark
lab L375
	mark	L376
	var	109
	var	5
	line	632
	colm	28
	synt	any
	invoke	1
	unmark
lab L376
	mark	L377
	var	110
	var	21
	var	5
	line	633
	colm	25
	synt	any
	invoke	2
	unmark
lab L377
	mark	L378
	pnull
	var	5
	var	76
	pnull
	int	29
	var	105
	var	115
	line	636
	colm	38
	synt	any
	invoke	1
	var	76
	pnull
	int	9
	var	69
	var	19
	var	23
	line	637
	colm	37
	synt	any
	llist	4
	line	637
	colm	36
	synt	any
	invoke	1
	line	635
	colm	29
	synt	any
	llist	3
	line	635
	colm	28
	synt	any
	invoke	1
	line	635
	colm	19
	synt	any
	asgn
	unmark
lab L378
	mark	L379
	pnull
	pnull
	pnull
	var	5
	line	642
	colm	19
	synt	any
	field	tsc_signature
	line	642
	colm	35
	synt	any
	field	fsig_special
	var	108
	int	8
	var	25
	line	642
	colm	61
	synt	any
	invoke	2
	line	642
	colm	50
	synt	any
	asgn
	unmark
lab L379
	mark	L380
	var	109
	var	5
	line	643
	colm	28
	synt	any
	invoke	1
	unmark
lab L380
	mark	L381
	var	110
	var	21
	var	5
	line	644
	colm	25
	synt	any
	invoke	2
	unmark
lab L381
	mark	L382
	mark	L383
	pnull
	var	28
	var	100
	line	646
	colm	37
	synt	any
	invoke	0
	line	646
	colm	25
	synt	any
	asgn
	unmark
lab L383
	mark	L384
	pnull
	var	29
	var	100
	line	648
	colm	37
	synt	any
	invoke	0
	line	648
	colm	25
	synt	any
	asgn
	unmark
lab L384
	mark	L385
	var	110
	var	28
	pnull
	var	30
	var	76
	pnull
	int	2
	var	69
	var	23
	line	652
	colm	47
	synt	any
	llist	3
	line	652
	colm	46
	synt	any
	invoke	1
	line	652
	colm	37
	synt	any
	asgn
	line	652
	colm	29
	synt	any
	invoke	2
	unmark
lab L385
	mark	L386
	pnull
	pnull
	var	30
	line	653
	colm	23
	synt	any
	field	pre_num
	var	116
	line	653
	colm	33
	synt	any
	asgn
	unmark
lab L386
	mark	L387
	pnull
	var	116
	dup
	int	4
	line	654
	colm	30
	synt	any
	plus
	asgn
	unmark
lab L387
	mark	L388
	var	110
	var	29
	pnull
	var	30
	var	76
	pnull
	int	6
	var	101
	line	656
	colm	47
	synt	any
	llist	2
	line	656
	colm	46
	synt	any
	invoke	1
	line	656
	colm	37
	synt	any
	asgn
	line	656
	colm	29
	synt	any
	invoke	2
	unmark
lab L388
	mark	L389
	pnull
	pnull
	var	30
	line	657
	colm	23
	synt	any
	field	id_last_definition
	var	117
	var	28
	line	657
	colm	52
	synt	any
	invoke	1
	line	657
	colm	44
	synt	any
	asgn
	unmark
lab L389
	mark	L390
	pnull
	pnull
	var	30
	line	658
	colm	23
	synt	any
	field	id_def_found
	int	4
	line	658
	colm	38
	synt	any
	asgn
	unmark
lab L390
	mark	L391
	pnull
	var	20
	var	81
	var	100
	line	661
	colm	47
	synt	any
	invoke	0
	line	661
	colm	37
	synt	any
	invoke	1
	line	661
	colm	30
	synt	any
	asgn
	unmark
lab L391
	mark	L392
	pnull
	var	27
	pnull
	var	19
	line	662
	colm	37
	synt	any
	field	lh_first
	line	662
	colm	26
	synt	any
	asgn
	unmark
lab L392
	mark	L393
lab L394
	line	663
	colm	21
	synt	while
	mark0
	pnull
	var	27
	line	663
	colm	27
	synt	any
	nonnull
	unmark
	mark	L394
	mark	L397
	pnull
	var	31
	pnull
	var	27
	line	664
	colm	34
	synt	any
	field	cn_hd_field
	line	664
	colm	27
	synt	any
	asgn
	unmark
lab L397
	mark	L398
	pnull
	var	5
	var	102
	pnull
	var	31
	line	665
	colm	41
	synt	any
	field	par_id
	line	665
	colm	38
	synt	any
	invoke	1
	line	665
	colm	27
	synt	any
	asgn
	unmark
lab L398
	mark	L399
	pnull
	pnull
	var	5
	line	666
	colm	27
	synt	any
	field	sel_type
	var	22
	line	666
	colm	38
	synt	any
	asgn
	unmark
lab L399
	mark	L400
	pnull
	pnull
	var	5
	line	667
	colm	27
	synt	any
	field	id_last_definition
	var	69
	line	667
	colm	48
	synt	any
	asgn
	unmark
lab L400
	mark	L401
	pnull
	pnull
	var	5
	line	668
	colm	27
	synt	any
	field	id_def_found
	int	4
	line	668
	colm	42
	synt	any
	asgn
	unmark
lab L401
	mark	L402
	pnull
	var	5
	var	76
	pnull
	int	15
	var	5
	var	29
	line	669
	colm	37
	synt	any
	llist	3
	line	669
	colm	36
	synt	any
	invoke	1
	line	669
	colm	27
	synt	any
	asgn
	unmark
lab L402
	mark	L403
	var	110
	var	20
	var	5
	line	670
	colm	33
	synt	any
	invoke	2
	unmark
lab L403
	pnull
	var	27
	pnull
	var	27
	line	671
	colm	37
	synt	any
	field	cn_tl_field
	line	671
	colm	30
	synt	any
	asgn
lab L395
	unmark
	goto	L394
lab L396
	line	663
	colm	21
	synt	endwhile
	unmark
lab L393
	mark	L404
	pnull
	var	26
	int	3
	line	673
	colm	23
	synt	any
	asgn
	unmark
lab L404
	mark	L405
	pnull
	var	27
	pnull
	var	19
	line	674
	colm	37
	synt	any
	field	lh_first
	line	674
	colm	26
	synt	any
	asgn
	unmark
lab L405
lab L406
	line	675
	colm	21
	synt	while
	mark0
	pnull
	var	27
	line	675
	colm	27
	synt	any
	nonnull
	unmark
	mark	L406
	mark	L409
	pnull
	var	31
	pnull
	var	27
	line	676
	colm	34
	synt	any
	field	cn_hd_field
	line	676
	colm	27
	synt	any
	asgn
	unmark
lab L409
	mark	L410
	line	677
	colm	25
	synt	ifelse
	mark	L411
	pnull
	var	63
	int	3
	line	677
	colm	34
	synt	any
	numne
	pop
	var	104
	pnull
	var	31
	line	677
	colm	55
	synt	any
	field	par_signature
	line	677
	colm	52
	synt	any
	invoke	1
	unmark
	pnull
	var	32
	int	4
	line	678
	colm	36
	synt	any
	asgn
	goto	L412
lab L411
	pnull
	var	32
	int	3
	line	679
	colm	36
	synt	any
	asgn
lab L412
	line	677
	colm	25
	synt	endifelse
	unmark
lab L410
	mark	L413
	pnull
	var	5
	var	76
	pnull
	int	9
	var	69
	var	28
	var	118
	pnull
	var	31
	line	684
	colm	46
	synt	any
	field	par_signature
	var	19
	var	20
	line	684
	colm	43
	synt	any
	invoke	3
	line	681
	colm	37
	synt	any
	llist	4
	line	681
	colm	36
	synt	any
	invoke	1
	line	681
	colm	27
	synt	any
	asgn
	unmark
lab L413
	mark	L414
	line	688
	colm	25
	synt	ifelse
	mark	L415
	pnull
	var	32
	int	3
	line	688
	colm	33
	synt	any
	numeq
	unmark
	pnull
	pnull
	var	5
	line	689
	colm	31
	synt	any
	field	fsig_special
	var	108
	int	7
	var	26
	line	689
	colm	56
	synt	any
	invoke	2
	line	689
	colm	46
	synt	any
	asgn
	goto	L416
lab L415
	pnull
	pnull
	var	5
	line	691
	colm	31
	synt	any
	field	fsig_special
	var	108
	int	31
	int	3
	line	691
	colm	56
	synt	any
	invoke	2
	line	691
	colm	46
	synt	any
	asgn
lab L416
	line	688
	colm	25
	synt	endifelse
	unmark
lab L414
	mark	L417
	line	693
	colm	25
	synt	if
	mark0
	pnull
	pnull
	var	31
	line	693
	colm	35
	synt	any
	field	par_id
	line	693
	colm	30
	synt	any
	null
	unmark
	var	94
	str	32
	var	31
	line	694
	colm	41
	synt	any
	invoke	2
	line	693
	colm	25
	synt	endif
	unmark
lab L417
	mark	L418
	pnull
	var	5
	var	76
	pnull
	int	29
	pnull
	var	31
	line	696
	colm	43
	synt	any
	field	par_id
	var	5
	line	696
	colm	37
	synt	any
	llist	3
	line	696
	colm	36
	synt	any
	invoke	1
	line	696
	colm	27
	synt	any
	asgn
	unmark
lab L418
	mark	L419
	var	109
	var	5
	line	697
	colm	36
	synt	any
	invoke	1
	unmark
lab L419
	mark	L420
	var	110
	var	21
	var	5
	line	698
	colm	33
	synt	any
	invoke	2
	unmark
lab L420
	mark	L421
	line	699
	colm	25
	synt	if
	mark0
	pnull
	var	32
	int	3
	line	699
	colm	33
	synt	any
	numeq
	unmark
	pnull
	var	26
	dup
	int	4
	line	700
	colm	31
	synt	any
	plus
	asgn
	line	699
	colm	25
	synt	endif
	unmark
lab L421
	pnull
	var	27
	pnull
	var	27
	line	702
	colm	37
	synt	any
	field	cn_tl_field
	line	702
	colm	30
	synt	any
	asgn
lab L407
	unmark
	goto	L406
lab L408
	line	675
	colm	21
	synt	endwhile
	unmark
lab L382
	mark	L422
	var	60
	var	57
	var	76
	pnull
	int	10
	var	22
	var	21
	var	69
	var	69
	var	69
	line	705
	colm	35
	synt	any
	llist	6
	line	705
	colm	34
	synt	any
	invoke	1
	line	705
	colm	24
	synt	any
	invoke	2
	unmark
lab L422
	mark	L423
	pnull
	pnull
	pnull
	var	57
	line	709
	colm	19
	synt	any
	field	signature
	line	709
	colm	31
	synt	any
	field	pre_num
	var	116
	line	709
	colm	41
	synt	any
	asgn
	unmark
lab L423
	mark	L424
	pnull
	var	116
	dup
	int	4
	line	710
	colm	26
	synt	any
	plus
	asgn
	unmark
lab L424
	mark	L425
	var	119
	pnull
	var	57
	line	712
	colm	30
	synt	any
	field	signature
	line	712
	colm	27
	synt	any
	invoke	1
	unmark
lab L425
	mark	L426
	pnull
	pnull
	var	22
	line	716
	colm	26
	synt	any
	field	id_def_found
	int	4
	line	716
	colm	41
	synt	any
	asgn
	unmark
lab L426
	mark	L427
	pnull
	pnull
	var	22
	line	717
	colm	26
	synt	any
	field	id_last_definition
	pnull
	var	57
	line	717
	colm	52
	synt	any
	field	signature
	line	717
	colm	47
	synt	any
	asgn
	unmark
lab L427
	mark	L428
	pnull
	pnull
	var	57
	line	718
	colm	19
	synt	any
	field	signature
	var	120
	pnull
	var	57
	line	718
	colm	43
	synt	any
	field	signature
	var	57
	var	22
	int	3
	line	718
	colm	40
	synt	any
	invoke	4
	line	718
	colm	31
	synt	any
	asgn
	unmark
lab L428
	mark	L429
	pnull
	pnull
	var	22
	line	723
	colm	26
	synt	any
	field	id_def_found
	int	4
	line	723
	colm	41
	synt	any
	asgn
	unmark
lab L429
	mark	L430
	pnull
	pnull
	var	22
	line	724
	colm	26
	synt	any
	field	id_last_definition
	pnull
	var	57
	line	724
	colm	52
	synt	any
	field	signature
	line	724
	colm	47
	synt	any
	asgn
	unmark
lab L430
	mark	L431
	pnull
	pnull
	var	57
	line	725
	colm	19
	synt	any
	field	sig_done
	int	2
	line	725
	colm	30
	synt	any
	asgn
	unmark
lab L431
	mark	L432
	pnull
	var	27
	pnull
	var	19
	line	727
	colm	33
	synt	any
	field	lh_first
	line	727
	colm	22
	synt	any
	asgn
	unmark
lab L432
	mark	L433
lab L434
	line	728
	colm	17
	synt	while
	mark0
	pnull
	var	27
	line	728
	colm	23
	synt	any
	nonnull
	unmark
	mark	L434
	mark	L437
	pnull
	var	31
	pnull
	var	27
	line	729
	colm	30
	synt	any
	field	cn_hd_field
	line	729
	colm	23
	synt	any
	asgn
	unmark
lab L437
	mark	L438
	line	730
	colm	21
	synt	case
	mark0
	pnull
	pnull
	var	31
	line	730
	colm	29
	synt	any
	field	par_signature
	line	730
	colm	45
	synt	any
	field	kind
	eret
	mark	L440
	ccase
	int	9
	line	731
	colm	26
	synt	any
	eqv
	unmark
	pop
	pnull
	var	24
	int	3
	line	732
	colm	41
	synt	any
	asgn
	goto	L439
lab L440
	mark	L441
	ccase
	int	10
	line	733
	colm	26
	synt	any
	eqv
	unmark
	pop
	pnull
	var	24
	int	3
	line	734
	colm	41
	synt	any
	asgn
	goto	L439
lab L441
	mark	L442
	ccase
	int	7
	line	735
	colm	26
	synt	any
	eqv
	unmark
	pop
	line	737
	colm	33
	synt	ifelse
	mark	L443
	pnull
	var	62
	pnull
	pnull
	var	31
	line	737
	colm	46
	synt	any
	field	par_signature
	line	737
	colm	60
	synt	any
	field	val_denotation
	int	3
	line	737
	colm	44
	synt	any
	invoke	2
	int	3
	line	737
	colm	80
	synt	any
	numne
	unmark
	pnull
	var	24
	int	3
	line	738
	colm	49
	synt	any
	asgn
	goto	L444
lab L443
	mark	L445
	pnull
	var	18
	pnull
	pnull
	pnull
	var	31
	line	740
	colm	49
	synt	any
	field	par_signature
	line	740
	colm	63
	synt	any
	field	val_denotation
	line	740
	colm	78
	synt	any
	field	signature
	line	740
	colm	45
	synt	any
	asgn
	unmark
lab L445
	line	741
	colm	37
	synt	if
	mark0
	pnull
	var	18
	int	2
	line	741
	colm	49
	synt	any
	numne
	pop
	pnull
	pnull
	var	18
	line	741
	colm	63
	synt	any
	field	kind
	int	10
	line	741
	colm	69
	synt	any
	numeq
	unmark
	line	742
	colm	41
	synt	ifelse
	mark	L446
	pnull
	var	24
	int	3
	line	742
	colm	56
	synt	any
	numne
	pop
	pnull
	pnull
	var	18
	line	742
	colm	71
	synt	any
	field	ts_simple_type
	int	3
	line	742
	colm	88
	synt	any
	numne
	unmark
	pnull
	var	24
	int	4
	line	743
	colm	57
	synt	any
	asgn
	goto	L447
lab L446
	pnull
	var	24
	int	3
	line	744
	colm	58
	synt	any
	asgn
lab L447
	line	742
	colm	41
	synt	endifelse
	line	741
	colm	37
	synt	endif
lab L444
	line	737
	colm	33
	synt	endifelse
	goto	L439
lab L442
	efail
lab L439
	line	730
	colm	21
	synt	endcase
	unmark
lab L438
	pnull
	var	27
	pnull
	var	27
	line	750
	colm	34
	synt	any
	field	cn_tl_field
	line	750
	colm	26
	synt	any
	asgn
lab L435
	unmark
	goto	L434
lab L436
	line	728
	colm	17
	synt	endwhile
	unmark
lab L433
	mark	L448
	pnull
	pnull
	pnull
	var	57
	line	752
	colm	19
	synt	any
	field	signature
	line	752
	colm	31
	synt	any
	field	ts_simple_type
	var	24
	line	752
	colm	48
	synt	any
	asgn
	unmark
lab L448
	mark	L449
	var	82
	var	21
	line	753
	colm	23
	synt	any
	invoke	1
	unmark
lab L449
	mark	L450
	var	82
	var	20
	line	754
	colm	23
	synt	any
	invoke	1
	unmark
lab L450
	mark	L451
	var	73
	var	20
	line	755
	colm	22
	synt	any
	invoke	1
	unmark
lab L451
	mark	L452
	int	3
	line	756
	colm	17
	synt	any
	pret
lab L452
	synt	any
	pfail
	goto	L12
lab L347
	mark	L453
	ccase
	int	33
	line	758
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L454
	mark	L455
	pnull
	var	33
	pnull
	var	57
	line	761
	colm	37
	synt	any
	field	prod_components
	line	761
	colm	32
	synt	any
	asgn
	unmark
lab L455
	mark	L456
	pnull
	var	21
	var	81
	var	100
	line	762
	colm	48
	synt	any
	invoke	0
	line	762
	colm	38
	synt	any
	invoke	1
	line	762
	colm	31
	synt	any
	asgn
	unmark
lab L456
	mark	L457
	line	763
	colm	21
	synt	ifelse
	mark	L458
	pnull
	pnull
	var	57
	line	763
	colm	29
	synt	any
	field	prod_local_type_id
	line	763
	colm	24
	synt	any
	null
	unmark
	pnull
	var	22
	var	76
	pnull
	int	6
	var	101
	line	764
	colm	44
	synt	any
	llist	2
	line	764
	colm	43
	synt	any
	invoke	1
	line	764
	colm	34
	synt	any
	asgn
	goto	L459
lab L458
	pnull
	var	22
	var	102
	pnull
	var	57
	line	765
	colm	49
	synt	any
	field	prod_local_type_id
	line	765
	colm	46
	synt	any
	invoke	1
	line	765
	colm	35
	synt	any
	asgn
lab L459
	line	763
	colm	21
	synt	endifelse
	unmark
lab L457
	mark	L460
	pnull
	var	23
	var	76
	pnull
	int	7
	var	22
	line	766
	colm	38
	synt	any
	llist	2
	line	766
	colm	37
	synt	any
	invoke	1
	line	766
	colm	29
	synt	any
	numeq
	unmark
lab L460
	mark	L461
	pnull
	var	25
	var	103
	var	33
	line	767
	colm	34
	synt	any
	invoke	1
	line	767
	colm	25
	synt	any
	asgn
	unmark
lab L461
	mark	L462
	pnull
	var	5
	var	76
	pnull
	int	29
	var	105
	var	106
	line	770
	colm	42
	synt	any
	invoke	1
	var	102
	var	107
	line	771
	colm	42
	synt	any
	invoke	1
	line	769
	colm	33
	synt	any
	llist	3
	line	769
	colm	32
	synt	any
	invoke	1
	line	769
	colm	23
	synt	any
	asgn
	unmark
lab L462
	mark	L463
	pnull
	pnull
	pnull
	var	5
	line	772
	colm	23
	synt	any
	field	tsc_signature
	line	772
	colm	39
	synt	any
	field	fsig_special
	var	108
	int	9
	var	25
	line	772
	colm	64
	synt	any
	invoke	2
	line	772
	colm	54
	synt	any
	asgn
	unmark
lab L463
	mark	L464
	var	109
	var	5
	line	773
	colm	32
	synt	any
	invoke	1
	unmark
lab L464
	mark	L465
	var	110
	var	21
	var	5
	line	774
	colm	29
	synt	any
	invoke	2
	unmark
lab L465
	mark	L466
	pnull
	var	5
	var	76
	pnull
	int	29
	var	105
	var	111
	line	776
	colm	42
	synt	any
	invoke	1
	var	102
	var	112
	line	777
	colm	42
	synt	any
	invoke	1
	line	775
	colm	33
	synt	any
	llist	3
	line	775
	colm	32
	synt	any
	invoke	1
	line	775
	colm	23
	synt	any
	asgn
	unmark
lab L466
	mark	L467
	pnull
	pnull
	pnull
	var	5
	line	778
	colm	23
	synt	any
	field	tsc_signature
	line	778
	colm	39
	synt	any
	field	fsig_special
	var	108
	int	29
	var	25
	line	778
	colm	64
	synt	any
	invoke	2
	line	778
	colm	54
	synt	any
	asgn
	unmark
lab L467
	mark	L468
	var	109
	var	5
	line	779
	colm	32
	synt	any
	invoke	1
	unmark
lab L468
	mark	L469
	var	110
	var	21
	var	5
	line	780
	colm	29
	synt	any
	invoke	2
	unmark
lab L469
	mark	L470
	pnull
	var	5
	var	76
	pnull
	int	29
	var	105
	var	113
	line	782
	colm	41
	synt	any
	invoke	1
	var	102
	var	114
	line	783
	colm	41
	synt	any
	invoke	1
	line	781
	colm	32
	synt	any
	llist	3
	line	781
	colm	31
	synt	any
	invoke	1
	line	781
	colm	23
	synt	any
	numeq
	unmark
lab L470
	mark	L471
	pnull
	pnull
	pnull
	var	5
	line	784
	colm	23
	synt	any
	field	tsc_signature
	line	784
	colm	39
	synt	any
	field	fsig_special
	var	108
	int	10
	var	25
	line	784
	colm	64
	synt	any
	invoke	2
	line	784
	colm	54
	synt	any
	asgn
	unmark
lab L471
	mark	L472
	var	109
	var	5
	line	785
	colm	32
	synt	any
	invoke	1
	unmark
lab L472
	mark	L473
	var	110
	var	21
	var	5
	line	786
	colm	29
	synt	any
	invoke	2
	unmark
lab L473
	mark	L474
	pnull
	var	28
	var	100
	line	788
	colm	40
	synt	any
	invoke	0
	line	788
	colm	29
	synt	any
	numeq
	unmark
lab L474
	mark	L475
	var	110
	var	28
	pnull
	var	30
	var	76
	pnull
	int	2
	var	69
	var	121
	line	791
	colm	51
	synt	any
	llist	3
	line	791
	colm	50
	synt	any
	invoke	1
	line	791
	colm	41
	synt	any
	asgn
	line	791
	colm	33
	synt	any
	invoke	2
	unmark
lab L475
	mark	L476
	pnull
	pnull
	var	30
	line	792
	colm	27
	synt	any
	field	pre_num
	var	116
	line	792
	colm	37
	synt	any
	numeq
	unmark
lab L476
	mark	L477
	pnull
	var	116
	dup
	int	4
	line	793
	colm	34
	synt	any
	plus
	asgn
	unmark
lab L477
	mark	L478
	pnull
	var	26
	int	3
	line	795
	colm	27
	synt	any
	asgn
	unmark
lab L478
	mark	L479
	pnull
	var	27
	pnull
	var	33
	line	796
	colm	43
	synt	any
	field	lh_first
	line	796
	colm	30
	synt	any
	asgn
	unmark
lab L479
	mark	L480
lab L481
	line	797
	colm	25
	synt	while
	mark0
	pnull
	var	27
	line	797
	colm	31
	synt	any
	nonnull
	unmark
	mark	L481
	mark	L484
	pnull
	var	31
	pnull
	var	27
	line	798
	colm	38
	synt	any
	field	cn_hd_field
	line	798
	colm	31
	synt	any
	asgn
	unmark
lab L484
	mark	L485
	line	800
	colm	29
	synt	ifelse
	mark	L486
	pnull
	var	63
	int	3
	line	800
	colm	38
	synt	any
	numeq
	pop
	var	104
	pnull
	var	31
	line	800
	colm	58
	synt	any
	field	par_signature
	line	800
	colm	55
	synt	any
	invoke	1
	unmark
	pnull
	var	32
	int	4
	line	801
	colm	45
	synt	any
	asgn
	goto	L487
lab L486
	pnull
	var	32
	int	3
	line	802
	colm	38
	synt	any
	asgn
lab L487
	line	800
	colm	29
	synt	endifelse
	unmark
lab L485
	mark	L488
	line	804
	colm	29
	synt	if
	mark0
	pnull
	pnull
	pnull
	var	31
	line	804
	colm	35
	synt	any
	field	par_id
	line	804
	colm	44
	synt	any
	field	kind
	int	6
	line	804
	colm	51
	synt	any
	numne
	unmark
	var	56
	pnull
	str	34
	var	122
	pnull
	pnull
	var	31
	line	806
	colm	51
	synt	any
	field	par_id
	line	806
	colm	60
	synt	any
	field	id_str_table_index
	line	806
	colm	48
	synt	any
	invoke	1
	line	805
	colm	66
	synt	any
	cat
	line	805
	colm	40
	synt	any
	invoke	1
	line	804
	colm	29
	synt	endif
	unmark
lab L488
	mark	L489
	pnull
	var	5
	var	76
	pnull
	int	9
	var	69
	var	28
	pnull
	var	31
	line	812
	colm	43
	synt	any
	field	par_signature
	line	809
	colm	40
	synt	any
	llist	4
	line	809
	colm	39
	synt	any
	invoke	1
	line	809
	colm	31
	synt	any
	numeq
	unmark
lab L489
	mark	L490
	line	814
	colm	29
	synt	ifelse
	mark	L491
	pnull
	var	32
	int	3
	line	814
	colm	37
	synt	any
	numeq
	unmark
	mark	L493
	pnull
	pnull
	var	5
	line	815
	colm	35
	synt	any
	field	fsig_special
	var	108
	int	11
	var	26
	line	815
	colm	60
	synt	any
	invoke	2
	line	815
	colm	50
	synt	any
	asgn
	unmark
lab L493
	pnull
	goto	L492
lab L491
	mark	L494
	pnull
	pnull
	var	5
	line	817
	colm	35
	synt	any
	field	fsig_special
	var	108
	int	31
	int	3
	line	817
	colm	60
	synt	any
	invoke	2
	line	817
	colm	50
	synt	any
	asgn
	unmark
lab L494
	pnull
lab L492
	line	814
	colm	29
	synt	endifelse
	unmark
lab L490
	mark	L495
	pnull
	pnull
	var	5
	line	819
	colm	31
	synt	any
	field	fsig_inline_code
	var	123
	pnull
	var	5
	line	820
	colm	52
	synt	any
	field	fsig_special
	line	820
	colm	49
	synt	any
	invoke	1
	line	819
	colm	50
	synt	any
	asgn
	unmark
lab L495
	mark	L496
	var	110
	var	21
	var	76
	pnull
	int	29
	var	124
	str	35
	pnull
	var	31
	line	823
	colm	63
	synt	any
	field	par_id
	line	823
	colm	53
	synt	any
	invoke	2
	var	5
	line	822
	colm	45
	synt	any
	llist	3
	line	822
	colm	44
	synt	any
	invoke	1
	line	821
	colm	37
	synt	any
	invoke	2
	unmark
lab L496
	mark	L497
	pnull
	var	5
	var	76
	pnull
	int	9
	var	69
	var	28
	var	90
	line	827
	colm	41
	synt	any
	llist	4
	line	827
	colm	40
	synt	any
	invoke	1
	line	827
	colm	31
	synt	any
	asgn
	unmark
lab L497
	mark	L498
	pnull
	pnull
	var	5
	line	832
	colm	31
	synt	any
	field	fsig_special
	var	108
	int	17
	var	26
	line	832
	colm	56
	synt	any
	invoke	2
	line	832
	colm	46
	synt	any
	asgn
	unmark
lab L498
	mark	L499
	pnull
	pnull
	var	5
	line	833
	colm	31
	synt	any
	field	fsig_inline_code
	var	123
	pnull
	var	5
	line	833
	colm	72
	synt	any
	field	fsig_special
	line	833
	colm	69
	synt	any
	invoke	1
	line	833
	colm	50
	synt	any
	asgn
	unmark
lab L499
	mark	L500
	var	110
	var	21
	var	76
	pnull
	int	29
	var	124
	str	36
	pnull
	var	31
	line	836
	colm	63
	synt	any
	field	par_id
	line	836
	colm	53
	synt	any
	invoke	2
	var	5
	line	835
	colm	45
	synt	any
	llist	3
	line	835
	colm	44
	synt	any
	invoke	1
	line	834
	colm	37
	synt	any
	invoke	2
	unmark
lab L500
	mark	L501
	pnull
	var	5
	var	76
	pnull
	int	9
	var	69
	var	125
	pnull
	var	76
	int	2
	var	69
	pnull
	var	31
	line	844
	colm	60
	synt	any
	field	par_signature
	line	842
	colm	57
	synt	any
	invoke	3
	pnull
	line	842
	colm	49
	synt	any
	llist	2
	line	842
	colm	48
	synt	any
	invoke	1
	var	23
	line	840
	colm	41
	synt	any
	llist	4
	line	840
	colm	40
	synt	any
	invoke	1
	line	840
	colm	31
	synt	any
	asgn
	unmark
lab L501
	mark	L502
	line	849
	colm	29
	synt	ifelse
	mark	L503
	pnull
	var	32
	int	3
	line	849
	colm	37
	synt	any
	numeq
	unmark
	pnull
	pnull
	var	5
	line	850
	colm	35
	synt	any
	field	fsig_special
	var	108
	int	37
	var	26
	line	850
	colm	59
	synt	any
	invoke	2
	line	850
	colm	50
	synt	any
	numeq
	goto	L504
lab L503
	pnull
	pnull
	var	5
	line	852
	colm	35
	synt	any
	field	fsig_special
	var	108
	int	38
	var	26
	line	852
	colm	59
	synt	any
	invoke	2
	line	852
	colm	50
	synt	any
	numeq
lab L504
	line	849
	colm	29
	synt	endifelse
	unmark
lab L502
	mark	L505
	pnull
	pnull
	var	5
	line	854
	colm	31
	synt	any
	field	fsig_inline_code
	var	123
	pnull
	var	5
	line	855
	colm	52
	synt	any
	field	fsig_special
	line	855
	colm	49
	synt	any
	invoke	1
	line	854
	colm	50
	synt	any
	asgn
	unmark
lab L505
	mark	L506
	var	110
	var	21
	var	76
	pnull
	int	29
	var	124
	str	39
	pnull
	var	31
	line	858
	colm	65
	synt	any
	field	par_id
	line	858
	colm	53
	synt	any
	invoke	2
	var	5
	line	857
	colm	45
	synt	any
	llist	3
	line	857
	colm	44
	synt	any
	invoke	1
	line	856
	colm	37
	synt	any
	invoke	2
	unmark
lab L506
	pnull
	var	26
	dup
	int	4
	line	861
	colm	31
	synt	any
	plus
	asgn
lab L482
	unmark
	goto	L481
lab L483
	line	797
	colm	25
	synt	endwhile
	unmark
lab L480
	pnull
	var	27
	pnull
	var	27
	line	863
	colm	37
	synt	any
	field	cn_tl_field
	line	863
	colm	30
	synt	any
	asgn
	unmark
lab L454
	mark	L507
	var	60
	var	57
	var	76
	pnull
	int	10
	var	69
	var	21
	var	69
	var	69
	var	69
	line	866
	colm	35
	synt	any
	llist	6
	line	866
	colm	34
	synt	any
	invoke	1
	line	866
	colm	24
	synt	any
	invoke	2
	unmark
lab L507
	mark	L508
	pnull
	pnull
	pnull
	var	57
	line	867
	colm	19
	synt	any
	field	signature
	line	867
	colm	31
	synt	any
	field	pre_num
	var	116
	line	867
	colm	41
	synt	any
	asgn
	unmark
lab L508
	mark	L509
	pnull
	var	116
	dup
	int	4
	line	868
	colm	26
	synt	any
	plus
	asgn
	unmark
lab L509
	mark	L510
	var	119
	pnull
	var	57
	line	870
	colm	30
	synt	any
	field	signature
	line	870
	colm	27
	synt	any
	invoke	1
	unmark
lab L510
	mark	L511
	pnull
	pnull
	var	22
	line	874
	colm	26
	synt	any
	field	id_def_found
	int	4
	line	874
	colm	41
	synt	any
	asgn
	unmark
lab L511
	mark	L512
	pnull
	pnull
	var	22
	line	875
	colm	26
	synt	any
	field	id_last_definition
	pnull
	var	57
	line	875
	colm	52
	synt	any
	field	signature
	line	875
	colm	47
	synt	any
	asgn
	unmark
lab L512
	mark	L513
	pnull
	pnull
	var	57
	line	876
	colm	19
	synt	any
	field	signature
	var	120
	pnull
	var	57
	line	876
	colm	43
	synt	any
	field	signature
	var	57
	var	22
	int	3
	line	876
	colm	40
	synt	any
	invoke	4
	line	876
	colm	31
	synt	any
	asgn
	unmark
lab L513
	mark	L514
	pnull
	pnull
	var	22
	line	881
	colm	26
	synt	any
	field	id_last_definition
	pnull
	var	57
	line	881
	colm	52
	synt	any
	field	signature
	line	881
	colm	47
	synt	any
	asgn
	unmark
lab L514
	mark	L515
	pnull
	pnull
	var	57
	line	882
	colm	19
	synt	any
	field	sig_done
	int	2
	line	882
	colm	30
	synt	any
	asgn
	unmark
lab L515
	mark	L516
	pnull
	var	27
	pnull
	var	33
	line	884
	colm	35
	synt	any
	field	lh_first
	line	884
	colm	22
	synt	any
	asgn
	unmark
lab L516
	mark	L517
lab L518
	line	885
	colm	17
	synt	while
	mark0
	pnull
	var	27
	line	885
	colm	23
	synt	any
	nonnull
	unmark
	mark	L518
	mark	L521
	pnull
	var	31
	pnull
	var	27
	line	886
	colm	30
	synt	any
	field	cn_hd_field
	line	886
	colm	23
	synt	any
	asgn
	unmark
lab L521
	mark	L522
	line	888
	colm	21
	synt	case
	mark0
	pnull
	pnull
	var	31
	line	888
	colm	29
	synt	any
	field	par_signature
	line	888
	colm	45
	synt	any
	field	kind
	eret
	mark	L524
	ccase
	int	9
	line	889
	colm	26
	synt	any
	eqv
	unmark
	pop
	pnull
	var	24
	int	3
	line	890
	colm	41
	synt	any
	asgn
	goto	L523
lab L524
	mark	L525
	ccase
	int	10
	line	891
	colm	26
	synt	any
	eqv
	unmark
	pop
	pnull
	var	24
	int	3
	line	892
	colm	41
	synt	any
	asgn
	goto	L523
lab L525
	mark	L526
	ccase
	int	7
	line	893
	colm	26
	synt	any
	eqv
	unmark
	pop
	line	895
	colm	33
	synt	ifelse
	mark	L527
	pnull
	var	62
	pnull
	pnull
	var	31
	line	895
	colm	46
	synt	any
	field	par_signature
	line	895
	colm	62
	synt	any
	field	val_denotation
	int	3
	line	895
	colm	43
	synt	any
	invoke	2
	int	3
	line	895
	colm	84
	synt	any
	numne
	unmark
	pnull
	var	24
	int	3
	line	896
	colm	49
	synt	any
	asgn
	goto	L528
lab L527
	mark	L529
	pnull
	var	18
	pnull
	pnull
	pnull
	var	31
	line	898
	colm	50
	synt	any
	field	par_signature
	line	898
	colm	66
	synt	any
	field	val_denotation
	line	898
	colm	82
	synt	any
	field	signature
	line	898
	colm	45
	synt	any
	asgn
	unmark
lab L529
	line	899
	colm	37
	synt	if
	mark0
	pnull
	var	18
	int	2
	line	899
	colm	49
	synt	any
	numne
	pop
	pnull
	pnull
	var	18
	line	900
	colm	49
	synt	any
	field	kind
	int	10
	line	900
	colm	56
	synt	any
	numeq
	unmark
	line	901
	colm	45
	synt	ifelse
	mark	L530
	pnull
	var	24
	int	3
	line	901
	colm	61
	synt	any
	numne
	pop
	pnull
	pnull
	var	18
	line	902
	colm	57
	synt	any
	field	ts_simple_type
	int	3
	line	902
	colm	74
	synt	any
	numne
	unmark
	pnull
	var	24
	int	4
	line	903
	colm	61
	synt	any
	asgn
	goto	L531
lab L530
	pnull
	var	24
	var	126
	line	905
	colm	61
	synt	any
	asgn
lab L531
	line	901
	colm	45
	synt	endifelse
	line	899
	colm	37
	synt	endif
lab L528
	line	895
	colm	33
	synt	endifelse
	goto	L523
lab L526
	efail
lab L523
	line	888
	colm	21
	synt	endcase
	unmark
lab L522
	pnull
	var	27
	pnull
	var	27
	line	911
	colm	33
	synt	any
	field	cn_tl_field
	line	911
	colm	26
	synt	any
	asgn
lab L519
	unmark
	goto	L518
lab L520
	line	885
	colm	17
	synt	endwhile
	unmark
lab L517
	mark	L532
	pnull
	pnull
	pnull
	var	57
	line	913
	colm	19
	synt	any
	field	signature
	line	913
	colm	31
	synt	any
	field	ts_simple_type
	var	24
	line	913
	colm	48
	synt	any
	asgn
	unmark
lab L532
	mark	L533
	var	73
	var	21
	line	914
	colm	22
	synt	any
	invoke	1
	unmark
lab L533
	mark	L534
	int	3
	line	915
	colm	17
	synt	any
	pret
lab L534
	synt	any
	pfail
	goto	L12
lab L453
	mark	L535
	ccase
	int	40
	line	918
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L536
	pnull
	var	34
	pnull
	var	57
	line	920
	colm	30
	synt	any
	field	enum_id_list
	line	920
	colm	25
	synt	any
	asgn
	unmark
lab L536
	mark	L537
	pnull
	var	21
	var	81
	var	100
	line	921
	colm	44
	synt	any
	invoke	0
	line	921
	colm	34
	synt	any
	invoke	1
	line	921
	colm	27
	synt	any
	asgn
	unmark
lab L537
	mark	L538
	pnull
	var	22
	var	76
	pnull
	int	6
	pnull
	int	4
	line	922
	colm	41
	synt	any
	neg
	line	922
	colm	36
	synt	any
	llist	2
	line	922
	colm	35
	synt	any
	invoke	1
	line	922
	colm	26
	synt	any
	asgn
	unmark
lab L538
	mark	L539
	pnull
	var	23
	var	76
	pnull
	int	7
	var	22
	line	923
	colm	34
	synt	any
	llist	2
	line	923
	colm	33
	synt	any
	invoke	1
	line	923
	colm	25
	synt	any
	numeq
	unmark
lab L539
	mark	L540
	pnull
	var	35
	var	76
	pnull
	int	2
	var	69
	var	23
	line	924
	colm	38
	synt	any
	llist	3
	line	924
	colm	37
	synt	any
	invoke	1
	line	924
	colm	28
	synt	any
	asgn
	unmark
lab L540
	mark	L541
	pnull
	var	36
	var	125
	pnull
	var	35
	line	925
	colm	38
	synt	any
	llist	1
	line	925
	colm	37
	synt	any
	invoke	1
	line	925
	colm	28
	synt	any
	asgn
	unmark
lab L541
	mark	L542
	pnull
	var	37
	var	76
	pnull
	int	2
	var	69
	var	127
	line	926
	colm	37
	synt	any
	llist	3
	line	926
	colm	36
	synt	any
	invoke	1
	line	926
	colm	27
	synt	any
	asgn
	unmark
lab L542
	mark	L543
	pnull
	var	38
	var	125
	pnull
	var	37
	line	927
	colm	37
	synt	any
	llist	1
	line	927
	colm	36
	synt	any
	invoke	1
	line	927
	colm	27
	synt	any
	asgn
	unmark
lab L543
	mark	L544
	pnull
	var	25
	var	103
	var	34
	line	928
	colm	30
	synt	any
	invoke	1
	line	928
	colm	21
	synt	any
	asgn
	unmark
lab L544
	mark	L545
	pnull
	var	5
	var	76
	pnull
	int	29
	var	105
	var	106
	line	931
	colm	38
	synt	any
	invoke	1
	var	102
	var	107
	line	932
	colm	38
	synt	any
	invoke	1
	line	930
	colm	29
	synt	any
	llist	3
	line	930
	colm	28
	synt	any
	invoke	1
	line	930
	colm	19
	synt	any
	asgn
	unmark
lab L545
	mark	L546
	pnull
	pnull
	pnull
	var	5
	line	933
	colm	19
	synt	any
	field	tsc_signature
	line	933
	colm	35
	synt	any
	field	fsig_special
	var	108
	int	33
	var	25
	line	933
	colm	64
	synt	any
	invoke	2
	line	933
	colm	50
	synt	any
	asgn
	unmark
lab L546
	mark	L547
	var	109
	var	5
	line	934
	colm	28
	synt	any
	invoke	1
	unmark
lab L547
	mark	L548
	var	110
	var	21
	var	5
	line	935
	colm	25
	synt	any
	invoke	2
	unmark
lab L548
	mark	L549
	pnull
	var	5
	var	76
	pnull
	int	29
	var	105
	var	111
	line	937
	colm	38
	synt	any
	invoke	1
	var	102
	var	112
	line	938
	colm	38
	synt	any
	invoke	1
	line	936
	colm	29
	synt	any
	llist	3
	line	936
	colm	28
	synt	any
	invoke	1
	line	936
	colm	19
	synt	any
	asgn
	unmark
lab L549
	mark	L550
	pnull
	pnull
	pnull
	var	5
	line	939
	colm	19
	synt	any
	field	tsc_signature
	line	939
	colm	35
	synt	any
	field	fsig_special
	var	108
	int	14
	var	25
	line	939
	colm	64
	synt	any
	invoke	2
	line	939
	colm	50
	synt	any
	asgn
	unmark
lab L550
	mark	L551
	var	109
	var	5
	line	940
	colm	28
	synt	any
	invoke	1
	unmark
lab L551
	mark	L552
	var	110
	var	21
	var	5
	line	941
	colm	25
	synt	any
	invoke	2
	unmark
lab L552
	mark	L553
	pnull
	var	5
	var	76
	pnull
	int	29
	var	105
	var	113
	line	943
	colm	38
	synt	any
	invoke	1
	var	102
	var	114
	line	944
	colm	38
	synt	any
	invoke	1
	line	942
	colm	29
	synt	any
	llist	3
	line	942
	colm	28
	synt	any
	invoke	1
	line	942
	colm	19
	synt	any
	asgn
	unmark
lab L553
	mark	L554
	pnull
	pnull
	pnull
	var	5
	line	945
	colm	19
	synt	any
	field	tsc_signature
	line	945
	colm	35
	synt	any
	field	fsig_special
	var	108
	int	41
	var	25
	line	945
	colm	64
	synt	any
	invoke	2
	line	945
	colm	50
	synt	any
	asgn
	unmark
lab L554
	mark	L555
	var	109
	var	5
	line	946
	colm	28
	synt	any
	invoke	1
	unmark
lab L555
	mark	L556
	var	110
	var	21
	var	5
	line	947
	colm	25
	synt	any
	invoke	2
	unmark
lab L556
	mark	L557
	pnull
	var	5
	var	76
	pnull
	int	29
	var	105
	var	128
	line	949
	colm	38
	synt	any
	invoke	1
	var	102
	var	129
	line	950
	colm	38
	synt	any
	invoke	1
	line	948
	colm	29
	synt	any
	llist	3
	line	948
	colm	28
	synt	any
	invoke	1
	line	948
	colm	19
	synt	any
	asgn
	unmark
lab L557
	mark	L558
	pnull
	pnull
	pnull
	var	5
	line	951
	colm	19
	synt	any
	field	tsc_signature
	line	951
	colm	35
	synt	any
	field	fsig_special
	var	108
	int	42
	var	25
	line	951
	colm	64
	synt	any
	invoke	2
	line	951
	colm	50
	synt	any
	asgn
	unmark
lab L558
	mark	L559
	var	109
	var	5
	line	952
	colm	28
	synt	any
	invoke	1
	unmark
lab L559
	mark	L560
	var	110
	var	21
	var	5
	line	953
	colm	25
	synt	any
	invoke	2
	unmark
lab L560
	mark	L561
	pnull
	var	5
	var	76
	pnull
	int	29
	var	105
	var	130
	line	955
	colm	38
	synt	any
	invoke	1
	var	102
	var	129
	line	956
	colm	38
	synt	any
	invoke	1
	line	954
	colm	29
	synt	any
	llist	3
	line	954
	colm	28
	synt	any
	invoke	1
	line	954
	colm	19
	synt	any
	asgn
	unmark
lab L561
	mark	L562
	pnull
	pnull
	pnull
	var	5
	line	957
	colm	19
	synt	any
	field	tsc_signature
	line	957
	colm	35
	synt	any
	field	fsig_special
	var	108
	int	43
	var	25
	line	957
	colm	60
	synt	any
	invoke	2
	line	957
	colm	50
	synt	any
	asgn
	unmark
lab L562
	mark	L563
	var	109
	var	5
	line	958
	colm	28
	synt	any
	invoke	1
	unmark
lab L563
	mark	L564
	var	110
	var	21
	var	5
	line	959
	colm	25
	synt	any
	invoke	2
	unmark
lab L564
	mark	L565
	pnull
	var	5
	var	76
	pnull
	int	29
	var	105
	var	131
	line	961
	colm	38
	synt	any
	invoke	1
	var	102
	var	132
	line	962
	colm	38
	synt	any
	invoke	1
	line	960
	colm	29
	synt	any
	llist	3
	line	960
	colm	28
	synt	any
	invoke	1
	line	960
	colm	19
	synt	any
	asgn
	unmark
lab L565
	mark	L566
	pnull
	pnull
	pnull
	var	5
	line	963
	colm	19
	synt	any
	field	tsc_signature
	line	963
	colm	35
	synt	any
	field	fsig_special
	var	108
	int	44
	int	3
	line	963
	colm	60
	synt	any
	invoke	2
	line	963
	colm	50
	synt	any
	asgn
	unmark
lab L566
	mark	L567
	var	109
	var	5
	line	964
	colm	28
	synt	any
	invoke	1
	unmark
lab L567
	mark	L568
	var	110
	var	21
	var	5
	line	965
	colm	25
	synt	any
	invoke	2
	unmark
lab L568
	mark	L569
	pnull
	var	5
	var	76
	pnull
	int	29
	var	105
	var	133
	line	967
	colm	38
	synt	any
	invoke	1
	var	102
	var	132
	line	968
	colm	38
	synt	any
	invoke	1
	line	966
	colm	29
	synt	any
	llist	3
	line	966
	colm	28
	synt	any
	invoke	1
	line	966
	colm	19
	synt	any
	asgn
	unmark
lab L569
	mark	L570
	pnull
	pnull
	pnull
	var	5
	line	969
	colm	19
	synt	any
	field	tsc_signature
	line	969
	colm	35
	synt	any
	field	fsig_special
	var	108
	int	44
	pnull
	var	25
	int	4
	line	969
	colm	68
	synt	any
	minus
	line	969
	colm	60
	synt	any
	invoke	2
	line	969
	colm	50
	synt	any
	asgn
	unmark
lab L570
	mark	L571
	var	109
	var	5
	line	970
	colm	28
	synt	any
	invoke	1
	unmark
lab L571
	mark	L572
	var	110
	var	21
	var	5
	line	971
	colm	25
	synt	any
	invoke	2
	unmark
lab L572
	mark	L573
	pnull
	var	5
	var	76
	pnull
	int	29
	var	105
	var	134
	line	973
	colm	38
	synt	any
	invoke	1
	var	76
	pnull
	int	9
	var	69
	var	36
	var	121
	line	974
	colm	37
	synt	any
	llist	4
	line	974
	colm	36
	synt	any
	invoke	1
	line	972
	colm	29
	synt	any
	llist	3
	line	972
	colm	28
	synt	any
	invoke	1
	line	972
	colm	19
	synt	any
	asgn
	unmark
lab L573
	mark	L574
	pnull
	pnull
	pnull
	var	5
	line	976
	colm	19
	synt	any
	field	tsc_signature
	line	976
	colm	35
	synt	any
	field	fsig_special
	var	108
	int	20
	var	25
	line	976
	colm	60
	synt	any
	invoke	2
	line	976
	colm	50
	synt	any
	asgn
	unmark
lab L574
	mark	L575
	var	109
	var	5
	line	977
	colm	28
	synt	any
	invoke	1
	unmark
lab L575
	mark	L576
	var	110
	var	21
	var	5
	line	978
	colm	25
	synt	any
	invoke	2
	unmark
lab L576
	mark	L577
	pnull
	var	5
	var	76
	pnull
	int	29
	var	105
	var	135
	line	980
	colm	38
	synt	any
	invoke	1
	var	76
	pnull
	int	9
	var	69
	var	36
	var	121
	line	981
	colm	37
	synt	any
	llist	4
	line	981
	colm	36
	synt	any
	invoke	1
	line	979
	colm	29
	synt	any
	llist	3
	line	979
	colm	28
	synt	any
	invoke	1
	line	979
	colm	19
	synt	any
	asgn
	unmark
lab L577
	mark	L578
	pnull
	pnull
	pnull
	var	5
	line	983
	colm	19
	synt	any
	field	tsc_signature
	line	983
	colm	35
	synt	any
	field	fsig_special
	var	108
	int	22
	var	25
	line	983
	colm	60
	synt	any
	invoke	2
	line	983
	colm	50
	synt	any
	asgn
	unmark
lab L578
	mark	L579
	var	109
	var	5
	line	984
	colm	28
	synt	any
	invoke	1
	unmark
lab L579
	mark	L580
	var	110
	var	21
	var	5
	line	985
	colm	25
	synt	any
	invoke	2
	unmark
lab L580
	mark	L581
	pnull
	var	5
	var	76
	pnull
	int	29
	var	105
	var	136
	line	987
	colm	38
	synt	any
	invoke	1
	var	76
	pnull
	int	9
	var	69
	var	36
	var	127
	line	988
	colm	37
	synt	any
	llist	4
	line	988
	colm	36
	synt	any
	invoke	1
	line	986
	colm	29
	synt	any
	llist	3
	line	986
	colm	28
	synt	any
	invoke	1
	line	986
	colm	19
	synt	any
	asgn
	unmark
lab L581
	mark	L582
	pnull
	pnull
	pnull
	var	5
	line	990
	colm	19
	synt	any
	field	tsc_signature
	line	990
	colm	35
	synt	any
	field	fsig_special
	var	108
	int	24
	var	25
	line	990
	colm	60
	synt	any
	invoke	2
	line	990
	colm	50
	synt	any
	asgn
	unmark
lab L582
	mark	L583
	var	109
	var	5
	line	991
	colm	28
	synt	any
	invoke	1
	unmark
lab L583
	mark	L584
	var	110
	var	21
	var	5
	line	992
	colm	25
	synt	any
	invoke	2
	unmark
lab L584
	mark	L585
	pnull
	var	5
	var	76
	pnull
	int	29
	var	105
	var	137
	line	994
	colm	38
	synt	any
	invoke	1
	var	76
	pnull
	int	9
	var	69
	var	38
	var	121
	line	995
	colm	37
	synt	any
	llist	4
	line	995
	colm	36
	synt	any
	invoke	1
	line	993
	colm	29
	synt	any
	llist	3
	line	993
	colm	28
	synt	any
	invoke	1
	line	993
	colm	19
	synt	any
	asgn
	unmark
lab L585
	mark	L586
	pnull
	pnull
	pnull
	var	5
	line	997
	colm	19
	synt	any
	field	tsc_signature
	line	997
	colm	35
	synt	any
	field	fsig_special
	var	108
	int	24
	var	25
	line	997
	colm	60
	synt	any
	invoke	2
	line	997
	colm	50
	synt	any
	asgn
	unmark
lab L586
	mark	L587
	var	109
	var	5
	line	998
	colm	28
	synt	any
	invoke	1
	unmark
lab L587
	mark	L588
	var	110
	var	21
	var	5
	line	999
	colm	25
	synt	any
	invoke	2
	unmark
lab L588
	mark	L589
	pnull
	var	5
	var	76
	pnull
	int	29
	var	105
	var	138
	line	1001
	colm	38
	synt	any
	invoke	1
	var	76
	pnull
	int	9
	var	69
	var	100
	line	1003
	colm	52
	synt	any
	invoke	0
	var	127
	line	1002
	colm	37
	synt	any
	llist	4
	line	1002
	colm	36
	synt	any
	invoke	1
	line	1000
	colm	29
	synt	any
	llist	3
	line	1000
	colm	28
	synt	any
	invoke	1
	line	1000
	colm	19
	synt	any
	asgn
	unmark
lab L589
	mark	L590
	pnull
	pnull
	pnull
	var	5
	line	1004
	colm	19
	synt	any
	field	tsc_signature
	line	1004
	colm	35
	synt	any
	field	fsig_special
	var	108
	int	45
	var	25
	line	1004
	colm	60
	synt	any
	invoke	2
	line	1004
	colm	50
	synt	any
	asgn
	unmark
lab L590
	mark	L591
	var	109
	var	5
	line	1005
	colm	28
	synt	any
	invoke	1
	unmark
lab L591
	mark	L592
	var	110
	var	21
	var	5
	line	1006
	colm	25
	synt	any
	invoke	2
	unmark
lab L592
	mark	L593
	mark	L594
	pnull
	var	26
	int	3
	line	1010
	colm	23
	synt	any
	asgn
	unmark
lab L594
	mark	L595
	pnull
	var	27
	pnull
	var	34
	line	1011
	colm	36
	synt	any
	field	lh_first
	line	1011
	colm	26
	synt	any
	asgn
	unmark
lab L595
lab L596
	line	1012
	colm	21
	synt	while
	mark0
	pnull
	var	27
	line	1012
	colm	27
	synt	any
	nonnull
	unmark
	mark	L596
	mark	L599
	pnull
	var	31
	pnull
	var	27
	line	1013
	colm	34
	synt	any
	field	cn_hd_field
	line	1013
	colm	27
	synt	any
	asgn
	unmark
lab L599
	mark	L600
	pnull
	var	5
	var	102
	var	132
	line	1014
	colm	38
	synt	any
	invoke	1
	line	1014
	colm	27
	synt	any
	asgn
	unmark
lab L600
	mark	L601
	pnull
	pnull
	var	5
	line	1015
	colm	27
	synt	any
	field	fsig_special
	var	108
	int	44
	var	26
	line	1015
	colm	52
	synt	any
	invoke	2
	line	1015
	colm	42
	synt	any
	asgn
	unmark
lab L601
	mark	L602
	pnull
	pnull
	var	5
	line	1016
	colm	27
	synt	any
	field	fsig_inline_code
	var	123
	pnull
	var	5
	line	1017
	colm	48
	synt	any
	field	fsig_special
	line	1017
	colm	45
	synt	any
	invoke	1
	line	1016
	colm	46
	synt	any
	asgn
	unmark
lab L602
	mark	L603
	var	110
	var	21
	var	76
	pnull
	int	29
	var	31
	var	5
	line	1018
	colm	52
	synt	any
	llist	3
	line	1018
	colm	51
	synt	any
	invoke	1
	line	1018
	colm	33
	synt	any
	invoke	2
	unmark
lab L603
	mark	L604
	pnull
	var	26
	dup
	int	4
	line	1019
	colm	27
	synt	any
	plus
	asgn
	unmark
lab L604
	pnull
	var	27
	pnull
	var	27
	line	1020
	colm	37
	synt	any
	field	cn_tl_field
	line	1020
	colm	30
	synt	any
	asgn
lab L597
	unmark
	goto	L596
lab L598
	line	1012
	colm	21
	synt	endwhile
	unmark
lab L593
	mark	L605
	var	60
	var	57
	var	76
	pnull
	int	10
	var	69
	var	21
	var	69
	var	69
	var	69
	line	1023
	colm	35
	synt	any
	llist	6
	line	1023
	colm	34
	synt	any
	invoke	1
	line	1023
	colm	24
	synt	any
	invoke	2
	unmark
lab L605
	mark	L606
	var	82
	var	21
	line	1026
	colm	23
	synt	any
	invoke	1
	unmark
lab L606
	mark	L607
	pnull
	pnull
	pnull
	var	57
	line	1027
	colm	19
	synt	any
	field	signature
	line	1027
	colm	31
	synt	any
	field	pre_num
	var	116
	line	1027
	colm	41
	synt	any
	asgn
	unmark
lab L607
	mark	L608
	pnull
	var	116
	dup
	int	4
	line	1028
	colm	26
	synt	any
	plus
	asgn
	unmark
lab L608
	mark	L609
	pnull
	pnull
	var	57
	line	1029
	colm	19
	synt	any
	field	sig_done
	int	2
	line	1029
	colm	30
	synt	any
	asgn
	unmark
lab L609
	mark	L610
	var	119
	pnull
	var	57
	line	1031
	colm	30
	synt	any
	field	signature
	line	1031
	colm	27
	synt	any
	invoke	1
	unmark
lab L610
	mark	L611
	pnull
	pnull
	pnull
	var	57
	line	1032
	colm	19
	synt	any
	field	signature
	line	1032
	colm	31
	synt	any
	field	ts_simple_type
	int	4
	line	1032
	colm	48
	synt	any
	asgn
	unmark
lab L611
	mark	L612
	int	3
	line	1033
	colm	17
	synt	any
	pret
lab L612
	synt	any
	pfail
	goto	L12
lab L535
	mark	L613
	ccase
	int	46
	line	1035
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L614
	line	1037
	colm	17
	synt	if
	mark0
	pnull
	pnull
	var	4
	var	62
	pnull
	var	57
	line	1037
	colm	37
	synt	any
	field	ext_denotation
	int	3
	line	1037
	colm	34
	synt	any
	invoke	2
	line	1037
	colm	24
	synt	any
	asgn
	int	3
	line	1037
	colm	59
	synt	any
	numne
	unmark
	mark	L615
	pnull
	pnull
	var	57
	line	1038
	colm	23
	synt	any
	field	sig_done
	int	3
	line	1038
	colm	34
	synt	any
	asgn
	unmark
lab L615
	mark	L616
	var	4
	line	1039
	colm	21
	synt	any
	pret
lab L616
	synt	any
	pfail
	line	1037
	colm	17
	synt	endif
	unmark
lab L614
	mark	L617
	line	1041
	colm	17
	synt	if
	mark0
	pnull
	pnull
	pnull
	var	57
	line	1041
	colm	23
	synt	any
	field	ext_denotation
	line	1041
	colm	40
	synt	any
	field	signature
	int	2
	line	1041
	colm	52
	synt	any
	numeq
	unmark
	mark	L618
	pnull
	pnull
	var	57
	line	1042
	colm	23
	synt	any
	field	signature
	int	2
	line	1042
	colm	35
	synt	any
	asgn
	unmark
lab L618
	mark	L619
	pnull
	pnull
	var	57
	line	1043
	colm	23
	synt	any
	field	sig_done
	int	2
	line	1043
	colm	34
	synt	any
	asgn
	unmark
lab L619
	mark	L620
	int	3
	line	1044
	colm	21
	synt	any
	pret
lab L620
	synt	any
	pfail
	line	1041
	colm	17
	synt	endif
	unmark
lab L617
	mark	L621
	pnull
	var	41
	var	81
	var	102
	pnull
	pnull
	var	57
	line	1047
	colm	40
	synt	any
	field	ext_denotation
	line	1047
	colm	57
	synt	any
	field	signature
	line	1047
	colm	37
	synt	any
	invoke	1
	line	1047
	colm	28
	synt	any
	invoke	1
	line	1047
	colm	21
	synt	any
	asgn
	unmark
lab L621
	mark	L622
	line	1048
	colm	17
	synt	if
	mark0
	pnull
	pnull
	var	41
	line	1048
	colm	25
	synt	any
	field	kind
	int	10
	line	1048
	colm	32
	synt	any
	numne
	unmark
	mark	L623
	var	56
	str	47
	line	1049
	colm	28
	synt	any
	invoke	1
	unmark
lab L623
	mark	L624
	pnull
	pnull
	var	57
	line	1050
	colm	23
	synt	any
	field	signature
	int	2
	line	1050
	colm	35
	synt	any
	asgn
	unmark
lab L624
	mark	L625
	pnull
	pnull
	var	57
	line	1051
	colm	23
	synt	any
	field	sig_done
	int	2
	line	1051
	colm	34
	synt	any
	asgn
	unmark
lab L625
	mark	L626
	int	3
	line	1052
	colm	21
	synt	any
	pret
lab L626
	synt	any
	pfail
	line	1048
	colm	17
	synt	endif
	unmark
lab L622
	mark	L627
	line	1054
	colm	17
	synt	ifelse
	mark	L628
	pnull
	pnull
	var	41
	line	1054
	colm	27
	synt	any
	field	ts_local_type_id
	line	1054
	colm	20
	synt	any
	nonnull
	unmark
	pnull
	var	22
	var	81
	var	102
	pnull
	var	41
	line	1055
	colm	51
	synt	any
	field	ts_local_type_id
	line	1055
	colm	46
	synt	any
	invoke	1
	line	1055
	colm	37
	synt	any
	invoke	1
	line	1055
	colm	30
	synt	any
	asgn
	goto	L629
lab L628
	pnull
	var	22
	var	76
	pnull
	int	6
	var	101
	line	1057
	colm	40
	synt	any
	llist	2
	line	1057
	colm	39
	synt	any
	invoke	1
	line	1057
	colm	30
	synt	any
	asgn
lab L629
	line	1054
	colm	17
	synt	endifelse
	unmark
lab L627
	mark	L630
	pnull
	pnull
	var	41
	line	1059
	colm	21
	synt	any
	field	pre_num
	var	116
	line	1059
	colm	31
	synt	any
	asgn
	unmark
lab L630
	mark	L631
	pnull
	var	116
	dup
	int	4
	line	1060
	colm	26
	synt	any
	plus
	asgn
	unmark
lab L631
	mark	L632
	pnull
	pnull
	var	41
	line	1064
	colm	21
	synt	any
	field	ts_clist
	var	139
	pnull
	var	41
	line	1064
	colm	48
	synt	any
	field	ts_clist
	line	1064
	colm	43
	synt	any
	invoke	1
	line	1064
	colm	32
	synt	any
	asgn
	unmark
lab L632
	mark	L633
	mark	L634
	pnull
	var	46
	var	41
	line	1067
	colm	26
	synt	any
	asgn
	unmark
lab L634
	mark	L635
	pnull
	pnull
	var	22
	line	1069
	colm	30
	synt	any
	field	id_last_definition
	var	41
	line	1069
	colm	51
	synt	any
	asgn
	unmark
lab L635
	mark	L636
	pnull
	pnull
	var	22
	line	1070
	colm	30
	synt	any
	field	id_def_found
	int	4
	line	1070
	colm	45
	synt	any
	asgn
	unmark
lab L636
	mark	L637
	pnull
	var	41
	var	81
	var	120
	var	41
	pnull
	pnull
	var	57
	line	1072
	colm	42
	synt	any
	field	ext_denotation
	line	1072
	colm	59
	synt	any
	field	signature
	var	22
	int	4
	line	1071
	colm	39
	synt	any
	invoke	4
	line	1071
	colm	32
	synt	any
	invoke	1
	line	1071
	colm	25
	synt	any
	asgn
	unmark
lab L637
	mark	L638
	pnull
	pnull
	var	22
	line	1075
	colm	30
	synt	any
	field	id_last_definition
	var	41
	line	1075
	colm	51
	synt	any
	asgn
	unmark
lab L638
	var	73
	var	82
	var	46
	line	1076
	colm	33
	synt	any
	invoke	1
	line	1076
	colm	26
	synt	any
	invoke	1
	unmark
lab L633
	mark	L639
	pnull
	var	44
	var	76
	pnull
	int	6
	var	140
	line	1079
	colm	32
	synt	any
	llist	2
	line	1079
	colm	31
	synt	any
	invoke	1
	line	1079
	colm	23
	synt	any
	numeq
	unmark
lab L639
	mark	L640
	pnull
	var	45
	var	76
	pnull
	int	6
	var	141
	line	1080
	colm	33
	synt	any
	llist	2
	line	1080
	colm	32
	synt	any
	invoke	1
	line	1080
	colm	24
	synt	any
	numeq
	unmark
lab L640
	mark	L641
	line	1083
	colm	17
	synt	if
	mark0
	pnull
	var	96
	pnull
	var	57
	line	1083
	colm	38
	synt	any
	field	ext_denotation
	line	1083
	colm	35
	synt	any
	invoke	1
	line	1083
	colm	20
	synt	any
	nonnull
	unmark
	mark	L642
	pnull
	pnull
	var	57
	line	1084
	colm	23
	synt	any
	field	sig_done
	int	3
	line	1084
	colm	34
	synt	any
	asgn
	unmark
lab L642
	mark	L643
	var	96
	pnull
	var	57
	line	1085
	colm	43
	synt	any
	field	ext_denotation
	line	1085
	colm	40
	synt	any
	invoke	1
	line	1085
	colm	21
	synt	any
	pret
lab L643
	synt	any
	pfail
	line	1083
	colm	17
	synt	endif
	unmark
lab L641
	mark	L644
	pnull
	var	42
	var	76
	pnull
	int	7
	pnull
	var	57
	line	1087
	colm	42
	synt	any
	field	ext_denotation
	line	1087
	colm	36
	synt	any
	llist	2
	line	1087
	colm	35
	synt	any
	invoke	1
	line	1087
	colm	26
	synt	any
	asgn
	unmark
lab L644
	mark	L645
	pnull
	var	43
	var	76
	pnull
	int	7
	var	76
	pnull
	int	6
	pnull
	int	4
	line	1088
	colm	51
	synt	any
	neg
	line	1088
	colm	46
	synt	any
	llist	2
	line	1088
	colm	45
	synt	any
	invoke	1
	line	1088
	colm	35
	synt	any
	llist	2
	line	1088
	colm	34
	synt	any
	invoke	1
	line	1088
	colm	25
	synt	any
	asgn
	unmark
lab L645
	mark	L646
	pnull
	var	19
	var	125
	pnull
	var	76
	pnull
	int	2
	var	69
	var	42
	line	1089
	colm	44
	synt	any
	llist	3
	line	1089
	colm	43
	synt	any
	invoke	1
	line	1089
	colm	36
	synt	any
	llist	1
	line	1089
	colm	35
	synt	any
	invoke	1
	line	1089
	colm	26
	synt	any
	asgn
	unmark
lab L646
	mark	L647
	pnull
	var	39
	var	76
	pnull
	int	9
	var	69
	var	19
	var	43
	line	1090
	colm	34
	synt	any
	llist	4
	line	1090
	colm	33
	synt	any
	invoke	1
	line	1090
	colm	24
	synt	any
	asgn
	unmark
lab L647
	mark	L648
	pnull
	var	19
	var	125
	pnull
	var	76
	pnull
	int	2
	var	69
	var	43
	line	1094
	colm	44
	synt	any
	llist	3
	line	1094
	colm	43
	synt	any
	invoke	1
	line	1094
	colm	36
	synt	any
	llist	1
	line	1094
	colm	35
	synt	any
	invoke	1
	line	1094
	colm	26
	synt	any
	asgn
	unmark
lab L648
	mark	L649
	pnull
	var	40
	var	76
	pnull
	int	9
	var	69
	var	19
	var	42
	line	1095
	colm	35
	synt	any
	llist	4
	line	1095
	colm	34
	synt	any
	invoke	1
	line	1095
	colm	25
	synt	any
	asgn
	unmark
lab L649
	mark	L650
	pnull
	pnull
	var	39
	line	1099
	colm	24
	synt	any
	field	fsig_special
	var	108
	int	24
	int	3
	line	1099
	colm	49
	synt	any
	invoke	2
	line	1099
	colm	39
	synt	any
	asgn
	unmark
lab L650
	mark	L651
	pnull
	pnull
	var	39
	line	1100
	colm	24
	synt	any
	field	fsig_inline_code
	var	123
	pnull
	var	39
	line	1100
	colm	70
	synt	any
	field	fsig_special
	line	1100
	colm	62
	synt	any
	invoke	1
	line	1100
	colm	43
	synt	any
	asgn
	unmark
lab L651
	mark	L652
	pnull
	pnull
	var	40
	line	1101
	colm	25
	synt	any
	field	fsig_special
	var	108
	int	24
	int	3
	line	1101
	colm	50
	synt	any
	invoke	2
	line	1101
	colm	40
	synt	any
	asgn
	unmark
lab L652
	mark	L653
	pnull
	pnull
	var	40
	line	1102
	colm	25
	synt	any
	field	fsig_inline_code
	var	123
	pnull
	var	40
	line	1102
	colm	72
	synt	any
	field	fsig_special
	line	1102
	colm	63
	synt	any
	invoke	1
	line	1102
	colm	44
	synt	any
	asgn
	unmark
lab L653
	mark	L654
	line	1106
	colm	17
	synt	if
	mark0
	pnull
	var	142
	var	41
	var	44
	var	69
	var	39
	var	41
	var	69
	int	4
	line	1106
	colm	30
	synt	any
	invoke	7
	line	1106
	colm	20
	synt	any
	nonnull
	unmark
	mark	L655
	var	94
	str	48
	var	57
	line	1108
	colm	37
	synt	any
	invoke	2
	unmark
lab L655
	pnull
	line	1106
	colm	17
	synt	endif
	unmark
lab L654
	mark	L656
	line	1110
	colm	17
	synt	if
	mark0
	pnull
	var	142
	var	41
	var	45
	var	69
	var	40
	var	41
	var	69
	int	4
	line	1110
	colm	30
	synt	any
	invoke	7
	line	1110
	colm	20
	synt	any
	nonnull
	unmark
	var	94
	str	49
	var	57
	line	1112
	colm	37
	synt	any
	invoke	2
	line	1110
	colm	17
	synt	endif
	unmark
lab L656
	mark	L657
	var	143
	var	41
	var	44
	var	39
	var	69
	line	1115
	colm	24
	synt	any
	invoke	4
	unmark
lab L657
	mark	L658
	pnull
	pnull
	var	57
	line	1116
	colm	19
	synt	any
	field	In_index
	var	144
	line	1116
	colm	30
	synt	any
	asgn
	unmark
lab L658
	mark	L659
	var	143
	var	41
	var	45
	var	40
	var	69
	line	1117
	colm	24
	synt	any
	invoke	4
	unmark
lab L659
	mark	L660
	pnull
	pnull
	var	57
	line	1118
	colm	19
	synt	any
	field	Out_index
	var	144
	line	1118
	colm	31
	synt	any
	asgn
	unmark
lab L660
	mark	L661
	var	60
	var	57
	var	41
	line	1119
	colm	24
	synt	any
	invoke	2
	unmark
lab L661
	mark	L662
	pnull
	pnull
	var	57
	line	1120
	colm	19
	synt	any
	field	sig_done
	int	2
	line	1120
	colm	30
	synt	any
	asgn
	unmark
lab L662
	mark	L663
	int	3
	line	1123
	colm	17
	synt	any
	pret
lab L663
	synt	any
	pfail
	goto	L12
lab L613
	mark	L664
	ccase
	int	50
	line	1126
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L665
	pnull
	var	33
	pnull
	var	57
	line	1128
	colm	33
	synt	any
	field	enum_id_list
	line	1128
	colm	28
	synt	any
	asgn
	unmark
lab L665
	mark	L666
	pnull
	var	21
	var	81
	var	100
	line	1129
	colm	44
	synt	any
	invoke	0
	line	1129
	colm	34
	synt	any
	invoke	1
	line	1129
	colm	27
	synt	any
	asgn
	unmark
lab L666
	mark	L667
	pnull
	var	22
	var	76
	pnull
	int	6
	pnull
	int	4
	line	1130
	colm	41
	synt	any
	neg
	line	1130
	colm	36
	synt	any
	llist	2
	line	1130
	colm	35
	synt	any
	invoke	1
	line	1130
	colm	26
	synt	any
	asgn
	unmark
lab L667
	mark	L668
	pnull
	var	121
	var	76
	pnull
	int	7
	var	22
	line	1131
	colm	32
	synt	any
	llist	2
	line	1131
	colm	31
	synt	any
	invoke	1
	line	1131
	colm	22
	synt	any
	asgn
	unmark
lab L668
	mark	L669
	pnull
	var	35
	var	76
	pnull
	int	2
	var	69
	var	23
	line	1132
	colm	38
	synt	any
	llist	3
	line	1132
	colm	37
	synt	any
	invoke	1
	line	1132
	colm	28
	synt	any
	asgn
	unmark
lab L669
	mark	L670
	pnull
	var	36
	var	125
	pnull
	var	35
	line	1133
	colm	38
	synt	any
	llist	1
	line	1133
	colm	37
	synt	any
	invoke	1
	line	1133
	colm	28
	synt	any
	asgn
	unmark
lab L670
	mark	L671
	pnull
	var	47
	var	100
	line	1134
	colm	43
	synt	any
	invoke	0
	line	1134
	colm	31
	synt	any
	asgn
	unmark
lab L671
	mark	L672
	pnull
	var	48
	var	105
	var	106
	line	1135
	colm	35
	synt	any
	invoke	1
	line	1135
	colm	24
	synt	any
	asgn
	unmark
lab L672
	mark	L673
	pnull
	var	49
	var	105
	var	111
	line	1136
	colm	39
	synt	any
	invoke	1
	line	1136
	colm	28
	synt	any
	asgn
	unmark
lab L673
	mark	L674
	pnull
	var	50
	var	105
	var	113
	line	1137
	colm	38
	synt	any
	invoke	1
	line	1137
	colm	27
	synt	any
	asgn
	unmark
lab L674
	mark	L675
	pnull
	var	25
	var	103
	var	33
	line	1138
	colm	30
	synt	any
	invoke	1
	line	1138
	colm	21
	synt	any
	asgn
	unmark
lab L675
	mark	L676
	pnull
	var	27
	pnull
	pnull
	var	57
	line	1142
	colm	27
	synt	any
	field	rec_component_list
	line	1142
	colm	47
	synt	any
	field	lh_first
	line	1142
	colm	22
	synt	any
	asgn
	unmark
lab L676
	mark	L677
lab L678
	line	1143
	colm	17
	synt	while
	mark0
	pnull
	var	27
	line	1143
	colm	23
	synt	any
	nonnull
	unmark
	mark	L678
	mark	L681
	pnull
	var	31
	pnull
	var	27
	line	1144
	colm	30
	synt	any
	field	cn_hd_field
	line	1144
	colm	23
	synt	any
	asgn
	unmark
lab L681
	mark	L682
	line	1146
	colm	21
	synt	if
	mark0
	pnull
	pnull
	var	4
	var	62
	pnull
	var	31
	line	1146
	colm	41
	synt	any
	field	re_denotation
	int	3
	line	1146
	colm	38
	synt	any
	invoke	2
	line	1146
	colm	28
	synt	any
	asgn
	int	3
	line	1146
	colm	62
	synt	any
	numne
	unmark
	mark	L683
	pnull
	pnull
	var	57
	line	1147
	colm	27
	synt	any
	field	sig_done
	int	3
	line	1147
	colm	38
	synt	any
	asgn
	unmark
lab L683
	mark	L684
	var	4
	line	1148
	colm	25
	synt	any
	pret
lab L684
	synt	any
	pfail
	line	1146
	colm	21
	synt	endif
	unmark
lab L682
	mark	L685
	pnull
	var	51
	pnull
	pnull
	var	31
	line	1150
	colm	37
	synt	any
	field	re_denotation
	line	1150
	colm	53
	synt	any
	field	signature
	line	1150
	colm	32
	synt	any
	asgn
	unmark
lab L685
	mark	L686
	line	1151
	colm	21
	synt	if
	mark0
	pnull
	var	51
	int	2
	line	1151
	colm	36
	synt	any
	numeq
	unmark
	line	1153
	colm	25
	synt	any
	pfail
	line	1151
	colm	21
	synt	endif
	unmark
lab L686
	mark	L687
	line	1155
	colm	21
	synt	if
	mark0
	pnull
	pnull
	var	51
	line	1155
	colm	36
	synt	any
	field	kind
	int	10
	line	1155
	colm	43
	synt	any
	numne
	unmark
	mark	L688
	var	94
	str	51
	var	31
	line	1156
	colm	37
	synt	any
	invoke	2
	unmark
lab L688
	pnull
	line	1155
	colm	21
	synt	endif
	unmark
lab L687
	mark	L689
	line	1159
	colm	21
	synt	if
	mark0
	pnull
	var	96
	pnull
	var	31
	line	1159
	colm	42
	synt	any
	field	re_denotation
	line	1159
	colm	39
	synt	any
	invoke	1
	line	1159
	colm	24
	synt	any
	nonnull
	unmark
	mark	L690
	pnull
	pnull
	var	57
	line	1160
	colm	27
	synt	any
	field	sig_done
	int	3
	line	1160
	colm	38
	synt	any
	asgn
	unmark
lab L690
	mark	L691
	var	96
	pnull
	var	31
	line	1161
	colm	47
	synt	any
	field	re_denotation
	line	1161
	colm	44
	synt	any
	invoke	1
	line	1161
	colm	25
	synt	any
	pret
lab L691
	synt	any
	pfail
	line	1159
	colm	21
	synt	endif
	unmark
lab L689
	mark	L692
	line	1163
	colm	21
	synt	if
	mark0
	pnull
	var	142
	var	51
	var	49
	var	69
	var	112
	var	51
	var	69
	int	4
	line	1163
	colm	34
	synt	any
	invoke	7
	line	1163
	colm	24
	synt	any
	null
	unmark
	var	94
	str	52
	var	31
	line	1166
	colm	51
	synt	any
	invoke	2
	line	1163
	colm	21
	synt	endif
	unmark
lab L692
	mark	L693
	pnull
	pnull
	var	31
	line	1168
	colm	23
	synt	any
	field	re_ValueOf_index
	var	144
	line	1168
	colm	42
	synt	any
	asgn
	unmark
lab L693
	mark	L694
	line	1169
	colm	21
	synt	if
	mark0
	pnull
	var	142
	var	51
	var	48
	var	69
	var	107
	var	51
	var	69
	int	4
	line	1169
	colm	34
	synt	any
	invoke	7
	line	1169
	colm	24
	synt	any
	null
	unmark
	var	94
	str	53
	var	31
	line	1172
	colm	51
	synt	any
	invoke	2
	line	1169
	colm	21
	synt	endif
	unmark
lab L694
	mark	L695
	pnull
	pnull
	var	31
	line	1174
	colm	23
	synt	any
	field	re_New_index
	var	144
	line	1174
	colm	38
	synt	any
	asgn
	unmark
lab L695
	mark	L696
	line	1175
	colm	21
	synt	if
	mark0
	pnull
	var	142
	var	51
	var	50
	var	69
	var	114
	var	51
	var	69
	int	4
	line	1175
	colm	34
	synt	any
	invoke	7
	line	1175
	colm	24
	synt	any
	null
	unmark
	var	145
	str	54
	var	31
	line	1178
	colm	50
	synt	any
	invoke	2
	line	1175
	colm	21
	synt	endif
	unmark
lab L696
	mark	L697
	pnull
	pnull
	var	31
	line	1180
	colm	23
	synt	any
	field	re_assign_index
	var	144
	line	1180
	colm	41
	synt	any
	asgn
	unmark
lab L697
	pnull
	var	27
	pnull
	var	27
	line	1182
	colm	32
	synt	any
	field	cn_tl_field
	line	1182
	colm	25
	synt	any
	asgn
lab L679
	unmark
	goto	L678
lab L680
	line	1143
	colm	17
	synt	endwhile
	unmark
lab L677
	mark	L698
	pnull
	var	5
	var	76
	pnull
	int	29
	var	48
	var	102
	var	107
	line	1187
	colm	38
	synt	any
	invoke	1
	line	1185
	colm	29
	synt	any
	llist	3
	line	1185
	colm	28
	synt	any
	invoke	1
	line	1185
	colm	19
	synt	any
	asgn
	unmark
lab L698
	mark	L699
	pnull
	pnull
	pnull
	var	5
	line	1188
	colm	19
	synt	any
	field	tsc_signature
	line	1188
	colm	35
	synt	any
	field	fsig_special
	var	108
	int	19
	var	25
	line	1188
	colm	60
	synt	any
	invoke	2
	line	1188
	colm	50
	synt	any
	asgn
	unmark
lab L699
	mark	L700
	var	109
	var	5
	line	1189
	colm	28
	synt	any
	invoke	1
	unmark
lab L700
	mark	L701
	var	110
	var	21
	var	5
	line	1190
	colm	25
	synt	any
	invoke	2
	unmark
lab L701
	mark	L702
	pnull
	var	5
	var	76
	pnull
	int	29
	var	49
	var	102
	var	112
	line	1193
	colm	38
	synt	any
	invoke	1
	line	1191
	colm	29
	synt	any
	llist	3
	line	1191
	colm	28
	synt	any
	invoke	1
	line	1191
	colm	19
	synt	any
	asgn
	unmark
lab L702
	mark	L703
	pnull
	pnull
	pnull
	var	5
	line	1194
	colm	19
	synt	any
	field	tsc_signature
	line	1194
	colm	35
	synt	any
	field	fsig_special
	var	108
	int	40
	var	25
	line	1194
	colm	60
	synt	any
	invoke	2
	line	1194
	colm	50
	synt	any
	asgn
	unmark
lab L703
	mark	L704
	var	109
	var	5
	line	1195
	colm	28
	synt	any
	invoke	1
	unmark
lab L704
	mark	L705
	var	110
	var	21
	var	5
	line	1196
	colm	25
	synt	any
	invoke	2
	unmark
lab L705
	mark	L706
	pnull
	var	5
	var	76
	pnull
	int	29
	var	50
	var	102
	var	114
	line	1199
	colm	37
	synt	any
	invoke	1
	line	1197
	colm	28
	synt	any
	llist	3
	line	1197
	colm	27
	synt	any
	invoke	1
	line	1197
	colm	19
	synt	any
	numeq
	unmark
lab L706
	mark	L707
	pnull
	pnull
	pnull
	var	5
	line	1200
	colm	19
	synt	any
	field	tsc_signature
	line	1200
	colm	35
	synt	any
	field	fsig_special
	var	108
	int	15
	var	25
	line	1200
	colm	60
	synt	any
	invoke	2
	line	1200
	colm	50
	synt	any
	asgn
	unmark
lab L707
	mark	L708
	var	109
	var	5
	line	1201
	colm	28
	synt	any
	invoke	1
	unmark
lab L708
	mark	L709
	var	110
	var	21
	var	5
	line	1202
	colm	25
	synt	any
	invoke	2
	unmark
lab L709
	mark	L710
	pnull
	var	27
	pnull
	pnull
	var	57
	line	1204
	colm	27
	synt	any
	field	rec_component_list
	line	1204
	colm	47
	synt	any
	field	lh_first
	line	1204
	colm	22
	synt	any
	asgn
	unmark
lab L710
	mark	L711
lab L712
	line	1205
	colm	17
	synt	while
	mark0
	pnull
	var	27
	line	1205
	colm	23
	synt	any
	nonnull
	unmark
	mark	L712
	mark	L715
	pnull
	var	31
	pnull
	var	27
	line	1206
	colm	30
	synt	any
	field	cn_hd_field
	line	1206
	colm	23
	synt	any
	asgn
	unmark
lab L715
	mark	L716
	pnull
	var	5
	var	76
	pnull
	int	7
	pnull
	var	31
	line	1207
	colm	39
	synt	any
	field	re_denotation
	line	1207
	colm	33
	synt	any
	llist	2
	line	1207
	colm	32
	synt	any
	invoke	1
	line	1207
	colm	23
	synt	any
	asgn
	unmark
lab L716
	mark	L717
	pnull
	var	5
	var	76
	pnull
	int	2
	var	69
	var	5
	line	1208
	colm	32
	synt	any
	llist	3
	line	1208
	colm	31
	synt	any
	invoke	1
	line	1208
	colm	23
	synt	any
	numeq
	unmark
lab L717
	mark	L718
	var	110
	var	47
	var	5
	line	1209
	colm	29
	synt	any
	invoke	2
	unmark
lab L718
	pnull
	var	27
	pnull
	var	27
	line	1210
	colm	33
	synt	any
	field	cn_tl_field
	line	1210
	colm	26
	synt	any
	asgn
lab L713
	unmark
	goto	L712
lab L714
	line	1205
	colm	17
	synt	endwhile
	unmark
lab L711
	mark	L719
	pnull
	var	5
	var	76
	pnull
	int	9
	var	69
	var	47
	var	23
	line	1212
	colm	28
	synt	any
	llist	4
	line	1212
	colm	27
	synt	any
	invoke	1
	line	1212
	colm	19
	synt	any
	numeq
	unmark
lab L719
	mark	L720
	pnull
	pnull
	var	5
	line	1214
	colm	19
	synt	any
	field	fsig_special
	var	108
	int	46
	var	25
	line	1214
	colm	44
	synt	any
	invoke	2
	line	1214
	colm	34
	synt	any
	asgn
	unmark
lab L720
	mark	L721
	pnull
	var	5
	var	76
	pnull
	int	29
	var	105
	var	115
	line	1216
	colm	37
	synt	any
	invoke	1
	var	5
	line	1215
	colm	28
	synt	any
	llist	3
	line	1215
	colm	27
	synt	any
	invoke	1
	line	1215
	colm	19
	synt	any
	numeq
	unmark
lab L721
	mark	L722
	var	109
	var	5
	line	1218
	colm	28
	synt	any
	invoke	1
	unmark
lab L722
	mark	L723
	var	110
	var	21
	var	5
	line	1219
	colm	25
	synt	any
	invoke	2
	unmark
lab L723
	mark	L724
	pnull
	var	26
	int	3
	line	1221
	colm	19
	synt	any
	numeq
	unmark
lab L724
	mark	L725
	pnull
	var	27
	pnull
	pnull
	var	57
	line	1222
	colm	27
	synt	any
	field	rec_component_list
	line	1222
	colm	47
	synt	any
	field	lh_first
	line	1222
	colm	22
	synt	any
	asgn
	unmark
lab L725
	mark	L726
lab L727
	line	1223
	colm	17
	synt	while
	mark0
	pnull
	var	27
	line	1223
	colm	23
	synt	any
	nonnull
	unmark
	mark	L727
	mark	L730
	pnull
	var	52
	var	76
	pnull
	int	9
	var	69
	var	36
	var	76
	pnull
	int	7
	pnull
	var	31
	line	1230
	colm	55
	synt	any
	field	re_denotation
	line	1229
	colm	52
	synt	any
	llist	2
	line	1229
	colm	51
	synt	any
	invoke	1
	line	1226
	colm	44
	synt	any
	llist	4
	line	1226
	colm	43
	synt	any
	invoke	1
	line	1226
	colm	34
	synt	any
	asgn
	unmark
lab L730
	mark	L731
	pnull
	var	5
	var	125
	pnull
	var	76
	pnull
	int	2
	var	69
	var	76
	pnull
	int	8
	var	22
	line	1233
	colm	49
	synt	any
	llist	2
	line	1233
	colm	48
	synt	any
	invoke	1
	line	1231
	colm	41
	synt	any
	llist	3
	line	1231
	colm	40
	synt	any
	invoke	1
	line	1231
	colm	33
	synt	any
	llist	1
	line	1231
	colm	32
	synt	any
	invoke	1
	line	1231
	colm	23
	synt	any
	asgn
	unmark
lab L731
	mark	L732
	pnull
	var	53
	var	76
	pnull
	int	9
	var	69
	var	5
	var	76
	pnull
	int	8
	pnull
	var	31
	line	1238
	colm	56
	synt	any
	field	re_denotation
	line	1237
	colm	53
	synt	any
	llist	2
	line	1237
	colm	52
	synt	any
	invoke	1
	line	1234
	colm	45
	synt	any
	llist	4
	line	1234
	colm	44
	synt	any
	invoke	1
	line	1234
	colm	34
	synt	any
	asgn
	unmark
lab L732
	mark	L733
	pnull
	pnull
	var	52
	line	1239
	colm	34
	synt	any
	field	fsig_special
	var	108
	int	18
	var	26
	line	1239
	colm	59
	synt	any
	invoke	2
	line	1239
	colm	49
	synt	any
	asgn
	unmark
lab L733
	mark	L734
	pnull
	pnull
	var	53
	line	1240
	colm	34
	synt	any
	field	fsig_special
	var	108
	int	50
	var	26
	line	1240
	colm	59
	synt	any
	invoke	2
	line	1240
	colm	49
	synt	any
	asgn
	unmark
lab L734
	mark	L735
	pnull
	var	5
	var	76
	pnull
	int	29
	pnull
	var	31
	line	1242
	colm	36
	synt	any
	field	re_id
	var	52
	line	1241
	colm	33
	synt	any
	llist	3
	line	1241
	colm	32
	synt	any
	invoke	1
	line	1241
	colm	23
	synt	any
	asgn
	unmark
lab L735
	mark	L736
	var	109
	var	5
	line	1244
	colm	32
	synt	any
	invoke	1
	unmark
lab L736
	mark	L737
	var	110
	var	21
	var	5
	line	1245
	colm	29
	synt	any
	invoke	2
	unmark
lab L737
	mark	L738
	pnull
	var	5
	var	76
	pnull
	int	29
	pnull
	var	31
	line	1247
	colm	35
	synt	any
	field	re_id
	var	53
	line	1246
	colm	32
	synt	any
	llist	3
	line	1246
	colm	31
	synt	any
	invoke	1
	line	1246
	colm	23
	synt	any
	numeq
	unmark
lab L738
	mark	L739
	var	109
	var	5
	line	1249
	colm	32
	synt	any
	invoke	1
	unmark
lab L739
	mark	L740
	var	110
	var	21
	var	5
	line	1250
	colm	29
	synt	any
	invoke	2
	unmark
lab L740
	mark	L741
	pnull
	var	26
	dup
	int	4
	line	1251
	colm	23
	synt	any
	plus
	asgn
	unmark
lab L741
	pnull
	var	27
	pnull
	var	27
	line	1253
	colm	33
	synt	any
	field	cn_tl_field
	line	1253
	colm	26
	synt	any
	asgn
lab L728
	unmark
	goto	L727
lab L729
	line	1223
	colm	17
	synt	endwhile
	unmark
lab L726
	mark	L742
	var	60
	var	57
	var	76
	pnull
	int	10
	var	69
	var	21
	var	69
	var	69
	var	69
	line	1255
	colm	35
	synt	any
	llist	6
	line	1255
	colm	34
	synt	any
	invoke	1
	line	1255
	colm	24
	synt	any
	invoke	2
	unmark
lab L742
	mark	L743
	var	82
	var	21
	line	1258
	colm	23
	synt	any
	invoke	1
	unmark
lab L743
	mark	L744
	pnull
	pnull
	pnull
	var	57
	line	1259
	colm	19
	synt	any
	field	signature
	line	1259
	colm	31
	synt	any
	field	pre_num
	var	116
	line	1259
	colm	41
	synt	any
	numeq
	unmark
lab L744
	mark	L745
	pnull
	var	116
	dup
	int	4
	line	1260
	colm	26
	synt	any
	plus
	asgn
	unmark
lab L745
	mark	L746
	pnull
	pnull
	var	57
	line	1262
	colm	19
	synt	any
	field	sig_done
	int	2
	line	1262
	colm	30
	synt	any
	asgn
	unmark
lab L746
	mark	L747
	var	119
	pnull
	var	57
	line	1264
	colm	30
	synt	any
	field	signature
	line	1264
	colm	27
	synt	any
	invoke	1
	unmark
lab L747
	mark	L748
	pnull
	pnull
	pnull
	var	57
	line	1266
	colm	19
	synt	any
	field	signature
	line	1266
	colm	31
	synt	any
	field	ts_simple_type
	int	4
	line	1266
	colm	48
	synt	any
	asgn
	unmark
lab L748
	mark	L749
	pnull
	var	27
	pnull
	pnull
	var	57
	line	1267
	colm	27
	synt	any
	field	rec_component_list
	line	1267
	colm	47
	synt	any
	field	lh_first
	line	1267
	colm	22
	synt	any
	asgn
	unmark
lab L749
	mark	L750
lab L751
	line	1268
	colm	17
	synt	while
	mark0
	pnull
	var	27
	line	1268
	colm	23
	synt	any
	nonnull
	unmark
	mark	L751
	mark	L754
	pnull
	var	31
	pnull
	var	27
	line	1269
	colm	30
	synt	any
	field	cn_hd_field
	line	1269
	colm	23
	synt	any
	asgn
	unmark
lab L754
	mark	L755
	line	1270
	colm	21
	synt	if
	mark0
	pnull
	pnull
	pnull
	pnull
	var	31
	line	1270
	colm	27
	synt	any
	field	re_denotation
	line	1270
	colm	43
	synt	any
	field	signature
	line	1270
	colm	54
	synt	any
	field	ts_simple_type
	int	3
	line	1270
	colm	71
	synt	any
	numeq
	unmark
	pnull
	pnull
	pnull
	var	57
	line	1271
	colm	27
	synt	any
	field	signature
	line	1271
	colm	39
	synt	any
	field	ts_simple_type
	int	3
	line	1271
	colm	56
	synt	any
	asgn
	line	1270
	colm	21
	synt	endif
	unmark
lab L755
	pnull
	var	27
	pnull
	var	27
	line	1273
	colm	33
	synt	any
	field	cn_tl_field
	line	1273
	colm	26
	synt	any
	asgn
lab L752
	unmark
	goto	L751
lab L753
	line	1268
	colm	17
	synt	endwhile
	unmark
lab L750
	mark	L756
	mark	L757
	int	3
	line	1275
	colm	17
	synt	any
	pret
lab L757
	synt	any
	pfail
	unmark
lab L756
	pnull
	goto	L12
lab L664
	mark	L758
	ccase
	int	55
	line	1278
	colm	11
	synt	any
	eqv
	unmark
	pop
	var	56
	str	56
	line	1279
	colm	20
	synt	any
	invoke	1
	goto	L12
lab L758
	pop
	var	56
	pnull
	str	57
	var	2
	line	1282
	colm	60
	synt	any
	cat
	line	1282
	colm	24
	synt	any
	invoke	1
lab L12
	line	204
	colm	5
	synt	endcase
	unmark
lab L11
	pnull
	line	1285
	colm	1
	synt	any
	pfail
	end
proc tl_findsig
	local	0,001000,p_orig
	local	1,001000,dont_coerce
	local	2,000020,q
	local	3,000000,rpt_err
	local	4,000000,p
	local	5,000000,fix_p
	local	6,000000,chgsig
	local	7,000000,nil
	local	8,000000,findsig
	local	9,000000,rpt_err_node
	local	10,000000,getname
	local	11,000000,dontsubst
	local	12,000000,cn_del_hd
	con	0,010000,22,164,154,137,146,151,156,144,163,151,147,072,040,160,137,157,162,151,147,040,156,151,154
	con	1,010000,17,164,154,137,146,151,156,144,163,151,147,072,040,160,040,156,151,154
	con	2,002000,2,28
	con	3,002000,1,0
	con	4,002000,2,29
	con	5,002000,2,35
	con	6,002000,2,32
	con	7,002000,2,31
	con	8,010000,40,143,151,162,143,165,154,141,162,040,163,151,147,156,141,164,165,162,145,040,144,145,160,145,156,144,145,156,143,171,040,151,156,166,157,154,166,151,156,147,040
	con	9,010000,29,103,151,162,143,165,154,141,162,040,163,151,147,156,141,164,165,162,145,040,144,145,160,145,156,144,145,156,143,171
	con	10,002000,1,2
	declend
	line	1360
	colm	12
	synt	any
	mark	L1
	line	1362
	colm	5
	synt	ifelse
	mark	L2
	pnull
	var	0
	line	1362
	colm	8
	synt	any
	null
	unmark
	var	3
	str	0
	line	1363
	colm	16
	synt	any
	invoke	1
	goto	L3
lab L2
	pnull
	var	4
	var	5
	var	0
	line	1365
	colm	19
	synt	any
	invoke	1
	line	1365
	colm	11
	synt	any
	asgn
lab L3
	line	1362
	colm	5
	synt	endifelse
	unmark
lab L1
	mark	L4
	line	1366
	colm	5
	synt	if
	mark0
	pnull
	var	4
	line	1366
	colm	8
	synt	any
	null
	unmark
	var	3
	str	1
	line	1367
	colm	16
	synt	any
	invoke	1
	line	1366
	colm	5
	synt	endif
	unmark
lab L4
	mark	L5
	line	1370
	colm	5
	synt	case
	mark0
	pnull
	var	4
	line	1370
	colm	13
	synt	any
	field	kind
	eret
	mark	L7
	ccase
	int	2
	line	1371
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L8
	var	6
	var	4
	var	7
	line	1373
	colm	23
	synt	any
	invoke	2
	unmark
lab L8
	pnull
	pnull
	var	4
	line	1374
	colm	19
	synt	any
	field	sig_done
	int	3
	line	1374
	colm	30
	synt	any
	asgn
	goto	L6
lab L7
	mark	L9
	ccase
	int	4
	line	1376
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L10
	var	6
	var	4
	var	7
	line	1378
	colm	23
	synt	any
	invoke	2
	unmark
lab L10
	pnull
	pnull
	var	4
	line	1379
	colm	19
	synt	any
	field	sig_done
	int	3
	line	1379
	colm	30
	synt	any
	asgn
	goto	L6
lab L9
	mark	L11
	ccase
	int	5
	line	1382
	colm	11
	synt	any
	eqv
	unmark
	pop
	pnull
	pnull
	var	4
	line	1384
	colm	23
	synt	any
	field	sig_done
	int	3
	line	1384
	colm	34
	synt	any
	asgn
	goto	L6
lab L11
	efail
lab L6
	line	1370
	colm	5
	synt	endcase
	unmark
lab L5
	mark	L12
	pnull
	var	2
	var	8
	var	4
	var	1
	line	1387
	colm	17
	synt	any
	invoke	2
	line	1387
	colm	7
	synt	any
	asgn
	unmark
lab L12
	mark	L13
	line	1388
	colm	5
	synt	if
	mark0
	pnull
	var	2
	int	3
	line	1388
	colm	11
	synt	any
	numne
	unmark
	mark	L14
	line	1390
	colm	13
	synt	ifelse
	mark	L15
	mark	L17
	pnull
	pnull
	var	2
	line	1390
	colm	19
	synt	any
	field	kind
	int	6
	line	1390
	colm	26
	synt	any
	numeq
	line	1390
	colm	31
	synt	any
	esusp
	goto	L18
lab L17
	pnull
	pnull
	var	2
	line	1390
	colm	35
	synt	any
	field	kind
	int	7
	line	1390
	colm	42
	synt	any
	numeq
lab L18
	unmark
	var	9
	pnull
	str	8
	var	10
	pnull
	var	2
	line	1393
	colm	91
	synt	any
	field	id_str_table_index
	line	1393
	colm	88
	synt	any
	invoke	1
	line	1393
	colm	77
	synt	any
	cat
	var	2
	line	1393
	colm	33
	synt	any
	invoke	2
	goto	L16
lab L15
	var	9
	str	9
	var	2
	line	1397
	colm	37
	synt	any
	invoke	2
lab L16
	line	1390
	colm	13
	synt	endifelse
	unmark
lab L14
	mark	L19
	line	1399
	colm	13
	synt	ifelse
	mark	L20
	pnull
	pnull
	var	4
	line	1399
	colm	19
	synt	any
	field	kind
	int	5
	line	1399
	colm	26
	synt	any
	numeq
	unmark
	pnull
	pnull
	pnull
	var	4
	line	1402
	colm	23
	synt	any
	field	signature
	line	1402
	colm	35
	synt	any
	field	fsig_result_sig
	int	10
	line	1402
	colm	53
	synt	any
	asgn
	goto	L21
lab L20
	pnull
	pnull
	var	4
	line	1406
	colm	27
	synt	any
	field	signature
	int	10
	line	1406
	colm	39
	synt	any
	asgn
lab L21
	line	1399
	colm	13
	synt	endifelse
	unmark
lab L19
	pnull
	pnull
	var	4
	line	1408
	colm	15
	synt	any
	field	sig_done
	int	10
	line	1408
	colm	26
	synt	any
	asgn
	line	1388
	colm	5
	synt	endif
	unmark
lab L13
	mark	L22
lab L23
	line	1412
	colm	5
	synt	while
	mark0
	pnull
	var	11
	line	1412
	colm	13
	synt	any
	nonnull
	unmark
	mark	L23
	pnull
	var	11
	var	12
	var	11
	line	1414
	colm	35
	synt	any
	invoke	1
	line	1414
	colm	23
	synt	any
	asgn
lab L24
	unmark
	goto	L23
lab L25
	line	1412
	colm	5
	synt	endwhile
	unmark
lab L22
	pnull
	line	1417
	colm	1
	synt	any
	pfail
	end
