version	U12.1.00
uid	sigids.tmp.u1-1465334334-0
impl	error
global	254
	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,nodes_created_trace_file,0
	141,000001,sym2_table,0
	142,000001,line_cnt,0
	143,000001,char_cnt,0
	144,000001,token_cnt,0
	145,000001,reserved_id_cnt,0
	146,000001,reserved_op_cnt,0
	147,000001,numeral_cnt,0
	148,000001,nodes_total_cnt,0
	149,000001,nodes_made_cnt,0
	150,000001,lists_total_cnt,0
	151,000001,lists_made_cnt,0
	152,000001,yyn_switches_cnt,0
	153,000001,yyn_compute_cnt,0
	154,000001,newstate_cnt,0
	155,000001,setstate_cnt,0
	156,000001,backup_cnt,0
	157,000001,default_cnt,0
	158,000001,reduce_cnt,0
	159,000001,errlab_cnt,0
	160,000001,errlab1_cnt,0
	161,000001,defined_id_cnt,0
	162,000001,defined_op_cnt,0
	163,000001,seperator_cnt,0
	164,000001,RIC_table,0
	165,000001,RIC_op_code_cnt,0
	166,000001,RIC_table_entry_cnt,0
	167,000001,comments_cnt,0
	168,000001,sing_quoted_cnt,0
	169,000001,dbl_quoted_cnt,0
	170,000001,infile,0
	171,000001,entry_name,0
	172,000001,yyinfnm,0
	173,000001,addposition,0
	174,000001,inline_cnvt,0
	175,000001,Ginline_cnvt,0
	176,000001,Vinline_cnvt,0
	177,000001,paramstop,0
	178,000001,denseqstop,0
	179,000001,condstop,0
	180,000001,declstop,0
	181,000001,stxtree,0
	182,000001,yystate,0
	183,000001,fn_count,0
	184,000001,scanstk,0
	185,000001,stktop,0
	186,000001,scansavc,0
	187,000001,yydescr,0
	188,000001,has_externs,0
	189,000001,argcnt_from_kind,0
	190,000001,parser_actions_cnt,0
	191,000001,curr_void_decl,0
	192,000001,curr_sig_transp,0
	193,000001,curr_tsig,0
	194,000001,err_node,0
	195,000001,in_sig,0
	196,000001,in_loop,0
	197,000001,linebuf,0
	198,000001,restab,0
	199,000001,cctab,0
	200,000001,tokenlgth,0
	201,000001,yynerrs,0
	202,000001,decl_num,0
	203,000001,decl_nums,0
	204,000001,Outer_arg,0
	205,000001,file_sigs,0
	206,000001,decl_num_in,0
	207,000001,sig_table,0
	208,000001,unique_node_id,0
	209,000001,objfilelist,0
	210,000001,Idtable,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,000001,dump__tree_depth,0
	251,000001,trash_id,0
	252,000005,sigids,1
	253,000005,check_sig,1

proc sigids
	local	0,001000,p
	local	1,000020,q
	local	2,000020,v
	local	3,000020,old_insig
	local	4,000020,old_in_loop
	local	5,000020,old_void_decl
	local	6,000020,old_sig_transp
	local	7,000020,def
	local	8,000020,imid
	local	9,000020,id_def
	local	10,000020,usl
	local	11,000020,sig
	local	12,000020,fixed_it
	local	13,000020,goto_dflt
	local	14,000020,temp
	local	15,000020,s
	local	16,000020,goto_str_fixed_it
	local	17,000040,in_loop
	local	18,000000,insig
	local	19,000000,curr_void_decl
	local	20,000000,curr_sig_transp
	local	21,000000,nil
	local	22,000000,sigids
	local	23,000000,errmsg0
	local	24,000000,yynerrs
	local	25,000000,rpt_err
	local	26,000000,getname
	local	27,000000,is_descendant
	local	28,000000,hascomp
	local	29,000000,check_sig
	local	30,000000,expand_str
	local	31,000000,hasstring
	local	32,000000,findvl
	local	33,000000,fn_count
	local	34,000000,fn_name
	local	35,000000,entry_name
	local	36,000000,getrl
	local	37,000000,comp_st
	local	38,000000,var_Void
	local	39,000000,ior
	local	40,000000,id_name
	local	41,000000,is_list
	local	42,000000,e
	con	0,002000,1,0
	con	1,002000,1,1
	con	2,002000,2,31
	con	3,002000,1,2
	con	4,010000,46,127,141,162,156,151,156,147,040,055,040,163,151,147,156,141,164,165,162,145,163,040,151,156,040,163,151,147,156,141,164,165,162,145,163,040,141,162,145,040,151,147,156,157,162,145,144
	con	5,010000,39,106,157,162,167,141,162,144,040,162,145,146,145,162,145,156,143,145,040,164,157,040,151,156,040,075,075,075,040,144,145,143,154,141,162,141,164,151,157,156
	con	6,002000,2,32
	con	7,002000,1,7
	con	8,010000,10,165,156,144,145,143,154,141,162,145,144
	con	9,002000,2,33
	con	10,010000,40,116,157,040,141,160,160,162,157,160,162,151,141,164,145,040,164,171,160,145,040,146,157,162,040,151,156,163,151,144,145,040,163,151,147,156,141,164,165,162,145
	con	11,002000,2,34
	con	12,002000,2,17
	con	13,002000,2,35
	con	14,002000,2,13
	con	15,002000,2,11
	con	16,002000,2,16
	con	17,010000,1,047
	con	18,002000,1,8
	con	19,002000,2,23
	con	20,002000,2,38
	con	21,002000,2,29
	con	22,002000,2,20
	con	23,002000,1,6
	con	24,002000,1,5
	con	25,002000,1,4
	declend
	filen	pass3/sigids.tmp.icn
	line	110
	colm	12
	synt	any
lab L1
	init	L3
	mark	L2
	pnull
	var	17
	int	0
	line	114
	colm	21
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L4
	pnull
	var	3
	var	18
	line	120
	colm	15
	synt	any
	asgn
	unmark
lab L4
	mark	L5
	pnull
	var	4
	var	17
	line	121
	colm	17
	synt	any
	asgn
	unmark
lab L5
	mark	L6
	pnull
	var	5
	var	19
	line	122
	colm	19
	synt	any
	asgn
	unmark
lab L6
	mark	L7
	pnull
	var	6
	var	20
	line	123
	colm	20
	synt	any
	asgn
	unmark
lab L7
	mark	L8
	line	125
	colm	5
	synt	if
	mark0
	pnull
	var	0
	line	125
	colm	9
	synt	any
	null
	unmark
	mark	L9
	int	1
	line	125
	colm	18
	synt	any
	pret
lab L9
	synt	any
	pfail
	line	125
	colm	5
	synt	endif
	unmark
lab L8
	mark	L10
	pnull
	var	13
	int	0
	line	126
	colm	15
	synt	any
	asgn
	unmark
lab L10
	mark	L11
	line	127
	colm	5
	synt	case
	mark0
	pnull
	var	0
	line	127
	colm	14
	synt	any
	field	kind
	eret
	mark	L13
	ccase
	int	2
	line	128
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L14
	line	51
	colm	5
	synt	ifelse
	mark	L15
	pnull
	pnull
	var	0
	line	51
	colm	14
	synt	any
	field	sel_type
	line	51
	colm	9
	synt	any
	nonnull
	unmark
	mark	L17
	pnull
	pnull
	var	0
	line	52
	colm	7
	synt	any
	field	id_last_definition
	var	21
	line	52
	colm	28
	synt	any
	asgn
	unmark
lab L17
	mark	L18
	pnull
	pnull
	var	0
	line	53
	colm	7
	synt	any
	field	id_def_found
	int	1
	line	53
	colm	22
	synt	any
	asgn
	unmark
lab L18
	var	22
	pnull
	var	0
	line	54
	colm	15
	synt	any
	field	sel_type
	line	54
	colm	11
	synt	any
	invoke	1
	goto	L16
lab L15
	line	55
	colm	8
	synt	if
	mark0
	var	18
	unmark
	mark	L19
	line	56
	colm	5
	synt	if
	mark0
	pnull
	pnull
	var	0
	line	56
	colm	14
	synt	any
	field	signature
	line	56
	colm	9
	synt	any
	nonnull
	pop
	pnull
	pnull
	var	0
	line	56
	colm	32
	synt	any
	field	sig_done
	int	3
	line	56
	colm	43
	synt	any
	numne
	unmark
	mark	L20
	var	23
	var	0
	str	4
	line	58
	colm	16
	synt	any
	invoke	2
	unmark
lab L20
	pnull
	var	24
	dup
	int	1
	line	60
	colm	17
	synt	any
	minus
	asgn
	line	56
	colm	5
	synt	endif
	unmark
lab L19
	mark	L21
	line	62
	colm	5
	synt	if
	mark0
	pnull
	var	20
	line	62
	colm	10
	synt	any
	nonnull
	pop
	pnull
	pnull
	var	0
	line	63
	colm	16
	synt	any
	field	id_last_definition
	line	63
	colm	11
	synt	any
	nonnull
	unmark
	mark	L22
	pnull
	var	7
	pnull
	var	0
	line	64
	colm	22
	synt	any
	field	id_last_definition
	line	64
	colm	17
	synt	any
	asgn
	unmark
lab L22
	mark	L23
	pnull
	var	8
	pnull
	var	20
	line	65
	colm	37
	synt	any
	field	decl_innermost_id
	line	65
	colm	18
	synt	any
	asgn
	unmark
lab L23
	line	68
	colm	13
	synt	if
	mark0
	pnull
	pnull
	var	7
	line	68
	colm	21
	synt	any
	field	kind
	int	1
	line	68
	colm	28
	synt	any
	numeq
	unmark
	mark	L24
	line	70
	colm	17
	synt	if
	mark0
	pnull
	pnull
	var	7
	line	70
	colm	25
	synt	any
	field	post_num
	pnull
	var	0
	line	70
	colm	41
	synt	any
	field	post_num
	line	70
	colm	36
	synt	any
	numge
	unmark
	var	25
	pnull
	str	5
	var	26
	pnull
	var	0
	line	71
	colm	84
	synt	any
	field	id_str_table_index
	line	71
	colm	81
	synt	any
	invoke	1
	line	71
	colm	71
	synt	any
	cat
	line	71
	colm	28
	synt	any
	invoke	1
	line	70
	colm	17
	synt	endif
	unmark
lab L24
	line	73
	colm	17
	synt	ifelse
	mark	L25
	pnull
	var	7
	line	73
	colm	25
	synt	any
	field	decl_sig_transp
	unmark
	pnull
	var	9
	pnull
	var	7
	line	74
	colm	35
	synt	any
	field	decl_innermost_id
	line	74
	colm	28
	synt	any
	asgn
	goto	L26
lab L25
	pnull
	var	9
	var	7
	line	76
	colm	28
	synt	any
	asgn
lab L26
	line	73
	colm	17
	synt	endifelse
	line	68
	colm	13
	synt	endif
	line	62
	colm	5
	synt	endif
	unmark
lab L21
	line	80
	colm	5
	synt	if
	mark0
	pnull
	var	9
	line	80
	colm	9
	synt	any
	nonnull
	pop
	mark	L27
	pnull
	var	8
	line	81
	colm	10
	synt	any
	null
	line	81
	colm	16
	synt	any
	esusp
	goto	L28
lab L27
	var	27
	var	9
	pnull
	var	8
	line	82
	colm	37
	synt	any
	field	decl_scope
	line	82
	colm	23
	synt	any
	invoke	2
lab L28
	unmark
	pnull
	pnull
	var	20
	line	83
	colm	30
	synt	any
	field	decl_innermost_id
	var	9
	line	83
	colm	50
	synt	any
	asgn
	line	80
	colm	5
	synt	endif
	line	55
	colm	8
	synt	endif
lab L16
	line	51
	colm	5
	synt	endifelse
	unmark
lab L14
	mark	L29
	line	88
	colm	5
	synt	if
	mark0
	pnull
	pnull
	var	0
	line	88
	colm	14
	synt	any
	field	id_last_definition
	line	88
	colm	9
	synt	any
	null
	pop
	pnull
	pnull
	var	0
	line	89
	colm	11
	synt	any
	field	id_str_table_index
	pnull
	int	1
	line	89
	colm	35
	synt	any
	neg
	line	89
	colm	32
	synt	any
	numne
	unmark
	mark	L30
	pnull
	var	10
	pnull
	var	0
	line	91
	colm	14
	synt	any
	field	id_use_list
	line	91
	colm	9
	synt	any
	asgn
	unmark
lab L30
	mark	L31
lab L32
	line	92
	colm	5
	synt	while
	mark0
	pnull
	var	10
	line	92
	colm	12
	synt	any
	nonnull
	unmark
	mark	L32
	mark	L35
	pnull
	var	12
	int	0
	line	93
	colm	18
	synt	any
	asgn
	unmark
lab L35
	mark	L36
	pnull
	var	14
	pnull
	pnull
	var	10
	line	94
	colm	20
	synt	any
	field	usl_type_list
	line	94
	colm	34
	synt	any
	field	lh_first
	line	94
	colm	14
	synt	any
	asgn
	unmark
lab L36
	mark	L37
lab L38
	line	95
	colm	9
	synt	while
	mark0
	pnull
	var	14
	line	95
	colm	15
	synt	any
	nonnull
	pop
	pnull
	var	12
	int	0
	line	95
	colm	33
	synt	any
	numeq
	unmark
	mark	L38
	mark	L41
	pnull
	var	15
	pnull
	var	14
	line	96
	colm	22
	synt	any
	field	cn_hd_field
	line	96
	colm	15
	synt	any
	asgn
	unmark
lab L41
	mark	L42
	line	97
	colm	13
	synt	ifelse
	mark	L43
	mark	L45
	pnull
	pnull
	var	15
	line	97
	colm	20
	synt	any
	field	kind
	int	6
	line	97
	colm	27
	synt	any
	numne
	pop
	pnull
	var	15
	line	97
	colm	37
	synt	any
	field	kind
	pnull
	int	2
	line	97
	colm	45
	synt	any
	tabmat
	invoke	-1
	line	97
	colm	51
	synt	any
	esusp
	goto	L46
lab L45
	mark	L47
	pnull
	pnull
	var	15
	line	98
	colm	22
	synt	any
	field	signature
	line	98
	colm	17
	synt	any
	nonnull
	line	98
	colm	35
	synt	any
	esusp
	goto	L48
lab L47
	pnull
	pnull
	var	15
	line	99
	colm	23
	synt	any
	field	sel_type
	line	99
	colm	17
	synt	any
	nonnull
lab L48
lab L46
	unmark
	mark	L49
	pnull
	pnull
	var	0
	line	100
	colm	23
	synt	any
	field	sel_type
	var	15
	line	100
	colm	34
	synt	any
	asgn
	unmark
lab L49
	mark	L50
	pnull
	var	12
	int	1
	line	101
	colm	30
	synt	any
	asgn
	unmark
lab L50
	unmark
	unmark
	pnull
	goto	L40
	goto	L44
lab L43
	mark	L51
	pnull
	var	7
	pnull
	var	15
	line	104
	colm	30
	synt	any
	field	id_last_definition
	line	104
	colm	25
	synt	any
	asgn
	unmark
lab L51
	mark	L52
	line	105
	colm	21
	synt	if
	mark0
	mark	L53
	pnull
	var	7
	line	105
	colm	25
	synt	any
	null
	line	105
	colm	31
	synt	any
	esusp
	goto	L54
lab L53
	mark	L55
	pnull
	pnull
	var	7
	line	106
	colm	30
	synt	any
	field	kind
	int	1
	line	106
	colm	37
	synt	any
	numne
	pop
	pnull
	pnull
	var	7
	line	107
	colm	30
	synt	any
	field	kind
	int	3
	line	107
	colm	37
	synt	any
	numne
	line	107
	colm	43
	synt	any
	esusp
	goto	L56
lab L55
	pnull
	pnull
	var	7
	line	108
	colm	30
	synt	any
	field	kind
	int	1
	line	108
	colm	37
	synt	any
	numeq
	pop
	pnull
	pnull
	var	7
	line	109
	colm	33
	synt	any
	field	decl_signature
	line	109
	colm	26
	synt	any
	null
lab L56
lab L54
	unmark
	mark	L57
	pnull
	pnull
	var	0
	line	110
	colm	32
	synt	any
	field	sel_type
	var	15
	line	110
	colm	43
	synt	any
	asgn
	unmark
lab L57
	mark	L58
	pnull
	var	12
	int	1
	line	111
	colm	39
	synt	any
	asgn
	unmark
lab L58
	unmark
	unmark
	unmark
	pnull
	goto	L40
	line	105
	colm	21
	synt	endif
	unmark
lab L52
	mark	L59
	line	114
	colm	21
	synt	ifelse
	mark	L60
	pnull
	pnull
	var	7
	line	114
	colm	27
	synt	any
	field	kind
	int	3
	line	114
	colm	33
	synt	any
	numeq
	unmark
	pnull
	var	11
	pnull
	var	7
	line	115
	colm	35
	synt	any
	field	par_signature
	line	115
	colm	29
	synt	any
	asgn
	goto	L61
lab L60
	pnull
	var	11
	pnull
	var	7
	line	117
	colm	35
	synt	any
	field	decl_signature
	line	117
	colm	29
	synt	any
	asgn
lab L61
	line	114
	colm	21
	synt	endifelse
	unmark
lab L59
	line	118
	colm	21
	synt	if
	mark0
	pnull
	pnull
	var	11
	line	118
	colm	29
	synt	any
	field	kind
	int	7
	line	118
	colm	36
	synt	any
	numeq
	pop
	var	28
	var	11
	pnull
	var	0
	line	119
	colm	40
	synt	any
	field	id_str_table_index
	line	119
	colm	32
	synt	any
	invoke	2
	unmark
	mark	L62
	pnull
	pnull
	var	0
	line	120
	colm	31
	synt	any
	field	sel_type
	var	15
	line	120
	colm	42
	synt	any
	asgn
	unmark
lab L62
	mark	L63
	pnull
	var	12
	int	1
	line	121
	colm	38
	synt	any
	asgn
	unmark
lab L63
	unmark
	unmark
	pnull
	goto	L40
	line	118
	colm	21
	synt	endif
lab L44
	line	97
	colm	13
	synt	endifelse
	unmark
lab L42
	pnull
	var	14
	pnull
	var	14
	line	125
	colm	25
	synt	any
	field	cn_tl_field
	line	125
	colm	18
	synt	any
	asgn
lab L39
	unmark
	goto	L38
lab L40
	line	95
	colm	9
	synt	endwhile
	unmark
lab L37
	line	127
	colm	9
	synt	if
	mark0
	pnull
	var	12
	int	0
	line	127
	colm	21
	synt	any
	numeq
	unmark
	pnull
	var	10
	pnull
	var	10
	line	128
	colm	24
	synt	any
	field	usl_previous_list
	line	128
	colm	17
	synt	any
	asgn
	line	127
	colm	9
	synt	endif
lab L33
	unmark
	goto	L32
lab L34
	line	92
	colm	5
	synt	endwhile
	unmark
lab L31
	mark	L64
	line	130
	colm	5
	synt	if
	mark0
	pnull
	var	12
	int	0
	line	130
	colm	17
	synt	any
	numeq
	unmark
	mark	L65
	var	25
	pnull
	str	8
	var	26
	pnull
	var	0
	line	131
	colm	43
	synt	any
	field	id_str_table_index
	line	131
	colm	40
	synt	any
	invoke	1
	line	131
	colm	30
	synt	any
	cat
	line	131
	colm	16
	synt	any
	invoke	1
	unmark
lab L65
	mark	L66
	pnull
	pnull
	var	0
	line	133
	colm	11
	synt	any
	field	signature
	int	3
	line	133
	colm	23
	synt	any
	asgn
	unmark
lab L66
	pnull
	pnull
	var	0
	line	134
	colm	11
	synt	any
	field	sig_done
	int	3
	line	134
	colm	22
	synt	any
	asgn
	line	130
	colm	5
	synt	endif
	unmark
lab L64
	mark	L67
	pnull
	pnull
	var	0
	line	136
	colm	7
	synt	any
	field	id_def_found
	int	1
	line	136
	colm	22
	synt	any
	asgn
	unmark
lab L67
	var	22
	pnull
	var	0
	line	137
	colm	14
	synt	any
	field	sel_type
	line	137
	colm	11
	synt	any
	invoke	1
	line	88
	colm	5
	synt	endif
	unmark
lab L29
	mark	L68
	var	29
	pnull
	var	0
	line	139
	colm	17
	synt	any
	field	signature
	line	139
	colm	14
	synt	any
	invoke	1
	unmark
lab L68
	var	22
	pnull
	var	0
	line	140
	colm	15
	synt	any
	field	signature
	line	140
	colm	11
	synt	any
	invoke	1
	goto	L12
lab L13
	mark	L69
	ccase
	int	6
	line	131
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L70
	line	51
	colm	5
	synt	ifelse
	mark	L71
	pnull
	pnull
	var	0
	line	51
	colm	14
	synt	any
	field	sel_type
	line	51
	colm	9
	synt	any
	nonnull
	unmark
	mark	L73
	pnull
	pnull
	var	0
	line	52
	colm	7
	synt	any
	field	id_last_definition
	var	21
	line	52
	colm	28
	synt	any
	asgn
	unmark
lab L73
	mark	L74
	pnull
	pnull
	var	0
	line	53
	colm	7
	synt	any
	field	id_def_found
	int	1
	line	53
	colm	22
	synt	any
	asgn
	unmark
lab L74
	var	22
	pnull
	var	0
	line	54
	colm	15
	synt	any
	field	sel_type
	line	54
	colm	11
	synt	any
	invoke	1
	goto	L72
lab L71
	line	55
	colm	8
	synt	if
	mark0
	var	18
	unmark
	mark	L75
	line	56
	colm	5
	synt	if
	mark0
	pnull
	pnull
	var	0
	line	56
	colm	14
	synt	any
	field	signature
	line	56
	colm	9
	synt	any
	nonnull
	pop
	pnull
	pnull
	var	0
	line	56
	colm	32
	synt	any
	field	sig_done
	int	3
	line	56
	colm	43
	synt	any
	numne
	unmark
	mark	L76
	var	23
	var	0
	str	4
	line	58
	colm	16
	synt	any
	invoke	2
	unmark
lab L76
	pnull
	var	24
	dup
	int	1
	line	60
	colm	17
	synt	any
	minus
	asgn
	line	56
	colm	5
	synt	endif
	unmark
lab L75
	mark	L77
	line	62
	colm	5
	synt	if
	mark0
	pnull
	var	20
	line	62
	colm	10
	synt	any
	nonnull
	pop
	pnull
	pnull
	var	0
	line	63
	colm	16
	synt	any
	field	id_last_definition
	line	63
	colm	11
	synt	any
	nonnull
	unmark
	mark	L78
	pnull
	var	7
	pnull
	var	0
	line	64
	colm	22
	synt	any
	field	id_last_definition
	line	64
	colm	17
	synt	any
	asgn
	unmark
lab L78
	mark	L79
	pnull
	var	8
	pnull
	var	20
	line	65
	colm	37
	synt	any
	field	decl_innermost_id
	line	65
	colm	18
	synt	any
	asgn
	unmark
lab L79
	line	68
	colm	13
	synt	if
	mark0
	pnull
	pnull
	var	7
	line	68
	colm	21
	synt	any
	field	kind
	int	1
	line	68
	colm	28
	synt	any
	numeq
	unmark
	mark	L80
	line	70
	colm	17
	synt	if
	mark0
	pnull
	pnull
	var	7
	line	70
	colm	25
	synt	any
	field	post_num
	pnull
	var	0
	line	70
	colm	41
	synt	any
	field	post_num
	line	70
	colm	36
	synt	any
	numge
	unmark
	var	25
	pnull
	str	5
	var	26
	pnull
	var	0
	line	71
	colm	84
	synt	any
	field	id_str_table_index
	line	71
	colm	81
	synt	any
	invoke	1
	line	71
	colm	71
	synt	any
	cat
	line	71
	colm	28
	synt	any
	invoke	1
	line	70
	colm	17
	synt	endif
	unmark
lab L80
	line	73
	colm	17
	synt	ifelse
	mark	L81
	pnull
	var	7
	line	73
	colm	25
	synt	any
	field	decl_sig_transp
	unmark
	pnull
	var	9
	pnull
	var	7
	line	74
	colm	35
	synt	any
	field	decl_innermost_id
	line	74
	colm	28
	synt	any
	asgn
	goto	L82
lab L81
	pnull
	var	9
	var	7
	line	76
	colm	28
	synt	any
	asgn
lab L82
	line	73
	colm	17
	synt	endifelse
	line	68
	colm	13
	synt	endif
	line	62
	colm	5
	synt	endif
	unmark
lab L77
	line	80
	colm	5
	synt	if
	mark0
	pnull
	var	9
	line	80
	colm	9
	synt	any
	nonnull
	pop
	mark	L83
	pnull
	var	8
	line	81
	colm	10
	synt	any
	null
	line	81
	colm	16
	synt	any
	esusp
	goto	L84
lab L83
	var	27
	var	9
	pnull
	var	8
	line	82
	colm	37
	synt	any
	field	decl_scope
	line	82
	colm	23
	synt	any
	invoke	2
lab L84
	unmark
	pnull
	pnull
	var	20
	line	83
	colm	30
	synt	any
	field	decl_innermost_id
	var	9
	line	83
	colm	50
	synt	any
	asgn
	line	80
	colm	5
	synt	endif
	line	55
	colm	8
	synt	endif
lab L72
	line	51
	colm	5
	synt	endifelse
	unmark
lab L70
	mark	L85
	line	88
	colm	5
	synt	if
	mark0
	pnull
	pnull
	var	0
	line	88
	colm	14
	synt	any
	field	id_last_definition
	line	88
	colm	9
	synt	any
	null
	pop
	pnull
	pnull
	var	0
	line	89
	colm	11
	synt	any
	field	id_str_table_index
	pnull
	int	1
	line	89
	colm	35
	synt	any
	neg
	line	89
	colm	32
	synt	any
	numne
	unmark
	mark	L86
	pnull
	var	10
	pnull
	var	0
	line	91
	colm	14
	synt	any
	field	id_use_list
	line	91
	colm	9
	synt	any
	asgn
	unmark
lab L86
	mark	L87
lab L88
	line	92
	colm	5
	synt	while
	mark0
	pnull
	var	10
	line	92
	colm	12
	synt	any
	nonnull
	unmark
	mark	L88
	mark	L91
	pnull
	var	12
	int	0
	line	93
	colm	18
	synt	any
	asgn
	unmark
lab L91
	mark	L92
	pnull
	var	14
	pnull
	pnull
	var	10
	line	94
	colm	20
	synt	any
	field	usl_type_list
	line	94
	colm	34
	synt	any
	field	lh_first
	line	94
	colm	14
	synt	any
	asgn
	unmark
lab L92
	mark	L93
lab L94
	line	95
	colm	9
	synt	while
	mark0
	pnull
	var	14
	line	95
	colm	15
	synt	any
	nonnull
	pop
	pnull
	var	12
	int	0
	line	95
	colm	33
	synt	any
	numeq
	unmark
	mark	L94
	mark	L97
	pnull
	var	15
	pnull
	var	14
	line	96
	colm	22
	synt	any
	field	cn_hd_field
	line	96
	colm	15
	synt	any
	asgn
	unmark
lab L97
	mark	L98
	line	97
	colm	13
	synt	ifelse
	mark	L99
	mark	L101
	pnull
	pnull
	var	15
	line	97
	colm	20
	synt	any
	field	kind
	int	6
	line	97
	colm	27
	synt	any
	numne
	pop
	pnull
	var	15
	line	97
	colm	37
	synt	any
	field	kind
	pnull
	int	2
	line	97
	colm	45
	synt	any
	tabmat
	invoke	-1
	line	97
	colm	51
	synt	any
	esusp
	goto	L102
lab L101
	mark	L103
	pnull
	pnull
	var	15
	line	98
	colm	22
	synt	any
	field	signature
	line	98
	colm	17
	synt	any
	nonnull
	line	98
	colm	35
	synt	any
	esusp
	goto	L104
lab L103
	pnull
	pnull
	var	15
	line	99
	colm	23
	synt	any
	field	sel_type
	line	99
	colm	17
	synt	any
	nonnull
lab L104
lab L102
	unmark
	mark	L105
	pnull
	pnull
	var	0
	line	100
	colm	23
	synt	any
	field	sel_type
	var	15
	line	100
	colm	34
	synt	any
	asgn
	unmark
lab L105
	mark	L106
	pnull
	var	12
	int	1
	line	101
	colm	30
	synt	any
	asgn
	unmark
lab L106
	unmark
	unmark
	pnull
	goto	L96
	goto	L100
lab L99
	mark	L107
	pnull
	var	7
	pnull
	var	15
	line	104
	colm	30
	synt	any
	field	id_last_definition
	line	104
	colm	25
	synt	any
	asgn
	unmark
lab L107
	mark	L108
	line	105
	colm	21
	synt	if
	mark0
	mark	L109
	pnull
	var	7
	line	105
	colm	25
	synt	any
	null
	line	105
	colm	31
	synt	any
	esusp
	goto	L110
lab L109
	mark	L111
	pnull
	pnull
	var	7
	line	106
	colm	30
	synt	any
	field	kind
	int	1
	line	106
	colm	37
	synt	any
	numne
	pop
	pnull
	pnull
	var	7
	line	107
	colm	30
	synt	any
	field	kind
	int	3
	line	107
	colm	37
	synt	any
	numne
	line	107
	colm	43
	synt	any
	esusp
	goto	L112
lab L111
	pnull
	pnull
	var	7
	line	108
	colm	30
	synt	any
	field	kind
	int	1
	line	108
	colm	37
	synt	any
	numeq
	pop
	pnull
	pnull
	var	7
	line	109
	colm	33
	synt	any
	field	decl_signature
	line	109
	colm	26
	synt	any
	null
lab L112
lab L110
	unmark
	mark	L113
	pnull
	pnull
	var	0
	line	110
	colm	32
	synt	any
	field	sel_type
	var	15
	line	110
	colm	43
	synt	any
	asgn
	unmark
lab L113
	mark	L114
	pnull
	var	12
	int	1
	line	111
	colm	39
	synt	any
	asgn
	unmark
lab L114
	unmark
	unmark
	unmark
	pnull
	goto	L96
	line	105
	colm	21
	synt	endif
	unmark
lab L108
	mark	L115
	line	114
	colm	21
	synt	ifelse
	mark	L116
	pnull
	pnull
	var	7
	line	114
	colm	27
	synt	any
	field	kind
	int	3
	line	114
	colm	33
	synt	any
	numeq
	unmark
	pnull
	var	11
	pnull
	var	7
	line	115
	colm	35
	synt	any
	field	par_signature
	line	115
	colm	29
	synt	any
	asgn
	goto	L117
lab L116
	pnull
	var	11
	pnull
	var	7
	line	117
	colm	35
	synt	any
	field	decl_signature
	line	117
	colm	29
	synt	any
	asgn
lab L117
	line	114
	colm	21
	synt	endifelse
	unmark
lab L115
	line	118
	colm	21
	synt	if
	mark0
	pnull
	pnull
	var	11
	line	118
	colm	29
	synt	any
	field	kind
	int	7
	line	118
	colm	36
	synt	any
	numeq
	pop
	var	28
	var	11
	pnull
	var	0
	line	119
	colm	40
	synt	any
	field	id_str_table_index
	line	119
	colm	32
	synt	any
	invoke	2
	unmark
	mark	L118
	pnull
	pnull
	var	0
	line	120
	colm	31
	synt	any
	field	sel_type
	var	15
	line	120
	colm	42
	synt	any
	asgn
	unmark
lab L118
	mark	L119
	pnull
	var	12
	int	1
	line	121
	colm	38
	synt	any
	asgn
	unmark
lab L119
	unmark
	unmark
	pnull
	goto	L96
	line	118
	colm	21
	synt	endif
lab L100
	line	97
	colm	13
	synt	endifelse
	unmark
lab L98
	pnull
	var	14
	pnull
	var	14
	line	125
	colm	25
	synt	any
	field	cn_tl_field
	line	125
	colm	18
	synt	any
	asgn
lab L95
	unmark
	goto	L94
lab L96
	line	95
	colm	9
	synt	endwhile
	unmark
lab L93
	line	127
	colm	9
	synt	if
	mark0
	pnull
	var	12
	int	0
	line	127
	colm	21
	synt	any
	numeq
	unmark
	pnull
	var	10
	pnull
	var	10
	line	128
	colm	24
	synt	any
	field	usl_previous_list
	line	128
	colm	17
	synt	any
	asgn
	line	127
	colm	9
	synt	endif
lab L89
	unmark
	goto	L88
lab L90
	line	92
	colm	5
	synt	endwhile
	unmark
lab L87
	mark	L120
	line	130
	colm	5
	synt	if
	mark0
	pnull
	var	12
	int	0
	line	130
	colm	17
	synt	any
	numeq
	unmark
	mark	L121
	var	25
	pnull
	str	8
	var	26
	pnull
	var	0
	line	131
	colm	43
	synt	any
	field	id_str_table_index
	line	131
	colm	40
	synt	any
	invoke	1
	line	131
	colm	30
	synt	any
	cat
	line	131
	colm	16
	synt	any
	invoke	1
	unmark
lab L121
	mark	L122
	pnull
	pnull
	var	0
	line	133
	colm	11
	synt	any
	field	signature
	int	3
	line	133
	colm	23
	synt	any
	asgn
	unmark
lab L122
	pnull
	pnull
	var	0
	line	134
	colm	11
	synt	any
	field	sig_done
	int	3
	line	134
	colm	22
	synt	any
	asgn
	line	130
	colm	5
	synt	endif
	unmark
lab L120
	mark	L123
	pnull
	pnull
	var	0
	line	136
	colm	7
	synt	any
	field	id_def_found
	int	1
	line	136
	colm	22
	synt	any
	asgn
	unmark
lab L123
	var	22
	pnull
	var	0
	line	137
	colm	14
	synt	any
	field	sel_type
	line	137
	colm	11
	synt	any
	invoke	1
	line	88
	colm	5
	synt	endif
	unmark
lab L85
	mark	L124
	var	29
	pnull
	var	0
	line	139
	colm	17
	synt	any
	field	signature
	line	139
	colm	14
	synt	any
	invoke	1
	unmark
lab L124
	var	22
	pnull
	var	0
	line	140
	colm	15
	synt	any
	field	signature
	line	140
	colm	11
	synt	any
	invoke	1
	goto	L12
lab L69
	mark	L125
	ccase
	int	9
	line	134
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L126
	line	52
	colm	5
	synt	ifelse
	mark	L127
	pnull
	pnull
	var	0
	line	52
	colm	14
	synt	any
	field	sel_type
	line	52
	colm	9
	synt	any
	nonnull
	unmark
	mark	L129
	var	22
	pnull
	var	0
	line	53
	colm	15
	synt	any
	field	sel_type
	line	53
	colm	11
	synt	any
	invoke	1
	unmark
lab L129
	pnull
	pnull
	var	0
	line	54
	colm	7
	synt	any
	field	str_expansion
	var	30
	var	0
	line	54
	colm	36
	synt	any
	invoke	1
	line	54
	colm	23
	synt	any
	asgn
	goto	L128
lab L127
	line	55
	colm	8
	synt	if
	mark0
	pnull
	var	18
	line	55
	colm	12
	synt	any
	nonnull
	unmark
	mark	L130
	pnull
	var	10
	pnull
	var	0
	line	57
	colm	14
	synt	any
	field	str_use_list
	line	57
	colm	9
	synt	any
	asgn
	unmark
lab L130
	mark	L131
lab L132
	line	58
	colm	5
	synt	while
	mark0
	pnull
	var	10
	line	58
	colm	12
	synt	any
	nonnull
	unmark
	mark	L132
	mark	L135
	pnull
	var	14
	pnull
	pnull
	var	10
	line	59
	colm	21
	synt	any
	field	usl_type_list
	line	59
	colm	36
	synt	any
	field	lh_first
	line	59
	colm	14
	synt	any
	asgn
	unmark
lab L135
	mark	L136
lab L137
	line	60
	colm	9
	synt	while
	mark0
	pnull
	var	14
	line	60
	colm	15
	synt	any
	nonnull
	unmark
	mark	L137
	mark	L140
	pnull
	var	15
	pnull
	pnull
	var	14
	line	61
	colm	22
	synt	any
	field	cn_hd
	line	61
	colm	28
	synt	any
	field	field
	line	61
	colm	15
	synt	any
	asgn
	unmark
lab L140
	mark	L141
	line	62
	colm	13
	synt	ifelse
	mark	L142
	mark	L144
	pnull
	pnull
	var	15
	line	62
	colm	20
	synt	any
	field	kind
	int	6
	line	62
	colm	27
	synt	any
	numne
	pop
	pnull
	pnull
	var	15
	line	62
	colm	37
	synt	any
	field	kind
	int	2
	line	62
	colm	44
	synt	any
	numne
	line	62
	colm	51
	synt	any
	esusp
	goto	L145
lab L144
	mark	L146
	pnull
	pnull
	var	15
	line	63
	colm	22
	synt	any
	field	signature
	line	63
	colm	17
	synt	any
	nonnull
	line	63
	colm	35
	synt	any
	esusp
	goto	L147
lab L146
	pnull
	pnull
	var	15
	line	64
	colm	23
	synt	any
	field	sel_type
	line	64
	colm	17
	synt	any
	nonnull
lab L147
lab L145
	unmark
	mark	L148
	pnull
	pnull
	var	0
	line	65
	colm	23
	synt	any
	field	sel_type
	var	15
	line	65
	colm	34
	synt	any
	asgn
	unmark
lab L148
	mark	L149
	pnull
	var	16
	int	1
	line	66
	colm	39
	synt	any
	asgn
	unmark
lab L149
	unmark
	unmark
	pnull
	goto	L139
	goto	L143
lab L142
	mark	L150
	pnull
	var	7
	pnull
	var	15
	line	69
	colm	30
	synt	any
	field	id_last_definition
	line	69
	colm	25
	synt	any
	asgn
	unmark
lab L150
	mark	L151
	line	70
	colm	21
	synt	if
	mark0
	mark	L152
	pnull
	var	7
	line	70
	colm	25
	synt	any
	null
	line	70
	colm	32
	synt	any
	esusp
	goto	L153
lab L152
	mark	L154
	pnull
	pnull
	var	7
	line	71
	colm	30
	synt	any
	field	kind
	int	1
	line	71
	colm	37
	synt	any
	numne
	pop
	pnull
	pnull
	var	7
	line	72
	colm	30
	synt	any
	field	kind
	int	3
	line	72
	colm	37
	synt	any
	numne
	line	72
	colm	43
	synt	any
	esusp
	goto	L155
lab L154
	pnull
	pnull
	var	7
	line	73
	colm	30
	synt	any
	field	kind
	int	1
	line	73
	colm	37
	synt	any
	numeq
	pop
	pnull
	pnull
	var	7
	line	74
	colm	33
	synt	any
	field	decl_signature
	line	74
	colm	26
	synt	any
	null
lab L155
lab L153
	unmark
	mark	L156
	pnull
	pnull
	var	0
	line	75
	colm	32
	synt	any
	field	sel_type
	var	15
	line	75
	colm	43
	synt	any
	asgn
	unmark
lab L156
	mark	L157
	pnull
	var	16
	int	1
	line	76
	colm	48
	synt	any
	asgn
	unmark
lab L157
	unmark
	unmark
	unmark
	pnull
	goto	L139
	line	70
	colm	21
	synt	endif
	unmark
lab L151
	mark	L158
	line	79
	colm	21
	synt	ifelse
	mark	L159
	pnull
	pnull
	var	7
	line	79
	colm	28
	synt	any
	field	kind
	int	3
	line	79
	colm	34
	synt	any
	numeq
	unmark
	pnull
	var	11
	pnull
	var	7
	line	80
	colm	36
	synt	any
	field	par_signature
	line	80
	colm	29
	synt	any
	asgn
	goto	L160
lab L159
	pnull
	var	11
	pnull
	var	7
	line	82
	colm	36
	synt	any
	field	decl_signature
	line	82
	colm	29
	synt	any
	asgn
lab L160
	line	79
	colm	21
	synt	endifelse
	unmark
lab L158
	line	83
	colm	21
	synt	if
	mark0
	pnull
	pnull
	var	11
	line	83
	colm	29
	synt	any
	field	kind
	int	7
	line	83
	colm	36
	synt	any
	numeq
	pop
	var	31
	var	11
	var	0
	line	84
	colm	34
	synt	any
	invoke	2
	unmark
	mark	L161
	pnull
	pnull
	var	0
	line	85
	colm	31
	synt	any
	field	sel_type
	var	15
	line	85
	colm	42
	synt	any
	asgn
	unmark
lab L161
	mark	L162
	pnull
	var	16
	int	1
	line	86
	colm	47
	synt	any
	asgn
	unmark
lab L162
	unmark
	unmark
	pnull
	goto	L139
	line	83
	colm	21
	synt	endif
lab L143
	line	62
	colm	13
	synt	endifelse
	unmark
lab L141
	pnull
	var	14
	pnull
	var	14
	line	90
	colm	25
	synt	any
	field	cn_tl_field
	line	90
	colm	18
	synt	any
	asgn
lab L138
	unmark
	goto	L137
lab L139
	line	60
	colm	9
	synt	endwhile
	unmark
lab L136
	line	92
	colm	9
	synt	if
	mark0
	pnull
	var	16
	int	1
	line	92
	colm	30
	synt	any
	numeq
	unmark
	pnull
	var	10
	pnull
	var	10
	line	93
	colm	24
	synt	any
	field	usl_previous_list
	line	93
	colm	17
	synt	any
	asgn
	line	92
	colm	9
	synt	endif
lab L133
	unmark
	goto	L132
lab L134
	line	58
	colm	5
	synt	endwhile
	unmark
lab L131
	mark	L163
	line	96
	colm	5
	synt	case
	mark0
	pnull
	var	0
	line	96
	colm	13
	synt	any
	field	kind
	eret
	mark	L165
	ccase
	int	9
	line	97
	colm	11
	synt	any
	eqv
	unmark
	pop
	var	25
	pnull
	str	10
	pnull
	var	0
	line	98
	colm	69
	synt	any
	field	str_string
	line	98
	colm	64
	synt	any
	cat
	line	98
	colm	20
	synt	any
	invoke	1
	goto	L164
lab L165
	mark	L166
	ccase
	int	11
	line	100
	colm	11
	synt	any
	eqv
	unmark
	pop
	var	25
	pnull
	str	10
	pnull
	var	0
	line	102
	colm	73
	synt	any
	field	str_string
	line	102
	colm	68
	synt	any
	cat
	line	102
	colm	24
	synt	any
	invoke	1
	goto	L164
lab L166
	efail
lab L164
	line	96
	colm	5
	synt	endcase
	unmark
lab L163
	mark	L167
	pnull
	pnull
	var	0
	line	105
	colm	7
	synt	any
	field	signature
	int	3
	line	105
	colm	19
	synt	any
	asgn
	unmark
lab L167
	pnull
	pnull
	var	0
	line	106
	colm	7
	synt	any
	field	sig_done
	int	3
	line	106
	colm	18
	synt	any
	asgn
	line	55
	colm	8
	synt	endif
lab L128
	line	52
	colm	5
	synt	endifelse
	unmark
lab L126
	pnull
	pnull
	var	0
	line	108
	colm	7
	synt	any
	field	str_expansion
	var	30
	var	0
	line	108
	colm	36
	synt	any
	invoke	1
	line	108
	colm	23
	synt	any
	asgn
	goto	L12
lab L125
	mark	L168
	ccase
	int	11
	line	137
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L169
	line	52
	colm	5
	synt	ifelse
	mark	L170
	pnull
	pnull
	var	0
	line	52
	colm	14
	synt	any
	field	sel_type
	line	52
	colm	9
	synt	any
	nonnull
	unmark
	mark	L172
	var	22
	pnull
	var	0
	line	53
	colm	15
	synt	any
	field	sel_type
	line	53
	colm	11
	synt	any
	invoke	1
	unmark
lab L172
	pnull
	pnull
	var	0
	line	54
	colm	7
	synt	any
	field	str_expansion
	var	30
	var	0
	line	54
	colm	36
	synt	any
	invoke	1
	line	54
	colm	23
	synt	any
	asgn
	goto	L171
lab L170
	line	55
	colm	8
	synt	if
	mark0
	pnull
	var	18
	line	55
	colm	12
	synt	any
	nonnull
	unmark
	mark	L173
	pnull
	var	10
	pnull
	var	0
	line	57
	colm	14
	synt	any
	field	str_use_list
	line	57
	colm	9
	synt	any
	asgn
	unmark
lab L173
	mark	L174
lab L175
	line	58
	colm	5
	synt	while
	mark0
	pnull
	var	10
	line	58
	colm	12
	synt	any
	nonnull
	unmark
	mark	L175
	mark	L178
	pnull
	var	14
	pnull
	pnull
	var	10
	line	59
	colm	21
	synt	any
	field	usl_type_list
	line	59
	colm	36
	synt	any
	field	lh_first
	line	59
	colm	14
	synt	any
	asgn
	unmark
lab L178
	mark	L179
lab L180
	line	60
	colm	9
	synt	while
	mark0
	pnull
	var	14
	line	60
	colm	15
	synt	any
	nonnull
	unmark
	mark	L180
	mark	L183
	pnull
	var	15
	pnull
	pnull
	var	14
	line	61
	colm	22
	synt	any
	field	cn_hd
	line	61
	colm	28
	synt	any
	field	field
	line	61
	colm	15
	synt	any
	asgn
	unmark
lab L183
	mark	L184
	line	62
	colm	13
	synt	ifelse
	mark	L185
	mark	L187
	pnull
	pnull
	var	15
	line	62
	colm	20
	synt	any
	field	kind
	int	6
	line	62
	colm	27
	synt	any
	numne
	pop
	pnull
	pnull
	var	15
	line	62
	colm	37
	synt	any
	field	kind
	int	2
	line	62
	colm	44
	synt	any
	numne
	line	62
	colm	51
	synt	any
	esusp
	goto	L188
lab L187
	mark	L189
	pnull
	pnull
	var	15
	line	63
	colm	22
	synt	any
	field	signature
	line	63
	colm	17
	synt	any
	nonnull
	line	63
	colm	35
	synt	any
	esusp
	goto	L190
lab L189
	pnull
	pnull
	var	15
	line	64
	colm	23
	synt	any
	field	sel_type
	line	64
	colm	17
	synt	any
	nonnull
lab L190
lab L188
	unmark
	mark	L191
	pnull
	pnull
	var	0
	line	65
	colm	23
	synt	any
	field	sel_type
	var	15
	line	65
	colm	34
	synt	any
	asgn
	unmark
lab L191
	mark	L192
	pnull
	var	16
	int	1
	line	66
	colm	39
	synt	any
	asgn
	unmark
lab L192
	unmark
	unmark
	pnull
	goto	L182
	goto	L186
lab L185
	mark	L193
	pnull
	var	7
	pnull
	var	15
	line	69
	colm	30
	synt	any
	field	id_last_definition
	line	69
	colm	25
	synt	any
	asgn
	unmark
lab L193
	mark	L194
	line	70
	colm	21
	synt	if
	mark0
	mark	L195
	pnull
	var	7
	line	70
	colm	25
	synt	any
	null
	line	70
	colm	32
	synt	any
	esusp
	goto	L196
lab L195
	mark	L197
	pnull
	pnull
	var	7
	line	71
	colm	30
	synt	any
	field	kind
	int	1
	line	71
	colm	37
	synt	any
	numne
	pop
	pnull
	pnull
	var	7
	line	72
	colm	30
	synt	any
	field	kind
	int	3
	line	72
	colm	37
	synt	any
	numne
	line	72
	colm	43
	synt	any
	esusp
	goto	L198
lab L197
	pnull
	pnull
	var	7
	line	73
	colm	30
	synt	any
	field	kind
	int	1
	line	73
	colm	37
	synt	any
	numeq
	pop
	pnull
	pnull
	var	7
	line	74
	colm	33
	synt	any
	field	decl_signature
	line	74
	colm	26
	synt	any
	null
lab L198
lab L196
	unmark
	mark	L199
	pnull
	pnull
	var	0
	line	75
	colm	32
	synt	any
	field	sel_type
	var	15
	line	75
	colm	43
	synt	any
	asgn
	unmark
lab L199
	mark	L200
	pnull
	var	16
	int	1
	line	76
	colm	48
	synt	any
	asgn
	unmark
lab L200
	unmark
	unmark
	unmark
	pnull
	goto	L182
	line	70
	colm	21
	synt	endif
	unmark
lab L194
	mark	L201
	line	79
	colm	21
	synt	ifelse
	mark	L202
	pnull
	pnull
	var	7
	line	79
	colm	28
	synt	any
	field	kind
	int	3
	line	79
	colm	34
	synt	any
	numeq
	unmark
	pnull
	var	11
	pnull
	var	7
	line	80
	colm	36
	synt	any
	field	par_signature
	line	80
	colm	29
	synt	any
	asgn
	goto	L203
lab L202
	pnull
	var	11
	pnull
	var	7
	line	82
	colm	36
	synt	any
	field	decl_signature
	line	82
	colm	29
	synt	any
	asgn
lab L203
	line	79
	colm	21
	synt	endifelse
	unmark
lab L201
	line	83
	colm	21
	synt	if
	mark0
	pnull
	pnull
	var	11
	line	83
	colm	29
	synt	any
	field	kind
	int	7
	line	83
	colm	36
	synt	any
	numeq
	pop
	var	31
	var	11
	var	0
	line	84
	colm	34
	synt	any
	invoke	2
	unmark
	mark	L204
	pnull
	pnull
	var	0
	line	85
	colm	31
	synt	any
	field	sel_type
	var	15
	line	85
	colm	42
	synt	any
	asgn
	unmark
lab L204
	mark	L205
	pnull
	var	16
	int	1
	line	86
	colm	47
	synt	any
	asgn
	unmark
lab L205
	unmark
	unmark
	pnull
	goto	L182
	line	83
	colm	21
	synt	endif
lab L186
	line	62
	colm	13
	synt	endifelse
	unmark
lab L184
	pnull
	var	14
	pnull
	var	14
	line	90
	colm	25
	synt	any
	field	cn_tl_field
	line	90
	colm	18
	synt	any
	asgn
lab L181
	unmark
	goto	L180
lab L182
	line	60
	colm	9
	synt	endwhile
	unmark
lab L179
	line	92
	colm	9
	synt	if
	mark0
	pnull
	var	16
	int	1
	line	92
	colm	30
	synt	any
	numeq
	unmark
	pnull
	var	10
	pnull
	var	10
	line	93
	colm	24
	synt	any
	field	usl_previous_list
	line	93
	colm	17
	synt	any
	asgn
	line	92
	colm	9
	synt	endif
lab L176
	unmark
	goto	L175
lab L177
	line	58
	colm	5
	synt	endwhile
	unmark
lab L174
	mark	L206
	line	96
	colm	5
	synt	case
	mark0
	pnull
	var	0
	line	96
	colm	13
	synt	any
	field	kind
	eret
	mark	L208
	ccase
	int	9
	line	97
	colm	11
	synt	any
	eqv
	unmark
	pop
	var	25
	pnull
	str	10
	pnull
	var	0
	line	98
	colm	69
	synt	any
	field	str_string
	line	98
	colm	64
	synt	any
	cat
	line	98
	colm	20
	synt	any
	invoke	1
	goto	L207
lab L208
	mark	L209
	ccase
	int	11
	line	100
	colm	11
	synt	any
	eqv
	unmark
	pop
	var	25
	pnull
	str	10
	pnull
	var	0
	line	102
	colm	73
	synt	any
	field	str_string
	line	102
	colm	68
	synt	any
	cat
	line	102
	colm	24
	synt	any
	invoke	1
	goto	L207
lab L209
	efail
lab L207
	line	96
	colm	5
	synt	endcase
	unmark
lab L206
	mark	L210
	pnull
	pnull
	var	0
	line	105
	colm	7
	synt	any
	field	signature
	int	3
	line	105
	colm	19
	synt	any
	asgn
	unmark
lab L210
	pnull
	pnull
	var	0
	line	106
	colm	7
	synt	any
	field	sig_done
	int	3
	line	106
	colm	18
	synt	any
	asgn
	line	55
	colm	8
	synt	endif
lab L171
	line	52
	colm	5
	synt	endifelse
	unmark
lab L169
	pnull
	pnull
	var	0
	line	108
	colm	7
	synt	any
	field	str_expansion
	var	30
	var	0
	line	108
	colm	36
	synt	any
	invoke	1
	line	108
	colm	23
	synt	any
	asgn
	goto	L12
lab L168
	mark	L211
	ccase
	int	12
	line	140
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L212
	pnull
	var	14
	pnull
	pnull
	var	0
	line	142
	colm	26
	synt	any
	field	rec_component_list
	line	142
	colm	45
	synt	any
	field	lh_first
	line	142
	colm	22
	synt	any
	asgn
	unmark
lab L212
lab L213
	line	143
	colm	17
	synt	while
	mark0
	pnull
	var	14
	line	143
	colm	23
	synt	any
	nonnull
	unmark
	mark	L213
	mark	L216
	pnull
	var	15
	pnull
	var	14
	line	144
	colm	30
	synt	any
	field	cn_hd_field
	line	144
	colm	23
	synt	any
	asgn
	unmark
lab L216
	mark	L217
	var	22
	pnull
	var	15
	line	145
	colm	30
	synt	any
	field	re_denotation
	line	145
	colm	27
	synt	any
	invoke	1
	unmark
lab L217
	pnull
	var	14
	pnull
	var	14
	line	146
	colm	33
	synt	any
	field	cn_tl_field
	line	146
	colm	26
	synt	any
	asgn
lab L214
	unmark
	goto	L213
lab L215
	line	143
	colm	17
	synt	endwhile
	goto	L12
lab L211
	mark	L218
	ccase
	int	13
	line	149
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L219
	line	151
	colm	13
	synt	if
	mark0
	pnull
	pnull
	var	0
	line	151
	colm	20
	synt	any
	field	fc_code_label
	line	151
	colm	17
	synt	any
	null
	unmark
	mark	L220
	var	32
	pnull
	var	0
	line	152
	colm	26
	synt	any
	field	vlineno
	line	152
	colm	23
	synt	any
	invoke	1
	unmark
lab L220
	mark	L221
	pnull
	var	33
	dup
	int	1
	line	153
	colm	26
	synt	any
	plus
	asgn
	unmark
lab L221
	mark	L222
	pnull
	var	34
	pnull
	pnull
	var	35
	var	36
	line	154
	colm	48
	synt	any
	invoke	0
	line	154
	colm	40
	synt	any
	cat
	var	33
	line	154
	colm	51
	synt	any
	cat
	line	154
	colm	25
	synt	any
	asgn
	unmark
lab L222
	pnull
	pnull
	var	0
	line	155
	colm	19
	synt	any
	field	fc_code_label
	var	34
	line	155
	colm	35
	synt	any
	asgn
	line	151
	colm	13
	synt	endif
	unmark
lab L219
	mark	L223
	pnull
	var	17
	int	0
	line	157
	colm	21
	synt	any
	asgn
	unmark
lab L223
	mark	L224
	pnull
	var	14
	pnull
	pnull
	pnull
	var	0
	line	159
	colm	23
	synt	any
	field	signature
	line	159
	colm	35
	synt	any
	field	fsig_param_list
	line	159
	colm	52
	synt	any
	field	lh_first
	line	159
	colm	18
	synt	any
	asgn
	unmark
lab L224
	mark	L225
lab L226
	line	160
	colm	13
	synt	while
	mark0
	pnull
	var	14
	line	160
	colm	19
	synt	any
	nonnull
	unmark
	mark	L226
	mark	L229
	pnull
	var	15
	pnull
	var	14
	line	161
	colm	26
	synt	any
	field	cn_hd_field
	line	161
	colm	19
	synt	any
	asgn
	unmark
lab L229
	mark	L230
	var	29
	pnull
	var	15
	line	162
	colm	29
	synt	any
	field	par_signature
	line	162
	colm	26
	synt	any
	invoke	1
	unmark
lab L230
	mark	L231
	line	163
	colm	17
	synt	if
	mark0
	pnull
	var	37
	pnull
	var	15
	line	163
	colm	31
	synt	any
	field	par_signature
	var	38
	var	21
	var	21
	line	163
	colm	28
	synt	any
	invoke	4
	int	0
	line	164
	colm	49
	synt	any
	numeq
	unmark
	pnull
	var	19
	var	15
	line	165
	colm	48
	synt	any
	asgn
	line	163
	colm	17
	synt	endif
	unmark
lab L231
	pnull
	var	14
	pnull
	var	14
	line	167
	colm	29
	synt	any
	field	cn_tl_field
	line	167
	colm	22
	synt	any
	asgn
lab L227
	unmark
	goto	L226
lab L228
	line	160
	colm	13
	synt	endwhile
	unmark
lab L225
	mark	L232
	pnull
	var	18
	int	1
	line	169
	colm	19
	synt	any
	asgn
	unmark
lab L232
	mark	L233
	pnull
	var	14
	pnull
	pnull
	pnull
	var	0
	line	170
	colm	24
	synt	any
	field	signature
	line	170
	colm	36
	synt	any
	field	fsig_param_list
	line	170
	colm	53
	synt	any
	field	lh_first
	line	170
	colm	18
	synt	any
	asgn
	unmark
lab L233
	mark	L234
lab L235
	line	171
	colm	13
	synt	while
	mark0
	pnull
	var	14
	line	171
	colm	19
	synt	any
	nonnull
	unmark
	mark	L235
	mark	L238
	pnull
	var	15
	pnull
	var	14
	line	172
	colm	26
	synt	any
	field	cn_hd_field
	line	172
	colm	19
	synt	any
	asgn
	unmark
lab L238
	mark	L239
	var	22
	pnull
	var	15
	line	173
	colm	26
	synt	any
	field	par_signature
	line	173
	colm	23
	synt	any
	invoke	1
	unmark
lab L239
	pnull
	var	14
	pnull
	var	14
	line	174
	colm	29
	synt	any
	field	cn_tl_field
	line	174
	colm	22
	synt	any
	asgn
lab L236
	unmark
	goto	L235
lab L237
	line	171
	colm	13
	synt	endwhile
	unmark
lab L234
	mark	L240
	var	29
	pnull
	pnull
	var	0
	line	176
	colm	25
	synt	any
	field	signature
	line	176
	colm	37
	synt	any
	field	fsig_result_sig
	line	176
	colm	22
	synt	any
	invoke	1
	unmark
lab L240
	mark	L241
	var	22
	pnull
	pnull
	var	0
	line	177
	colm	22
	synt	any
	field	signature
	line	177
	colm	34
	synt	any
	field	fsig_result_sig
	line	177
	colm	19
	synt	any
	invoke	1
	unmark
lab L241
	mark	L242
	pnull
	var	18
	var	3
	line	178
	colm	19
	synt	any
	asgn
	unmark
lab L242
	mark	L243
	var	22
	pnull
	var	0
	line	179
	colm	22
	synt	any
	field	fc_body
	line	179
	colm	19
	synt	any
	invoke	1
	unmark
lab L243
	pnull
	pnull
	pnull
	var	0
	line	180
	colm	15
	synt	any
	field	signature
	line	180
	colm	27
	synt	any
	field	fsig_slink_known
	int	1
	line	180
	colm	46
	synt	any
	asgn
	goto	L12
lab L218
	mark	L244
	ccase
	int	14
	line	185
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L245
	var	22
	pnull
	var	0
	line	187
	colm	30
	synt	any
	field	ap_operator
	line	187
	colm	27
	synt	any
	invoke	1
	unmark
lab L245
	mark	L246
	var	22
	pnull
	var	0
	line	188
	colm	30
	synt	any
	field	ap_args
	line	188
	colm	27
	synt	any
	invoke	1
	unmark
lab L246
	pnull
	pnull
	var	0
	line	189
	colm	23
	synt	any
	field	ap_void_decl
	var	19
	line	189
	colm	38
	synt	any
	asgn
	goto	L12
lab L244
	mark	L247
	ccase
	int	15
	line	191
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L248
	line	192
	colm	13
	synt	if
	mark0
	pnull
	var	17
	int	0
	line	192
	colm	25
	synt	any
	numeq
	unmark
	pnull
	pnull
	var	0
	line	193
	colm	18
	synt	any
	field	bld_flags
	var	39
	pnull
	var	0
	line	193
	colm	39
	synt	any
	field	bld_flags
	int	16
	line	193
	colm	36
	synt	any
	invoke	2
	line	193
	colm	30
	synt	any
	asgn
	line	192
	colm	13
	synt	endif
	unmark
lab L248
	mark	L249
	var	22
	pnull
	var	0
	line	195
	colm	21
	synt	any
	field	bld_declaration_list
	line	195
	colm	19
	synt	any
	invoke	1
	unmark
lab L249
	var	22
	pnull
	var	0
	line	196
	colm	21
	synt	any
	field	bld_den_seq
	line	196
	colm	19
	synt	any
	invoke	1
	goto	L12
lab L247
	mark	L250
	ccase
	int	1
	line	199
	colm	10
	synt	any
	eqv
	unmark
	pop
	mark	L251
	line	200
	colm	13
	synt	if
	mark0
	pnull
	pnull
	pnull
	var	0
	line	200
	colm	19
	synt	any
	field	decl_denotation
	line	200
	colm	37
	synt	any
	field	kind
	int	13
	line	200
	colm	44
	synt	any
	numeq
	pop
	pnull
	pnull
	pnull
	var	0
	line	201
	colm	19
	synt	any
	field	decl_id
	line	201
	colm	29
	synt	any
	field	kind
	int	6
	line	201
	colm	36
	synt	any
	numeq
	pop
	pnull
	pnull
	pnull
	var	0
	line	202
	colm	22
	synt	any
	field	decl_denotation
	line	202
	colm	40
	synt	any
	field	fc_code_label
	line	202
	colm	17
	synt	any
	null
	unmark
	line	204
	colm	21
	synt	if
	mark0
	pnull
	pnull
	var	40
	int	1
	line	204
	colm	32
	synt	any
	subsc
	str	17
	line	204
	colm	36
	synt	any
	lexne
	unmark
	mark	L252
	pnull
	var	33
	dup
	int	1
	line	205
	colm	34
	synt	any
	plus
	asgn
	unmark
lab L252
	mark	L253
	pnull
	var	34
	pnull
	pnull
	var	35
	var	40
	line	206
	colm	47
	synt	any
	cat
	var	33
	line	206
	colm	58
	synt	any
	cat
	line	206
	colm	33
	synt	any
	asgn
	unmark
lab L253
	pnull
	pnull
	pnull
	var	0
	line	207
	colm	27
	synt	any
	field	decl_denotation
	line	207
	colm	45
	synt	any
	field	fc_code_label
	var	34
	line	207
	colm	61
	synt	any
	asgn
	line	204
	colm	21
	synt	endif
	line	200
	colm	13
	synt	endif
	unmark
lab L251
	mark	L254
	pnull
	var	18
	int	1
	line	210
	colm	19
	synt	any
	asgn
	unmark
lab L254
	mark	L255
	var	29
	pnull
	var	0
	line	211
	colm	25
	synt	any
	field	decl_signature
	line	211
	colm	22
	synt	any
	invoke	1
	unmark
lab L255
	mark	L256
	var	22
	pnull
	var	0
	line	212
	colm	22
	synt	any
	field	decl_signature
	line	212
	colm	19
	synt	any
	invoke	1
	unmark
lab L256
	mark	L257
	line	213
	colm	13
	synt	ifelse
	mark	L258
	pnull
	pnull
	var	0
	line	213
	colm	22
	synt	any
	field	decl_sig_transp
	line	213
	colm	17
	synt	any
	null
	unmark
	pnull
	var	18
	var	3
	line	214
	colm	23
	synt	any
	asgn
	goto	L259
lab L258
	pnull
	var	20
	var	0
	line	217
	colm	33
	synt	any
	asgn
lab L259
	line	213
	colm	13
	synt	endifelse
	unmark
lab L257
	var	22
	pnull
	var	0
	line	219
	colm	22
	synt	any
	field	decl_denotation
	line	219
	colm	19
	synt	any
	invoke	1
	goto	L12
lab L250
	mark	L260
	ccase
	int	18
	line	221
	colm	10
	synt	any
	eqv
	unmark
	pop
	mark	L261
	var	29
	pnull
	var	0
	line	222
	colm	25
	synt	any
	field	tsc_signature
	line	222
	colm	22
	synt	any
	invoke	1
	unmark
lab L261
	var	22
	pnull
	var	0
	line	223
	colm	22
	synt	any
	field	tsc_signature
	line	223
	colm	19
	synt	any
	invoke	1
	goto	L12
lab L260
	mark	L262
	ccase
	int	19
	line	226
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L263
	var	22
	pnull
	var	0
	line	227
	colm	22
	synt	any
	field	ee_export_list
	line	227
	colm	19
	synt	any
	invoke	1
	unmark
lab L263
	mark	L264
	pnull
	var	18
	int	1
	line	228
	colm	19
	synt	any
	asgn
	unmark
lab L264
	mark	L265
	var	29
	pnull
	var	0
	line	229
	colm	25
	synt	any
	field	ee_signature
	line	229
	colm	22
	synt	any
	invoke	1
	unmark
lab L265
	var	22
	pnull
	var	0
	line	230
	colm	22
	synt	any
	field	ee_signature
	line	230
	colm	19
	synt	any
	invoke	1
	goto	L12
lab L262
	mark	L266
	ccase
	int	20
	line	232
	colm	11
	synt	any
	eqv
	unmark
	pop
	pnull
	goto	L12
lab L266
	mark	L267
	ccase
	int	3
	line	235
	colm	10
	synt	any
	eqv
	unmark
	pop
	mark	L268
	pnull
	var	18
	int	1
	line	236
	colm	19
	synt	any
	asgn
	unmark
lab L268
	mark	L269
	var	29
	pnull
	var	0
	line	237
	colm	25
	synt	any
	field	par_signature
	line	237
	colm	22
	synt	any
	invoke	1
	unmark
lab L269
	var	22
	pnull
	var	0
	line	238
	colm	22
	synt	any
	field	par_signature
	line	238
	colm	19
	synt	any
	invoke	1
	goto	L12
lab L267
	mark	L270
	ccase
	int	21
	line	241
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L271
	pnull
	var	17
	int	1
	line	242
	colm	21
	synt	any
	asgn
	unmark
lab L271
	pnull
	var	13
	int	1
	line	243
	colm	23
	synt	any
	asgn
	goto	L12
lab L270
	mark	L272
	ccase
	int	22
	line	246
	colm	11
	synt	any
	eqv
	unmark
	pop
	mark	L273
	line	247
	colm	13
	synt	ifelse
	mark	L274
	pnull
	var	17
	int	0
	line	247
	colm	25
	synt	any
	numeq
	unmark
	pnull
	pnull
	var	0
	line	248
	colm	19
	synt	any
	field	mp_no_surr_loop
	int	1
	line	248
	colm	37
	synt	any
	asgn
	goto	L275
lab L274
	pnull
	pnull
	var	0
	line	250
	colm	19
	synt	any
	field	mp_no_surr_loop
	int	0
	line	250
	colm	37
	synt	any
	asgn
lab L275
	line	247
	colm	13
	synt	endifelse
	unmark
lab L273
	pnull
	var	13
	int	1
	line	252
	colm	23
	synt	any
	asgn
	goto	L12
lab L272
	mark	L276
	ccase
	int	7
	line	254
	colm	10
	synt	any
	eqv
	unmark
	pop
	pnull
	var	18
	int	1
	line	256
	colm	23
	synt	any
	asgn
	goto	L12
lab L276
	mark	L277
	ccase
	int	23
	line	259
	colm	10
	synt	any
	eqv
	unmark
	pop
	pnull
	var	18
	int	1
	line	261
	colm	23
	synt	any
	asgn
	goto	L12
lab L277
	mark	L278
	ccase
	int	24
	line	264
	colm	10
	synt	any
	eqv
	unmark
	pop
	pnull
	var	18
	int	1
	line	266
	colm	23
	synt	any
	asgn
	goto	L12
lab L278
	mark	L279
	ccase
	int	25
	line	269
	colm	10
	synt	any
	eqv
	unmark
	pop
	pnull
	var	18
	int	1
	line	271
	colm	23
	synt	any
	asgn
	goto	L12
lab L279
	pop
	line	52
	colm	5
	synt	if
	mark0
	var	41
	pnull
	var	0
	line	52
	colm	18
	synt	any
	field	cn_hd_field
	line	52
	colm	16
	synt	any
	invoke	1
	unmark
	mark	L280
	pnull
	var	14
	pnull
	var	0
	line	53
	colm	18
	synt	any
	field	lh_first
	line	53
	colm	14
	synt	any
	asgn
	unmark
lab L280
lab L281
	line	54
	colm	9
	synt	while
	mark0
	pnull
	var	14
	line	54
	colm	15
	synt	any
	nonnull
	unmark
	mark	L281
	mark	L284
	pnull
	var	42
	pnull
	var	14
	line	55
	colm	22
	synt	any
	field	cn_hd_field
	line	55
	colm	15
	synt	any
	asgn
	unmark
lab L284
	mark	L285
	var	22
	var	42
	line	56
	colm	19
	synt	any
	invoke	1
	unmark
lab L285
	pnull
	var	14
	pnull
	var	14
	line	57
	colm	25
	synt	any
	field	cn_tl_field
	line	57
	colm	18
	synt	any
	asgn
lab L282
	unmark
	goto	L281
lab L283
	line	54
	colm	9
	synt	endwhile
	line	52
	colm	5
	synt	endif
lab L12
	line	127
	colm	5
	synt	endcase
	unmark
lab L11
	mark	L286
	line	279
	colm	5
	synt	if
	mark0
	pnull
	var	13
	int	1
	line	279
	colm	18
	synt	any
	asgn
	unmark
	line	52
	colm	5
	synt	if
	mark0
	var	41
	pnull
	var	0
	line	52
	colm	18
	synt	any
	field	cn_hd_field
	line	52
	colm	16
	synt	any
	invoke	1
	unmark
	mark	L287
	pnull
	var	14
	pnull
	var	0
	line	53
	colm	18
	synt	any
	field	lh_first
	line	53
	colm	14
	synt	any
	asgn
	unmark
lab L287
lab L288
	line	54
	colm	9
	synt	while
	mark0
	pnull
	var	14
	line	54
	colm	15
	synt	any
	nonnull
	unmark
	mark	L288
	mark	L291
	pnull
	var	42
	pnull
	var	14
	line	55
	colm	22
	synt	any
	field	cn_hd_field
	line	55
	colm	15
	synt	any
	asgn
	unmark
lab L291
	mark	L292
	var	22
	var	42
	line	56
	colm	19
	synt	any
	invoke	1
	unmark
lab L292
	pnull
	var	14
	pnull
	var	14
	line	57
	colm	25
	synt	any
	field	cn_tl_field
	line	57
	colm	18
	synt	any
	asgn
lab L289
	unmark
	goto	L288
lab L290
	line	54
	colm	9
	synt	endwhile
	line	52
	colm	5
	synt	endif
	line	279
	colm	5
	synt	endif
	unmark
lab L286
	mark	L293
	pnull
	var	18
	var	3
	line	283
	colm	11
	synt	any
	asgn
	unmark
lab L293
	mark	L294
	pnull
	var	19
	var	5
	line	284
	colm	20
	synt	any
	asgn
	unmark
lab L294
	mark	L295
	pnull
	var	20
	var	6
	line	285
	colm	21
	synt	any
	asgn
	unmark
lab L295
	pnull
	line	287
	colm	2
	synt	any
	pfail
	end
proc check_sig
	local	0,001000,q
	local	1,000020,p
	local	2,000000,id_last_definition
	local	3,000000,comp_st
	local	4,000000,sig_Signature
	local	5,000000,nil
	local	6,000000,rpt_err
	local	7,000000,getname
	con	0,002000,1,1
	con	1,002000,2,32
	con	2,002000,2,31
	con	3,002000,2,10
	con	4,002000,1,5
	con	5,002000,1,4
	con	6,002000,1,6
	con	7,002000,1,7
	con	8,002000,1,2
	con	9,002000,1,0
	con	10,010000,49,111,144,145,156,164,151,146,151,145,162,040,156,157,164,040,155,145,141,156,151,156,147,146,165,154,154,171,040,142,157,165,156,144,040,164,157,040,141,040,163,151,147,156,141,164,165,162,145,040
	con	11,010000,18,123,151,147,156,141,164,165,162,145,040,145,170,160,145,143,164,145,144
	declend
	line	290
	colm	12
	synt	any
	mark	L1
	pnull
	var	1
	var	0
	line	292
	colm	7
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	line	294
	colm	5
	synt	if
	mark0
	pnull
	var	1
	line	294
	colm	9
	synt	any
	null
	unmark
	mark	L3
	int	0
	line	294
	colm	18
	synt	any
	pret
lab L3
	synt	any
	pfail
	line	294
	colm	5
	synt	endif
	unmark
lab L2
	mark	L4
lab L5
	line	295
	colm	5
	synt	while
	mark0
	mark	L8
	pnull
	pnull
	var	1
	line	295
	colm	18
	synt	any
	field	kind
	int	1
	line	295
	colm	25
	synt	any
	numeq
	line	295
	colm	30
	synt	any
	esusp
	goto	L9
lab L8
	pnull
	pnull
	var	1
	line	295
	colm	34
	synt	any
	field	kind
	int	2
	line	295
	colm	41
	synt	any
	numeq
lab L9
	pop
	pnull
	pnull
	var	1
	line	296
	colm	17
	synt	any
	field	sel_type
	line	296
	colm	12
	synt	any
	null
	pop
	pnull
	var	2
	line	297
	colm	12
	synt	any
	nonnull
	pop
	pnull
	pnull
	pnull
	var	1
	line	298
	colm	14
	synt	any
	field	id_last_definition
	line	298
	colm	35
	synt	any
	field	kind
	int	0
	line	298
	colm	42
	synt	any
	numeq
	pop
	pnull
	pnull
	pnull
	var	1
	line	299
	colm	17
	synt	any
	field	id_last_definition
	line	299
	colm	38
	synt	any
	field	decl_sig_transp
	line	299
	colm	12
	synt	any
	nonnull
	pop
	pnull
	pnull
	pnull
	var	1
	line	300
	colm	15
	synt	any
	field	id_last_definition
	line	300
	colm	36
	synt	any
	field	post_num
	pnull
	var	1
	line	300
	colm	51
	synt	any
	field	post_num
	line	300
	colm	47
	synt	any
	numlt
	unmark
	mark	L5
	pnull
	var	1
	pnull
	pnull
	var	1
	line	301
	colm	23
	synt	any
	field	id_last_definition
	line	301
	colm	44
	synt	any
	field	decl_denotation
	line	301
	colm	18
	synt	any
	asgn
lab L6
	unmark
	goto	L5
lab L7
	line	295
	colm	5
	synt	endwhile
	unmark
lab L4
	mark	L10
	line	304
	colm	5
	synt	if
	mark0
	pnull
	pnull
	var	1
	line	304
	colm	11
	synt	any
	field	kind
	int	3
	line	304
	colm	18
	synt	any
	numne
	pop
	pnull
	pnull
	var	1
	line	305
	colm	10
	synt	any
	field	kind
	int	4
	line	305
	colm	16
	synt	any
	numne
	pop
	pnull
	pnull
	var	1
	line	306
	colm	10
	synt	any
	field	kind
	int	5
	line	306
	colm	16
	synt	any
	numne
	pop
	pnull
	pnull
	var	1
	line	307
	colm	10
	synt	any
	field	kind
	int	6
	line	307
	colm	16
	synt	any
	numne
	pop
	pnull
	pnull
	var	1
	line	308
	colm	10
	synt	any
	field	kind
	int	7
	line	308
	colm	16
	synt	any
	numne
	unmark
	line	310
	colm	13
	synt	ifelse
	mark	L11
	mark	L13
	pnull
	pnull
	var	1
	line	310
	colm	19
	synt	any
	field	kind
	int	1
	line	310
	colm	26
	synt	any
	numeq
	line	310
	colm	31
	synt	any
	esusp
	goto	L14
lab L13
	pnull
	pnull
	var	1
	line	310
	colm	35
	synt	any
	field	kind
	int	2
	line	310
	colm	42
	synt	any
	numeq
lab L14
	unmark
	line	311
	colm	17
	synt	if
	mark0
	mark	L15
	pnull
	pnull
	var	1
	line	311
	colm	26
	synt	any
	field	id_last_definition
	line	311
	colm	21
	synt	any
	null
	line	311
	colm	48
	synt	any
	esusp
	goto	L16
lab L15
	mark	L17
	pnull
	pnull
	pnull
	var	1
	line	312
	colm	23
	synt	any
	field	id_last_definition
	line	312
	colm	44
	synt	any
	field	kind
	int	8
	line	312
	colm	51
	synt	any
	numne
	line	312
	colm	56
	synt	any
	esusp
	goto	L18
lab L17
	pnull
	var	3
	pnull
	pnull
	var	1
	line	313
	colm	31
	synt	any
	field	id_last_definition
	line	313
	colm	52
	synt	any
	field	par_signature
	var	4
	var	5
	var	5
	line	313
	colm	28
	synt	any
	invoke	4
	int	9
	line	314
	colm	54
	synt	any
	numne
lab L18
lab L16
	unmark
	var	6
	pnull
	str	10
	var	7
	pnull
	var	0
	line	315
	colm	106
	synt	any
	field	id_str_table_index
	line	315
	colm	103
	synt	any
	invoke	1
	line	315
	colm	93
	synt	any
	cat
	line	315
	colm	40
	synt	any
	invoke	1
	line	311
	colm	17
	synt	endif
	goto	L12
lab L11
	var	6
	str	11
	line	318
	colm	24
	synt	any
	invoke	1
lab L12
	line	310
	colm	13
	synt	endifelse
	line	304
	colm	5
	synt	endif
	unmark
lab L10
	pnull
	line	322
	colm	1
	synt	any
	pfail
	end
