X-Git-Url: https://git.saurik.com/bison.git/blobdiff_plain/333e670c857bff3b9354f61a572edaa0e25ac695..27cb5b590124894edc3e4bee11737972e56d2dbe:/data/yacc.c diff --git a/data/yacc.c b/data/yacc.c index b871118a..d16e385f 100644 --- a/data/yacc.c +++ b/data/yacc.c @@ -1,10 +1,12 @@ -*- C -*- - # Yacc compatible skeleton for Bison # Copyright (C) 1984, 1989, 1990, 2000, 2001, 2002, 2003, 2004, 2005, 2006, # 2007, 2008 Free Software Foundation, Inc. +m4_pushdef([b4_copyright_years], +[1984, 1989, 1990, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008]) + # This program is free software: you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation, either version 3 of the License, or @@ -114,7 +116,7 @@ m4_define([b4_int_type], # -------------------- # Expansion of $$. m4_define([b4_lhs_value], -[(yyval[]m4_ifval([$1], [.$1]))]) +[b4_symbol_value(yyval, [$1])]) # b4_rhs_value(RULE-LENGTH, NUM, [TYPE]) @@ -122,7 +124,7 @@ m4_define([b4_lhs_value], # Expansion of $NUM, where the current rule has RULE-LENGTH # symbols on RHS. m4_define([b4_rhs_value], -[(yyvsp@{($2) - ($1)@}m4_ifval([$3], [.$3]))]) +[b4_symbol_value([yyvsp@{($2) - ($1)@}], [$3])]) @@ -153,9 +155,9 @@ m4_define([b4_rhs_location], # We do want M4 expansion after # for CPP macros. m4_changecom() m4_divert_push(0)dnl -@output(b4_parser_file_name@) -b4_copyright([Skeleton implementation for Bison's Yacc-like parsers in C],dnl ' - [1984, 1989, 1990, 2000, 2001, 2002, 2003, 2004, 2005, 2006])[ +@output(b4_parser_file_name@)@ +b4_copyright([Implementation for Bison's Yacc-like parsers in C])dnl' +[ /* C LALR(1) parser skeleton written by Richard Stallman, by simplifying the original so-called "semantic" parser. */ @@ -480,7 +482,7 @@ union yyalloc #define YYNNTS ]b4_nterms_number[ /* YYNRULES -- Number of rules. */ #define YYNRULES ]b4_rules_number[ -/* YYNRULES -- Number of states. */ +/* YYNSTATES -- Number of states. */ #define YYNSTATES ]b4_states_number[ /* YYTRANSLATE(YYLEX) -- Bison symbol number corresponding to YYLEX. */ @@ -1191,9 +1193,9 @@ b4_push_if([b4_pure_if([], [[ int yypushed_char = yychar; int yytoken; /* The variables used to return semantic value and location from the action routines. */ - YYSTYPE yyval; -]b4_locations_if([[ YYLTYPE yyloc; -]])[ + YYSTYPE yyval;]b4_locations_if([[ + YYLTYPE yyloc;]])[ + #if YYERROR_VERBOSE /* Buffer for error messages, and its allocated size. */ char yymsgbuf[128]; @@ -1205,19 +1207,18 @@ b4_push_if([b4_pure_if([], [[ int yypushed_char = yychar; /* The number of symbols on the RHS of the reduced rule. Keep to zero when no symbol should be popped. */ - int yylen = 0; -]b4_push_if([[ + int yylen = 0;]b4_push_if([[ + if (!yyps->yynew) { yyn = yypact[yystate]; goto yyread_pushed_token; - } -]])[ + }]])[ + yytoken = 0; yyss = yyssa; - yyvs = yyvsa; -]b4_locations_if([[ yyls = yylsa; -]])[ + yyvs = yyvsa;]b4_locations_if([[ + yyls = yylsa;]])[ yystacksize = YYINITDEPTH; YYDPRINTF ((stderr, "Starting parse\n")); @@ -1354,33 +1355,29 @@ yybackup: /* YYCHAR is either YYEMPTY or YYEOF or a valid lookahead symbol. */ if (yychar == YYEMPTY) - { -]b4_push_if([[ if (!yyps->yynew) - { -]b4_use_push_for_pull_if([], -[[ YYDPRINTF ((stderr, "Return for a new token:\n")); -]])[ yyresult = YYPUSH_MORE; + {]b4_push_if([[ + if (!yyps->yynew) + {]b4_use_push_for_pull_if([], [[ + YYDPRINTF ((stderr, "Return for a new token:\n"));]])[ + yyresult = YYPUSH_MORE; goto yypushreturn; } - yyps->yynew = 0; -]b4_pure_if([], [[ + yyps->yynew = 0;]b4_pure_if([], [[ /* Restoring the pushed token is only necessary for the first yypush_parse invocation since subsequent invocations don't overwrite it before jumping to yyread_pushed_token. */ yychar = yypushed_char; - yylval = yypushed_val; - ]b4_locations_if([[yylloc = yypushed_loc; -]])])[ -yyread_pushed_token: -]])[ YYDPRINTF ((stderr, "Reading a token: ")); -]b4_push_if([b4_pure_if([[ yychar = yypushed_char; + yylval = yypushed_val;]b4_locations_if([[ + yylloc = yypushed_loc;]])])[ +yyread_pushed_token:]])[ + YYDPRINTF ((stderr, "Reading a token: "));]b4_push_if([b4_pure_if([[ + yychar = yypushed_char; if (yypushed_val) - yylval = *yypushed_val; -]b4_locations_if([[ if (yypushed_loc) - yylloc = *yypushed_loc; -]])])], -[[ yychar = YYLEX; -]])[ } + yylval = *yypushed_val;]b4_locations_if([[ + if (yypushed_loc) + yylloc = *yypushed_loc;]])])], [[ + yychar = YYLEX;]])[ + } if (yychar <= YYEOF) { @@ -1679,9 +1676,8 @@ yypushreturn: ]b4_epilogue b4_defines_if( -[@output(b4_spec_defines_file@) -b4_copyright([Skeleton interface for Bison's Yacc-like parsers in C],dnl ' - [1984, 1989, 1990, 2000, 2001, 2002, 2003, 2004, 2005, 2006]) +[@output(b4_spec_defines_file@)@ +b4_copyright([Interface for Bison's Yacc-like parsers in C])dnl' b4_percent_code_get([[requires]])[]dnl @@ -1744,3 +1740,4 @@ b4_c_function_decl([b4_prefix[pstate_delete]], [[void]], b4_percent_code_get([[provides]])[]dnl ])dnl b4_defines_if m4_divert_pop(0) +m4_popdef([b4_copyright_years])