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