X-Git-Url: https://git.saurik.com/bison.git/blobdiff_plain/dc9701e848f27ae64b6ddcf809580998667d60f2..2b81e969ea04c1a6502928ba7e847ec8ff7dcb2f:/src/scan-skel.l diff --git a/src/scan-skel.l b/src/scan-skel.l index 951a9fda..4f34a6c6 100644 --- a/src/scan-skel.l +++ b/src/scan-skel.l @@ -31,21 +31,7 @@ #include "complain.h" #include "getargs.h" #include "files.h" - -int skel_lex (void); - -/* Pacify "gcc -Wmissing-prototypes" when flex 2.5.31 is used. */ -int skel_get_lineno (void); -FILE *skel_get_in (void); -FILE *skel_get_out (void); -int skel_get_leng (void); -char *skel_get_text (void); -void skel_set_lineno (int); -void skel_set_in (FILE *); -void skel_set_out (FILE *); -int skel_get_debug (void); -void skel_set_debug (int); -int skel_lex_destroy (void); +#include "scan-skel.h" #define QPUTS(String) \ fputs (quotearg_style (c_quoting_style, (String)), yyout) @@ -59,15 +45,15 @@ int skel_lex_destroy (void); %} "@output ".*\n { - char const *filename = yytext + sizeof "@output " - 1; + char const *file_name = yytext + sizeof "@output " - 1; yytext[yyleng - 1] = '\0'; - if (*filename == '@') + if (*file_name == '@') { - if (strcmp (filename, "@output_header_name@") == 0) - filename = spec_defines_file; - else if (strcmp (filename, "@output_parser_name@") == 0) - filename = parser_file_name; + if (strcmp (file_name, "@output_header_name@") == 0) + file_name = spec_defines_file; + else if (strcmp (file_name, "@output_parser_name@") == 0) + file_name = parser_file_name; else fatal ("invalid token in skeleton: %s", yytext); } @@ -77,7 +63,7 @@ int skel_lex_destroy (void); free (outname); xfclose (yyout); } - outname = xstrdup (filename); + outname = xstrdup (file_name); yyout = xfopen (outname, "w"); lineno = 1; } @@ -88,6 +74,7 @@ int skel_lex_destroy (void); "@oline@" fprintf (yyout, "%d", lineno + 1); "@ofile@" QPUTS (outname); +"@dir_prefix@" QPUTS (dir_prefix); "@output_parser_name@" QPUTS (parser_file_name); "@output_header_name@" QPUTS (spec_defines_file); @@ -110,8 +97,6 @@ int skel_lex_destroy (void); | Scan a Bison skeleton. | `------------------------*/ -void scan_skel (FILE *); - void scan_skel (FILE *in) {