version	U12.1.00
uid	stt.tmp.u1-1465100062-0
impl	error
global	256
	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,stt_enter,1
	253,000005,getname,1
	254,000005,build_Idtable,0
	255,000005,list_Idtable,0

proc stt_enter
	local	0,001000,stt_id
	local	1,000020,it
	local	2,000040,sttnstrings
	local	3,000000,yyinfo
	local	4,000000,stt_table
	local	5,000000,reverse_stt
	local	6,000000,stt_unique_cnt
	local	7,000000,stt_reference_cnt
	con	0,002000,1,1
	con	1,010000,19,163,164,164,040,145,156,164,145,162,040,163,164,164,040,151,144,040,075,040
	con	2,002000,1,0
	con	3,010000,10,163,164,164,040,160,141,164,150,040,061
	con	4,010000,25,163,164,164,040,160,141,164,150,040,061,040,163,164,164,156,163,164,162,151,156,147,163,040,075,040
	con	5,010000,10,163,164,164,040,160,141,164,150,040,062
	con	6,010000,16,163,164,164,040,160,141,164,150,040,062,040,151,164,040,075,040
	declend
	filen	pass1/stt/stt.tmp.icn
	line	261
	colm	12
	synt	any
lab L1
	init	L3
	mark	L2
	pnull
	var	2
	int	0
	line	264
	colm	25
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L4
	var	3
	pnull
	str	1
	var	0
	line	265
	colm	33
	synt	any
	cat
	line	265
	colm	10
	synt	any
	invoke	1
	unmark
lab L4
	mark	L5
	line	266
	colm	5
	synt	ifelse
	mark	L6
	pnull
	pnull
	var	4
	var	0
	line	266
	colm	18
	synt	any
	subsc
	int	2
	line	266
	colm	27
	synt	any
	numle
	unmark
	mark	L8
	var	3
	str	3
	line	268
	colm	15
	synt	any
	invoke	1
	unmark
lab L8
	mark	L9
	var	3
	pnull
	str	4
	var	2
	line	269
	colm	44
	synt	any
	cat
	line	269
	colm	15
	synt	any
	invoke	1
	unmark
lab L9
	mark	L10
	pnull
	pnull
	var	4
	var	0
	line	270
	colm	18
	synt	any
	subsc
	var	2
	line	270
	colm	27
	synt	any
	asgn
	unmark
lab L10
	mark	L11
	pnull
	var	5
	dup
	pnull
	var	0
	line	271
	colm	27
	synt	any
	llist	1
	line	271
	colm	21
	synt	any
	lconcat
	asgn
	unmark
lab L11
	mark	L12
	pnull
	var	6
	dup
	int	0
	line	272
	colm	24
	synt	any
	plus
	asgn
	unmark
lab L12
	mark	L13
	pnull
	var	2
	dup
	int	0
	line	273
	colm	21
	synt	any
	plus
	asgn
	unmark
lab L13
	mark	L14
	pnull
	var	2
	int	0
	line	274
	colm	28
	synt	any
	minus
	line	274
	colm	9
	synt	any
	pret
lab L14
	synt	any
	pfail
	goto	L7
lab L6
	mark	L15
	var	3
	str	5
	line	277
	colm	15
	synt	any
	invoke	1
	unmark
lab L15
	mark	L16
	pnull
	var	7
	dup
	int	0
	line	278
	colm	27
	synt	any
	plus
	asgn
	unmark
lab L16
	mark	L17
	pnull
	var	1
	pnull
	var	4
	var	0
	line	279
	colm	24
	synt	any
	subsc
	line	279
	colm	12
	synt	any
	asgn
	unmark
lab L17
	mark	L18
	var	3
	pnull
	str	6
	var	1
	line	280
	colm	35
	synt	any
	cat
	line	280
	colm	15
	synt	any
	invoke	1
	unmark
lab L18
	mark	L19
	var	1
	line	281
	colm	9
	synt	any
	pret
lab L19
	synt	any
	pfail
lab L7
	line	266
	colm	5
	synt	endifelse
	unmark
lab L5
	pnull
	line	283
	colm	1
	synt	any
	pfail
	end
proc getname
	local	0,001000,rpt
	local	1,000000,yyinfo
	local	2,000000,reverse_stt
	con	0,010000,14,147,145,164,156,141,155,145,040,162,160,164,040,075,040
	con	1,010000,15,050,154,157,143,141,154,040,164,171,160,145,040,151,144,051
	declend
	line	291
	colm	12
	synt	any
	mark	L1
	var	1
	pnull
	str	0
	var	0
	line	292
	colm	25
	synt	any
	cat
	line	292
	colm	7
	synt	any
	invoke	1
	unmark
lab L1
	mark	L2
	line	293
	colm	5
	synt	ifelse
	mark	L3
	pnull
	var	0
	line	293
	colm	9
	synt	any
	null
	unmark
	mark	L5
	str	1
	line	294
	colm	9
	synt	any
	pret
lab L5
	synt	any
	pfail
	goto	L4
lab L3
	mark	L6
	pnull
	var	2
	var	0
	line	296
	colm	28
	synt	any
	subsc
	line	296
	colm	9
	synt	any
	pret
lab L6
	synt	any
	pfail
lab L4
	line	293
	colm	5
	synt	endifelse
	unmark
lab L2
	pnull
	line	298
	colm	1
	synt	any
	pfail
	end
proc build_Idtable
	local	0,000020,x
	local	1,000000,Idtable
	local	2,000000,table
	local	3,000000,nil
	local	4,000000,key
	local	5,000000,stt_table
	local	6,000000,write
	local	7,000000,stderr
	con	0,010000,18,142,165,151,154,144,137,111,144,164,141,142,154,145,040,170,040,075,040
	con	1,010000,11,040,163,145,164,040,164,157,040,156,151,154
	con	2,002000,1,1
	declend
	line	309
	colm	12
	synt	any
lab L1
	init	L3
	mark	L2
	pnull
	var	1
	var	2
	var	3
	line	311
	colm	29
	synt	any
	invoke	1
	line	311
	colm	21
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L4
	line	312
	colm	5
	synt	every
	mark0
	pnull
	var	0
	var	4
	var	5
	line	312
	colm	19
	synt	any
	invoke	1
	line	312
	colm	13
	synt	any
	asgn
	pop
	mark0
	mark	L7
	var	6
	var	7
	pnull
	pnull
	str	0
	var	0
	line	314
	colm	47
	synt	any
	cat
	str	1
	line	314
	colm	52
	synt	any
	cat
	line	314
	colm	18
	synt	any
	invoke	2
	unmark
lab L7
	pnull
	pnull
	var	1
	var	0
	line	315
	colm	20
	synt	any
	subsc
	var	3
	line	315
	colm	24
	synt	any
	asgn
	unmark
lab L5
	efail
lab L6
	line	312
	colm	5
	synt	endevery
	unmark
lab L4
	mark	L8
	mark	L9
	int	2
	line	317
	colm	1
	synt	any
	pret
lab L9
	synt	any
	pfail
	unmark
lab L8
	pnull
	line	318
	colm	2
	synt	any
	pfail
	end
proc list_Idtable
	local	0,000020,symlist
	local	1,000020,x
	local	2,000020,i
	local	3,000000,write
	local	4,000000,symfile
	local	5,000000,left
	local	6,000000,sort
	local	7,000000,Idtable
	local	8,000000,get
	local	9,000000,writes
	local	10,000000,stt_table
	local	11,000000,dump_info
	local	12,000000,reverse_stt
	con	0,010000,13,101,114,120,110,101,040,114,111,123,124,111,116,107
	con	1,010000,6,123,171,155,142,157,154
	con	2,002000,2,20
	con	3,010000,5,111,156,144,145,170
	con	4,010000,11,101,163,163,157,143,151,141,164,151,157,156
	con	5,002000,1,3
	con	6,010000,1,040
	con	7,010000,18,116,125,115,105,122,111,111,103,101,114,040,114,111,123,124,111,116,107
	con	8,002000,1,1
	declend
	line	320
	colm	12
	synt	any
	mark	L1
	var	3
	var	4
	str	0
	line	322
	colm	6
	synt	any
	invoke	2
	unmark
lab L1
	mark	L2
	var	3
	var	4
	pnull
	pnull
	var	5
	str	1
	int	2
	line	323
	colm	19
	synt	any
	invoke	2
	var	5
	str	3
	int	2
	line	323
	colm	40
	synt	any
	invoke	2
	line	323
	colm	33
	synt	any
	cat
	str	4
	line	323
	colm	53
	synt	any
	cat
	line	323
	colm	6
	synt	any
	invoke	2
	unmark
lab L2
	mark	L3
	pnull
	var	0
	var	6
	var	7
	int	5
	line	324
	colm	16
	synt	any
	invoke	2
	line	324
	colm	9
	synt	any
	asgn
	unmark
lab L3
	mark	L4
lab L5
	line	325
	colm	1
	synt	while
	mark0
	pnull
	var	1
	var	8
	var	0
	line	325
	colm	16
	synt	any
	invoke	1
	line	325
	colm	10
	synt	any
	asgn
	unmark
	mark	L5
	mark	L8
	var	9
	var	4
	var	5
	var	1
	int	2
	line	327
	colm	28
	synt	any
	invoke	2
	line	327
	colm	15
	synt	any
	invoke	2
	unmark
lab L8
	mark	L9
	var	9
	var	4
	var	5
	pnull
	var	10
	var	1
	line	328
	colm	38
	synt	any
	subsc
	int	2
	line	328
	colm	28
	synt	any
	invoke	2
	line	328
	colm	15
	synt	any
	invoke	2
	unmark
lab L9
	mark	L10
	var	9
	var	4
	var	11
	var	8
	var	0
	line	329
	colm	37
	synt	any
	invoke	1
	line	329
	colm	33
	synt	any
	invoke	1
	line	329
	colm	15
	synt	any
	invoke	2
	unmark
lab L10
	var	3
	var	4
	str	6
	line	330
	colm	14
	synt	any
	invoke	2
lab L6
	unmark
	goto	L5
lab L7
	line	325
	colm	1
	synt	endwhile
	unmark
lab L4
	mark	L11
	var	3
	var	4
	str	7
	line	332
	colm	6
	synt	any
	invoke	2
	unmark
lab L11
	mark	L12
	var	3
	var	4
	pnull
	pnull
	var	5
	str	1
	int	2
	line	333
	colm	19
	synt	any
	invoke	2
	var	5
	str	3
	int	2
	line	333
	colm	40
	synt	any
	invoke	2
	line	333
	colm	33
	synt	any
	cat
	str	4
	line	333
	colm	53
	synt	any
	cat
	line	333
	colm	6
	synt	any
	invoke	2
	unmark
lab L12
	mark	L13
	pnull
	var	2
	int	8
	line	334
	colm	3
	synt	any
	asgn
	unmark
lab L13
	mark	L14
lab L15
	line	335
	colm	2
	synt	while
	mark0
	pnull
	var	2
	pnull
	var	12
	line	335
	colm	12
	synt	any
	size
	line	335
	colm	10
	synt	any
	numlt
	unmark
	mark	L15
	mark	L18
	var	9
	var	4
	var	5
	pnull
	var	12
	var	2
	line	337
	colm	40
	synt	any
	subsc
	int	2
	line	337
	colm	28
	synt	any
	invoke	2
	line	337
	colm	15
	synt	any
	invoke	2
	unmark
lab L18
	mark	L19
	var	9
	var	4
	var	5
	var	2
	int	2
	line	338
	colm	28
	synt	any
	invoke	2
	line	338
	colm	15
	synt	any
	invoke	2
	unmark
lab L19
	mark	L20
	var	9
	var	4
	var	11
	pnull
	var	7
	pnull
	var	12
	var	2
	line	339
	colm	54
	synt	any
	subsc
	line	339
	colm	42
	synt	any
	subsc
	line	339
	colm	34
	synt	any
	invoke	1
	line	339
	colm	15
	synt	any
	invoke	2
	unmark
lab L20
	mark	L21
	var	3
	var	4
	str	6
	line	340
	colm	14
	synt	any
	invoke	2
	unmark
lab L21
	pnull
	var	2
	dup
	int	8
	line	341
	colm	11
	synt	any
	plus
	asgn
lab L16
	unmark
	goto	L15
lab L17
	line	335
	colm	2
	synt	endwhile
	unmark
lab L14
	mark	L22
	mark	L23
	int	8
	line	343
	colm	1
	synt	any
	pret
lab L23
	synt	any
	pfail
	unmark
lab L22
	pnull
	line	344
	colm	2
	synt	any
	pfail
	end
