1%{
2/* fixit.l - convert long external names to names of 8-bytes or less */
3/*
4 * This program is included to satisfy "dumb" compilers/linkers which
5 * do not know about externals of names longer than 8 bytes.
6 *
7 *  Steven W. Layten
8 *  Chemical Abstracts Service
9 *  PO BOX 3012
10 *  Columbus, OH 43210
11 */
12%}
13%%
14"action_file_name"			printf("actfilnm");
15"action_out"				printf("actnout");
16"add_accept"				printf("addacpt");
17"all_lower"				printf("alllower");
18"all_upper"				printf("allupper");
19"allocate_array"			printf("allocarr");
20"assoc_rule"				printf("asscrule");
21"backtrack_file"			printf("bktrkfil");
22"backtrack_report"			printf("bktrkrep");
23"bol_needed"				printf("bol_nded");
24"build_eof_action"			printf("bldeofac");
25"cclinstal"				printf("cclnstal");
26"ccllookup"				printf("ccllookp");
27"cclnegate"				printf("cclnegat");
28"cclsorted"				printf("cclsrted");
29"check_for_backtracking"		printf("ck4bktrk");
30"check_trailing_context"		printf("cktrlcnt");
31"continued_action"			printf("cntdactn");
32"copy_string"				printf("copystrn");
33"copy_unsigned_string"			printf("cpunsstr");
34"copyright"				printf("cpyrght");
35"copysingl"				printf("copysngl");
36"current_max_ccl_tbl_size"		printf("c_mx_ccl");
37"current_max_dfa_size"			printf("c_mx_dfa");
38"current_max_dfas"			printf("c_mxdfas");
39"current_max_rules"			printf("curmxrls");
40"current_max_scs"			printf("c_mx_scs");
41"current_max_template_xpairs"		printf("c_mx_tmp");
42"current_max_xpairs"			printf("c_mx_xpr");
43"current_maxccls"			printf("c_mxccls");
44"current_mns"				printf("curr_mns");
45"current_state_type"			printf("cursttyp");
46"dataflush"				printf("datflush");
47"dfaacc_union"				printf("dfacunin");
48"do_indent"				printf("do_indnt");
49"dump_associated_rules"			printf("dmpasrl");
50"dump_transitions"			printf("dmptrns");
51"dupmachine"				printf("dupmach");
52"ecs_from_xlation"			printf("ecsfrmxt");
53"end_of_buffer_state"			printf("eobstate");
54"epsclosure"				printf("epsclos");
55"expand_nxt_chk"			printf("expnxtck");
56"find_table_space"			printf("fndtblsp");
57"finish_rule"				printf("fnshrule");
58"firstfree"				printf("firstfre");
59"firstprot"				printf("firstprt");
60"flex_gettime"				printf("flxgettm");
61"flexerror"				printf("flxerror");
62"flexfatal"				printf("flxfatal");
63"format_pinpoint_message"		printf("fmtptmsg");
64"gen_NUL_trans"				printf("gnNULtrn");
65"gen_backtracking"			printf("gnbktrkg");
66"gen_bt_action"				printf("gnbtactn");
67"gen_find_action"			printf("gnfndact");
68"gen_line_dirs"				printf("gnlindir");
69"gen_next_compressed_state"		printf("gnnxcste");
70"gen_next_match"			printf("gnnxmtch");
71"gen_next_state"			printf("gnnxtst");
72"gen_start_state"			printf("gnstrtst");
73"hash_entry"				printf("hshentry");
74"hashfunct"				printf("hshfct");
75"increase_max_dfas"			printf("incmxdfa");
76"indent_put2s"				printf("indput2s");
77"indent_puts"				printf("indputs");
78"infilename"				printf("infilnam");
79"input_files"				printf("inp_fles");
80"interactive"				printf("intractv");
81"line_directive_out"			printf("lndirout");
82"link_machines"				printf("lnkmchns");
83"list_character_set"			printf("lst_cset");
84"make_tables"				printf("maketbls");
85"mark_beginning_as_normal"		printf("mkbgnorm");
86"mktemplate"				printf("mktmplat");
87"num_backtracking"			printf("nbktrckg");
88"num_input_files"			printf("ninfiles");
89"num_reallocs"				printf("numraloc");
90"num_rules"				printf("numrules");
91"num_xlations"				printf("nuxlatns");
92"numsnpairs"				printf("numnpair");
93"output_file_name"			printf("outfilnm");
94"peakpairs"				printf("peakpair");
95"performance_report"			printf("perf_rep");
96"pinpoint_message"			printf("pptmsg");
97"place_state"				printf("plcstate");
98"previous_continued_action"		printf("prvctdan");
99"printstats"				printf("prtstats");
100"program_name"				printf("pgm_name");
101"protcomst"				printf("prtcomst");
102"readable_form"				printf("rdblefrm");
103"real_reject"				printf("realrjct");
104"reallocate_array"			printf("rallocar");
105"reject_really_used"			printf("rjctused");
106"rule_linenum"				printf("rulelnno");
107"rule_type"				printf("ruletype");
108"set_input_file"			printf("stinpfle");
109"set_up_initial_allocations"		printf("setupia");
110"starttime"				printf("startime");
111"state_type"				printf("ste_type");
112"symfollowset"				printf("symfollo");
113"sympartition"				printf("sympartn");
114"syntaxerror"				printf("syntxerr");
115"temp_action_file"			printf("tmpactfl");
116"todo_head"				printf("todohead");
117"todo_next"				printf("todonext");
118"transchar"				printf("trnschar");
119"transition_struct_out"			printf("trnstout");
120"trlcontxt"				printf("trlcntxt");
121"variable_trail_rule"			printf("vtrailrl");
122"variable_trailing_context_rules"	printf("vtrlctrl");
123"varlength"				printf("varlngth");
124"yy_create_buffer"			printf("yycrbffr");
125"yy_delete_buffer"			printf("yydlbffr");
126"yy_init_buffer"			printf("yyinbffr");
127"yy_load_buffer_state"			printf("yyldbfst");
128"yy_switch_to_buffer"			printf("yyswtobf");
129"yyerrflag"				printf("yyerrflg");
130"yymore_really_used"			printf("yymrreus");
131"yymore_used"				printf("yymrused");
132"yyrestart"				printf("yyrestrt");
133.					ECHO;
134%%
135main()
136{
137    yylex();
138}
139