* src/output.c (prepare): Delete insertion of previous muscles,

[bison.git] / src / bison.simple

diff --git a/src/bison.simple b/src/bison.simple
index 77b54685cb89acf358b26d9de804deb851f65317..1217108f827994e4a908a37f0fadba4ba4690593 100644 (file)
--- a/src/bison.simple
+++ b/src/bison.simple
@@ -1,5 +1,8 @@
-/* -*-C-*-  Note some compilers choke on comments on `#line' lines.  */
-#line
+/* -*- C -*- */
+
+/* A Bison parser, made from %%filename
+   by GNU bison %%version.  */
+

 /* Skeleton output parser for bison,
    Copyright 1984, 1989, 1990, 2000, 2001 Free Software Foundation, Inc.
 
 /* Skeleton output parser for bison,
    Copyright 1984, 1989, 1990, 2000, 2001 Free Software Foundation, Inc.
 


@@ -28,16 +31,37 @@
    It was written by Richard Stallman by simplifying the hairy parser
    used when %semantic_parser is specified.  */
 
    It was written by Richard Stallman by simplifying the hairy parser
    used when %semantic_parser is specified.  */
 

+#include <stdio.h>
+
+/* If name_prefix is specify substitute the variables and functions
+   names.  */
+#define yyparse %%prefix##parse
+#define yylex %%prefix##lex
+#define yyerror %%prefix##error
+#define yylval %%prefix##lval
+#define yychar %%prefix##char
+#define yydebug %%prefix##debug
+#define yynerrs %%prefix##nerrs
+
+/* Copy the user declarations.  */
+%%prologue
+
+#ifndef __cplusplus
+# ifndef __STDC__
+#  define const
+# endif
+#endif
+

 #ifndef YYSTACK_USE_ALLOCA
 # ifdef alloca
 #ifndef YYSTACK_USE_ALLOCA
 # ifdef alloca

-#  define YYSTACK_USE_ALLOCA
+#  define YYSTACK_USE_ALLOCA 1

 # else /* alloca not defined */
 #  ifdef __GNUC__
 # else /* alloca not defined */
 #  ifdef __GNUC__

-#   define YYSTACK_USE_ALLOCA
+#   define YYSTACK_USE_ALLOCA 1

 #   define alloca __builtin_alloca
 #  else /* not GNU C.  */
 #   if (!defined (__STDC__) && defined (sparc)) || defined (__sparc__) || defined (__sparc) || defined (__sgi) || (defined (__sun) && defined (__i386))
 #   define alloca __builtin_alloca
 #  else /* not GNU C.  */
 #   if (!defined (__STDC__) && defined (sparc)) || defined (__sparc__) || defined (__sparc) || defined (__sgi) || (defined (__sun) && defined (__i386))

-#    define YYSTACK_USE_ALLOCA
+#    define YYSTACK_USE_ALLOCA 1

 #    include <alloca.h>
 #   else /* not sparc */
      /* We think this test detects Watcom and Microsoft C.  */
 #    include <alloca.h>
 #   else /* not sparc */
      /* We think this test detects Watcom and Microsoft C.  */


@@ -55,13 +79,13 @@
          namespace.  So I turned it off.  rms, 2 May 1997.  */
        /* #include <malloc.h>  */
  #pragma alloca
          namespace.  So I turned it off.  rms, 2 May 1997.  */
        /* #include <malloc.h>  */
  #pragma alloca

-#      define YYSTACK_USE_ALLOCA
+#      define YYSTACK_USE_ALLOCA 1

 #     else /* not MSDOS, or __TURBOC__, or _AIX */
 #      if 0
        /* haible@ilog.fr says this works for HPUX 9.05 and up, and on
           HPUX 10.  Eventually we can turn this on.  */
 #       ifdef __hpux
 #     else /* not MSDOS, or __TURBOC__, or _AIX */
 #      if 0
        /* haible@ilog.fr says this works for HPUX 9.05 and up, and on
           HPUX 10.  Eventually we can turn this on.  */
 #       ifdef __hpux

-#        define YYSTACK_USE_ALLOCA
+#        define YYSTACK_USE_ALLOCA 1

 #        define alloca __builtin_alloca
 #      endif /* __hpux */
 #      endif
 #        define alloca __builtin_alloca
 #      endif /* __hpux */
 #      endif


@@ -72,37 +96,168 @@
 # endif /* alloca not defined */
 #endif /* YYSTACK_USE_ALLOCA not defined */
 
 # endif /* alloca not defined */
 #endif /* YYSTACK_USE_ALLOCA not defined */
 

-#ifdef YYSTACK_USE_ALLOCA
+#if YYSTACK_USE_ALLOCA

 # define YYSTACK_ALLOC alloca
 #else
 # define YYSTACK_ALLOC malloc
 #endif
 
 # define YYSTACK_ALLOC alloca
 #else
 # define YYSTACK_ALLOC malloc
 #endif
 

+#define YYBISON        1       /* Identify Bison output.  */
+#define YYPURE %%pure  /* Identify pure parsers.  */
+
+#ifndef YYDEBUG
+# define YYDEBUG %%debug
+#endif
+
+#ifndef YYSTYPE
+# define YYSTYPE %%stype
+#endif
+
+#ifndef YYLTYPE
+typedef struct yyltype
+{
+  int first_line;
+  int first_column;
+  int last_line;
+  int last_column;
+} yyltype;
+# define YYLTYPE %%ltype
+#endif
+
+#ifndef YYERROR_VERBOSE
+# define YYERROR_VERBOSE %%verbose
+#endif
+
+/* Tokens.  */
+%%tokendef
+
+#define YYFINAL                %%final
+#define YYFLAG         %%flag
+#define YYNTBASE       %%ntbase
+#define YYLAST         %%last
+
+#define YYNTOKENS      %%ntokens
+#define YYNNTS         %%nnts
+#define YYNRULES       %%nrules
+#define YYNSTATES      %%nstates
+#define YYMAXUTOK      %%maxtok
+
+/* YYTRANSLATE(YYLEX) -- Bison token number corresponding to YYLEX.  */
+#define YYTRANSLATE(x) ((unsigned)(x) <= %%maxtok ? yytranslate[x] : %%nsym)
+
+/* YYTRANSLATE[YYLEX] -- Bison token number corresponding to YYLEX.  */
+static const char yytranslate[] =
+{
+  %%translate
+};
+
+#if YYDEBUG
+static const short yyprhs[] =
+{
+  %%prhs
+};
+
+static const short yyrhs[] =
+{
+  %%rhs
+};
+
+/* YYRLINE[YYN] -- source line where rule number YYN was defined.  */
+static const short yyrline[] =
+{
+  %%rline
+};
+#endif
+
+#if YYDEBUG || YYERROR_VERBOSE
+/* YYTNME[TOKEN_NUM] -- String name of the token TOKEN_NUM.  */
+static const char *const yytname[] =
+{
+  %%tname
+};
+#endif
+
+/* YYTOKNUM[YYN] -- Index in YYTNAME corresponding to YYLEX.  */
+static const short yytoknum[] =
+{
+  %%toknum
+};
+
+/* YYR1[YYN] -- Symbol number of symbol that rule YYN derives.  */
+static const short yyr1[] =
+{
+  %%r1
+};
+
+/* YYR2[YYN] -- Number of symbols composing right hand side of rule YYN.  */
+static const short yyr2[] =
+{
+  %%r2
+};
+
+/* YYDEFACT[S] -- default rule to reduce with in state S when YYTABLE
+   doesn't specify something else to do.  Zero means the default is an
+   error.  */
+static const short yydefact[] =
+{
+  %%defact
+};
+
+static const short yydefgoto[] =
+{
+  %%defgoto
+};
+
+static const short yypact[] =
+{
+  %%pact
+};
+
+static const short yypgoto[] =
+{
+  %%pgoto
+};
+
+static const short yytable[] =
+{
+  %%table
+};
+
+static const short yycheck[] =
+{
+  %%check
+};
+

 #define yyerrok                (yyerrstatus = 0)
 #define yyclearin      (yychar = YYEMPTY)
 #define YYEMPTY                -2
 #define YYEOF          0
 #define yyerrok                (yyerrstatus = 0)
 #define yyclearin      (yychar = YYEMPTY)
 #define YYEMPTY                -2
 #define YYEOF          0

+

 #define YYACCEPT       goto yyacceptlab
 #define YYACCEPT       goto yyacceptlab

-#define YYABORT        goto yyabortlab
+#define YYABORT                goto yyabortlab

 #define YYERROR                goto yyerrlab1
 #define YYERROR                goto yyerrlab1

+

 /* Like YYERROR except do call yyerror.  This remains here temporarily
    to ease the transition to the new meaning of YYERROR, for GCC.
    Once GCC version 2 has supplanted version 1, this can go.  */
 /* Like YYERROR except do call yyerror.  This remains here temporarily
    to ease the transition to the new meaning of YYERROR, for GCC.
    Once GCC version 2 has supplanted version 1, this can go.  */

+

 #define YYFAIL         goto yyerrlab
 #define YYFAIL         goto yyerrlab

+

 #define YYRECOVERING()  (!!yyerrstatus)
 #define YYRECOVERING()  (!!yyerrstatus)

+

 #define YYBACKUP(Token, Value)                                 \
 do                                                             \
   if (yychar == YYEMPTY && yylen == 1)                         \
     {                                                          \
       yychar = (Token);                                                \
 #define YYBACKUP(Token, Value)                                 \
 do                                                             \
   if (yychar == YYEMPTY && yylen == 1)                         \
     {                                                          \
       yychar = (Token);                                                \

-      yylval = (Value);                                                \
+      yylval = (Value);                                        \

       yychar1 = YYTRANSLATE (yychar);                          \
       YYPOPSTACK;                                              \
       goto yybackup;                                           \
     }                                                          \
   else                                                         \
     {                                                          \
       yychar1 = YYTRANSLATE (yychar);                          \
       YYPOPSTACK;                                              \
       goto yybackup;                                           \
     }                                                          \
   else                                                         \
     {                                                          \

-      yyerror ("syntax error: cannot back up");                        \
+      yyerror ("syntax error: cannot back up");                \

       YYERROR;                                                 \
     }                                                          \
 while (0)
       YYERROR;                                                 \
     }                                                          \
 while (0)


@@ -110,7 +265,6 @@ while (0)
 #define YYTERROR       1
 #define YYERRCODE      256
 
 #define YYTERROR       1
 #define YYERRCODE      256
 

-

 /* YYLLOC_DEFAULT -- Compute the default location (before the actions
    are run).
 
 /* YYLLOC_DEFAULT -- Compute the default location (before the actions
    are run).
 


@@ -124,7 +278,6 @@ while (0)
    Current.last_column = Rhs[N].last_column;
 #endif
 
    Current.last_column = Rhs[N].last_column;
 #endif
 

-

 /* YYLEX -- calling `yylex' with the right arguments.  */
 
 #if YYPURE
 /* YYLEX -- calling `yylex' with the right arguments.  */
 
 #if YYPURE


@@ -145,7 +298,6 @@ while (0)
 # define YYLEX                 yylex ()
 #endif /* !YYPURE */
 
 # define YYLEX                 yylex ()
 #endif /* !YYPURE */
 

-

 /* Enable debugging if requested.  */
 #if YYDEBUG
 # define YYDPRINTF(Args)                       \
 /* Enable debugging if requested.  */
 #if YYDEBUG
 # define YYDPRINTF(Args)                       \


@@ -164,7 +316,7 @@ int yydebug;
 
 /* YYINITDEPTH -- initial size of the parser's stacks.  */
 #ifndef        YYINITDEPTH
 
 /* YYINITDEPTH -- initial size of the parser's stacks.  */
 #ifndef        YYINITDEPTH

-# define YYINITDEPTH 200
+# define YYINITDEPTH %%initdepth

 #endif
 
 /* YYMAXDEPTH -- maximum size the stacks can grow to (effective only
 #endif
 
 /* YYMAXDEPTH -- maximum size the stacks can grow to (effective only


@@ -174,9 +326,11 @@ int yydebug;
 #endif
 
 #ifndef YYMAXDEPTH
 #endif
 
 #ifndef YYMAXDEPTH

-# define YYMAXDEPTH 10000
+# define YYMAXDEPTH %%maxdepth

 #endif
 #endif

+

 \f
 \f

+

 /* Define __yy_memcpy.  Note that the size argument
    should be passed with type unsigned int, because that is what the non-GCC
    definitions require.  With GCC, __builtin_memcpy takes an arg
 /* Define __yy_memcpy.  Note that the size argument
    should be passed with type unsigned int, because that is what the non-GCC
    definitions require.  With GCC, __builtin_memcpy takes an arg


@@ -205,10 +359,11 @@ __yy_memcpy (char *to, const char *from, unsigned int count)
   while (i-- > 0)
     *t++ = *f++;
 }
   while (i-- > 0)
     *t++ = *f++;
 }

-

 #endif
 #endif

+

 \f
 \f

-#line
+
+#line %%line "%%filename"

 
 /* The user can define YYPARSE_PARAM as the name of an argument to be passed
    into yyparse.  The argument should have type void *.
 
 /* The user can define YYPARSE_PARAM as the name of an argument to be passed
    into yyparse.  The argument should have type void *.


@@ -245,7 +400,7 @@ int yyparse (void);
 /* The lookahead symbol.  */                           \
 int yychar;                                            \
                                                        \
 /* The lookahead symbol.  */                           \
 int yychar;                                            \
                                                        \

-/* The semantic value of the lookahead symbol. */      \
+/* The semantic value of the lookahead symbol.  */     \

 YYSTYPE yylval;                                                \
                                                        \
 /* Number of parse errors so far.  */                  \
 YYSTYPE yylval;                                                \
                                                        \
 /* Number of parse errors so far.  */                  \


@@ -262,8 +417,7 @@ YYLTYPE yylloc;
 _YY_DECL_VARIABLES
 #endif
 
 _YY_DECL_VARIABLES
 #endif
 

-
-/* If nonreentrant, generate the variables here. */
+/* If nonreentrant, generate the variables here.  */

 
 #if !YYPURE
 YY_DECL_VARIABLES
 
 #if !YYPURE
 YY_DECL_VARIABLES


@@ -273,7 +427,7 @@ int
 yyparse (YYPARSE_PARAM_ARG)
      YYPARSE_PARAM_DECL
 {
 yyparse (YYPARSE_PARAM_ARG)
      YYPARSE_PARAM_DECL
 {

-  /* If reentrant, generate the variables here. */
+  /* If reentrant, generate the variables here.  */

 #if YYPURE
   YY_DECL_VARIABLES
 #endif  /* !YYPURE */
 #if YYPURE
   YY_DECL_VARIABLES
 #endif  /* !YYPURE */


@@ -293,7 +447,7 @@ yyparse (YYPARSE_PARAM_ARG)
      Refer to the stacks thru separate pointers, to allow yyoverflow
      to reallocate them elsewhere.  */
 
      Refer to the stacks thru separate pointers, to allow yyoverflow
      to reallocate them elsewhere.  */
 

-  /* The state stack. */
+  /* The state stack.  */

   short        yyssa[YYINITDEPTH];
   short *yyss = yyssa;
   register short *yyssp;
   short        yyssa[YYINITDEPTH];
   short *yyss = yyssa;
   register short *yyssp;


@@ -319,7 +473,6 @@ yyparse (YYPARSE_PARAM_ARG)
   int yystacksize = YYINITDEPTH;
   int yyfree_stacks = 0;
 
   int yystacksize = YYINITDEPTH;
   int yyfree_stacks = 0;
 

-

   /* The variables used to return semantic value and location from the
      action routines.  */
   YYSTYPE yyval;
   /* The variables used to return semantic value and location from the
      action routines.  */
   YYSTYPE yyval;


@@ -328,7 +481,7 @@ yyparse (YYPARSE_PARAM_ARG)
 # endif
 
   /* When reducing, the number of symbols on the RHS of the reduced
 # endif
 
   /* When reducing, the number of symbols on the RHS of the reduced

-     rule. */
+     rule.  */

   int yylen;
 
   YYDPRINTF ((stderr, "Starting parse\n"));
   int yylen;
 
   YYDPRINTF ((stderr, "Starting parse\n"));


@@ -343,12 +496,12 @@ yyparse (YYPARSE_PARAM_ARG)
      so that they stay on the same level as the state stack.
      The wasted elements are never initialized.  */
 
      so that they stay on the same level as the state stack.
      The wasted elements are never initialized.  */
 

-  yyssp = yyss - 1;
+  yyssp = yyss;

   yyvsp = yyvs;
 #if YYLSP_NEEDED
   yylsp = yyls;
 #endif
   yyvsp = yyvs;
 #if YYLSP_NEEDED
   yylsp = yyls;
 #endif

-
+  goto yysetstate;

 
 /*------------------------------------------------------------.
 | yynewstate -- Push a new state, which is found in yystate.  |
 
 /*------------------------------------------------------------.
 | yynewstate -- Push a new state, which is found in yystate.  |


@@ -357,7 +510,10 @@ yynewstate:
   /* In all cases, when you get here, the value and location stacks
      have just been pushed. so pushing a state here evens the stacks.
      */
   /* In all cases, when you get here, the value and location stacks
      have just been pushed. so pushing a state here evens the stacks.
      */

-  *++yyssp = yystate;
+  yyssp++;
+
+yysetstate:
+  *yyssp = yystate;

 
   if (yyssp >= yyss + yystacksize - 1)
     {
 
   if (yyssp >= yyss + yystacksize - 1)
     {


@@ -413,7 +569,7 @@ yynewstate:
       yystacksize *= 2;
       if (yystacksize > YYMAXDEPTH)
        yystacksize = YYMAXDEPTH;
       yystacksize *= 2;
       if (yystacksize > YYMAXDEPTH)
        yystacksize = YYMAXDEPTH;

-# ifndef YYSTACK_USE_ALLOCA
+# if !YYSTACK_USE_ALLOCA

       yyfree_stacks = 1;
 # endif
       yyss = (short *) YYSTACK_ALLOC (yystacksize * sizeof (*yyssp));
       yyfree_stacks = 1;
 # endif
       yyss = (short *) YYSTACK_ALLOC (yystacksize * sizeof (*yyssp));


@@ -445,7 +601,6 @@ yynewstate:
 
   goto yybackup;
 
 
   goto yybackup;
 

-

 /*-----------.
 | yybackup.  |
 `-----------*/
 /*-----------.
 | yybackup.  |
 `-----------*/


@@ -472,12 +627,12 @@ yybackup:
       yychar = YYLEX;
     }
 
       yychar = YYLEX;
     }
 

-  /* Convert token to internal form (in yychar1) for indexing tables with */
+  /* Convert token to internal form (in yychar1) for indexing tables with.  */

 
 

-  if (yychar <= 0)             /* This means end of input. */
+  if (yychar <= 0)             /* This means end of input.  */

     {
       yychar1 = 0;
     {
       yychar1 = 0;

-      yychar = YYEOF;          /* Don't call YYLEX any more */
+      yychar = YYEOF;          /* Don't call YYLEX any more.  */

 
       YYDPRINTF ((stderr, "Now at end of input.\n"));
     }
 
       YYDPRINTF ((stderr, "Now at end of input.\n"));
     }


@@ -598,8 +753,11 @@ yyreduce:
       fprintf (stderr, " -> %s\n", yytname[yyr1[yyn]]);
     }
 #endif
       fprintf (stderr, " -> %s\n", yytname[yyr1[yyn]]);
     }
 #endif

-%% actions /* The action file replaces this line. */
-#line
+  switch (yyn)
+    {
+      %%action /* The action file replaces this line.  */
+    }
+#line %%line "%%filename"

 \f
   yyvsp -= yylen;
   yyssp -= yylen;
 \f
   yyvsp -= yylen;
   yyssp -= yylen;


@@ -647,7 +805,7 @@ yyerrlab:
     {
       ++yynerrs;
 
     {
       ++yynerrs;
 

-#ifdef YYERROR_VERBOSE
+#if YYERROR_VERBOSE

       yyn = yypact[yystate];
 
       if (yyn > YYFLAG && yyn < YYLAST)
       yyn = yypact[yystate];
 
       if (yyn > YYFLAG && yyn < YYLAST)


@@ -675,11 +833,11 @@ yyerrlab:
                {
                  count = 0;
                  for (x = (yyn < 0 ? -yyn : 0);
                {
                  count = 0;
                  for (x = (yyn < 0 ? -yyn : 0);

-                      x < (int) (sizeof (yytname) / sizeof (char *)); x++)
+                        x < (int) (sizeof (yytname) / sizeof (char *)); x++)

                    if (yycheck[x + yyn] == x)
                      {
                    if (yycheck[x + yyn] == x)
                      {

-                       strcat (msg, count == 0 ? ", expecting `" : " or `");
-                       strcat (msg, yytname[x]);
+                       strcat (msg, count == 0 ? ", expecting `" : " or `");
+                       strcat (msg, yytname[x]);

                        strcat (msg, "'");
                        count++;
                      }
                        strcat (msg, "'");
                        count++;
                      }


@@ -687,26 +845,26 @@ yyerrlab:
              yyerror (msg);
              free (msg);
            }
              yyerror (msg);
              free (msg);
            }

-         else
+          else

            yyerror ("parse error; also virtual memory exceeded");
            yyerror ("parse error; also virtual memory exceeded");

-       }
+        }

       else
 #endif /* YYERROR_VERBOSE */
       else
 #endif /* YYERROR_VERBOSE */

-       yyerror ("parse error");
+        yyerror ("parse error");

     }
   goto yyerrlab1;
 
 
     }
   goto yyerrlab1;
 
 

-/*--------------------------------------------------.
-| yyerrlab1 -- error raised explicitly by an action |
-`--------------------------------------------------*/
+/*----------------------------------------------------.
+| yyerrlab1 -- error raised explicitly by an action.  |
+`----------------------------------------------------*/

 yyerrlab1:
   if (yyerrstatus == 3)
     {
       /* If just tried and failed to reuse lookahead token after an
         error, discard it.  */
 
 yyerrlab1:
   if (yyerrstatus == 3)
     {
       /* If just tried and failed to reuse lookahead token after an
         error, discard it.  */
 

-      /* return failure if at end of input */
+      /* Return failure if at end of input.  */

       if (yychar == YYEOF)
        YYABORT;
       YYDPRINTF ((stderr, "Discarding token %d (%s).\n",
       if (yychar == YYEOF)
        YYABORT;
       YYDPRINTF ((stderr, "Discarding token %d (%s).\n",


@@ -717,7 +875,7 @@ yyerrlab1:
   /* Else will try to reuse lookahead token after shifting the error
      token.  */
 
   /* Else will try to reuse lookahead token after shifting the error
      token.  */
 

-  yyerrstatus = 3;             /* Each real token shifted decrements this */
+  yyerrstatus = 3;             /* Each real token shifted decrements this.  */

 
   goto yyerrhandle;
 
 
   goto yyerrhandle;
 


@@ -740,7 +898,7 @@ yyerrdefault:
 
 /*---------------------------------------------------------------.
 | yyerrpop -- pop the current state because it cannot handle the |
 
 /*---------------------------------------------------------------.
 | yyerrpop -- pop the current state because it cannot handle the |

-| error token                                                    |
+| error token.                                                   |

 `---------------------------------------------------------------*/
 yyerrpop:
   if (yyssp == yyss)
 `---------------------------------------------------------------*/
 yyerrpop:
   if (yyssp == yyss)


@@ -828,3 +986,6 @@ yyabortlab:
     }
   return 1;
 }
     }
   return 1;
 }

+
+%%epilogue
+