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 } 139