139 lines
		
	
	
		
			4.9 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
			
		
		
	
	
			139 lines
		
	
	
		
			4.9 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
| %{
 | |
| /* fixit.l - convert long external names to names of 8-bytes or less */
 | |
| /* 
 | |
|  * This program is included to satisfy "dumb" compilers/linkers which 
 | |
|  * do not know about externals of names longer than 8 bytes.
 | |
|  *
 | |
|  *  Steven W. Layten
 | |
|  *  Chemical Abstracts Service
 | |
|  *  PO BOX 3012
 | |
|  *  Columbus, OH 43210
 | |
|  */
 | |
| %}
 | |
| %%
 | |
| "action_file_name"			printf("actfilnm");
 | |
| "action_out"				printf("actnout");
 | |
| "add_accept"				printf("addacpt");
 | |
| "all_lower"				printf("alllower");
 | |
| "all_upper"				printf("allupper");
 | |
| "allocate_array"			printf("allocarr");
 | |
| "assoc_rule"				printf("asscrule");
 | |
| "backtrack_file"			printf("bktrkfil");
 | |
| "backtrack_report"			printf("bktrkrep");
 | |
| "bol_needed"				printf("bol_nded");
 | |
| "build_eof_action"			printf("bldeofac");
 | |
| "cclinstal"				printf("cclnstal");
 | |
| "ccllookup"				printf("ccllookp");
 | |
| "cclnegate"				printf("cclnegat");
 | |
| "cclsorted"				printf("cclsrted");
 | |
| "check_for_backtracking"		printf("ck4bktrk");
 | |
| "check_trailing_context"		printf("cktrlcnt");
 | |
| "continued_action"			printf("cntdactn");
 | |
| "copy_string"				printf("copystrn");
 | |
| "copy_unsigned_string"			printf("cpunsstr");
 | |
| "copyright"				printf("cpyrght");
 | |
| "copysingl"				printf("copysngl");
 | |
| "current_max_ccl_tbl_size"		printf("c_mx_ccl");
 | |
| "current_max_dfa_size"			printf("c_mx_dfa");
 | |
| "current_max_dfas"			printf("c_mxdfas");
 | |
| "current_max_rules"			printf("curmxrls");
 | |
| "current_max_scs"			printf("c_mx_scs");
 | |
| "current_max_template_xpairs"		printf("c_mx_tmp");
 | |
| "current_max_xpairs"			printf("c_mx_xpr");
 | |
| "current_maxccls"			printf("c_mxccls");
 | |
| "current_mns"				printf("curr_mns");
 | |
| "current_state_type"			printf("cursttyp");
 | |
| "dataflush"				printf("datflush");
 | |
| "dfaacc_union"				printf("dfacunin");
 | |
| "do_indent"				printf("do_indnt");
 | |
| "dump_associated_rules"			printf("dmpasrl");
 | |
| "dump_transitions"			printf("dmptrns");
 | |
| "dupmachine"				printf("dupmach");
 | |
| "ecs_from_xlation"			printf("ecsfrmxt");
 | |
| "end_of_buffer_state"			printf("eobstate");
 | |
| "epsclosure"				printf("epsclos");
 | |
| "expand_nxt_chk"			printf("expnxtck");
 | |
| "find_table_space"			printf("fndtblsp");
 | |
| "finish_rule"				printf("fnshrule");
 | |
| "firstfree"				printf("firstfre");
 | |
| "firstprot"				printf("firstprt");
 | |
| "flex_gettime"				printf("flxgettm");
 | |
| "flexerror"				printf("flxerror");
 | |
| "flexfatal"				printf("flxfatal");
 | |
| "format_pinpoint_message"		printf("fmtptmsg");
 | |
| "gen_NUL_trans"				printf("gnNULtrn");
 | |
| "gen_backtracking"			printf("gnbktrkg");
 | |
| "gen_bt_action"				printf("gnbtactn");
 | |
| "gen_find_action"			printf("gnfndact");
 | |
| "gen_line_dirs"				printf("gnlindir");
 | |
| "gen_next_compressed_state"		printf("gnnxcste");
 | |
| "gen_next_match"			printf("gnnxmtch");
 | |
| "gen_next_state"			printf("gnnxtst");
 | |
| "gen_start_state"			printf("gnstrtst");
 | |
| "hash_entry"				printf("hshentry");
 | |
| "hashfunct"				printf("hshfct");
 | |
| "increase_max_dfas"			printf("incmxdfa");
 | |
| "indent_put2s"				printf("indput2s");
 | |
| "indent_puts"				printf("indputs");
 | |
| "infilename"				printf("infilnam");
 | |
| "input_files"				printf("inp_fles");
 | |
| "interactive"				printf("intractv");
 | |
| "line_directive_out"			printf("lndirout");
 | |
| "link_machines"				printf("lnkmchns");
 | |
| "list_character_set"			printf("lst_cset");
 | |
| "make_tables"				printf("maketbls");
 | |
| "mark_beginning_as_normal"		printf("mkbgnorm");
 | |
| "mktemplate"				printf("mktmplat");
 | |
| "num_backtracking"			printf("nbktrckg");
 | |
| "num_input_files"			printf("ninfiles");
 | |
| "num_reallocs"				printf("numraloc");
 | |
| "num_rules"				printf("numrules");
 | |
| "num_xlations"				printf("nuxlatns");
 | |
| "numsnpairs"				printf("numnpair");
 | |
| "output_file_name"			printf("outfilnm");
 | |
| "peakpairs"				printf("peakpair");
 | |
| "performance_report"			printf("perf_rep");
 | |
| "pinpoint_message"			printf("pptmsg");
 | |
| "place_state"				printf("plcstate");
 | |
| "previous_continued_action"		printf("prvctdan");
 | |
| "printstats"				printf("prtstats");
 | |
| "program_name"				printf("pgm_name");
 | |
| "protcomst"				printf("prtcomst");
 | |
| "readable_form"				printf("rdblefrm");
 | |
| "real_reject"				printf("realrjct");
 | |
| "reallocate_array"			printf("rallocar");
 | |
| "reject_really_used"			printf("rjctused");
 | |
| "rule_linenum"				printf("rulelnno");
 | |
| "rule_type"				printf("ruletype");
 | |
| "set_input_file"			printf("stinpfle");
 | |
| "set_up_initial_allocations"		printf("setupia");
 | |
| "starttime"				printf("startime");
 | |
| "state_type"				printf("ste_type");
 | |
| "symfollowset"				printf("symfollo");
 | |
| "sympartition"				printf("sympartn");
 | |
| "syntaxerror"				printf("syntxerr");
 | |
| "temp_action_file"			printf("tmpactfl");
 | |
| "todo_head"				printf("todohead");
 | |
| "todo_next"				printf("todonext");
 | |
| "transchar"				printf("trnschar");
 | |
| "transition_struct_out"			printf("trnstout");
 | |
| "trlcontxt"				printf("trlcntxt");
 | |
| "variable_trail_rule"			printf("vtrailrl");
 | |
| "variable_trailing_context_rules"	printf("vtrlctrl");
 | |
| "varlength"				printf("varlngth");
 | |
| "yy_create_buffer"			printf("yycrbffr");
 | |
| "yy_delete_buffer"			printf("yydlbffr");
 | |
| "yy_init_buffer"			printf("yyinbffr");
 | |
| "yy_load_buffer_state"			printf("yyldbfst");
 | |
| "yy_switch_to_buffer"			printf("yyswtobf");
 | |
| "yyerrflag"				printf("yyerrflg");
 | |
| "yymore_really_used"			printf("yymrreus");
 | |
| "yymore_used"				printf("yymrused");
 | |
| "yyrestart"				printf("yyrestrt");
 | |
| .					ECHO;
 | |
| %%
 | |
| main()
 | |
| {
 | |
|     yylex();
 | |
| }
 | 
