| blob | 3e15b6fa42a57b2646c415627a37cbfa5bb182f3 |
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 %%
135 main()
136 {
137 yylex();
138 }