-/* A Bison parser, made by GNU Bison 1.75b. */
+/* A Bison parser, made by GNU Bison 1.75c. */
/* Skeleton parser for Yacc-like parsing with Bison,
Copyright (C) 1984, 1989, 1990, 2000, 2001, 2002 Free Software Foundation, Inc.
#include "reader.h"
#include "conflicts.h"
-/* Produce verbose parse errors. */
+/* Produce verbose syntax errors. */
#define YYERROR_VERBOSE 1
#define YYLLOC_DEFAULT(Current, Rhs, N) \
do { \
correctly typed access to it. */
#define yycontrol ((gram_control_t *) gram_control)
-/* Request detailed parse error messages, and pass them to GRAM_ERROR.
+/* Request detailed syntax error messages, and pass them to GRAM_ERROR.
FIXME: depends on the undocumented availability of YYLLOC.t */
#undef yyerror
#define yyerror(Msg) \
static void yyprint (FILE *file, int type, const yystype *value);
symbol_class current_class = unknown_sym;
-char *current_type = 0;
+struniq_t current_type = 0;
symbol_t *current_lhs;
location_t current_lhs_location;
assoc_t current_assoc;
int integer;
char *string;
assoc_t assoc;
+ struniq_t struniq;
} yystype;
-/* Line 212 of /tmp/prefix/share/bison/yacc.c. */
-#line 241 "parse-gram.c"
+/* Line 195 of /usr/local/share/bison/yacc.c. */
+#line 242 "parse-gram.c"
# define YYSTYPE yystype
# define YYSTYPE_IS_TRIVIAL 1
#endif
/* Copy the second part of user declarations. */
-/* Line 232 of /tmp/prefix/share/bison/yacc.c. */
-#line 262 "parse-gram.c"
+/* Line __line__ of __file__. */
+#line 263 "parse-gram.c"
#if ! defined (yyoverflow) || YYERROR_VERBOSE
{ \
register YYSIZE_T yyi; \
for (yyi = 0; yyi < (Count); yyi++) \
- (To)[yyi] = (From)[yyi]; \
+ (To)[yyi] = (From)[yyi]; \
} \
while (0)
# endif
/* YYFINAL -- State number of the termination state. */
#define YYFINAL 3
/* YYLAST -- Last index in YYTABLE. */
-#define YYLAST 125
+#define YYLAST 152
/* YYNTOKENS -- Number of terminals. */
#define YYNTOKENS 47
/* YYNNTS -- Number of nonterminals. */
-#define YYNNTS 28
+#define YYNNTS 29
/* YYNRULES -- Number of rules. */
-#define YYNRULES 76
+#define YYNRULES 77
/* YYNRULES -- Number of states. */
-#define YYNSTATES 115
+#define YYNSTATES 116
/* YYTRANSLATE(YYLEX) -- Bison symbol number corresponding to YYLEX. */
#define YYUNDEFTOK 2
#define YYMAXUTOK 301
-#define YYTRANSLATE(X) \
- ((unsigned)(X) <= YYMAXUTOK ? yytranslate[X] : YYUNDEFTOK)
+#define YYTRANSLATE(YYX) \
+ ((YYX <= 0) ? YYEOF : \
+ (unsigned)(YYX) <= YYMAXUTOK ? yytranslate[YYX] : YYUNDEFTOK)
/* YYTRANSLATE[YYLEX] -- Bison symbol number corresponding to YYLEX. */
static const unsigned char yytranslate[] =
111, 113, 115, 116, 118, 120, 123, 125, 127, 130,
133, 137, 139, 142, 144, 147, 149, 152, 155, 156,
162, 164, 168, 169, 172, 175, 179, 183, 187, 189,
- 191, 193, 195, 197, 198, 201, 202
+ 191, 193, 195, 197, 199, 200, 203, 204
};
/* YYRHS -- A `-1'-separated list of the rules' RHS. */
static const yysigned_char yyrhs[] =
{
- 48, 0, -1, 49, 43, 63, 73, -1, -1, 49,
- 50, 74, -1, 51, -1, 44, -1, 17, -1, 18,
+ 48, 0, -1, 49, 43, 63, 74, -1, -1, 49,
+ 50, 75, -1, 51, -1, 44, -1, 17, -1, 18,
72, 72, -1, 19, -1, 20, -1, 21, 4, -1,
- 22, 37, 72, -1, 23, -1, 24, 72, 40, 72,
+ 22, 37, 72, -1, 23, -1, 24, 73, 40, 73,
-1, 25, -1, 26, 37, 72, -1, 27, -1, 28,
- 37, 72, -1, 29, 72, 40, 72, -1, 30, -1,
+ 37, 72, -1, 29, 73, 40, 73, -1, 30, -1,
31, 72, -1, 33, -1, 34, -1, 35, -1, 57,
-1, 54, -1, 32, 69, -1, 10, 46, -1, -1,
8, 52, 46, 60, -1, -1, 9, 53, 46, 60,
38, -1, 68, -1, 67, 41, 68, -1, -1, 68,
69, -1, 68, 70, -1, 68, 14, 69, -1, 68,
15, 4, -1, 68, 16, 36, -1, 42, -1, 71,
- -1, 46, -1, 3, -1, 3, -1, -1, 43, 45,
- -1, -1, 38, -1
+ -1, 46, -1, 3, -1, 3, -1, 46, -1, -1,
+ 43, 45, -1, -1, 38, -1
};
/* YYRLINE[YYN] -- source line where rule number YYN was defined. */
static const unsigned short yyrline[] =
{
- 0, 167, 167, 180, 182, 185, 187, 188, 189, 190,
- 191, 192, 193, 194, 195, 197, 198, 199, 200, 201,
- 203, 204, 205, 206, 207, 210, 212, 213, 217, 224,
- 223, 234, 233, 246, 245, 251, 251, 256, 265, 280,
- 282, 283, 286, 288, 293, 295, 299, 304, 309, 315,
- 321, 331, 334, 343, 345, 351, 353, 358, 365, 364,
- 369, 371, 374, 377, 379, 381, 383, 385, 389, 391,
- 394, 400, 409, 417, 422, 428, 430
+ 0, 170, 170, 182, 184, 187, 189, 190, 191, 192,
+ 193, 194, 195, 196, 197, 202, 203, 204, 205, 206,
+ 211, 212, 213, 214, 215, 218, 220, 221, 225, 232,
+ 231, 242, 241, 254, 253, 259, 259, 264, 273, 288,
+ 290, 291, 294, 296, 301, 303, 307, 312, 317, 323,
+ 329, 339, 342, 351, 353, 359, 361, 366, 373, 372,
+ 377, 379, 382, 385, 387, 389, 391, 393, 397, 399,
+ 402, 408, 417, 426, 434, 436, 443, 445
};
#endif
"precedence_declarator", "type.opt", "symbols.1", "symbol_def",
"symbol_defs.1", "grammar", "rules_or_grammar_declaration", "rules",
"@5", "rhses.1", "rhs", "symbol", "action", "string_as_id",
- "string_content", "epilogue.opt", "semi_colon.opt", 0
+ "string_content", "code_content", "epilogue.opt", "semi_colon.opt", 0
};
#endif
58, 58, 59, 59, 60, 60, 61, 61, 61, 61,
61, 62, 62, 63, 63, 64, 64, 64, 66, 65,
67, 67, 68, 68, 68, 68, 68, 68, 69, 69,
- 70, 71, 72, 73, 73, 74, 74
+ 70, 71, 72, 73, 74, 74, 75, 75
};
/* YYR2[YYN] -- Number of symbols composing right hand side of rule YYN. */
1, 1, 0, 1, 1, 2, 1, 1, 2, 2,
3, 1, 2, 1, 2, 1, 2, 2, 0, 5,
1, 3, 0, 2, 2, 3, 3, 3, 1, 1,
- 1, 1, 1, 0, 2, 0, 1
+ 1, 1, 1, 1, 0, 2, 0, 1
};
/* YYDEFACT[STATE-NAME] -- Default rule to reduce with in state
3, 0, 0, 1, 35, 33, 0, 29, 31, 0,
39, 40, 41, 7, 0, 9, 10, 0, 0, 13,
0, 15, 0, 17, 0, 0, 20, 0, 0, 22,
- 23, 24, 0, 6, 75, 5, 26, 25, 42, 0,
- 0, 0, 0, 0, 28, 72, 0, 11, 0, 0,
- 0, 0, 0, 21, 71, 68, 27, 69, 0, 0,
- 0, 0, 53, 55, 76, 4, 43, 0, 46, 47,
- 51, 36, 34, 37, 44, 0, 0, 8, 12, 0,
- 16, 18, 0, 57, 58, 56, 0, 54, 2, 38,
- 48, 49, 52, 45, 30, 32, 14, 19, 62, 74,
- 50, 0, 60, 59, 62, 0, 0, 0, 70, 63,
- 64, 61, 65, 66, 67
+ 23, 24, 0, 6, 76, 5, 26, 25, 42, 0,
+ 0, 0, 0, 0, 28, 72, 0, 11, 0, 73,
+ 0, 0, 0, 0, 21, 71, 68, 27, 69, 0,
+ 0, 0, 0, 53, 55, 77, 4, 43, 0, 46,
+ 47, 51, 36, 34, 37, 44, 0, 0, 8, 12,
+ 0, 16, 18, 0, 57, 58, 56, 0, 54, 2,
+ 38, 48, 49, 52, 45, 30, 32, 14, 19, 62,
+ 75, 50, 0, 60, 59, 62, 0, 0, 0, 70,
+ 63, 64, 61, 65, 66, 67
};
/* YYDEFGOTO[NTERM-NUM]. */
static const yysigned_char yydefgoto[] =
{
- -1, 1, 2, 34, 60, 42, 43, 36, 40, 39,
- 37, 38, 67, 73, 70, 71, 61, 62, 63, 98,
- 101, 102, 74, 110, 57, 46, 88, 65
+ -1, 1, 2, 34, 61, 42, 43, 36, 40, 39,
+ 37, 38, 68, 74, 71, 72, 62, 63, 64, 99,
+ 102, 103, 75, 111, 58, 46, 50, 89, 66
};
/* YYPACT[STATE-NUM] -- Index in YYTABLE of the portion describing
STATE-NUM. */
-#define YYPACT_NINF -67
+#define YYPACT_NINF -66
static const yysigned_char yypact[] =
{
- -67, 7, 81, -67, -67, -67, -13, -67, -67, -16,
- -67, -67, -67, -67, 32, -67, -67, 36, 20, -67,
- 32, -67, 21, -67, 22, 32, -67, 32, -1, -67,
- -67, -67, 43, -67, 24, -67, -67, -67, 28, -14,
- -14, -1, 25, 26, -67, -67, 32, -67, 32, 30,
- 32, 32, 33, -67, -67, -67, -67, -67, 38, 29,
- 40, 4, -67, -67, -67, -67, -67, -1, -67, 16,
- -67, -14, -14, -1, -67, -1, -1, -67, -67, 32,
- -67, -67, 32, -67, -67, -67, 34, -67, -67, -1,
- 77, -67, -67, -67, -1, -1, -67, -67, -67, -67,
- -67, -20, 23, -67, -67, -1, 78, 45, -67, -67,
- -67, 23, -67, -67, -67
+ -66, 6, 108, -66, -66, -66, -16, -66, -66, -21,
+ -66, -66, -66, -66, 19, -66, -66, 32, 5, -66,
+ 3, -66, 10, -66, 11, 3, -66, 19, 1, -66,
+ -66, -66, 80, -66, 12, -66, -66, -66, 16, -19,
+ -19, 1, 7, 8, -66, -66, 19, -66, 19, -66,
+ 18, 19, 19, 20, -66, -66, -66, -66, -66, 13,
+ 24, 17, 2, -66, -66, -66, -66, -66, 1, -66,
+ 29, -66, -19, -19, 1, -66, 1, 1, -66, -66,
+ 3, -66, -66, 3, -66, -66, -66, 21, -66, -66,
+ 1, 61, -66, -66, -66, 1, 1, -66, -66, -66,
+ -66, -66, -17, 15, -66, -66, 1, 65, 34, -66,
+ -66, -66, 15, -66, -66, -66
};
/* YYPGOTO[NTERM-NUM]. */
static const yysigned_char yypgoto[] =
{
- -67, -67, -67, -67, 82, -67, -67, -67, -67, -67,
- -67, -67, -67, -42, -29, 55, -67, 35, -67, -67,
- -67, -7, -28, -67, -66, -19, -67, -67
+ -66, -66, -66, -66, 63, -66, -66, -66, -66, -66,
+ -66, -66, -66, -49, -34, 31, -66, 14, -66, -66,
+ -66, -33, -28, -66, -65, -11, -24, -66, -66
};
/* YYTABLE[YYPACT[STATE-NUM]]. What to do in state STATE-NUM. If
positive, shift that token. If negative, reduce the rule which
number is the opposite. If zero, do what YYDEFACT says.
- If YYTABLE_NINF, parse error. */
-#define YYTABLE_NINF -74
+ If YYTABLE_NINF, syntax error. */
+#define YYTABLE_NINF -75
static const yysigned_char yytable[] =
{
- 56, 49, 54, 91, -73, 58, 52, 3, 53, 4,
- 5, 6, 7, 8, 9, 10, 11, 12, 103, 54,
- 90, 104, 68, 41, 100, 89, 54, 77, 69, 78,
- 44, 80, 81, 94, 95, 45, 28, 105, 106, 107,
- 47, 55, 92, 92, 58, 93, 59, 86, 4, 5,
- 6, 7, 8, 9, 10, 11, 12, 48, 50, 51,
- 96, 93, 64, 97, 66, 55, 93, 93, 84, 108,
- 79, 75, 76, 82, 109, 28, 83, 112, 85, 99,
- 54, 114, 113, 109, 35, 59, 4, 5, 6, 7,
- 8, 9, 10, 11, 12, 72, 87, 111, 13, 14,
- 15, 16, 17, 18, 19, 20, 21, 22, 23, 24,
- 25, 26, 27, 28, 29, 30, 31, 0, 0, 0,
- 0, 0, 0, 0, 32, 33
+ 57, 53, -74, 59, 55, 92, 3, 4, 5, 6,
+ 7, 8, 9, 10, 11, 12, 54, 69, 55, 90,
+ 41, 104, 45, 70, 105, 44, 101, 95, 96, 106,
+ 107, 108, 55, 91, 28, 78, 47, 79, 93, 93,
+ 81, 82, 48, 56, 60, 87, 94, 51, 52, 49,
+ 65, 84, 67, 76, 77, 86, 97, 56, 80, 98,
+ 83, 109, 94, 85, 55, 35, 100, 94, 94, 114,
+ 115, 73, 112, 0, 0, 110, 88, 0, 113, 0,
+ 0, 59, 0, 0, 110, 4, 5, 6, 7, 8,
+ 9, 10, 11, 12, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 28, 4, 5, 6, 7, 8, 9, 10,
+ 11, 12, 60, 0, 0, 13, 14, 15, 16, 17,
+ 18, 19, 20, 21, 22, 23, 24, 25, 26, 27,
+ 28, 29, 30, 31, 0, 0, 0, 0, 0, 0,
+ 0, 32, 33
};
static const yysigned_char yycheck[] =
{
- 28, 20, 3, 69, 0, 1, 25, 0, 27, 5,
- 6, 7, 8, 9, 10, 11, 12, 13, 38, 3,
- 4, 41, 36, 36, 90, 67, 3, 46, 42, 48,
- 46, 50, 51, 75, 76, 3, 32, 14, 15, 16,
- 4, 42, 71, 72, 1, 73, 42, 43, 5, 6,
- 7, 8, 9, 10, 11, 12, 13, 37, 37, 37,
- 79, 89, 38, 82, 36, 42, 94, 95, 39, 46,
- 40, 46, 46, 40, 102, 32, 38, 105, 38, 45,
- 3, 36, 4, 111, 2, 42, 5, 6, 7, 8,
- 9, 10, 11, 12, 13, 40, 61, 104, 17, 18,
- 19, 20, 21, 22, 23, 24, 25, 26, 27, 28,
- 29, 30, 31, 32, 33, 34, 35, -1, -1, -1,
- -1, -1, -1, -1, 43, 44
+ 28, 25, 0, 1, 3, 70, 0, 5, 6, 7,
+ 8, 9, 10, 11, 12, 13, 27, 36, 3, 68,
+ 36, 38, 3, 42, 41, 46, 91, 76, 77, 14,
+ 15, 16, 3, 4, 32, 46, 4, 48, 72, 73,
+ 51, 52, 37, 42, 42, 43, 74, 37, 37, 46,
+ 38, 38, 36, 46, 46, 38, 80, 42, 40, 83,
+ 40, 46, 90, 39, 3, 2, 45, 95, 96, 4,
+ 36, 40, 105, -1, -1, 103, 62, -1, 106, -1,
+ -1, 1, -1, -1, 112, 5, 6, 7, 8, 9,
+ 10, 11, 12, 13, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, 32, 5, 6, 7, 8, 9, 10, 11,
+ 12, 13, 42, -1, -1, 17, 18, 19, 20, 21,
+ 22, 23, 24, 25, 26, 27, 28, 29, 30, 31,
+ 32, 33, 34, 35, -1, -1, -1, -1, -1, -1,
+ -1, 43, 44
};
/* YYSTOS[STATE-NUM] -- The (internal number of the) accessing
11, 12, 13, 17, 18, 19, 20, 21, 22, 23,
24, 25, 26, 27, 28, 29, 30, 31, 32, 33,
34, 35, 43, 44, 50, 51, 54, 57, 58, 56,
- 55, 36, 52, 53, 46, 3, 72, 4, 37, 72,
- 37, 37, 72, 72, 3, 42, 69, 71, 1, 42,
- 51, 63, 64, 65, 38, 74, 36, 59, 36, 42,
- 61, 62, 62, 60, 69, 46, 46, 72, 72, 40,
- 72, 72, 40, 38, 39, 38, 43, 64, 73, 60,
- 4, 71, 61, 69, 60, 60, 72, 72, 66, 45,
- 71, 67, 68, 38, 41, 14, 15, 16, 46, 69,
- 70, 68, 69, 4, 36
+ 55, 36, 52, 53, 46, 3, 72, 4, 37, 46,
+ 73, 37, 37, 73, 72, 3, 42, 69, 71, 1,
+ 42, 51, 63, 64, 65, 38, 75, 36, 59, 36,
+ 42, 61, 62, 62, 60, 69, 46, 46, 72, 72,
+ 40, 72, 72, 40, 38, 39, 38, 43, 64, 74,
+ 60, 4, 71, 61, 69, 60, 60, 73, 73, 66,
+ 45, 71, 67, 68, 38, 41, 14, 15, 16, 46,
+ 69, 70, 68, 69, 4, 36
};
#if ! defined (YYSIZE_T) && defined (__SIZE_TYPE__)
#endif
#define yyerrok (yyerrstatus = 0)
-#define yyclearin (yychar = YYEMPTY)
+#define yyclearin (yytoken = YYEMPTY)
#define YYEMPTY -2
#define YYEOF 0
#define YYBACKUP(Token, Value) \
do \
- if (yychar == YYEMPTY && yylen == 1) \
+ if (yytoken == YYEMPTY && yylen == 1) \
{ \
yychar = (Token); \
yylval = (Value); \
- yychar1 = YYTRANSLATE (yychar); \
+ yytoken = YYTRANSLATE (yychar); \
YYPOPSTACK; \
goto yybackup; \
} \
else \
{ \
- yyerror ("syntax error: cannot back up"); \
+ yyerror ("syntax error: cannot back up");\
YYERROR; \
} \
while (0)
are run). */
#ifndef YYLLOC_DEFAULT
-# define YYLLOC_DEFAULT(Current, Rhs, N) \
+# define YYLLOC_DEFAULT(Current, Rhs, N) \
Current.first_line = Rhs[1].first_line; \
Current.first_column = Rhs[1].first_column; \
Current.last_line = Rhs[N].last_line; \
if (yydebug) \
yysymprint Args; \
} while (0)
+# define YYDSYMPRINTF(Title, Token, Value, Location) \
+do { \
+ if (yydebug) \
+ { \
+ YYFPRINTF (stderr, "%s ", Title); \
+ yysymprint (stderr, \
+ Token, Value, Location); \
+ YYFPRINTF (stderr, "\n"); \
+ } \
+} while (0)
+
/* Nonzero means print parse trace. It is left uninitialized so that
multiple parsers can coexist. */
int yydebug;
#else /* !YYDEBUG */
# define YYDPRINTF(Args)
# define YYDSYMPRINT(Args)
+# define YYDSYMPRINTF(Title, Token, Value, Location)
#endif /* !YYDEBUG */
/* YYINITDEPTH -- initial size of the parser's stacks. */
#if defined (__STDC__) || defined (__cplusplus)
static void
-yysymprint (FILE *yyout, int yytype, YYSTYPE yyvalue, YYLTYPE yylocation)
+yysymprint (FILE *yyout, int yytype, YYSTYPE *yyvaluep, YYLTYPE *yylocationp)
#else
static void
-yysymprint (yyout, yytype, yyvalue, yylocation)
+yysymprint (yyout, yytype, yyvaluep, yylocationp)
FILE *yyout;
int yytype;
- YYSTYPE yyvalue;
- YYLTYPE yylocation;
+ YYSTYPE *yyvaluep;
+ YYLTYPE *yylocationp;
#endif
{
/* Pacify ``unused variable'' warnings. */
- (void) yyvalue;
- (void) yylocation;
+ (void) yyvaluep;
+ (void) yylocationp;
if (yytype < YYNTOKENS)
{
YYFPRINTF (yyout, "token %s (", yytname[yytype]);
# ifdef YYPRINT
- YYPRINT (yyout, yytoknum[yytype], yyvalue);
+ YYPRINT (yyout, yytoknum[yytype], *yyvaluep);
# endif
}
else
}
YYFPRINTF (yyout, ")");
}
-#endif /* YYDEBUG. */
-
+#endif /* YYDEBUG. */
/*-----------------------------------------------.
| Release the memory associated to this symbol. |
`-----------------------------------------------*/
#if defined (__STDC__) || defined (__cplusplus)
static void
-yydestruct (int yytype, YYSTYPE yyvalue, YYLTYPE yylocation)
+yydestruct (int yytype, YYSTYPE *yyvaluep, YYLTYPE *yylocationp)
#else
static void
-yydestruct (yytype, yyvalue, yylocation)
+yydestruct (yytype, yyvaluep, yylocationp)
int yytype;
- YYSTYPE yyvalue;
- YYLTYPE yylocation;
+ YYSTYPE *yyvaluep;
+ YYLTYPE *yylocationp;
#endif
{
/* Pacify ``unused variable'' warnings. */
- (void) yyvalue;
- (void) yylocation;
+ (void) yyvaluep;
+ (void) yylocationp;
switch (yytype)
{
+
default:
break;
}
}
-
\f
/* Prevent warnings from -Wmissing-prototypes. */
/* The semantic value of the lookahead symbol. */
YYSTYPE yylval;
-/* Number of parse errors so far. */
+/* Number of syntax errors so far. */
int yynerrs;
/* Location data for the lookahead symbol. */
YYLTYPE yylloc;
/* Number of tokens to shift before error messages enabled. */
int yyerrstatus;
/* Lookahead token as an internal (translated) token number. */
- int yychar1 = 0;
+ int yytoken = 0;
/* Three stacks and their tools:
`yyss': related to states,
yystate = 0;
yyerrstatus = 0;
yynerrs = 0;
- yychar = YYEMPTY; /* Cause a token to be read. */
+ yychar = yytoken = YYEMPTY; /* Cause a token to be read. */
/* Initialize stack pointers.
Waste one element of value and location stack
/* Not known => get a lookahead token if don't already have one. */
- /* yychar is either YYEMPTY or YYEOF
- or a valid token in external form. */
-
- if (yychar == YYEMPTY)
+ /* YYTOKEN is either YYEMPTY or YYEOF or a valid token. */
+ if (yytoken == YYEMPTY)
{
YYDPRINTF ((stderr, "Reading a token: "));
yychar = YYLEX;
+ yytoken = YYTRANSLATE (yychar);
}
- /* Convert token to internal form (in yychar1) for indexing tables with. */
-
- if (yychar <= 0) /* This means end of input. */
+ if (yytoken == YYEOF)
{
- yychar1 = 0;
- yychar = YYEOF; /* Don't call YYLEX any more. */
-
YYDPRINTF ((stderr, "Now at end of input.\n"));
}
else
{
- yychar1 = YYTRANSLATE (yychar);
-
/* We have to keep this `#if YYDEBUG', since we use variables
which are defined only if `YYDEBUG' is set. */
- YYDPRINTF ((stderr, "Next token is "));
- YYDSYMPRINT ((stderr, yychar1, yylval, yyloc));
- YYDPRINTF ((stderr, "\n"));
+ YYDSYMPRINTF ("Next token is", yytoken, &yylval, &yylloc);
}
- /* If the proper action on seeing token YYCHAR1 is to reduce or to
+ /* If the proper action on seeing token YYTOKEN is to reduce or to
detect an error, take that action. */
- yyn += yychar1;
- if (yyn < 0 || YYLAST < yyn || yycheck[yyn] != yychar1)
+ yyn += yytoken;
+ if (yyn < 0 || YYLAST < yyn || yycheck[yyn] != yytoken)
goto yydefault;
yyn = yytable[yyn];
if (yyn <= 0)
YYACCEPT;
/* Shift the lookahead token. */
- YYDPRINTF ((stderr, "Shifting token %d (%s), ",
- yychar, yytname[yychar1]));
+ YYDPRINTF ((stderr, "Shifting token %s, ", yytname[yytoken]));
/* Discard the token being shifted unless it is eof. */
- if (yychar != YYEOF)
- yychar = YYEMPTY;
+ if (yytoken != YYEOF)
+ yytoken = YYEMPTY;
*++yyvsp = yylval;
*++yylsp = yylloc;
{
int yyi;
- YYFPRINTF (stderr, "Reducing via rule %d (line %d), ",
+ YYFPRINTF (stderr, "Reducing by rule %d (line %d), ",
yyn - 1, yyrline[yyn]);
/* Print the symbols being reduced, and their result. */
for (yyi = yyprhs[yyn]; 0 <= yyrhs[yyi]; yyi++)
YYFPRINTF (stderr, "%s ", yytname[yyrhs[yyi]]);
- YYFPRINTF (stderr, " -> %s\n", yytname[yyr1[yyn]]);
+ YYFPRINTF (stderr, "-> %s\n", yytname[yyr1[yyn]]);
}
#endif
switch (yyn)
{
case 2:
-#line 169 "parse-gram.y"
+#line 172 "parse-gram.y"
{
yycontrol->errcode = 0;
- epilogue_set (yyvsp[0].string, yylsp[0]);
}
break;
case 6:
-#line 187 "parse-gram.y"
+#line 189 "parse-gram.y"
{ prologue_augment (yyvsp[0].string, yylsp[0]); }
break;
case 7:
-#line 188 "parse-gram.y"
+#line 190 "parse-gram.y"
{ debug_flag = 1; }
break;
case 8:
-#line 189 "parse-gram.y"
+#line 191 "parse-gram.y"
{ muscle_insert (yyvsp[-1].string, yyvsp[0].string); }
break;
case 9:
-#line 190 "parse-gram.y"
+#line 192 "parse-gram.y"
{ defines_flag = 1; }
break;
case 10:
-#line 191 "parse-gram.y"
+#line 193 "parse-gram.y"
{ error_verbose = 1; }
break;
case 11:
-#line 192 "parse-gram.y"
+#line 194 "parse-gram.y"
{ expected_conflicts = yyvsp[0].integer; }
break;
case 12:
-#line 193 "parse-gram.y"
+#line 195 "parse-gram.y"
{ spec_file_prefix = yyvsp[0].string; }
break;
case 13:
-#line 194 "parse-gram.y"
+#line 196 "parse-gram.y"
{ glr_parser = 1; }
break;
case 14:
-#line 196 "parse-gram.y"
- { muscle_pair_list_grow ("lex_param", yyvsp[-2].string, yyvsp[0].string); }
+#line 198 "parse-gram.y"
+ {
+ muscle_pair_list_grow ("lex_param", yyvsp[-2].string, yyvsp[0].string);
+ scanner_last_string_free ();
+ }
break;
case 15:
-#line 197 "parse-gram.y"
+#line 202 "parse-gram.y"
{ locations_flag = 1; }
break;
case 16:
-#line 198 "parse-gram.y"
+#line 203 "parse-gram.y"
{ spec_name_prefix = yyvsp[0].string; }
break;
case 17:
-#line 199 "parse-gram.y"
+#line 204 "parse-gram.y"
{ no_lines_flag = 1; }
break;
case 18:
-#line 200 "parse-gram.y"
+#line 205 "parse-gram.y"
{ spec_outfile = yyvsp[0].string; }
break;
case 19:
-#line 202 "parse-gram.y"
- { muscle_pair_list_grow ("parse_param", yyvsp[-2].string, yyvsp[0].string); }
+#line 207 "parse-gram.y"
+ {
+ muscle_pair_list_grow ("parse_param", yyvsp[-2].string, yyvsp[0].string);
+ scanner_last_string_free ();
+ }
break;
case 20:
-#line 203 "parse-gram.y"
+#line 211 "parse-gram.y"
{ pure_parser = 1; }
break;
case 21:
-#line 204 "parse-gram.y"
+#line 212 "parse-gram.y"
{ skeleton = yyvsp[0].string; }
break;
case 22:
-#line 205 "parse-gram.y"
+#line 213 "parse-gram.y"
{ token_table_flag = 1; }
break;
case 23:
-#line 206 "parse-gram.y"
+#line 214 "parse-gram.y"
{ report_flag = 1; }
break;
case 24:
-#line 207 "parse-gram.y"
+#line 215 "parse-gram.y"
{ yacc_flag = 1; }
break;
case 27:
-#line 214 "parse-gram.y"
+#line 222 "parse-gram.y"
{
grammar_start_symbol_set (yyvsp[0].symbol, yylsp[0]);
}
break;
case 28:
-#line 218 "parse-gram.y"
+#line 226 "parse-gram.y"
{
typed = 1;
MUSCLE_INSERT_INT ("stype_line", yylsp[0].first_line);
break;
case 29:
-#line 224 "parse-gram.y"
+#line 232 "parse-gram.y"
{ current_braced_code = destructor_braced_code; }
break;
case 30:
-#line 226 "parse-gram.y"
+#line 234 "parse-gram.y"
{
symbol_list_t *list;
for (list = yyvsp[0].list; list; list = list->next)
break;
case 31:
-#line 234 "parse-gram.y"
+#line 242 "parse-gram.y"
{ current_braced_code = printer_braced_code; }
break;
case 32:
-#line 236 "parse-gram.y"
+#line 244 "parse-gram.y"
{
symbol_list_t *list;
for (list = yyvsp[0].list; list; list = list->next)
break;
case 33:
-#line 246 "parse-gram.y"
+#line 254 "parse-gram.y"
{ current_class = nterm_sym; }
break;
case 34:
-#line 247 "parse-gram.y"
+#line 255 "parse-gram.y"
{
current_class = unknown_sym;
current_type = NULL;
break;
case 35:
-#line 251 "parse-gram.y"
+#line 259 "parse-gram.y"
{ current_class = token_sym; }
break;
case 36:
-#line 252 "parse-gram.y"
+#line 260 "parse-gram.y"
{
current_class = unknown_sym;
current_type = NULL;
break;
case 37:
-#line 257 "parse-gram.y"
+#line 265 "parse-gram.y"
{
symbol_list_t *list;
for (list = yyvsp[0].list; list; list = list->next)
- symbol_type_set (list->sym, yyvsp[-1].string, yylsp[-1]);
+ symbol_type_set (list->sym, yyvsp[-1].struniq, yylsp[-1]);
symbol_list_free (yyvsp[0].list);
}
break;
case 38:
-#line 267 "parse-gram.y"
+#line 275 "parse-gram.y"
{
symbol_list_t *list;
++current_prec;
break;
case 39:
-#line 281 "parse-gram.y"
+#line 289 "parse-gram.y"
{ yyval.assoc = left_assoc; }
break;
case 40:
-#line 282 "parse-gram.y"
+#line 290 "parse-gram.y"
{ yyval.assoc = right_assoc; }
break;
case 41:
-#line 283 "parse-gram.y"
+#line 291 "parse-gram.y"
{ yyval.assoc = non_assoc; }
break;
case 42:
-#line 287 "parse-gram.y"
+#line 295 "parse-gram.y"
{ current_type = NULL; }
break;
case 43:
-#line 288 "parse-gram.y"
- { current_type = yyvsp[0].string; }
+#line 296 "parse-gram.y"
+ { current_type = yyvsp[0].struniq; }
break;
case 44:
-#line 294 "parse-gram.y"
+#line 302 "parse-gram.y"
{ yyval.list = symbol_list_new (yyvsp[0].symbol, yylsp[0]); }
break;
case 45:
-#line 295 "parse-gram.y"
+#line 303 "parse-gram.y"
{ yyval.list = symbol_list_prepend (yyvsp[-1].list, yyvsp[0].symbol, yylsp[0]); }
break;
case 46:
-#line 301 "parse-gram.y"
+#line 309 "parse-gram.y"
{
- current_type = yyvsp[0].string;
+ current_type = yyvsp[0].struniq;
}
break;
case 47:
-#line 305 "parse-gram.y"
+#line 313 "parse-gram.y"
{
symbol_class_set (yyvsp[0].symbol, current_class, yylsp[0]);
symbol_type_set (yyvsp[0].symbol, current_type, yylsp[0]);
break;
case 48:
-#line 310 "parse-gram.y"
+#line 318 "parse-gram.y"
{
symbol_class_set (yyvsp[-1].symbol, current_class, yylsp[-1]);
symbol_type_set (yyvsp[-1].symbol, current_type, yylsp[-1]);
break;
case 49:
-#line 316 "parse-gram.y"
+#line 324 "parse-gram.y"
{
symbol_class_set (yyvsp[-1].symbol, current_class, yylsp[-1]);
symbol_type_set (yyvsp[-1].symbol, current_type, yylsp[-1]);
break;
case 50:
-#line 322 "parse-gram.y"
+#line 330 "parse-gram.y"
{
symbol_class_set (yyvsp[-2].symbol, current_class, yylsp[-2]);
symbol_type_set (yyvsp[-2].symbol, current_type, yylsp[-2]);
break;
case 51:
-#line 333 "parse-gram.y"
+#line 341 "parse-gram.y"
{;}
break;
case 52:
-#line 335 "parse-gram.y"
+#line 343 "parse-gram.y"
{;}
break;
case 56:
-#line 354 "parse-gram.y"
+#line 362 "parse-gram.y"
{
if (yacc_flag)
complain_at (yyloc, _("POSIX forbids declarations in the grammar"));
break;
case 57:
-#line 359 "parse-gram.y"
+#line 367 "parse-gram.y"
{
yyerrok;
}
break;
case 58:
-#line 365 "parse-gram.y"
+#line 373 "parse-gram.y"
{ current_lhs = yyvsp[-1].symbol; current_lhs_location = yylsp[-1]; }
break;
case 59:
-#line 366 "parse-gram.y"
+#line 374 "parse-gram.y"
{;}
break;
case 60:
-#line 370 "parse-gram.y"
+#line 378 "parse-gram.y"
{ grammar_rule_end (yylsp[0]); }
break;
case 61:
-#line 371 "parse-gram.y"
+#line 379 "parse-gram.y"
{ grammar_rule_end (yylsp[0]); }
break;
case 62:
-#line 376 "parse-gram.y"
+#line 384 "parse-gram.y"
{ grammar_rule_begin (current_lhs, current_lhs_location); }
break;
case 63:
-#line 378 "parse-gram.y"
+#line 386 "parse-gram.y"
{ grammar_current_rule_symbol_append (yyvsp[0].symbol, yylsp[0]); }
break;
case 64:
-#line 380 "parse-gram.y"
+#line 388 "parse-gram.y"
{ grammar_current_rule_action_append (yyvsp[0].string, yylsp[0]); }
break;
case 65:
-#line 382 "parse-gram.y"
+#line 390 "parse-gram.y"
{ grammar_current_rule_prec_set (yyvsp[0].symbol, yylsp[0]); }
break;
case 66:
-#line 384 "parse-gram.y"
+#line 392 "parse-gram.y"
{ grammar_current_rule_dprec_set (yyvsp[0].integer, yylsp[0]); }
break;
case 67:
-#line 386 "parse-gram.y"
- { grammar_current_rule_merge_set (yyvsp[0].string, yylsp[0]); }
+#line 394 "parse-gram.y"
+ { grammar_current_rule_merge_set (yyvsp[0].struniq, yylsp[0]); }
break;
case 68:
-#line 390 "parse-gram.y"
+#line 398 "parse-gram.y"
{ yyval.symbol = yyvsp[0].symbol; }
break;
case 69:
-#line 391 "parse-gram.y"
+#line 399 "parse-gram.y"
{ yyval.symbol = yyvsp[0].symbol; }
break;
case 70:
-#line 396 "parse-gram.y"
+#line 404 "parse-gram.y"
{ yyval.string = yyvsp[0].string; }
break;
case 71:
-#line 402 "parse-gram.y"
+#line 410 "parse-gram.y"
{
yyval.symbol = symbol_get (yyvsp[0].string, yylsp[0]);
symbol_class_set (yyval.symbol, token_sym, yylsp[0]);
break;
case 72:
-#line 411 "parse-gram.y"
+#line 419 "parse-gram.y"
{
yyval.string = yyvsp[0].string + 1;
yyval.string[strlen (yyval.string) - 1] = '\0';
break;
case 73:
-#line 419 "parse-gram.y"
+#line 428 "parse-gram.y"
{
- yyval.string = xstrdup ("");
+ yyval.string = yyvsp[0].string + 1;
+ yyval.string[strlen (yyval.string) - 1] = '\0';
}
break;
- case 74:
-#line 423 "parse-gram.y"
+ case 75:
+#line 437 "parse-gram.y"
{
- yyval.string = yyvsp[0].string;
+ epilogue_augment (yyvsp[0].string, yylsp[0]);
+ scanner_last_string_free ();
}
break;
}
-/* Line 1031 of /tmp/prefix/share/bison/yacc.c. */
-#line 1621 "parse-gram.c"
+/* Line 959 of /usr/local/share/bison/yacc.c. */
+#line 1636 "parse-gram.c"
\f
yyvsp -= yylen;
yyssp -= yylen;
yyx < (int) (sizeof (yytname) / sizeof (char *)); yyx++)
if (yycheck[yyx + yyn] == yyx && yyx != YYTERROR)
yysize += yystrlen (yytname[yyx]) + 15, yycount++;
- yysize += yystrlen ("parse error, unexpected ") + 1;
+ yysize += yystrlen ("syntax error, unexpected ") + 1;
yysize += yystrlen (yytname[yytype]);
yymsg = (char *) YYSTACK_ALLOC (yysize);
if (yymsg != 0)
{
- char *yyp = yystpcpy (yymsg, "parse error, unexpected ");
+ char *yyp = yystpcpy (yymsg, "syntax error, unexpected ");
yyp = yystpcpy (yyp, yytname[yytype]);
if (yycount < 5)
YYSTACK_FREE (yymsg);
}
else
- yyerror ("parse error; also virtual memory exhausted");
+ yyerror ("syntax error; also virtual memory exhausted");
}
else
#endif /* YYERROR_VERBOSE */
- yyerror ("parse error");
+ yyerror ("syntax error");
}
goto yyerrlab1;
error, discard it. */
/* Return failure if at end of input. */
- if (yychar == YYEOF)
+ if (yytoken == YYEOF)
{
/* Pop the error token. */
YYPOPSTACK;
/* Pop the rest of the stack. */
while (yyss < yyssp)
{
- YYDPRINTF ((stderr, "Error: popping "));
- YYDSYMPRINT ((stderr,
- yystos[*yyssp],
- *yyvsp, *yylsp));
- YYDPRINTF ((stderr, "\n"));
- yydestruct (yystos[*yyssp], *yyvsp, *yylsp);
+ YYDSYMPRINTF ("Error: popping", yystos[*yyssp], yyvsp, yylsp);
+ yydestruct (yystos[*yyssp], yyvsp, yylsp);
YYPOPSTACK;
}
YYABORT;
}
- YYDPRINTF ((stderr, "Discarding token %d (%s).\n",
- yychar, yytname[yychar1]));
- yydestruct (yychar1, yylval, yylloc);
- yychar = YYEMPTY;
+ YYDSYMPRINTF ("Error: discarding", yytoken, &yylval, &yylloc);
+ yydestruct (yytoken, &yylval, &yylloc);
+ yytoken = YYEMPTY;
}
/* Else will try to reuse lookahead token after shifting the error
if (yyssp == yyss)
YYABORT;
- YYDPRINTF ((stderr, "Error: popping "));
- YYDSYMPRINT ((stderr,
- yystos[*yyssp], *yyvsp, *yylsp));
- YYDPRINTF ((stderr, "\n"));
-
- yydestruct (yystos[yystate], *yyvsp, *yylsp);
+ YYDSYMPRINTF ("Error: popping", yystos[*yyssp], yyvsp, yylsp);
+ yydestruct (yystos[yystate], yyvsp, yylsp);
yyvsp--;
yystate = *--yyssp;
yylsp--;
}
-#line 432 "parse-gram.y"
+#line 447 "parse-gram.y"
/*------------------------------------------------------------------.
| When debugging the parser, display tokens' locations and values. |
break;
case TYPE:
- fprintf (file, " = <%s>", value->string);
+ fprintf (file, " = <%s>", value->struniq);
break;
case BRACED_CODE:
case EPILOGUE:
fprintf (file, " = {{ %s }}", value->string);
break;
+
+ default:
+ fprintf (file, "unknown token type");
+ break;
}
}
projects / bison.git / blobdiff