From f9d52903f176fbcf07edf8102cdb69f4744b2ddb Mon Sep 17 00:00:00 2001 From: "Joel E. Denny" Date: Sun, 13 Mar 2011 18:03:59 -0400 Subject: * src/parse-gram.c, src/parse-gram.h: Regenerate. --- ChangeLog | 4 + src/parse-gram.c | 518 +++++++++++++++++++++++++++++-------------------------- src/parse-gram.h | 8 +- 3 files changed, 281 insertions(+), 249 deletions(-) diff --git a/ChangeLog b/ChangeLog index a3d12021..9aab950c 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,7 @@ +2011-03-13 Joel E. Denny + + * src/parse-gram.c, src/parse-gram.h: Regenerate. + 2011-03-09 Akim Demaille named references: fix double free. diff --git a/src/parse-gram.c b/src/parse-gram.c index bd3c167c..6a0c2172 100644 --- a/src/parse-gram.c +++ b/src/parse-gram.c @@ -1,4 +1,4 @@ -/* A Bison parser, made by GNU Bison 2.4.557-bf3e4. */ +/* A Bison parser, made by GNU Bison 2.4.579-a4d1b. */ /* Bison implementation for Yacc-like parsers in C @@ -44,7 +44,7 @@ #define YYBISON 1 /* Bison version. */ -#define YYBISON_VERSION "2.4.557-bf3e4" +#define YYBISON_VERSION "2.4.579-a4d1b" /* Skeleton name. */ #define YYSKELETON_NAME "yacc.c" @@ -149,7 +149,7 @@ static char const *char_name (char); /* "%code requires" blocks. */ /* Line 289 of yacc.c */ -#line 202 "src/parse-gram.y" +#line 220 "src/parse-gram.y" # ifndef PARAM_TYPE # define PARAM_TYPE @@ -293,7 +293,7 @@ static char const *char_name (char); typedef union YYSTYPE { /* Line 294 of yacc.c */ -#line 88 "src/parse-gram.y" +#line 106 "src/parse-gram.y" assoc assoc; char *code; @@ -306,7 +306,7 @@ typedef union YYSTYPE unsigned char character; /* Line 294 of yacc.c */ -#line 226 "src/parse-gram.y" +#line 244 "src/parse-gram.y" param_type param; @@ -344,17 +344,35 @@ typedef struct YYLTYPE static int current_prec = 0; static location current_lhs_location; static named_ref *current_lhs_named_ref; - static symbol *current_lhs; + static symbol *current_lhs_symbol; static symbol_class current_class = unknown_sym; static uniqstr current_type = NULL; + /** Set the new current left-hand side symbol, possibly common + * to several right-hand side parts of rule. + */ + static + void + current_lhs(symbol *sym, location loc, named_ref *ref) + { + current_lhs_symbol = sym; + current_lhs_location = loc; + /* In order to simplify memory management, named references for lhs + are always assigned by deep copy into the current symbol_list + node. This is because a single named-ref in the grammar may + result in several uses when the user factors lhs between several + rules using "|". Therefore free the parser's original copy. */ + free (current_lhs_named_ref); + current_lhs_named_ref = ref; + } + #define YYTYPE_INT16 int_fast16_t #define YYTYPE_INT8 int_fast8_t #define YYTYPE_UINT16 uint_fast16_t #define YYTYPE_UINT8 uint_fast8_t /* Line 345 of yacc.c */ -#line 215 "src/parse-gram.y" +#line 233 "src/parse-gram.y" /** Add a lex-param and/or a parse-param. * @@ -367,7 +385,7 @@ typedef struct YYLTYPE /* Line 345 of yacc.c */ -#line 371 "src/parse-gram.c" +#line 389 "src/parse-gram.c" #ifdef short # undef short @@ -626,18 +644,18 @@ static const yytype_uint8 yytranslate[] = /* YYRLINEYYN -- Source line where rule number YYN was defined. */ static const yytype_uint16 yyrline[] = { - 0, 251, 251, 259, 261, 265, 266, 276, 280, 285, - 286, 291, 296, 297, 298, 299, 300, 305, 314, 315, - 316, 317, 318, 319, 320, 321, 321, 322, 323, 347, - 348, 349, 350, 354, 355, 364, 365, 366, 370, 377, - 384, 388, 392, 399, 414, 415, 419, 431, 431, 436, - 436, 441, 452, 467, 468, 469, 470, 474, 475, 480, - 482, 487, 488, 493, 495, 500, 501, 505, 506, 507, - 508, 513, 518, 523, 529, 535, 546, 547, 556, 557, - 563, 564, 565, 572, 572, 577, 578, 579, 584, 586, - 588, 590, 592, 594, 596, 601, 603, 613, 614, 619, - 620, 621, 630, 650, 652, 661, 666, 667, 672, 679, - 681 + 0, 269, 269, 277, 279, 283, 284, 294, 298, 303, + 304, 309, 314, 315, 316, 317, 318, 323, 332, 333, + 334, 335, 336, 337, 338, 339, 339, 340, 341, 365, + 366, 367, 368, 372, 373, 382, 383, 384, 388, 395, + 402, 406, 410, 417, 432, 433, 437, 449, 449, 454, + 454, 459, 470, 485, 486, 487, 488, 492, 493, 498, + 500, 505, 506, 511, 513, 518, 519, 523, 524, 525, + 526, 531, 536, 541, 547, 553, 564, 565, 574, 575, + 581, 582, 583, 590, 590, 598, 599, 600, 605, 607, + 609, 611, 613, 615, 617, 622, 624, 634, 635, 640, + 641, 642, 651, 671, 673, 682, 687, 688, 693, 700, + 702 }; #endif @@ -1014,106 +1032,106 @@ yy_symbol_value_print (yyoutput, yytype, yyvaluep, yylocationp) case 3: // "string" /* Line 751 of yacc.c */ -#line 175 "src/parse-gram.y" +#line 193 "src/parse-gram.y" { fputs (quotearg_style (c_quoting_style, ((*yyvaluep).chars)), stderr); } /* Line 751 of yacc.c */ -#line 1021 "src/parse-gram.c" +#line 1039 "src/parse-gram.c" break; case 4: // "integer" /* Line 751 of yacc.c */ -#line 188 "src/parse-gram.y" +#line 206 "src/parse-gram.y" { fprintf (stderr, "%d", ((*yyvaluep).integer)); } /* Line 751 of yacc.c */ -#line 1030 "src/parse-gram.c" +#line 1048 "src/parse-gram.c" break; case 24: // "%" /* Line 751 of yacc.c */ -#line 184 "src/parse-gram.y" +#line 202 "src/parse-gram.y" { fprintf (stderr, "%%%s", ((*yyvaluep).uniqstr)); } /* Line 751 of yacc.c */ -#line 1039 "src/parse-gram.c" +#line 1057 "src/parse-gram.c" break; case 40: // "{...}" /* Line 751 of yacc.c */ -#line 177 "src/parse-gram.y" +#line 195 "src/parse-gram.y" { fprintf (stderr, "{\n%s\n}", ((*yyvaluep).code)); } /* Line 751 of yacc.c */ -#line 1048 "src/parse-gram.c" +#line 1066 "src/parse-gram.c" break; case 42: // "[identifier]" /* Line 751 of yacc.c */ -#line 182 "src/parse-gram.y" +#line 200 "src/parse-gram.y" { fprintf (stderr, "[%s]", ((*yyvaluep).uniqstr)); } /* Line 751 of yacc.c */ -#line 1057 "src/parse-gram.c" +#line 1075 "src/parse-gram.c" break; case 43: // "char" /* Line 751 of yacc.c */ -#line 169 "src/parse-gram.y" +#line 187 "src/parse-gram.y" { fputs (char_name (((*yyvaluep).character)), stderr); } /* Line 751 of yacc.c */ -#line 1066 "src/parse-gram.c" +#line 1084 "src/parse-gram.c" break; case 44: // "epilogue" /* Line 751 of yacc.c */ -#line 177 "src/parse-gram.y" +#line 195 "src/parse-gram.y" { fprintf (stderr, "{\n%s\n}", ((*yyvaluep).chars)); } /* Line 751 of yacc.c */ -#line 1075 "src/parse-gram.c" +#line 1093 "src/parse-gram.c" break; case 46: // "identifier" /* Line 751 of yacc.c */ -#line 181 "src/parse-gram.y" +#line 199 "src/parse-gram.y" { fputs (((*yyvaluep).uniqstr), stderr); } /* Line 751 of yacc.c */ -#line 1084 "src/parse-gram.c" +#line 1102 "src/parse-gram.c" break; case 47: // "identifier:" /* Line 751 of yacc.c */ -#line 183 "src/parse-gram.y" +#line 201 "src/parse-gram.y" { fprintf (stderr, "%s:", ((*yyvaluep).uniqstr)); } /* Line 751 of yacc.c */ -#line 1093 "src/parse-gram.c" +#line 1111 "src/parse-gram.c" break; case 50: // "%{...%}" /* Line 751 of yacc.c */ -#line 177 "src/parse-gram.y" +#line 195 "src/parse-gram.y" { fprintf (stderr, "{\n%s\n}", ((*yyvaluep).chars)); } /* Line 751 of yacc.c */ -#line 1102 "src/parse-gram.c" +#line 1120 "src/parse-gram.c" break; case 52: // "" /* Line 751 of yacc.c */ -#line 185 "src/parse-gram.y" +#line 203 "src/parse-gram.y" { fprintf (stderr, "<%s>", ((*yyvaluep).uniqstr)); } /* Line 751 of yacc.c */ -#line 1111 "src/parse-gram.c" +#line 1129 "src/parse-gram.c" break; case 55: // "%param" /* Line 751 of yacc.c */ -#line 231 "src/parse-gram.y" +#line 249 "src/parse-gram.y" { switch (((*yyvaluep).param)) { @@ -1127,79 +1145,79 @@ yy_symbol_value_print (yyoutput, yytype, yyvaluep, yylocationp) } } /* Line 751 of yacc.c */ -#line 1131 "src/parse-gram.c" +#line 1149 "src/parse-gram.c" break; case 72: // symbol.prec /* Line 751 of yacc.c */ -#line 191 "src/parse-gram.y" +#line 209 "src/parse-gram.y" { fprintf (stderr, "%s", ((*yyvaluep).symbol)->tag); } /* Line 751 of yacc.c */ -#line 1140 "src/parse-gram.c" +#line 1158 "src/parse-gram.c" break; case 85: // variable /* Line 751 of yacc.c */ -#line 181 "src/parse-gram.y" +#line 199 "src/parse-gram.y" { fputs (((*yyvaluep).uniqstr), stderr); } /* Line 751 of yacc.c */ -#line 1149 "src/parse-gram.c" +#line 1167 "src/parse-gram.c" break; case 86: // content.opt /* Line 751 of yacc.c */ -#line 177 "src/parse-gram.y" +#line 195 "src/parse-gram.y" { fprintf (stderr, "{\n%s\n}", ((*yyvaluep).chars)); } /* Line 751 of yacc.c */ -#line 1158 "src/parse-gram.c" +#line 1176 "src/parse-gram.c" break; case 87: // braceless /* Line 751 of yacc.c */ -#line 177 "src/parse-gram.y" +#line 195 "src/parse-gram.y" { fprintf (stderr, "{\n%s\n}", ((*yyvaluep).chars)); } /* Line 751 of yacc.c */ -#line 1167 "src/parse-gram.c" +#line 1185 "src/parse-gram.c" break; case 88: // id /* Line 751 of yacc.c */ -#line 191 "src/parse-gram.y" +#line 209 "src/parse-gram.y" { fprintf (stderr, "%s", ((*yyvaluep).symbol)->tag); } /* Line 751 of yacc.c */ -#line 1176 "src/parse-gram.c" +#line 1194 "src/parse-gram.c" break; case 89: // id_colon /* Line 751 of yacc.c */ -#line 192 "src/parse-gram.y" +#line 210 "src/parse-gram.y" { fprintf (stderr, "%s:", ((*yyvaluep).symbol)->tag); } /* Line 751 of yacc.c */ -#line 1185 "src/parse-gram.c" +#line 1203 "src/parse-gram.c" break; case 90: // symbol /* Line 751 of yacc.c */ -#line 191 "src/parse-gram.y" +#line 209 "src/parse-gram.y" { fprintf (stderr, "%s", ((*yyvaluep).symbol)->tag); } /* Line 751 of yacc.c */ -#line 1194 "src/parse-gram.c" +#line 1212 "src/parse-gram.c" break; case 91: // string_as_id /* Line 751 of yacc.c */ -#line 191 "src/parse-gram.y" +#line 209 "src/parse-gram.y" { fprintf (stderr, "%s", ((*yyvaluep).symbol)->tag); } /* Line 751 of yacc.c */ -#line 1203 "src/parse-gram.c" +#line 1221 "src/parse-gram.c" break; default: @@ -1994,7 +2012,7 @@ YYLTYPE yylloc; /* User initialization code. */ /* Line 1524 of yacc.c */ -#line 80 "src/parse-gram.y" +#line 98 "src/parse-gram.y" { /* Bison's grammar can initial empty locations, hence a default location is needed. */ @@ -2002,7 +2020,7 @@ YYLTYPE yylloc; boundary_set (&yylloc.end, current_file, 1, 1); } /* Line 1524 of yacc.c */ -#line 2006 "src/parse-gram.c" +#line 2024 "src/parse-gram.c" yylsp[0] = yylloc; goto yysetstate; @@ -2196,7 +2214,7 @@ yyreduce: { case 6: /* Line 1740 of yacc.c */ -#line 267 "src/parse-gram.y" +#line 285 "src/parse-gram.y" { code_props plain_code; code_props_plain_init (&plain_code, (yyvsp[0].chars), (yylsp[0])); @@ -2207,106 +2225,106 @@ yyreduce: code_scanner_last_string_free (); } /* Line 1740 of yacc.c */ -#line 2211 "src/parse-gram.c" +#line 2229 "src/parse-gram.c" break; case 7: /* Line 1740 of yacc.c */ -#line 277 "src/parse-gram.y" +#line 295 "src/parse-gram.y" { muscle_percent_define_ensure ((yyvsp[0].uniqstr), (yylsp[0]), true); } /* Line 1740 of yacc.c */ -#line 2221 "src/parse-gram.c" +#line 2239 "src/parse-gram.c" break; case 8: /* Line 1740 of yacc.c */ -#line 281 "src/parse-gram.y" +#line 299 "src/parse-gram.y" { muscle_percent_define_insert ((yyvsp[-1].uniqstr), (yylsp[-1]), (yyvsp[0].chars), MUSCLE_PERCENT_DEFINE_GRAMMAR_FILE); } /* Line 1740 of yacc.c */ -#line 2232 "src/parse-gram.c" +#line 2250 "src/parse-gram.c" break; case 9: /* Line 1740 of yacc.c */ -#line 285 "src/parse-gram.y" +#line 303 "src/parse-gram.y" { defines_flag = true; } /* Line 1740 of yacc.c */ -#line 2240 "src/parse-gram.c" +#line 2258 "src/parse-gram.c" break; case 10: /* Line 1740 of yacc.c */ -#line 287 "src/parse-gram.y" +#line 305 "src/parse-gram.y" { defines_flag = true; spec_defines_file = xstrdup ((yyvsp[0].chars)); } /* Line 1740 of yacc.c */ -#line 2251 "src/parse-gram.c" +#line 2269 "src/parse-gram.c" break; case 11: /* Line 1740 of yacc.c */ -#line 292 "src/parse-gram.y" +#line 310 "src/parse-gram.y" { muscle_percent_define_insert ("parse.error", (yylsp[0]), "verbose", MUSCLE_PERCENT_DEFINE_GRAMMAR_FILE); } /* Line 1740 of yacc.c */ -#line 2262 "src/parse-gram.c" +#line 2280 "src/parse-gram.c" break; case 12: /* Line 1740 of yacc.c */ -#line 296 "src/parse-gram.y" +#line 314 "src/parse-gram.y" { expected_sr_conflicts = (yyvsp[0].integer); } /* Line 1740 of yacc.c */ -#line 2270 "src/parse-gram.c" +#line 2288 "src/parse-gram.c" break; case 13: /* Line 1740 of yacc.c */ -#line 297 "src/parse-gram.y" +#line 315 "src/parse-gram.y" { expected_rr_conflicts = (yyvsp[0].integer); } /* Line 1740 of yacc.c */ -#line 2278 "src/parse-gram.c" +#line 2296 "src/parse-gram.c" break; case 14: /* Line 1740 of yacc.c */ -#line 298 "src/parse-gram.y" +#line 316 "src/parse-gram.y" { spec_file_prefix = (yyvsp[0].chars); } /* Line 1740 of yacc.c */ -#line 2286 "src/parse-gram.c" +#line 2304 "src/parse-gram.c" break; case 15: /* Line 1740 of yacc.c */ -#line 299 "src/parse-gram.y" +#line 317 "src/parse-gram.y" { spec_file_prefix = (yyvsp[0].chars); } /* Line 1740 of yacc.c */ -#line 2294 "src/parse-gram.c" +#line 2312 "src/parse-gram.c" break; case 16: /* Line 1740 of yacc.c */ -#line 301 "src/parse-gram.y" +#line 319 "src/parse-gram.y" { nondeterministic_parser = true; glr_parser = true; } /* Line 1740 of yacc.c */ -#line 2305 "src/parse-gram.c" +#line 2323 "src/parse-gram.c" break; case 17: /* Line 1740 of yacc.c */ -#line 306 "src/parse-gram.y" +#line 324 "src/parse-gram.y" { code_props action; code_props_symbol_action_init (&action, (yyvsp[0].code), (yylsp[0])); @@ -2316,92 +2334,92 @@ yyreduce: code_scanner_last_string_free (); } /* Line 1740 of yacc.c */ -#line 2320 "src/parse-gram.c" +#line 2338 "src/parse-gram.c" break; case 18: /* Line 1740 of yacc.c */ -#line 314 "src/parse-gram.y" +#line 332 "src/parse-gram.y" { language_argmatch ((yyvsp[0].chars), grammar_prio, (yylsp[-1])); } /* Line 1740 of yacc.c */ -#line 2328 "src/parse-gram.c" +#line 2346 "src/parse-gram.c" break; case 19: /* Line 1740 of yacc.c */ -#line 315 "src/parse-gram.y" +#line 333 "src/parse-gram.y" { spec_name_prefix = (yyvsp[0].chars); } /* Line 1740 of yacc.c */ -#line 2336 "src/parse-gram.c" +#line 2354 "src/parse-gram.c" break; case 20: /* Line 1740 of yacc.c */ -#line 316 "src/parse-gram.y" +#line 334 "src/parse-gram.y" { spec_name_prefix = (yyvsp[0].chars); } /* Line 1740 of yacc.c */ -#line 2344 "src/parse-gram.c" +#line 2362 "src/parse-gram.c" break; case 21: /* Line 1740 of yacc.c */ -#line 317 "src/parse-gram.y" +#line 335 "src/parse-gram.y" { no_lines_flag = true; } /* Line 1740 of yacc.c */ -#line 2352 "src/parse-gram.c" +#line 2370 "src/parse-gram.c" break; case 22: /* Line 1740 of yacc.c */ -#line 318 "src/parse-gram.y" +#line 336 "src/parse-gram.y" { nondeterministic_parser = true; } /* Line 1740 of yacc.c */ -#line 2360 "src/parse-gram.c" +#line 2378 "src/parse-gram.c" break; case 23: /* Line 1740 of yacc.c */ -#line 319 "src/parse-gram.y" +#line 337 "src/parse-gram.y" { spec_outfile = (yyvsp[0].chars); } /* Line 1740 of yacc.c */ -#line 2368 "src/parse-gram.c" +#line 2386 "src/parse-gram.c" break; case 24: /* Line 1740 of yacc.c */ -#line 320 "src/parse-gram.y" +#line 338 "src/parse-gram.y" { spec_outfile = (yyvsp[0].chars); } /* Line 1740 of yacc.c */ -#line 2376 "src/parse-gram.c" +#line 2394 "src/parse-gram.c" break; case 25: /* Line 1740 of yacc.c */ -#line 321 "src/parse-gram.y" +#line 339 "src/parse-gram.y" { current_param = (yyvsp[0].param); } /* Line 1740 of yacc.c */ -#line 2384 "src/parse-gram.c" +#line 2402 "src/parse-gram.c" break; case 26: /* Line 1740 of yacc.c */ -#line 321 "src/parse-gram.y" +#line 339 "src/parse-gram.y" { current_param = param_none; } /* Line 1740 of yacc.c */ -#line 2392 "src/parse-gram.c" +#line 2410 "src/parse-gram.c" break; case 27: /* Line 1740 of yacc.c */ -#line 322 "src/parse-gram.y" +#line 340 "src/parse-gram.y" { version_check (&(yylsp[0]), (yyvsp[0].chars)); } /* Line 1740 of yacc.c */ -#line 2400 "src/parse-gram.c" +#line 2418 "src/parse-gram.c" break; case 28: /* Line 1740 of yacc.c */ -#line 324 "src/parse-gram.y" +#line 342 "src/parse-gram.y" { char const *skeleton_user = (yyvsp[0].chars); if (strchr (skeleton_user, '/')) @@ -2426,62 +2444,62 @@ yyreduce: skeleton_arg (skeleton_user, grammar_prio, (yylsp[-1])); } /* Line 1740 of yacc.c */ -#line 2430 "src/parse-gram.c" +#line 2448 "src/parse-gram.c" break; case 29: /* Line 1740 of yacc.c */ -#line 347 "src/parse-gram.y" +#line 365 "src/parse-gram.y" { token_table_flag = true; } /* Line 1740 of yacc.c */ -#line 2438 "src/parse-gram.c" +#line 2456 "src/parse-gram.c" break; case 30: /* Line 1740 of yacc.c */ -#line 348 "src/parse-gram.y" +#line 366 "src/parse-gram.y" { report_flag |= report_states; } /* Line 1740 of yacc.c */ -#line 2446 "src/parse-gram.c" +#line 2464 "src/parse-gram.c" break; case 31: /* Line 1740 of yacc.c */ -#line 349 "src/parse-gram.y" +#line 367 "src/parse-gram.y" { yacc_flag = true; } /* Line 1740 of yacc.c */ -#line 2454 "src/parse-gram.c" +#line 2472 "src/parse-gram.c" break; case 33: /* Line 1740 of yacc.c */ -#line 354 "src/parse-gram.y" +#line 372 "src/parse-gram.y" { add_param (current_param, (yyvsp[0].code), (yylsp[0])); } /* Line 1740 of yacc.c */ -#line 2462 "src/parse-gram.c" +#line 2480 "src/parse-gram.c" break; case 34: /* Line 1740 of yacc.c */ -#line 355 "src/parse-gram.y" +#line 373 "src/parse-gram.y" { add_param (current_param, (yyvsp[0].code), (yylsp[0])); } /* Line 1740 of yacc.c */ -#line 2470 "src/parse-gram.c" +#line 2488 "src/parse-gram.c" break; case 37: /* Line 1740 of yacc.c */ -#line 367 "src/parse-gram.y" +#line 385 "src/parse-gram.y" { grammar_start_symbol_set ((yyvsp[0].symbol), (yylsp[0])); } /* Line 1740 of yacc.c */ -#line 2480 "src/parse-gram.c" +#line 2498 "src/parse-gram.c" break; case 38: /* Line 1740 of yacc.c */ -#line 371 "src/parse-gram.y" +#line 389 "src/parse-gram.y" { symbol_list *list; for (list = (yyvsp[0].list); list; list = list->next) @@ -2489,12 +2507,12 @@ yyreduce: symbol_list_free ((yyvsp[0].list)); } /* Line 1740 of yacc.c */ -#line 2493 "src/parse-gram.c" +#line 2511 "src/parse-gram.c" break; case 39: /* Line 1740 of yacc.c */ -#line 378 "src/parse-gram.y" +#line 396 "src/parse-gram.y" { symbol_list *list; for (list = (yyvsp[0].list); list; list = list->next) @@ -2502,32 +2520,32 @@ yyreduce: symbol_list_free ((yyvsp[0].list)); } /* Line 1740 of yacc.c */ -#line 2506 "src/parse-gram.c" +#line 2524 "src/parse-gram.c" break; case 40: /* Line 1740 of yacc.c */ -#line 385 "src/parse-gram.y" +#line 403 "src/parse-gram.y" { default_prec = true; } /* Line 1740 of yacc.c */ -#line 2516 "src/parse-gram.c" +#line 2534 "src/parse-gram.c" break; case 41: /* Line 1740 of yacc.c */ -#line 389 "src/parse-gram.y" +#line 407 "src/parse-gram.y" { default_prec = false; } /* Line 1740 of yacc.c */ -#line 2526 "src/parse-gram.c" +#line 2544 "src/parse-gram.c" break; case 42: /* Line 1740 of yacc.c */ -#line 393 "src/parse-gram.y" +#line 411 "src/parse-gram.y" { /* Do not invoke muscle_percent_code_grow here since it invokes muscle_user_name_list_grow. */ @@ -2535,89 +2553,89 @@ yyreduce: code_scanner_last_string_free (); } /* Line 1740 of yacc.c */ -#line 2539 "src/parse-gram.c" +#line 2557 "src/parse-gram.c" break; case 43: /* Line 1740 of yacc.c */ -#line 400 "src/parse-gram.y" +#line 418 "src/parse-gram.y" { muscle_percent_code_grow ((yyvsp[-1].uniqstr), (yylsp[-1]), (yyvsp[0].chars), (yylsp[0])); code_scanner_last_string_free (); } /* Line 1740 of yacc.c */ -#line 2550 "src/parse-gram.c" +#line 2568 "src/parse-gram.c" break; case 44: /* Line 1740 of yacc.c */ -#line 414 "src/parse-gram.y" +#line 432 "src/parse-gram.y" {} /* Line 1740 of yacc.c */ -#line 2558 "src/parse-gram.c" +#line 2576 "src/parse-gram.c" break; case 45: /* Line 1740 of yacc.c */ -#line 415 "src/parse-gram.y" +#line 433 "src/parse-gram.y" { muscle_code_grow ("union_name", (yyvsp[0].uniqstr), (yylsp[0])); } /* Line 1740 of yacc.c */ -#line 2566 "src/parse-gram.c" +#line 2584 "src/parse-gram.c" break; case 46: /* Line 1740 of yacc.c */ -#line 420 "src/parse-gram.y" +#line 438 "src/parse-gram.y" { union_seen = true; muscle_code_grow ("stype", (yyvsp[0].chars), (yylsp[0])); code_scanner_last_string_free (); } /* Line 1740 of yacc.c */ -#line 2578 "src/parse-gram.c" +#line 2596 "src/parse-gram.c" break; case 47: /* Line 1740 of yacc.c */ -#line 431 "src/parse-gram.y" +#line 449 "src/parse-gram.y" { current_class = nterm_sym; } /* Line 1740 of yacc.c */ -#line 2586 "src/parse-gram.c" +#line 2604 "src/parse-gram.c" break; case 48: /* Line 1740 of yacc.c */ -#line 432 "src/parse-gram.y" +#line 450 "src/parse-gram.y" { current_class = unknown_sym; current_type = NULL; } /* Line 1740 of yacc.c */ -#line 2597 "src/parse-gram.c" +#line 2615 "src/parse-gram.c" break; case 49: /* Line 1740 of yacc.c */ -#line 436 "src/parse-gram.y" +#line 454 "src/parse-gram.y" { current_class = token_sym; } /* Line 1740 of yacc.c */ -#line 2605 "src/parse-gram.c" +#line 2623 "src/parse-gram.c" break; case 50: /* Line 1740 of yacc.c */ -#line 437 "src/parse-gram.y" +#line 455 "src/parse-gram.y" { current_class = unknown_sym; current_type = NULL; } /* Line 1740 of yacc.c */ -#line 2616 "src/parse-gram.c" +#line 2634 "src/parse-gram.c" break; case 51: /* Line 1740 of yacc.c */ -#line 442 "src/parse-gram.y" +#line 460 "src/parse-gram.y" { symbol_list *list; tag_seen = true; @@ -2626,12 +2644,12 @@ yyreduce: symbol_list_free ((yyvsp[0].list)); } /* Line 1740 of yacc.c */ -#line 2630 "src/parse-gram.c" +#line 2648 "src/parse-gram.c" break; case 52: /* Line 1740 of yacc.c */ -#line 453 "src/parse-gram.y" +#line 471 "src/parse-gram.y" { symbol_list *list; ++current_prec; @@ -2644,202 +2662,202 @@ yyreduce: current_type = NULL; } /* Line 1740 of yacc.c */ -#line 2648 "src/parse-gram.c" +#line 2666 "src/parse-gram.c" break; case 53: /* Line 1740 of yacc.c */ -#line 467 "src/parse-gram.y" +#line 485 "src/parse-gram.y" { (yyval.assoc) = left_assoc; } /* Line 1740 of yacc.c */ -#line 2656 "src/parse-gram.c" +#line 2674 "src/parse-gram.c" break; case 54: /* Line 1740 of yacc.c */ -#line 468 "src/parse-gram.y" +#line 486 "src/parse-gram.y" { (yyval.assoc) = right_assoc; } /* Line 1740 of yacc.c */ -#line 2664 "src/parse-gram.c" +#line 2682 "src/parse-gram.c" break; case 55: /* Line 1740 of yacc.c */ -#line 469 "src/parse-gram.y" +#line 487 "src/parse-gram.y" { (yyval.assoc) = non_assoc; } /* Line 1740 of yacc.c */ -#line 2672 "src/parse-gram.c" +#line 2690 "src/parse-gram.c" break; case 56: /* Line 1740 of yacc.c */ -#line 470 "src/parse-gram.y" +#line 488 "src/parse-gram.y" { (yyval.assoc) = precedence_assoc; } /* Line 1740 of yacc.c */ -#line 2680 "src/parse-gram.c" +#line 2698 "src/parse-gram.c" break; case 57: /* Line 1740 of yacc.c */ -#line 474 "src/parse-gram.y" +#line 492 "src/parse-gram.y" { current_type = NULL; } /* Line 1740 of yacc.c */ -#line 2688 "src/parse-gram.c" +#line 2706 "src/parse-gram.c" break; case 58: /* Line 1740 of yacc.c */ -#line 475 "src/parse-gram.y" +#line 493 "src/parse-gram.y" { current_type = (yyvsp[0].uniqstr); tag_seen = true; } /* Line 1740 of yacc.c */ -#line 2696 "src/parse-gram.c" +#line 2714 "src/parse-gram.c" break; case 59: /* Line 1740 of yacc.c */ -#line 481 "src/parse-gram.y" +#line 499 "src/parse-gram.y" { (yyval.list) = symbol_list_sym_new ((yyvsp[0].symbol), (yylsp[0])); } /* Line 1740 of yacc.c */ -#line 2704 "src/parse-gram.c" +#line 2722 "src/parse-gram.c" break; case 60: /* Line 1740 of yacc.c */ -#line 483 "src/parse-gram.y" +#line 501 "src/parse-gram.y" { (yyval.list) = symbol_list_prepend ((yyvsp[-1].list), symbol_list_sym_new ((yyvsp[0].symbol), (yylsp[0]))); } /* Line 1740 of yacc.c */ -#line 2712 "src/parse-gram.c" +#line 2730 "src/parse-gram.c" break; case 61: /* Line 1740 of yacc.c */ -#line 487 "src/parse-gram.y" +#line 505 "src/parse-gram.y" { (yyval.symbol) = (yyvsp[0].symbol); } /* Line 1740 of yacc.c */ -#line 2720 "src/parse-gram.c" +#line 2738 "src/parse-gram.c" break; case 62: /* Line 1740 of yacc.c */ -#line 488 "src/parse-gram.y" +#line 506 "src/parse-gram.y" { (yyval.symbol) = (yyvsp[-1].symbol); symbol_user_token_number_set ((yyvsp[-1].symbol), (yyvsp[0].integer), (yylsp[0])); } /* Line 1740 of yacc.c */ -#line 2728 "src/parse-gram.c" +#line 2746 "src/parse-gram.c" break; case 63: /* Line 1740 of yacc.c */ -#line 494 "src/parse-gram.y" +#line 512 "src/parse-gram.y" { (yyval.list) = symbol_list_sym_new ((yyvsp[0].symbol), (yylsp[0])); } /* Line 1740 of yacc.c */ -#line 2736 "src/parse-gram.c" +#line 2754 "src/parse-gram.c" break; case 64: /* Line 1740 of yacc.c */ -#line 496 "src/parse-gram.y" +#line 514 "src/parse-gram.y" { (yyval.list) = symbol_list_prepend ((yyvsp[-1].list), symbol_list_sym_new ((yyvsp[0].symbol), (yylsp[0]))); } /* Line 1740 of yacc.c */ -#line 2744 "src/parse-gram.c" +#line 2762 "src/parse-gram.c" break; case 65: /* Line 1740 of yacc.c */ -#line 500 "src/parse-gram.y" +#line 518 "src/parse-gram.y" { (yyval.list) = (yyvsp[0].list); } /* Line 1740 of yacc.c */ -#line 2752 "src/parse-gram.c" +#line 2770 "src/parse-gram.c" break; case 66: /* Line 1740 of yacc.c */ -#line 501 "src/parse-gram.y" +#line 519 "src/parse-gram.y" { (yyval.list) = symbol_list_prepend ((yyvsp[-1].list), (yyvsp[0].list)); } /* Line 1740 of yacc.c */ -#line 2760 "src/parse-gram.c" +#line 2778 "src/parse-gram.c" break; case 67: /* Line 1740 of yacc.c */ -#line 505 "src/parse-gram.y" +#line 523 "src/parse-gram.y" { (yyval.list) = symbol_list_sym_new ((yyvsp[0].symbol), (yylsp[0])); } /* Line 1740 of yacc.c */ -#line 2768 "src/parse-gram.c" +#line 2786 "src/parse-gram.c" break; case 68: /* Line 1740 of yacc.c */ -#line 506 "src/parse-gram.y" +#line 524 "src/parse-gram.y" { (yyval.list) = symbol_list_type_new ((yyvsp[0].uniqstr), (yylsp[0])); } /* Line 1740 of yacc.c */ -#line 2776 "src/parse-gram.c" +#line 2794 "src/parse-gram.c" break; case 69: /* Line 1740 of yacc.c */ -#line 507 "src/parse-gram.y" +#line 525 "src/parse-gram.y" { (yyval.list) = symbol_list_default_tagged_new ((yylsp[0])); } /* Line 1740 of yacc.c */ -#line 2784 "src/parse-gram.c" +#line 2802 "src/parse-gram.c" break; case 70: /* Line 1740 of yacc.c */ -#line 508 "src/parse-gram.y" +#line 526 "src/parse-gram.y" { (yyval.list) = symbol_list_default_tagless_new ((yylsp[0])); } /* Line 1740 of yacc.c */ -#line 2792 "src/parse-gram.c" +#line 2810 "src/parse-gram.c" break; case 71: /* Line 1740 of yacc.c */ -#line 514 "src/parse-gram.y" +#line 532 "src/parse-gram.y" { current_type = (yyvsp[0].uniqstr); tag_seen = true; } /* Line 1740 of yacc.c */ -#line 2803 "src/parse-gram.c" +#line 2821 "src/parse-gram.c" break; case 72: /* Line 1740 of yacc.c */ -#line 519 "src/parse-gram.y" +#line 537 "src/parse-gram.y" { symbol_class_set ((yyvsp[0].symbol), current_class, (yylsp[0]), true); symbol_type_set ((yyvsp[0].symbol), current_type, (yylsp[0])); } /* Line 1740 of yacc.c */ -#line 2814 "src/parse-gram.c" +#line 2832 "src/parse-gram.c" break; case 73: /* Line 1740 of yacc.c */ -#line 524 "src/parse-gram.y" +#line 542 "src/parse-gram.y" { symbol_class_set ((yyvsp[-1].symbol), current_class, (yylsp[-1]), true); symbol_type_set ((yyvsp[-1].symbol), current_type, (yylsp[-1])); symbol_user_token_number_set ((yyvsp[-1].symbol), (yyvsp[0].integer), (yylsp[0])); } /* Line 1740 of yacc.c */ -#line 2826 "src/parse-gram.c" +#line 2844 "src/parse-gram.c" break; case 74: /* Line 1740 of yacc.c */ -#line 530 "src/parse-gram.y" +#line 548 "src/parse-gram.y" { symbol_class_set ((yyvsp[-1].symbol), current_class, (yylsp[-1]), true); symbol_type_set ((yyvsp[-1].symbol), current_type, (yylsp[-1])); symbol_make_alias ((yyvsp[-1].symbol), (yyvsp[0].symbol), (yyloc)); } /* Line 1740 of yacc.c */ -#line 2838 "src/parse-gram.c" +#line 2856 "src/parse-gram.c" break; case 75: /* Line 1740 of yacc.c */ -#line 536 "src/parse-gram.y" +#line 554 "src/parse-gram.y" { symbol_class_set ((yyvsp[-2].symbol), current_class, (yylsp[-2]), true); symbol_type_set ((yyvsp[-2].symbol), current_type, (yylsp[-2])); @@ -2847,144 +2865,154 @@ yyreduce: symbol_make_alias ((yyvsp[-2].symbol), (yyvsp[0].symbol), (yyloc)); } /* Line 1740 of yacc.c */ -#line 2851 "src/parse-gram.c" +#line 2869 "src/parse-gram.c" break; case 82: /* Line 1740 of yacc.c */ -#line 566 "src/parse-gram.y" +#line 584 "src/parse-gram.y" { yyerrok; } /* Line 1740 of yacc.c */ -#line 2861 "src/parse-gram.c" +#line 2879 "src/parse-gram.c" break; case 83: /* Line 1740 of yacc.c */ -#line 572 "src/parse-gram.y" - { current_lhs = (yyvsp[-1].symbol); current_lhs_location = (yylsp[-1]); - current_lhs_named_ref = (yyvsp[0].named_ref); } +#line 590 "src/parse-gram.y" + { current_lhs ((yyvsp[-1].symbol), (yylsp[-1]), (yyvsp[0].named_ref)); } +/* Line 1740 of yacc.c */ +#line 2887 "src/parse-gram.c" + break; + + case 84: +/* Line 1740 of yacc.c */ +#line 591 "src/parse-gram.y" + { + /* Free the current lhs. */ + current_lhs (0, (yylsp[-3]), 0); + } /* Line 1740 of yacc.c */ -#line 2870 "src/parse-gram.c" +#line 2898 "src/parse-gram.c" break; case 85: /* Line 1740 of yacc.c */ -#line 577 "src/parse-gram.y" +#line 598 "src/parse-gram.y" { grammar_current_rule_end ((yylsp[0])); } /* Line 1740 of yacc.c */ -#line 2878 "src/parse-gram.c" +#line 2906 "src/parse-gram.c" break; case 86: /* Line 1740 of yacc.c */ -#line 578 "src/parse-gram.y" +#line 599 "src/parse-gram.y" { grammar_current_rule_end ((yylsp[0])); } /* Line 1740 of yacc.c */ -#line 2886 "src/parse-gram.c" +#line 2914 "src/parse-gram.c" break; case 88: /* Line 1740 of yacc.c */ -#line 584 "src/parse-gram.y" - { grammar_current_rule_begin (current_lhs, current_lhs_location, +#line 605 "src/parse-gram.y" + { grammar_current_rule_begin (current_lhs_symbol, current_lhs_location, current_lhs_named_ref); } /* Line 1740 of yacc.c */ -#line 2895 "src/parse-gram.c" +#line 2923 "src/parse-gram.c" break; case 89: /* Line 1740 of yacc.c */ -#line 587 "src/parse-gram.y" +#line 608 "src/parse-gram.y" { grammar_current_rule_symbol_append ((yyvsp[-1].symbol), (yylsp[-1]), (yyvsp[0].named_ref)); } /* Line 1740 of yacc.c */ -#line 2903 "src/parse-gram.c" +#line 2931 "src/parse-gram.c" break; case 90: /* Line 1740 of yacc.c */ -#line 589 "src/parse-gram.y" +#line 610 "src/parse-gram.y" { grammar_current_rule_action_append ((yyvsp[-1].code), (yylsp[-1]), (yyvsp[0].named_ref), false); } /* Line 1740 of yacc.c */ -#line 2911 "src/parse-gram.c" +#line 2939 "src/parse-gram.c" break; case 91: /* Line 1740 of yacc.c */ -#line 591 "src/parse-gram.y" +#line 612 "src/parse-gram.y" { grammar_current_rule_action_append ((yyvsp[0].code), (yylsp[0]), NULL, true); } /* Line 1740 of yacc.c */ -#line 2919 "src/parse-gram.c" +#line 2947 "src/parse-gram.c" break; case 92: /* Line 1740 of yacc.c */ -#line 593 "src/parse-gram.y" +#line 614 "src/parse-gram.y" { grammar_current_rule_prec_set ((yyvsp[0].symbol), (yylsp[0])); } /* Line 1740 of yacc.c */ -#line 2927 "src/parse-gram.c" +#line 2955 "src/parse-gram.c" break; case 93: /* Line 1740 of yacc.c */ -#line 595 "src/parse-gram.y" +#line 616 "src/parse-gram.y" { grammar_current_rule_dprec_set ((yyvsp[0].integer), (yylsp[0])); } /* Line 1740 of yacc.c */ -#line 2935 "src/parse-gram.c" +#line 2963 "src/parse-gram.c" break; case 94: /* Line 1740 of yacc.c */ -#line 597 "src/parse-gram.y" +#line 618 "src/parse-gram.y" { grammar_current_rule_merge_set ((yyvsp[0].uniqstr), (yylsp[0])); } /* Line 1740 of yacc.c */ -#line 2943 "src/parse-gram.c" +#line 2971 "src/parse-gram.c" break; case 95: /* Line 1740 of yacc.c */ -#line 601 "src/parse-gram.y" +#line 622 "src/parse-gram.y" { (yyval.named_ref) = 0; } /* Line 1740 of yacc.c */ -#line 2951 "src/parse-gram.c" +#line 2979 "src/parse-gram.c" break; case 96: /* Line 1740 of yacc.c */ -#line 603 "src/parse-gram.y" +#line 624 "src/parse-gram.y" { (yyval.named_ref) = named_ref_new((yyvsp[0].uniqstr), (yylsp[0])); } /* Line 1740 of yacc.c */ -#line 2959 "src/parse-gram.c" +#line 2987 "src/parse-gram.c" break; case 98: /* Line 1740 of yacc.c */ -#line 614 "src/parse-gram.y" +#line 635 "src/parse-gram.y" { (yyval.uniqstr) = uniqstr_new ((yyvsp[0].chars)); } /* Line 1740 of yacc.c */ -#line 2967 "src/parse-gram.c" +#line 2995 "src/parse-gram.c" break; case 99: /* Line 1740 of yacc.c */ -#line 619 "src/parse-gram.y" +#line 640 "src/parse-gram.y" { (yyval.chars) = ""; } /* Line 1740 of yacc.c */ -#line 2975 "src/parse-gram.c" +#line 3003 "src/parse-gram.c" break; case 100: /* Line 1740 of yacc.c */ -#line 620 "src/parse-gram.y" +#line 641 "src/parse-gram.y" { (yyval.chars) = (yyvsp[0].uniqstr); } /* Line 1740 of yacc.c */ -#line 2983 "src/parse-gram.c" +#line 3011 "src/parse-gram.c" break; case 102: /* Line 1740 of yacc.c */ -#line 631 "src/parse-gram.y" +#line 652 "src/parse-gram.y" { code_props plain_code; (yyvsp[0].code)[strlen ((yyvsp[0].code)) - 1] = '\n'; @@ -2994,51 +3022,51 @@ yyreduce: (yyval.chars) = plain_code.code; } /* Line 1740 of yacc.c */ -#line 2998 "src/parse-gram.c" +#line 3026 "src/parse-gram.c" break; case 103: /* Line 1740 of yacc.c */ -#line 651 "src/parse-gram.y" +#line 672 "src/parse-gram.y" { (yyval.symbol) = symbol_from_uniqstr ((yyvsp[0].uniqstr), (yylsp[0])); } /* Line 1740 of yacc.c */ -#line 3006 "src/parse-gram.c" +#line 3034 "src/parse-gram.c" break; case 104: /* Line 1740 of yacc.c */ -#line 653 "src/parse-gram.y" +#line 674 "src/parse-gram.y" { (yyval.symbol) = symbol_get (char_name ((yyvsp[0].character)), (yylsp[0])); symbol_class_set ((yyval.symbol), token_sym, (yylsp[0]), false); symbol_user_token_number_set ((yyval.symbol), (yyvsp[0].character), (yylsp[0])); } /* Line 1740 of yacc.c */ -#line 3018 "src/parse-gram.c" +#line 3046 "src/parse-gram.c" break; case 105: /* Line 1740 of yacc.c */ -#line 661 "src/parse-gram.y" +#line 682 "src/parse-gram.y" { (yyval.symbol) = symbol_from_uniqstr ((yyvsp[0].uniqstr), (yylsp[0])); } /* Line 1740 of yacc.c */ -#line 3026 "src/parse-gram.c" +#line 3054 "src/parse-gram.c" break; case 108: /* Line 1740 of yacc.c */ -#line 673 "src/parse-gram.y" +#line 694 "src/parse-gram.y" { (yyval.symbol) = symbol_get (quotearg_style (c_quoting_style, (yyvsp[0].chars)), (yylsp[0])); symbol_class_set ((yyval.symbol), token_sym, (yylsp[0]), false); } /* Line 1740 of yacc.c */ -#line 3037 "src/parse-gram.c" +#line 3065 "src/parse-gram.c" break; case 110: /* Line 1740 of yacc.c */ -#line 682 "src/parse-gram.y" +#line 703 "src/parse-gram.y" { code_props plain_code; code_props_plain_init (&plain_code, (yyvsp[0].chars), (yylsp[0])); @@ -3048,12 +3076,12 @@ yyreduce: code_scanner_last_string_free (); } /* Line 1740 of yacc.c */ -#line 3052 "src/parse-gram.c" +#line 3080 "src/parse-gram.c" break; /* Line 1740 of yacc.c */ -#line 3057 "src/parse-gram.c" +#line 3085 "src/parse-gram.c" default: break; } if (yychar_backup != yychar) @@ -3301,7 +3329,7 @@ yyreturn: } /* Line 2000 of yacc.c */ -#line 692 "src/parse-gram.y" +#line 713 "src/parse-gram.y" diff --git a/src/parse-gram.h b/src/parse-gram.h index 18bd3bd6..56f95650 100644 --- a/src/parse-gram.h +++ b/src/parse-gram.h @@ -1,4 +1,4 @@ -/* A Bison parser, made by GNU Bison 2.4.557-bf3e4. */ +/* A Bison parser, made by GNU Bison 2.4.579-a4d1b. */ /* Bison interface for Yacc-like parsers in C @@ -31,7 +31,7 @@ version 2.2 of Bison. */ /* "%code requires" blocks. */ /* Line 2001 of yacc.c */ -#line 202 "src/parse-gram.y" +#line 220 "src/parse-gram.y" # ifndef PARAM_TYPE # define PARAM_TYPE @@ -175,7 +175,7 @@ typedef union YYSTYPE { /* Line 2001 of yacc.c */ -#line 88 "src/parse-gram.y" +#line 106 "src/parse-gram.y" assoc assoc; char *code; @@ -188,7 +188,7 @@ typedef union YYSTYPE unsigned char character; /* Line 2001 of yacc.c */ -#line 226 "src/parse-gram.y" +#line 244 "src/parse-gram.y" param_type param; -- cgit v1.2.1