X-Git-Url: https://git.saurik.com/bison.git/blobdiff_plain/401b73afdf9694e0d9380968ebfd21d837045a2c..7aaaad6c6dc0fae412d608dcf20a3977d8902cd1:/src/scan-skel.l?ds=sidebyside diff --git a/src/scan-skel.l b/src/scan-skel.l index f342604b..284a1207 100644 --- a/src/scan-skel.l +++ b/src/scan-skel.l @@ -1,7 +1,6 @@ /* Scan Bison Skeletons. -*- C -*- - Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008-2009 - Free Software Foundation, Inc. + Copyright (C) 2001-2012 Free Software Foundation, Inc. This file is part of Bison, the GNU Compiler Compiler. @@ -59,7 +58,7 @@ static void fail_for_invalid_at (char const *at); %% %{ - int out_lineno IF_LINT (= 0); + int out_lineno PACIFY_CC (= 0); char *outname = NULL; /* Currently, only the @warn, @complain, @fatal, @warn_at, @complain_at, and @@ -73,12 +72,11 @@ static void fail_for_invalid_at (char const *at); "@@" fputc ('@', yyout); "@{" fputc ('[', yyout); "@}" fputc (']', yyout); -"@`" /* Emtpy. Used by b4_cat in ../data/bison.m4. */ +"@`" /* Empty. Used by b4_cat in ../data/bison.m4. */ @\n /* Likewise. */ "@oline@" fprintf (yyout, "%d", out_lineno + 1); "@ofile@" QPUTS (outname); -"@dir_prefix@" QPUTS (dir_prefix); @[a-z_]+"(" { yytext[yyleng-1] = '\0'; @@ -90,8 +88,8 @@ static void fail_for_invalid_at (char const *at); /* This pattern must not match more than the previous @ patterns. */ @[^@{}`(\n]* fail_for_invalid_at (yytext); -\n out_lineno++; ECHO; -[^@\n]+ ECHO; +\n out_lineno++; ECHO; +[^@\n]+ ECHO; <> { if (outname) @@ -108,7 +106,7 @@ static void fail_for_invalid_at (char const *at); "@@" { obstack_1grow (&obstack_for_string, '@'); } "@{" { obstack_1grow (&obstack_for_string, '['); } "@}" { obstack_1grow (&obstack_for_string, ']'); } - "@`" /* Emtpy. Useful for starting an argument + "@`" /* Empty. Useful for starting an argument that begins with whitespace. */ @\n /* Empty. */ @@ -175,20 +173,20 @@ skel_scanner_free (void) yylex_destroy (); } -static -void at_directive_perform (int at_directive_argc, - char *at_directive_argv[], - char **outnamep, int *out_linenop) +static void +at_directive_perform (int at_directive_argc, + char *at_directive_argv[], + char **outnamep, int *out_linenop) { - if (0 == strcmp (at_directive_argv[0], "@basename")) + if (STREQ (at_directive_argv[0], "@basename")) { if (at_directive_argc > 2) fail_for_at_directive_too_many_args (at_directive_argv[0]); fputs (last_component (at_directive_argv[1]), yyout); } - else if (0 == strcmp (at_directive_argv[0], "@warn") - || 0 == strcmp (at_directive_argv[0], "@complain") - || 0 == strcmp (at_directive_argv[0], "@fatal")) + else if (STREQ (at_directive_argv[0], "@warn") + || STREQ (at_directive_argv[0], "@complain") + || STREQ (at_directive_argv[0], "@fatal")) { void (*func)(char const *, ...); switch (at_directive_argv[0][1]) @@ -224,9 +222,9 @@ void at_directive_perform (int at_directive_argc, break; } } - else if (0 == strcmp (at_directive_argv[0], "@warn_at") - || 0 == strcmp (at_directive_argv[0], "@complain_at") - || 0 == strcmp (at_directive_argv[0], "@fatal_at")) + else if (STREQ (at_directive_argv[0], "@warn_at") + || STREQ (at_directive_argv[0], "@complain_at") + || STREQ (at_directive_argv[0], "@fatal_at")) { void (*func)(location, char const *, ...); location loc; @@ -267,7 +265,7 @@ void at_directive_perform (int at_directive_argc, break; } } - else if (0 == strcmp (at_directive_argv[0], "@output")) + else if (STREQ (at_directive_argv[0], "@output")) { if (at_directive_argc > 2) fail_for_at_directive_too_many_args (at_directive_argv[0]); @@ -277,7 +275,7 @@ void at_directive_perform (int at_directive_argc, xfclose (yyout); } *outnamep = xstrdup (at_directive_argv[1]); - output_file_name_check (*outnamep); + output_file_name_check (outnamep); yyout = xfopen (*outnamep, "w"); *out_linenop = 1; }