X-Git-Url: https://git.saurik.com/bison.git/blobdiff_plain/7dc4a6940c964d3650fecc6a0c99d8e191517086..a17187e56386747a9b4d9633c3d116c2087f2b8b:/src/scan-skel.l?ds=sidebyside diff --git a/src/scan-skel.l b/src/scan-skel.l index 6ef53511..e15294a1 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 Free Software - Foundation, Inc. + Copyright (C) 2001-2012 Free Software Foundation, Inc. This file is part of Bison, the GNU Compiler Compiler. @@ -18,7 +17,7 @@ You should have received a copy of the GNU General Public License along with this program. If not, see . */ -%option nodefault noyywrap nounput never-interactive debug +%option nodefault noyywrap noinput nounput never-interactive debug %option prefix="skel_" outfile="lex.yy.c" %{ @@ -28,16 +27,16 @@ #define skel_wrap() 1 #define FLEX_PREFIX(Id) skel_ ## Id -#include "flex-scanner.h" +#include #include #include #include -#include "complain.h" -#include "getargs.h" -#include "files.h" -#include "scan-skel.h" +#include +#include +#include +#include #define YY_DECL static int skel_lex (void) YY_DECL; @@ -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,7 +72,7 @@ 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); @@ -90,8 +89,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 +107,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 +174,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 +223,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 +266,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 +276,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; }