]> git.saurik.com Git - bison.git/blame - data/yacc.c
maint: update copyright years
[bison.git] / data / yacc.c
CommitLineData
08af01c2 1 -*- C -*-
a8289c62 2
60491a94 3# Yacc compatible skeleton for Bison
c7a65b99 4
68f91d58 5# Copyright (C) 1984, 1989-1990, 2000-2013 Free Software Foundation,
ea0a7676 6# Inc.
60491a94 7
f16b0819 8# This program is free software: you can redistribute it and/or modify
60491a94 9# it under the terms of the GNU General Public License as published by
f16b0819 10# the Free Software Foundation, either version 3 of the License, or
60491a94 11# (at your option) any later version.
f16b0819 12#
60491a94
AD
13# This program is distributed in the hope that it will be useful,
14# but WITHOUT ANY WARRANTY; without even the implied warranty of
15# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16# GNU General Public License for more details.
f16b0819 17#
60491a94 18# You should have received a copy of the GNU General Public License
f16b0819 19# along with this program. If not, see <http://www.gnu.org/licenses/>.
60491a94 20
812775a0
JD
21# Check the value of %define api.push-pull.
22b4_percent_define_default([[api.push-pull]], [[pull]])
23b4_percent_define_check_values([[[[api.push-pull]],
93d0103d 24 [[pull]], [[push]], [[both]]]])
9ca7f077
JD
25b4_define_flag_if([pull]) m4_define([b4_pull_flag], [[1]])
26b4_define_flag_if([push]) m4_define([b4_push_flag], [[1]])
812775a0 27m4_case(b4_percent_define_get([[api.push-pull]]),
9ca7f077
JD
28 [pull], [m4_define([b4_push_flag], [[0]])],
29 [push], [m4_define([b4_pull_flag], [[0]])])
30
31# Handle BISON_USE_PUSH_FOR_PULL for the test suite. So that push parsing
7e5ef706
PE
32# tests function as written, do not let BISON_USE_PUSH_FOR_PULL modify the
33# behavior of Bison at all when push parsing is already requested.
9ca7f077
JD
34b4_define_flag_if([use_push_for_pull])
35b4_use_push_for_pull_if([
36 b4_push_if([m4_define([b4_use_push_for_pull_flag], [[0]])],
37 [m4_define([b4_push_flag], [[1]])])])
945e396c 38
723fe7d1
JD
39# Check the value of %define parse.lac and friends, where LAC stands for
40# lookahead correction.
ea13bea8 41b4_percent_define_default([[parse.lac]], [[none]])
723fe7d1
JD
42b4_percent_define_default([[parse.lac.es-capacity-initial]], [[20]])
43b4_percent_define_default([[parse.lac.memory-trace]], [[failures]])
44b4_percent_define_check_values([[[[parse.lac]], [[full]], [[none]]]],
45 [[[[parse.lac.memory-trace]],
46 [[failures]], [[full]]]])
ea13bea8
JD
47b4_define_flag_if([lac])
48m4_define([b4_lac_flag],
49 [m4_if(b4_percent_define_get([[parse.lac]]),
50 [none], [[0]], [[1]])])
51
0a96ba81 52m4_include(b4_pkgdatadir/[c.m4])
7eb8a0bc 53
66d30cd4
AD
54## ---------------- ##
55## Default values. ##
56## ---------------- ##
57
58# Stack parameters.
59m4_define_default([b4_stack_depth_max], [10000])
60m4_define_default([b4_stack_depth_init], [200])
61
2a8d363a
AD
62
63## ------------------------ ##
64## Pure/impure interfaces. ##
65## ------------------------ ##
66
d9df47b6 67b4_percent_define_default([[api.pure]], [[false]])
6428a8a4
TR
68b4_percent_define_check_values([[[[api.pure]],
69 [[false]], [[true]], [[]], [[full]]]])
70
71m4_define([b4_pure_flag], [[0]])
72m4_case(b4_percent_define_get([[api.pure]]),
73 [false], [m4_define([b4_pure_flag], [[0]])],
74 [true], [m4_define([b4_pure_flag], [[1]])],
75 [], [m4_define([b4_pure_flag], [[1]])],
76 [full], [m4_define([b4_pure_flag], [[2]])])
77
78m4_define([b4_pure_if],
79[m4_case(b4_pure_flag,
80 [0], [$2],
81 [1], [$1],
82 [2], [$1])])
83 [m4_fatal([invalid api.pure value: ]$1)])])
84
85# b4_yyerror_arg_loc_if(ARG)
86# --------------------------
87# Expand ARG iff yyerror is to be given a location as argument.
88m4_define([b4_yyerror_arg_loc_if],
89[b4_locations_if([m4_case(b4_pure_flag,
90 [1], [m4_ifset([b4_parse_param], [$1])],
91 [2], [$1])])])
2a8d363a 92
93724f13
AD
93# b4_yyerror_args
94# ---------------
2a8d363a 95# Arguments passed to yyerror: user args plus yylloc.
93724f13 96m4_define([b4_yyerror_args],
6428a8a4 97[b4_yyerror_arg_loc_if([&yylloc, ])dnl
93724f13 98m4_ifset([b4_parse_param], [b4_c_args(b4_parse_param), ])])
2a8d363a
AD
99
100
101# b4_lex_param
102# ------------
d42f69cd 103# Accumulate in b4_lex_param all the yylex arguments.
2a8d363a 104# b4_lex_param arrives quoted twice, but we want to keep only one level.
21964f43
AD
105m4_define([b4_lex_param],
106m4_dquote(b4_pure_if([[[[YYSTYPE *]], [[&yylval]]][]dnl
327afc7c 107b4_locations_if([, [[YYLTYPE *], [&yylloc]]])m4_ifdef([b4_lex_param], [, ])])dnl
68cdf747 108m4_ifdef([b4_lex_param], b4_lex_param)))
66d30cd4
AD
109
110
f1886bb2
AD
111## ------------ ##
112## Data Types. ##
113## ------------ ##
114
115# b4_int_type(MIN, MAX)
116# ---------------------
117# Return the smallest int type able to handle numbers ranging from
d42cf844
PE
118# MIN to MAX (included). Overwrite the version from c.m4, which
119# uses only C89 types, so that the user can override the shorter
120# types, and so that pre-C89 compilers are handled correctly.
f1886bb2 121m4_define([b4_int_type],
d42cf844
PE
122[m4_if(b4_ints_in($@, [0], [255]), [1], [yytype_uint8],
123 b4_ints_in($@, [-128], [127]), [1], [yytype_int8],
f1886bb2 124
d42cf844
PE
125 b4_ints_in($@, [0], [65535]), [1], [yytype_uint16],
126 b4_ints_in($@, [-32768], [32767]), [1], [yytype_int16],
f1886bb2
AD
127
128 m4_eval([0 <= $1]), [1], [unsigned int],
129
02650b7f 130 [int])])
f1886bb2
AD
131
132
66d30cd4
AD
133## ----------------- ##
134## Semantic Values. ##
135## ----------------- ##
136
137
82b6cb3f
AD
138# b4_lhs_value([TYPE])
139# --------------------
140# Expansion of $<TYPE>$.
141m4_define([b4_lhs_value],
bc82c5a5 142[(yyval[]m4_ifval([$1], [.$1]))])
82b6cb3f
AD
143
144
145# b4_rhs_value(RULE-LENGTH, NUM, [TYPE])
146# --------------------------------------
147# Expansion of $<TYPE>NUM, where the current rule has RULE-LENGTH
148# symbols on RHS.
149m4_define([b4_rhs_value],
d1ff7a7c 150[(yyvsp@{($2) - ($1)@}m4_ifval([$3], [.$3]))])
82b6cb3f
AD
151
152
58612f1d
AD
153
154## ----------- ##
155## Locations. ##
156## ----------- ##
157
82b6cb3f
AD
158# b4_lhs_location()
159# -----------------
160# Expansion of @$.
161m4_define([b4_lhs_location],
bc82c5a5 162[(yyloc)])
82b6cb3f
AD
163
164
165# b4_rhs_location(RULE-LENGTH, NUM)
166# ---------------------------------
167# Expansion of @NUM, where the current rule has RULE-LENGTH symbols
168# on RHS.
169m4_define([b4_rhs_location],
d1ff7a7c 170[(yylsp@{($2) - ($1)@})])
be2a1a68 171
0d8bed56 172
c0828abf
AD
173## -------------- ##
174## Declarations. ##
175## -------------- ##
93d0103d
JD
176
177# b4_declare_scanner_communication_variables
178# ------------------------------------------
179# Declare the variables that are global, or local to YYPARSE if
180# pure-parser.
181m4_define([b4_declare_scanner_communication_variables], [[
182/* The lookahead symbol. */
183int yychar;
184
fa5303b8 185]b4_pure_if([[
4f4a54ab 186#if defined __GNUC__ && 407 <= __GNUC__ * 100 + __GNUC_MINOR__
fa5303b8
PE
187/* Suppress an incorrect diagnostic about yylval being uninitialized. */
188# define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN \
189 _Pragma ("GCC diagnostic push") \
63e8426a 190 _Pragma ("GCC diagnostic ignored \"-Wuninitialized\"")\
fa5303b8
PE
191 _Pragma ("GCC diagnostic ignored \"-Wmaybe-uninitialized\"")
192# define YY_IGNORE_MAYBE_UNINITIALIZED_END \
193 _Pragma ("GCC diagnostic pop")
194#else
195/* Default value used for initialization, for pacifying older GCCs
196 or non-GCC compilers. */
a1d1ab50 197static YYSTYPE yyval_default;
a68b1f23 198# define YY_INITIAL_VALUE(Value) = Value
fb4c8a7c
TR
199#endif]b4_locations_if([[
200static YYLTYPE yyloc_default][]b4_yyloc_default[;]])])[
fa5303b8
PE
201#ifndef YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
202# define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
203# define YY_IGNORE_MAYBE_UNINITIALIZED_END
204#endif
a68b1f23
AD
205#ifndef YY_INITIAL_VALUE
206# define YY_INITIAL_VALUE(Value) /* Nothing. */
207#endif
fa5303b8 208
93d0103d 209/* The semantic value of the lookahead symbol. */
a68b1f23 210YYSTYPE yylval YY_INITIAL_VALUE(yyval_default);]b4_locations_if([[
93d0103d
JD
211
212/* Location data for the lookahead symbol. */
fb4c8a7c 213YYLTYPE yylloc]b4_pure_if([ = yyloc_default], [b4_yyloc_default])[;
a1d1ab50 214]])b4_pure_if([], [[
93d0103d
JD
215
216/* Number of syntax errors so far. */
217int yynerrs;]])])
218
219
220# b4_declare_parser_state_variables
221# ---------------------------------
222# Declare all the variables that are needed to maintain the parser state
223# between calls to yypush_parse.
224m4_define([b4_declare_parser_state_variables], [b4_pure_if([[
225 /* Number of syntax errors so far. */
226 int yynerrs;
227]])[
228 int yystate;
229 /* Number of tokens to shift before error messages enabled. */
230 int yyerrstatus;
231
232 /* The stacks and their tools:
233 `yyss': related to states.
234 `yyvs': related to semantic values.]b4_locations_if([[
235 `yyls': related to locations.]])[
236
cbdb6d91 237 Refer to the stacks through separate pointers, to allow yyoverflow
93d0103d
JD
238 to reallocate them elsewhere. */
239
240 /* The state stack. */
241 yytype_int16 yyssa[YYINITDEPTH];
242 yytype_int16 *yyss;
243 yytype_int16 *yyssp;
244
245 /* The semantic value stack. */
246 YYSTYPE yyvsa[YYINITDEPTH];
247 YYSTYPE *yyvs;
248 YYSTYPE *yyvsp;]b4_locations_if([[
249
250 /* The location stack. */
251 YYLTYPE yylsa[YYINITDEPTH];
252 YYLTYPE *yyls;
253 YYLTYPE *yylsp;
254
255 /* The locations where the error started and ended. */
a005dbcb 256 YYLTYPE yyerror_range[3];]])[
93d0103d 257
723fe7d1
JD
258 YYSIZE_T yystacksize;]b4_lac_if([[
259
260 yytype_int16 yyesa@{]b4_percent_define_get([[parse.lac.es-capacity-initial]])[@};
261 yytype_int16 *yyes;
262 YYSIZE_T yyes_capacity;]])])
93d0103d 263
ae6bdabb 264
c3e9f08f
AD
265# b4_declare_yyparse_push_
266# ------------------------
55d1006f
AD
267# Declaration of yyparse (and dependencies) when using the push parser
268# (including in pull mode).
c3e9f08f 269m4_define([b4_declare_yyparse_push_],
ad60e80f
AD
270[[#ifndef YYPUSH_MORE_DEFINED
271# define YYPUSH_MORE_DEFINED
ae6bdabb 272enum { YYPUSH_MORE = 4 };
ad60e80f
AD
273#endif
274
275typedef struct ]b4_prefix[pstate ]b4_prefix[pstate;
276
ae6bdabb
AD
277]b4_pull_if([b4_c_function_decl([b4_prefix[parse]], [[int]], b4_parse_param)
278])b4_c_function_decl([b4_prefix[push_parse]], [[int]],
ad60e80f
AD
279 [[b4_prefix[pstate *ps]], [[ps]]]b4_pure_if([,
280 [[[int pushed_char]], [[pushed_char]]],
281 [[b4_api_PREFIX[STYPE const *pushed_val]], [[pushed_val]]]b4_locations_if([,
a1d1ab50 282 [[b4_api_PREFIX[LTYPE *pushed_loc]], [[pushed_loc]]]])])m4_ifset([b4_parse_param], [,
ae6bdabb
AD
283 b4_parse_param]))
284b4_pull_if([b4_c_function_decl([b4_prefix[pull_parse]], [[int]],
ad60e80f 285 [[b4_prefix[pstate *ps]], [[ps]]]m4_ifset([b4_parse_param], [,
ae6bdabb
AD
286 b4_parse_param]))])
287b4_c_function_decl([b4_prefix[pstate_new]], [b4_prefix[pstate *]],
288 [[[void]], []])
289b4_c_function_decl([b4_prefix[pstate_delete]], [[void]],
ad60e80f 290 [[b4_prefix[pstate *ps]], [[ps]]])dnl
c3e9f08f
AD
291])
292
293# b4_declare_yyparse_
294# -------------------
295# When not the push parser.
296m4_define([b4_declare_yyparse_],
297[[#ifdef YYPARSE_PARAM
298]b4_c_function_decl(b4_prefix[parse], [int],
299 [[void *YYPARSE_PARAM], [YYPARSE_PARAM]])[
300#else /* ! YYPARSE_PARAM */
301]b4_c_function_decl(b4_prefix[parse], [int], b4_parse_param)[
302#endif /* ! YYPARSE_PARAM */]dnl
303])
304
305
306# b4_declare_yyparse
307# ------------------
308m4_define([b4_declare_yyparse],
309[b4_push_if([b4_declare_yyparse_push_],
310 [b4_declare_yyparse_])[]dnl
311])
312
313
314# b4_shared_declarations
315# ----------------------
316# Declaration that might either go into the header (if --defines)
317# or open coded in the parser body.
318m4_define([b4_shared_declarations],
55d1006f
AD
319[b4_cpp_guard_open([b4_spec_defines_file])[
320]b4_declare_yydebug[
56ca3d8f 321]b4_percent_code_get([[requires]])[
c3e9f08f
AD
322]b4_token_enums_defines(b4_tokens)[
323]b4_declare_yylstype[
324]b4_declare_yyparse[
55d1006f
AD
325]b4_percent_code_get([[provides]])[
326]b4_cpp_guard_close([b4_spec_defines_file])[]dnl
ae6bdabb
AD
327])
328
1c7ec959 329
c0828abf
AD
330## -------------- ##
331## Output files. ##
332## -------------- ##
1ae72863 333
1c7ec959 334b4_output_begin([b4_parser_file_name])
448dc38b 335b4_copyright([Bison implementation for Yacc-like parsers in C],
68f91d58 336 [1984, 1989-1990, 2000-2013])[
af3412cd
PE
337
338/* C LALR(1) parser skeleton written by Richard Stallman, by
339 simplifying the original so-called "semantic" parser. */
444fbf65 340
cf44a9ae
PE
341/* All symbols defined below should begin with yy or YY, to avoid
342 infringing on user name space. This should be done even for local
343 variables, as they might otherwise be expanded by user macros.
344 There are some unavoidable exceptions within include files to
345 define necessary library symbols; they are noted "INFRINGES ON
346 USER NAME SPACE" below. */
347
9c1e26bd 348]b4_identification
a4e25e1d 349b4_percent_code_get([[top]])[]dnl
4b3847c3
AD
350m4_if(b4_api_prefix, [yy], [],
351[[/* Substitute the type names. */
9104636b
AD
352#define YYSTYPE ]b4_api_PREFIX[STYPE]b4_locations_if([[
353#define YYLTYPE ]b4_api_PREFIX[LTYPE]])])[
4b3847c3 354]m4_if(b4_prefix, [yy], [],
93d0103d
JD
355[[/* Substitute the variable and function names. */]b4_pull_if([[
356#define yyparse ]b4_prefix[parse]])b4_push_if([[
357#define yypush_parse ]b4_prefix[push_parse]b4_pull_if([[
358#define yypull_parse ]b4_prefix[pull_parse]])[
359#define yypstate_new ]b4_prefix[pstate_new
9ca7f077 360#define yypstate_delete ]b4_prefix[pstate_delete
93d0103d
JD
361#define yypstate ]b4_prefix[pstate]])[
362#define yylex ]b4_prefix[lex
9ca7f077
JD
363#define yyerror ]b4_prefix[error
364#define yylval ]b4_prefix[lval
365#define yychar ]b4_prefix[char
366#define yydebug ]b4_prefix[debug
6e2d7b09
AD
367#define yynerrs ]b4_prefix[nerrs]b4_locations_if([[
368#define yylloc ]b4_prefix[lloc]])])[
17da6427 369
0dd1580a 370/* Copy the first part of user declarations. */
136a0f76 371]b4_user_pre_prologue[
cce71710 372
ef51bfa7
AD
373]b4_null_define[
374
d99361e6
AD
375/* Enabling verbose error messages. */
376#ifdef YYERROR_VERBOSE
377# undef YYERROR_VERBOSE
378# define YYERROR_VERBOSE 1
379#else
327afc7c 380# define YYERROR_VERBOSE ]b4_error_verbose_flag[
d99361e6
AD
381#endif
382
6b4cb804
AD
383]m4_ifval(m4_quote(b4_spec_defines_file),
384[[/* In a future release of Bison, this section will be replaced
55d1006f 385 by #include "@basename(]b4_spec_defines_file[@)". */
6b4cb804
AD
386]])dnl
387b4_shared_declarations[
9bc0dd67 388
ae6bdabb 389/* Copy the second part of user declarations. */
8e0a5e9e 390]b4_user_post_prologue
a4e25e1d 391b4_percent_code_get[]dnl
7093d0f5 392
8e0a5e9e 393[#ifdef short
d42cf844
PE
394# undef short
395#endif
396
397#ifdef YYTYPE_UINT8
398typedef YYTYPE_UINT8 yytype_uint8;
399#else
400typedef unsigned char yytype_uint8;
401#endif
402
403#ifdef YYTYPE_INT8
404typedef YYTYPE_INT8 yytype_int8;
405#elif ]b4_c_modern[
406typedef signed char yytype_int8;
407#else
408typedef short int yytype_int8;
409#endif
410
411#ifdef YYTYPE_UINT16
412typedef YYTYPE_UINT16 yytype_uint16;
413#else
414typedef unsigned short int yytype_uint16;
415#endif
416
417#ifdef YYTYPE_INT16
418typedef YYTYPE_INT16 yytype_int16;
419#else
420typedef short int yytype_int16;
421#endif
422
55289366 423#ifndef YYSIZE_T
02650b7f 424# ifdef __SIZE_TYPE__
55289366 425# define YYSIZE_T __SIZE_TYPE__
02650b7f 426# elif defined size_t
55289366 427# define YYSIZE_T size_t
02650b7f 428# elif ! defined YYSIZE_T && ]b4_c_modern[
55289366
PE
429# include <stddef.h> /* INFRINGES ON USER NAME SPACE */
430# define YYSIZE_T size_t
431# else
432# define YYSIZE_T unsigned int
433# endif
bedf57f5 434#endif
7093d0f5 435
b4c1f9d2
PE
436#define YYSIZE_MAXIMUM ((YYSIZE_T) -1)
437
30757c8c 438#ifndef YY_
06caf0e1 439# if defined YYENABLE_NLS && YYENABLE_NLS
30757c8c
PE
440# if ENABLE_NLS
441# include <libintl.h> /* INFRINGES ON USER NAME SPACE */
39845e8e 442# define YY_(Msgid) dgettext ("bison-runtime", Msgid)
30757c8c
PE
443# endif
444# endif
445# ifndef YY_
39845e8e 446# define YY_(Msgid) Msgid
30757c8c
PE
447# endif
448#endif
449
80a2826e 450]b4_attribute_define[
12ce2df6
PE
451
452/* Identity function, used to suppress warnings about constant conditions. */
453#ifndef lint
39845e8e 454# define YYID(N) (N)
12ce2df6 455#else
cd9e1ba2 456]b4_c_function_def([YYID], [static int], [[int yyi], [yyi]])[
12ce2df6 457{
cd9e1ba2 458 return yyi;
12ce2df6
PE
459}
460#endif
2a4647a3 461
723fe7d1 462#if ]b4_lac_if([[1]], [[! defined yyoverflow || YYERROR_VERBOSE]])[
2779e383 463
723fe7d1
JD
464/* The parser invokes alloca or malloc; define the necessary symbols. */]dnl
465b4_push_if([], [b4_lac_if([], [[
7093d0f5 466
b929851a
PE
467# ifdef YYSTACK_USE_ALLOCA
468# if YYSTACK_USE_ALLOCA
b929851a
PE
469# ifdef __GNUC__
470# define YYSTACK_ALLOC __builtin_alloca
02650b7f 471# elif defined __BUILTIN_VA_ARG_INCR
55289366 472# include <alloca.h> /* INFRINGES ON USER NAME SPACE */
02650b7f 473# elif defined _AIX
55289366 474# define YYSTACK_ALLOC __alloca
02650b7f 475# elif defined _MSC_VER
55289366
PE
476# include <malloc.h> /* INFRINGES ON USER NAME SPACE */
477# define alloca _alloca
d7e14fc0
PE
478# else
479# define YYSTACK_ALLOC alloca
ea6046b9 480# if ! defined _ALLOCA_H && ! defined EXIT_SUCCESS && ]b4_c_modern[
bedf57f5 481# include <stdlib.h> /* INFRINGES ON USER NAME SPACE */
43e9e2a1 482 /* Use EXIT_SUCCESS as a witness for stdlib.h. */
ea6046b9
PE
483# ifndef EXIT_SUCCESS
484# define EXIT_SUCCESS 0
55289366 485# endif
bedf57f5 486# endif
7093d0f5
AD
487# endif
488# endif
723fe7d1 489# endif]])])[
7093d0f5 490
723fe7d1 491# ifdef YYSTACK_ALLOC
9d9b8b70 492 /* Pacify GCC's `empty if-body' warning. */
12ce2df6 493# define YYSTACK_FREE(Ptr) do { /* empty */; } while (YYID (0))
506ffb1f 494# ifndef YYSTACK_ALLOC_MAXIMUM
b9c9f761
PE
495 /* The OS might guarantee only one guard page at the bottom of the stack,
496 and a page size can be as small as 4096 bytes. So we cannot safely
497 invoke alloca (N) if N exceeds 4096. Use a slightly smaller number
498 to allow for a few compiler-allocated temporary stack slots. */
e2a21b6f 499# define YYSTACK_ALLOC_MAXIMUM 4032 /* reasonable circa 2006 */
506ffb1f 500# endif
7093d0f5 501# else
2779e383
PE
502# define YYSTACK_ALLOC YYMALLOC
503# define YYSTACK_FREE YYFREE
506ffb1f 504# ifndef YYSTACK_ALLOC_MAXIMUM
b4c1f9d2 505# define YYSTACK_ALLOC_MAXIMUM YYSIZE_MAXIMUM
506ffb1f 506# endif
ea6046b9 507# if (defined __cplusplus && ! defined EXIT_SUCCESS \
fc3f467f
PE
508 && ! ((defined YYMALLOC || defined malloc) \
509 && (defined YYFREE || defined free)))
510# include <stdlib.h> /* INFRINGES ON USER NAME SPACE */
ea6046b9
PE
511# ifndef EXIT_SUCCESS
512# define EXIT_SUCCESS 0
fc3f467f 513# endif
0925ebb4 514# endif
bedf57f5
PE
515# ifndef YYMALLOC
516# define YYMALLOC malloc
ea6046b9 517# if ! defined malloc && ! defined EXIT_SUCCESS && ]b4_c_modern[
bedf57f5
PE
518void *malloc (YYSIZE_T); /* INFRINGES ON USER NAME SPACE */
519# endif
520# endif
521# ifndef YYFREE
522# define YYFREE free
ea6046b9 523# if ! defined free && ! defined EXIT_SUCCESS && ]b4_c_modern[
bedf57f5
PE
524void free (void *); /* INFRINGES ON USER NAME SPACE */
525# endif
526# endif
723fe7d1
JD
527# endif]b4_lac_if([[
528# define YYCOPY_NEEDED 1]])[
529#endif]b4_lac_if([], [[ /* ! defined yyoverflow || YYERROR_VERBOSE */]])[
cf44a9ae
PE
530
531
02650b7f
PE
532#if (! defined yyoverflow \
533 && (! defined __cplusplus \
9104636b
AD
534 || (]b4_locations_if([[defined ]b4_api_PREFIX[LTYPE_IS_TRIVIAL && ]b4_api_PREFIX[LTYPE_IS_TRIVIAL \
535 && ]])[defined ]b4_api_PREFIX[STYPE_IS_TRIVIAL && ]b4_api_PREFIX[STYPE_IS_TRIVIAL)))
7093d0f5 536
600f9b0c
PE
537/* A type that is properly aligned for any stack member. */
538union yyalloc
539{
9ca7f077
JD
540 yytype_int16 yyss_alloc;
541 YYSTYPE yyvs_alloc;]b4_locations_if([
542 YYLTYPE yyls_alloc;])[
543};
600f9b0c
PE
544
545/* The size of the maximum gap between one aligned stack and the next. */
17836590 546# define YYSTACK_GAP_MAXIMUM (sizeof (union yyalloc) - 1)
600f9b0c
PE
547
548/* The size of an array large to enough to hold all stacks, each with
549 N elements. */
327afc7c 550]b4_locations_if(
58612f1d 551[# define YYSTACK_BYTES(N) \
d42cf844 552 ((N) * (sizeof (yytype_int16) + sizeof (YYSTYPE) + sizeof (YYLTYPE)) \
17836590 553 + 2 * YYSTACK_GAP_MAXIMUM)],
58612f1d 554[# define YYSTACK_BYTES(N) \
d42cf844 555 ((N) * (sizeof (yytype_int16) + sizeof (YYSTYPE)) \
17836590 556 + YYSTACK_GAP_MAXIMUM)])[
600f9b0c 557
723fe7d1 558# define YYCOPY_NEEDED 1
5b041382
PE
559
560/* Relocate STACK from its old location to the new one. The
7093d0f5 561 local variables YYSIZE and YYSTACKSIZE give the old and new number of
600f9b0c
PE
562 elements in the stack, and YYPTR gives the new location of the
563 stack. Advance YYPTR to a properly aligned location for the next
564 stack. */
9ca7f077 565# define YYSTACK_RELOCATE(Stack_alloc, Stack) \
7093d0f5
AD
566 do \
567 { \
568 YYSIZE_T yynewbytes; \
9ca7f077
JD
569 YYCOPY (&yyptr->Stack_alloc, Stack, yysize); \
570 Stack = &yyptr->Stack_alloc; \
17836590 571 yynewbytes = yystacksize * sizeof (*Stack) + YYSTACK_GAP_MAXIMUM; \
2729e106 572 yyptr += yynewbytes / sizeof (*yyptr); \
7093d0f5 573 } \
12ce2df6 574 while (YYID (0))
7093d0f5 575
cf44a9ae 576#endif
8850be4b 577
723fe7d1 578#if defined YYCOPY_NEEDED && YYCOPY_NEEDED
14f4455e 579/* Copy COUNT objects from SRC to DST. The source and destination do
723fe7d1
JD
580 not overlap. */
581# ifndef YYCOPY
582# if defined __GNUC__ && 1 < __GNUC__
14f4455e
AD
583# define YYCOPY(Dst, Src, Count) \
584 __builtin_memcpy (Dst, Src, (Count) * sizeof (*(Src)))
723fe7d1 585# else
14f4455e
AD
586# define YYCOPY(Dst, Src, Count) \
587 do \
588 { \
589 YYSIZE_T yyi; \
590 for (yyi = 0; yyi < (Count); yyi++) \
591 (Dst)[yyi] = (Src)[yyi]; \
592 } \
723fe7d1
JD
593 while (YYID (0))
594# endif
595# endif
596#endif /* !YYCOPY_NEEDED */
597
9d9b8b70 598/* YYFINAL -- State number of the termination state. */
9c1e26bd 599#define YYFINAL ]b4_final_state_number[
39912f52 600/* YYLAST -- Last index in YYTABLE. */
9c1e26bd 601#define YYLAST ]b4_last[
7742ddeb 602
9d9b8b70 603/* YYNTOKENS -- Number of terminals. */
9c1e26bd 604#define YYNTOKENS ]b4_tokens_number[
9d9b8b70 605/* YYNNTS -- Number of nonterminals. */
9c1e26bd 606#define YYNNTS ]b4_nterms_number[
9d9b8b70 607/* YYNRULES -- Number of rules. */
9c1e26bd 608#define YYNRULES ]b4_rules_number[
9d9b8b70 609/* YYNRULES -- Number of states. */
9c1e26bd 610#define YYNSTATES ]b4_states_number[
7742ddeb
AD
611
612/* YYTRANSLATE(YYLEX) -- Bison symbol number corresponding to YYLEX. */
9c1e26bd
AD
613#define YYUNDEFTOK ]b4_undef_token_number[
614#define YYMAXUTOK ]b4_user_token_number_max[
007a50a4 615
04098407 616#define YYTRANSLATE(YYX) \
a20713a4 617 ((unsigned int) (YYX) <= YYMAXUTOK ? yytranslate[YYX] : YYUNDEFTOK)
a8289c62 618
b0400cc6
AD
619/* YYTRANSLATE[YYLEX] -- Bison symbol number corresponding to YYLEX. */
620static const ]b4_int_type_for([b4_translate])[ yytranslate[] =
a8289c62 621{
c5e3e510 622 ]b4_translate[
a8289c62
RA
623};
624
5f108727 625#if ]b4_api_PREFIX[DEBUG
c5e3e510 626/* YYPRHS[YYN] -- Index of the first RHS symbol of rule number YYN in
7742ddeb 627 YYRHS. */
c5e3e510 628static const ]b4_int_type_for([b4_prhs])[ yyprhs[] =
a8289c62 629{
c5e3e510 630 ]b4_prhs[
a8289c62
RA
631};
632
9d9b8b70 633/* YYRHS -- A `-1'-separated list of the rules' RHS. */
c5e3e510 634static const ]b4_int_type_for([b4_rhs])[ yyrhs[] =
a8289c62 635{
c5e3e510 636 ]b4_rhs[
a8289c62
RA
637};
638
c5e3e510
AD
639/* YYRLINE[YYN] -- source line where rule number YYN was defined. */
640static const ]b4_int_type_for([b4_rline])[ yyrline[] =
a8289c62 641{
c5e3e510 642 ]b4_rline[
a8289c62
RA
643};
644#endif
645
5f108727 646#if ]b4_api_PREFIX[DEBUG || YYERROR_VERBOSE || ]b4_token_table_flag[
9e0876fb 647/* YYTNAME[SYMBOL-NUM] -- String name of the symbol SYMBOL-NUM.
9d9b8b70 648 First, the terminals, then, starting at YYNTOKENS, nonterminals. */
c5e3e510 649static const char *const yytname[] =
a8289c62 650{
c5e3e510 651 ]b4_tname[
a8289c62
RA
652};
653#endif
654
c0ad8bf3 655# ifdef YYPRINT
c5e3e510 656/* YYTOKNUM[YYLEX-NUM] -- Internal token number corresponding to
769b430f 657 token YYLEX-NUM. */
c5e3e510 658static const ]b4_int_type_for([b4_toknum])[ yytoknum[] =
a8289c62 659{
c5e3e510 660 ]b4_toknum[
a8289c62 661};
c0ad8bf3 662# endif
a8289c62 663
c5e3e510
AD
664/* YYR1[YYN] -- Symbol number of symbol that rule YYN derives. */
665static const ]b4_int_type_for([b4_r1])[ yyr1[] =
a8289c62 666{
c5e3e510 667 ]b4_r1[
a8289c62
RA
668};
669
c5e3e510
AD
670/* YYR2[YYN] -- Number of symbols composing right hand side of rule YYN. */
671static const ]b4_int_type_for([b4_r2])[ yyr2[] =
a8289c62 672{
c5e3e510 673 ]b4_r2[
a8289c62
RA
674};
675
620b5727
JD
676/* YYDEFACT[STATE-NAME] -- Default reduction number in state STATE-NUM.
677 Performed when YYTABLE doesn't specify something else to do. Zero
5504898e 678 means the default is an error. */
c5e3e510 679static const ]b4_int_type_for([b4_defact])[ yydefact[] =
a8289c62 680{
c5e3e510 681 ]b4_defact[
a8289c62
RA
682};
683
9d9b8b70 684/* YYDEFGOTO[NTERM-NUM]. */
c5e3e510 685static const ]b4_int_type_for([b4_defgoto])[ yydefgoto[] =
a8289c62 686{
c5e3e510 687 ]b4_defgoto[
a8289c62
RA
688};
689
c5e3e510 690/* YYPACT[STATE-NUM] -- Index in YYTABLE of the portion describing
7742ddeb 691 STATE-NUM. */
c5e3e510
AD
692#define YYPACT_NINF ]b4_pact_ninf[
693static const ]b4_int_type_for([b4_pact])[ yypact[] =
a8289c62 694{
c5e3e510 695 ]b4_pact[
a8289c62
RA
696};
697
c5e3e510
AD
698/* YYPGOTO[NTERM-NUM]. */
699static const ]b4_int_type_for([b4_pgoto])[ yypgoto[] =
a8289c62 700{
c5e3e510 701 ]b4_pgoto[
a8289c62
RA
702};
703
c5e3e510 704/* YYTABLE[YYPACT[STATE-NUM]]. What to do in state STATE-NUM. If
7742ddeb 705 positive, shift that token. If negative, reduce the rule which
e4bcae3c 706 number is the opposite. If YYTABLE_NINF, syntax error. */
c5e3e510
AD
707#define YYTABLE_NINF ]b4_table_ninf[
708static const ]b4_int_type_for([b4_table])[ yytable[] =
a8289c62 709{
c5e3e510 710 ]b4_table[
a8289c62
RA
711};
712
39845e8e
AD
713#define yypact_value_is_default(Yystate) \
714 ]b4_table_value_equals([[pact]], [[Yystate]], [b4_pact_ninf])[
77373efa 715
39845e8e
AD
716#define yytable_value_is_error(Yytable_value) \
717 ]b4_table_value_equals([[table]], [[Yytable_value]], [b4_table_ninf])[
77373efa 718
c5e3e510 719static const ]b4_int_type_for([b4_check])[ yycheck[] =
a8289c62 720{
c5e3e510 721 ]b4_check[
a8289c62
RA
722};
723
c5e3e510 724/* YYSTOS[STATE-NUM] -- The (internal number of the) accessing
5504898e 725 symbol of state STATE-NUM. */
c5e3e510 726static const ]b4_int_type_for([b4_stos])[ yystos[] =
5504898e 727{
c5e3e510 728 ]b4_stos[
5504898e 729};
7093d0f5 730
10fa2066 731#define yyerrok (yyerrstatus = 0)
a20713a4
PE
732#define yyclearin (yychar = YYEMPTY)
733#define YYEMPTY (-2)
10fa2066 734#define YYEOF 0
a8289c62 735
70ddf897 736#define YYACCEPT goto yyacceptlab
a8289c62 737#define YYABORT goto yyabortlab
a6b89bb2 738#define YYERROR goto yyerrorlab
8a3eb3c8 739
a8289c62 740
71da9eea
AD
741/* Like YYERROR except do call yyerror. This remains here temporarily
742 to ease the transition to the new meaning of YYERROR, for GCC.
41d35e54
JD
743 Once GCC version 2 has supplanted version 1, this can go. However,
744 YYFAIL appears to be in use. Nevertheless, it is formally deprecated
745 in Bison 2.4.2's NEWS entry, where a plan to phase it out is
746 discussed. */
a8289c62 747
10fa2066 748#define YYFAIL goto yyerrlab
41d35e54
JD
749#if defined YYFAIL
750 /* This is here to suppress warnings from the GCC cpp's
751 -Wunused-macros. Normally we don't worry about that warning, but
752 some users do, and we want to make it easy for users to remove
753 YYFAIL uses, which will produce warnings from Bison 2.5. */
754#endif
a8289c62 755
10fa2066 756#define YYRECOVERING() (!!yyerrstatus)
a8289c62 757
94556574
AD
758#define YYBACKUP(Token, Value) \
759do \
760 if (yychar == YYEMPTY) \
761 { \
762 yychar = (Token); \
763 yylval = (Value); \
764 YYPOPSTACK (yylen); \
765 yystate = *yyssp; \]b4_lac_if([[
766 YY_LAC_DISCARD ("YYBACKUP"); \]])[
767 goto yybackup; \
768 } \
769 else \
770 { \
30757c8c 771 yyerror (]b4_yyerror_args[YY_("syntax error: cannot back up")); \
71da9eea
AD
772 YYERROR; \
773 } \
12ce2df6 774while (YYID (0))
10fa2066 775
3237f570 776/* Error token number */
10fa2066
RS
777#define YYTERROR 1
778#define YYERRCODE 256
779
5fb07775 780]b4_locations_if([[
426903aa 781]b4_yylloc_default_define[
24e0cbd0 782#define YYRHSLOC(Rhs, K) ((Rhs)[K])
3237f570
AD
783]])[
784]b4_yy_location_print_define[
3fc16193 785
3abcd459 786/* YYLEX -- calling `yylex' with the right arguments. */
ae7453f2 787#ifdef YYLEX_PARAM
327afc7c 788# define YYLEX yylex (]b4_pure_if([&yylval[]b4_locations_if([, &yylloc]), ])[YYLEX_PARAM)
74310291 789#else
9c1e26bd 790# define YYLEX ]b4_c_function_call([yylex], [int], b4_lex_param)[
ae7453f2 791#endif
553e2b22 792
5a35a6cb 793/* Enable debugging if requested. */
5f108727 794#if ]b4_api_PREFIX[DEBUG
b7575ffe 795
2f4f028d 796# ifndef YYFPRINTF
45119af1
PE
797# include <stdio.h> /* INFRINGES ON USER NAME SPACE */
798# define YYFPRINTF fprintf
b7575ffe
PE
799# endif
800
5a35a6cb
AD
801# define YYDPRINTF(Args) \
802do { \
17da6427 803 if (yydebug) \
b7575ffe 804 YYFPRINTF Args; \
12ce2df6 805} while (YYID (0))
c5e3e510 806
4b367315
AD
807# define YY_SYMBOL_PRINT(Title, Type, Value, Location) \
808do { \
809 if (yydebug) \
810 { \
811 YYFPRINTF (stderr, "%s ", Title); \
a0af42fc 812 yy_symbol_print (stderr, \
327afc7c 813 Type, Value]b4_locations_if([, Location])[]b4_user_args[); \
4b367315
AD
814 YYFPRINTF (stderr, "\n"); \
815 } \
12ce2df6 816} while (YYID (0))
9c1e26bd 817
a0af42fc 818]b4_yy_symbol_print_generate([b4_c_function_def])[
d1ff7a7c 819
b0937b22
AD
820/*------------------------------------------------------------------.
821| yy_stack_print -- Print the state stack from its BOTTOM up to its |
5348bfbe 822| TOP (included). |
b0937b22
AD
823`------------------------------------------------------------------*/
824
825]b4_c_function_def([yy_stack_print], [static void],
cd9e1ba2
PE
826 [[yytype_int16 *yybottom], [yybottom]],
827 [[yytype_int16 *yytop], [yytop]])[
b0937b22 828{
2f4f028d 829 YYFPRINTF (stderr, "Stack now");
cd9e1ba2
PE
830 for (; yybottom <= yytop; yybottom++)
831 {
832 int yybot = *yybottom;
833 YYFPRINTF (stderr, " %d", yybot);
834 }
2f4f028d 835 YYFPRINTF (stderr, "\n");
b0937b22
AD
836}
837
838# define YY_STACK_PRINT(Bottom, Top) \
839do { \
840 if (yydebug) \
841 yy_stack_print ((Bottom), (Top)); \
12ce2df6 842} while (YYID (0))
b0937b22
AD
843
844
845/*------------------------------------------------.
846| Report that the YYRULE is going to be reduced. |
847`------------------------------------------------*/
848
849]b4_c_function_def([yy_reduce_print], [static void],
02650b7f 850 [[YYSTYPE *yyvsp], [yyvsp]],
aefef0d6
PE
851 b4_locations_if([[[YYLTYPE *yylsp], [yylsp]],
852 ])[[int yyrule], [yyrule]]m4_ifset([b4_parse_param], [,
9ca7f077 853 b4_parse_param]))[
b0937b22 854{
d1ff7a7c 855 int yynrhs = yyr2[yyrule];
b0937b22 856 int yyi;
30757c8c 857 unsigned long int yylno = yyrline[yyrule];
d1ff7a7c 858 YYFPRINTF (stderr, "Reducing stack by rule %d (line %lu):\n",
02650b7f 859 yyrule - 1, yylno);
d1ff7a7c
AD
860 /* The symbols being reduced. */
861 for (yyi = 0; yyi < yynrhs; yyi++)
862 {
f57a7536 863 YYFPRINTF (stderr, " $%d = ", yyi + 1);
a0af42fc 864 yy_symbol_print (stderr, yyrhs[yyprhs[yyrule] + yyi],
02650b7f 865 &]b4_rhs_value(yynrhs, yyi + 1)[
327afc7c 866 ]b4_locations_if([, &]b4_rhs_location(yynrhs, yyi + 1))[]dnl
02650b7f 867 b4_user_args[);
f57a7536 868 YYFPRINTF (stderr, "\n");
d1ff7a7c 869 }
b0937b22
AD
870}
871
d9963c85
PE
872# define YY_REDUCE_PRINT(Rule) \
873do { \
874 if (yydebug) \
327afc7c 875 yy_reduce_print (yyvsp, ]b4_locations_if([yylsp, ])[Rule]b4_user_args[); \
12ce2df6 876} while (YYID (0))
b0937b22 877
cf44a9ae
PE
878/* Nonzero means print parse trace. It is left uninitialized so that
879 multiple parsers can coexist. */
17da6427 880int yydebug;
5f108727 881#else /* !]b4_api_PREFIX[DEBUG */
5a35a6cb 882# define YYDPRINTF(Args)
284acc8b 883# define YY_SYMBOL_PRINT(Title, Type, Value, Location)
b0937b22 884# define YY_STACK_PRINT(Bottom, Top)
d9963c85 885# define YY_REDUCE_PRINT(Rule)
5f108727 886#endif /* !]b4_api_PREFIX[DEBUG */
5a35a6cb 887
b0937b22 888
5a35a6cb 889/* YYINITDEPTH -- initial size of the parser's stacks. */
10fa2066 890#ifndef YYINITDEPTH
9c1e26bd 891# define YYINITDEPTH ]b4_stack_depth_init[
10fa2066
RS
892#endif
893
5a35a6cb 894/* YYMAXDEPTH -- maximum size the stacks can grow to (effective only
600f9b0c
PE
895 if the built-in stack extension method is used).
896
897 Do not make this value too large; the results are undefined if
506ffb1f 898 YYSTACK_ALLOC_MAXIMUM < YYSTACK_BYTES (YYMAXDEPTH)
600f9b0c
PE
899 evaluated with infinite-precision integer arithmetic. */
900
10fa2066 901#ifndef YYMAXDEPTH
9c1e26bd 902# define YYMAXDEPTH ]b4_stack_depth_max[
ea13bea8
JD
903#endif]b4_lac_if([[
904
723fe7d1
JD
905/* Given a state stack such that *YYBOTTOM is its bottom, such that
906 *YYTOP is either its top or is YYTOP_EMPTY to indicate an empty
907 stack, and such that *YYCAPACITY is the maximum number of elements it
908 can hold without a reallocation, make sure there is enough room to
909 store YYADD more elements. If not, allocate a new stack using
910 YYSTACK_ALLOC, copy the existing elements, and adjust *YYBOTTOM,
911 *YYTOP, and *YYCAPACITY to reflect the new capacity and memory
912 location. If *YYBOTTOM != YYBOTTOM_NO_FREE, then free the old stack
913 using YYSTACK_FREE. Return 0 if successful or if no reallocation is
914 required. Return 1 if memory is exhausted. */
915static int
916yy_lac_stack_realloc (YYSIZE_T *yycapacity, YYSIZE_T yyadd,
5f108727 917#if ]b4_api_PREFIX[DEBUG
723fe7d1
JD
918 char const *yydebug_prefix,
919 char const *yydebug_suffix,
920#endif
921 yytype_int16 **yybottom,
922 yytype_int16 *yybottom_no_free,
923 yytype_int16 **yytop, yytype_int16 *yytop_empty)
924{
925 YYSIZE_T yysize_old =
926 *yytop == yytop_empty ? 0 : *yytop - *yybottom + 1;
927 YYSIZE_T yysize_new = yysize_old + yyadd;
928 if (*yycapacity < yysize_new)
929 {
930 YYSIZE_T yyalloc = 2 * yysize_new;
931 yytype_int16 *yybottom_new;
932 /* Use YYMAXDEPTH for maximum stack size given that the stack
933 should never need to grow larger than the main state stack
934 needs to grow without LAC. */
935 if (YYMAXDEPTH < yysize_new)
936 {
937 YYDPRINTF ((stderr, "%smax size exceeded%s", yydebug_prefix,
938 yydebug_suffix));
939 return 1;
940 }
941 if (YYMAXDEPTH < yyalloc)
942 yyalloc = YYMAXDEPTH;
943 yybottom_new =
944 (yytype_int16*) YYSTACK_ALLOC (yyalloc * sizeof *yybottom_new);
945 if (!yybottom_new)
946 {
947 YYDPRINTF ((stderr, "%srealloc failed%s", yydebug_prefix,
948 yydebug_suffix));
949 return 1;
950 }
951 if (*yytop != yytop_empty)
952 {
953 YYCOPY (yybottom_new, *yybottom, yysize_old);
954 *yytop = yybottom_new + (yysize_old - 1);
955 }
956 if (*yybottom != yybottom_no_free)
957 YYSTACK_FREE (*yybottom);
958 *yybottom = yybottom_new;
959 *yycapacity = yyalloc;]m4_if(b4_percent_define_get([[parse.lac.memory-trace]]),
960 [full], [[
961 YYDPRINTF ((stderr, "%srealloc to %lu%s", yydebug_prefix,
962 (unsigned long int) yyalloc, yydebug_suffix));]])[
963 }
964 return 0;
965}
966
ea13bea8
JD
967/* Establish the initial context for the current lookahead if no initial
968 context is currently established.
969
970 We define a context as a snapshot of the parser stacks. We define
971 the initial context for a lookahead as the context in which the
972 parser initially examines that lookahead in order to select a
973 syntactic action. Thus, if the lookahead eventually proves
974 syntactically unacceptable (possibly in a later context reached via a
975 series of reductions), the initial context can be used to determine
976 the exact set of tokens that would be syntactically acceptable in the
977 lookahead's place. Moreover, it is the context after which any
978 further semantic actions would be erroneous because they would be
979 determined by a syntactically unacceptable token.
980
981 YY_LAC_ESTABLISH should be invoked when a reduction is about to be
982 performed in an inconsistent state (which, for the purposes of LAC,
983 includes consistent states that don't know they're consistent because
984 their default reductions have been disabled). Iff there is a
985 lookahead token, it should also be invoked before reporting a syntax
986 error. This latter case is for the sake of the debugging output.
987
988 For parse.lac=full, the implementation of YY_LAC_ESTABLISH is as
989 follows. If no initial context is currently established for the
990 current lookahead, then check if that lookahead can eventually be
991 shifted if syntactic actions continue from the current context.
992 Report a syntax error if it cannot. */
723fe7d1
JD
993#define YY_LAC_ESTABLISH \
994do { \
995 if (!yy_lac_established) \
996 { \
997 YYDPRINTF ((stderr, \
998 "LAC: initial context established for %s\n", \
999 yytname[yytoken])); \
1000 yy_lac_established = 1; \
1001 { \
1002 int yy_lac_status = \
1003 yy_lac (yyesa, &yyes, &yyes_capacity, yyssp, yytoken); \
1004 if (yy_lac_status == 2) \
1005 goto yyexhaustedlab; \
1006 if (yy_lac_status == 1) \
1007 goto yyerrlab; \
1008 } \
1009 } \
ea13bea8
JD
1010} while (YYID (0))
1011
1012/* Discard any previous initial lookahead context because of Event,
1013 which may be a lookahead change or an invalidation of the currently
1014 established initial context for the current lookahead.
1015
1016 The most common example of a lookahead change is a shift. An example
1017 of both cases is syntax error recovery. That is, a syntax error
1018 occurs when the lookahead is syntactically erroneous for the
1019 currently established initial context, so error recovery manipulates
1020 the parser stacks to try to find a new initial context in which the
1021 current lookahead is syntactically acceptable. If it fails to find
1022 such a context, it discards the lookahead. */
5f108727 1023#if ]b4_api_PREFIX[DEBUG
ea13bea8
JD
1024# define YY_LAC_DISCARD(Event) \
1025do { \
1026 if (yy_lac_established) \
1027 { \
1028 if (yydebug) \
1029 YYFPRINTF (stderr, "LAC: initial context discarded due to " \
1030 Event "\n"); \
1031 yy_lac_established = 0; \
1032 } \
1033} while (YYID (0))
1034#else
1035# define YY_LAC_DISCARD(Event) yy_lac_established = 0
10fa2066 1036#endif
a8289c62 1037
ea13bea8 1038/* Given the stack whose top is *YYSSP, return 0 iff YYTOKEN can
723fe7d1
JD
1039 eventually (after perhaps some reductions) be shifted, return 1 if
1040 not, or return 2 if memory is exhausted. As preconditions and
1041 postconditions: *YYES_CAPACITY is the allocated size of the array to
1042 which *YYES points, and either *YYES = YYESA or *YYES points to an
1043 array allocated with YYSTACK_ALLOC. yy_lac may overwrite the
1044 contents of either array, alter *YYES and *YYES_CAPACITY, and free
1045 any old *YYES other than YYESA. */
ea13bea8 1046static int
723fe7d1
JD
1047yy_lac (yytype_int16 *yyesa, yytype_int16 **yyes,
1048 YYSIZE_T *yyes_capacity, yytype_int16 *yyssp, int yytoken)
ea13bea8
JD
1049{
1050 yytype_int16 *yyes_prev = yyssp;
ea13bea8
JD
1051 yytype_int16 *yyesp = yyes_prev;
1052 YYDPRINTF ((stderr, "LAC: checking lookahead %s:", yytname[yytoken]));
1053 if (yytoken == YYUNDEFTOK)
1054 {
1055 YYDPRINTF ((stderr, " Always Err\n"));
1056 return 1;
1057 }
1058 while (1)
1059 {
1060 int yyrule = yypact[*yyesp];
1061 if (yypact_value_is_default (yyrule)
1062 || (yyrule += yytoken) < 0 || YYLAST < yyrule
1063 || yycheck[yyrule] != yytoken)
1064 {
1065 yyrule = yydefact[*yyesp];
1066 if (yyrule == 0)
1067 {
1068 YYDPRINTF ((stderr, " Err\n"));
1069 return 1;
1070 }
1071 }
1072 else
1073 {
1074 yyrule = yytable[yyrule];
1075 if (yytable_value_is_error (yyrule))
1076 {
1077 YYDPRINTF ((stderr, " Err\n"));
1078 return 1;
1079 }
1080 if (0 < yyrule)
1081 {
1082 YYDPRINTF ((stderr, " S%d\n", yyrule));
1083 return 0;
1084 }
1085 yyrule = -yyrule;
1086 }
1087 {
1088 YYSIZE_T yylen = yyr2[yyrule];
1089 YYDPRINTF ((stderr, " R%d", yyrule - 1));
1090 if (yyesp != yyes_prev)
1091 {
723fe7d1 1092 YYSIZE_T yysize = yyesp - *yyes + 1;
ea13bea8
JD
1093 if (yylen < yysize)
1094 {
1095 yyesp -= yylen;
1096 yylen = 0;
1097 }
1098 else
1099 {
1100 yylen -= yysize;
1101 yyesp = yyes_prev;
1102 }
1103 }
1104 if (yylen)
1105 yyesp = yyes_prev -= yylen;
1106 }
1107 {
1108 int yystate;
1109 {
1110 int yylhs = yyr1[yyrule] - YYNTOKENS;
1111 yystate = yypgoto[yylhs] + *yyesp;
1112 if (yystate < 0 || YYLAST < yystate
1113 || yycheck[yystate] != *yyesp)
1114 yystate = yydefgoto[yylhs];
1115 else
1116 yystate = yytable[yystate];
1117 }
1118 if (yyesp == yyes_prev)
1119 {
723fe7d1 1120 yyesp = *yyes;
ea13bea8
JD
1121 *yyesp = yystate;
1122 }
1123 else
1124 {
723fe7d1 1125 if (yy_lac_stack_realloc (yyes_capacity, 1,
5f108727 1126#if ]b4_api_PREFIX[DEBUG
723fe7d1
JD
1127 " (", ")",
1128#endif
1129 yyes, yyesa, &yyesp, yyes_prev))
ea13bea8 1130 {
723fe7d1 1131 YYDPRINTF ((stderr, "\n"));
ea13bea8
JD
1132 return 2;
1133 }
1134 *++yyesp = yystate;
1135 }
7e5ef706 1136 YYDPRINTF ((stderr, " G%d", yystate));
ea13bea8
JD
1137 }
1138 }
1139}]])[
1140
a8289c62 1141
7093d0f5
AD
1142#if YYERROR_VERBOSE
1143
1144# ifndef yystrlen
02650b7f 1145# if defined __GLIBC__ && defined _STRING_H
7093d0f5
AD
1146# define yystrlen strlen
1147# else
1148/* Return the length of YYSTR. */
1b9c21fb
PE
1149]b4_c_function_def([yystrlen], [static YYSIZE_T],
1150 [[const char *yystr], [yystr]])[
7093d0f5 1151{
12ce2df6
PE
1152 YYSIZE_T yylen;
1153 for (yylen = 0; yystr[yylen]; yylen++)
7093d0f5 1154 continue;
12ce2df6 1155 return yylen;
7093d0f5
AD
1156}
1157# endif
1158# endif
1159
1160# ifndef yystpcpy
02650b7f 1161# if defined __GLIBC__ && defined _STRING_H && defined _GNU_SOURCE
7093d0f5
AD
1162# define yystpcpy stpcpy
1163# else
1164/* Copy YYSRC to YYDEST, returning the address of the terminating '\0' in
1165 YYDEST. */
1b9c21fb
PE
1166]b4_c_function_def([yystpcpy], [static char *],
1167 [[char *yydest], [yydest]], [[const char *yysrc], [yysrc]])[
7093d0f5 1168{
cb530ce9
PE
1169 char *yyd = yydest;
1170 const char *yys = yysrc;
7093d0f5
AD
1171
1172 while ((*yyd++ = *yys++) != '\0')
1173 continue;
1174
1175 return yyd - 1;
1176}
1177# endif
1178# endif
1179
9e0876fb
PE
1180# ifndef yytnamerr
1181/* Copy to YYRES the contents of YYSTR after stripping away unnecessary
1182 quotes and backslashes, so that it's suitable for yyerror. The
1183 heuristic is that double-quoting is unnecessary unless the string
1184 contains an apostrophe, a comma, or backslash (other than
1185 backslash-backslash). YYSTR is taken from yytname. If YYRES is
1186 null, do not copy; instead, return the length of what the result
1187 would have been. */
1188static YYSIZE_T
1189yytnamerr (char *yyres, const char *yystr)
1190{
1191 if (*yystr == '"')
1192 {
276f48df 1193 YYSIZE_T yyn = 0;
9e0876fb
PE
1194 char const *yyp = yystr;
1195
1196 for (;;)
1197 switch (*++yyp)
1198 {
1199 case '\'':
1200 case ',':
1201 goto do_not_strip_quotes;
1202
1203 case '\\':
1204 if (*++yyp != '\\')
1205 goto do_not_strip_quotes;
1206 /* Fall through. */
1207 default:
1208 if (yyres)
1209 yyres[yyn] = *yyp;
1210 yyn++;
1211 break;
1212
1213 case '"':
1214 if (yyres)
1215 yyres[yyn] = '\0';
1216 return yyn;
1217 }
1218 do_not_strip_quotes: ;
1219 }
1220
1221 if (! yyres)
1222 return yystrlen (yystr);
1223
1224 return yystpcpy (yyres, yystr) - yyres;
1225}
1226# endif
1227
69a2ab11 1228/* Copy into *YYMSG, which is of size *YYMSG_ALLOC, an error message
ea13bea8
JD
1229 about the unexpected token YYTOKEN for the state stack whose top is
1230 YYSSP.]b4_lac_if([[ In order to see if a particular token T is a
723fe7d1 1231 valid looakhead, invoke yy_lac (YYESA, YYES, YYES_CAPACITY, YYSSP, T).]])[
69a2ab11 1232
095a1d11
JD
1233 Return 0 if *YYMSG was successfully written. Return 1 if *YYMSG is
1234 not large enough to hold the message. In that case, also set
1235 *YYMSG_ALLOC to the required number of bytes. Return 2 if the
ea13bea8
JD
1236 required number of bytes is too large to store]b4_lac_if([[ or if
1237 yy_lac returned 2]])[. */
69a2ab11
JD
1238static int
1239yysyntax_error (YYSIZE_T *yymsg_alloc, char **yymsg,
723fe7d1
JD
1240 ]b4_lac_if([[yytype_int16 *yyesa, yytype_int16 **yyes,
1241 YYSIZE_T *yyes_capacity, ]])[yytype_int16 *yyssp, int yytoken)
f953cb20 1242{
6557bcce 1243 YYSIZE_T yysize0 = yytnamerr (YY_NULL, yytname[yytoken]);
f953cb20 1244 YYSIZE_T yysize = yysize0;
f953cb20
JD
1245 enum { YYERROR_VERBOSE_ARGS_MAXIMUM = 5 };
1246 /* Internationalized format string. */
6557bcce 1247 const char *yyformat = YY_NULL;
f953cb20
JD
1248 /* Arguments of yyformat. */
1249 char const *yyarg[YYERROR_VERBOSE_ARGS_MAXIMUM];
095a1d11
JD
1250 /* Number of reported tokens (one for the "unexpected", one per
1251 "expected"). */
1252 int yycount = 0;
f953cb20 1253
095a1d11
JD
1254 /* There are many possibilities here to consider:
1255 - Assume YYFAIL is not used. It's too flawed to consider. See
1256 <http://lists.gnu.org/archive/html/bison-patches/2009-12/msg00024.html>
1257 for details. YYERROR is fine as it does not invoke this
1258 function.
1259 - If this state is a consistent state with a default action, then
1260 the only way this function was invoked is if the default action
1261 is an error action. In that case, don't check for expected
1262 tokens because there are none.
1263 - The only way there can be no lookahead present (in yychar) is if
1264 this state is a consistent state with a default action. Thus,
1265 detecting the absence of a lookahead is sufficient to determine
1266 that there is no unexpected or expected token to report. In that
1267 case, just report a simple "syntax error".
1268 - Don't assume there isn't a lookahead just because this state is a
1269 consistent state with a default action. There might have been a
1270 previous inconsistent state, consistent state with a non-default
ea13bea8
JD
1271 action, or user semantic action that manipulated yychar.]b4_lac_if([[
1272 In the first two cases, it might appear that the current syntax
1273 error should have been detected in the previous state when yy_lac
1274 was invoked. However, at that time, there might have been a
1275 different syntax error that discarded a different initial context
1276 during error recovery, leaving behind the current lookahead.]], [[
095a1d11
JD
1277 - Of course, the expected token list depends on states to have
1278 correct lookahead information, and it depends on the parser not
1279 to perform extra reductions after fetching a lookahead from the
1280 scanner and before detecting a syntax error. Thus, state merging
1281 (from LALR or IELR) and default reductions corrupt the expected
1282 token list. However, the list is correct for canonical LR with
1283 one exception: it will still contain any token that will not be
ea13bea8 1284 accepted due to an error action in a later state.]])[
095a1d11
JD
1285 */
1286 if (yytoken != YYEMPTY)
1287 {
ea13bea8
JD
1288 int yyn = yypact[*yyssp];]b4_lac_if([[
1289 YYDPRINTF ((stderr, "Constructing syntax error message\n"));]])[
095a1d11
JD
1290 yyarg[yycount++] = yytname[yytoken];
1291 if (!yypact_value_is_default (yyn))
ea13bea8 1292 {]b4_lac_if([], [[
f953cb20
JD
1293 /* Start YYX at -YYN if negative to avoid negative indexes in
1294 YYCHECK. In other words, skip the first -YYN actions for
1295 this state because they are default actions. */
1296 int yyxbegin = yyn < 0 ? -yyn : 0;
f953cb20
JD
1297 /* Stay within bounds of both yycheck and yytname. */
1298 int yychecklim = YYLAST - yyn + 1;
ea13bea8
JD
1299 int yyxend = yychecklim < YYNTOKENS ? yychecklim : YYNTOKENS;]])[
1300 int yyx;]b4_lac_if([[
1301
1302 for (yyx = 0; yyx < YYNTOKENS; ++yyx)
1303 if (yyx != YYTERROR && yyx != YYUNDEFTOK)
1304 {
1305 {
723fe7d1
JD
1306 int yy_lac_status = yy_lac (yyesa, yyes, yyes_capacity,
1307 yyssp, yyx);
ea13bea8
JD
1308 if (yy_lac_status == 2)
1309 return 2;
1310 if (yy_lac_status == 1)
1311 continue;
1312 }]], [[
1313
f953cb20
JD
1314 for (yyx = yyxbegin; yyx < yyxend; ++yyx)
1315 if (yycheck[yyx + yyn] == yyx && yyx != YYTERROR
1316 && !yytable_value_is_error (yytable[yyx + yyn]))
ea13bea8 1317 {]])[
f953cb20
JD
1318 if (yycount == YYERROR_VERBOSE_ARGS_MAXIMUM)
1319 {
1320 yycount = 1;
1321 yysize = yysize0;
1322 break;
1323 }
1324 yyarg[yycount++] = yytname[yyx];
4b6d6419
AD
1325 {
1326 YYSIZE_T yysize1 = yysize + yytnamerr (YY_NULL, yytname[yyx]);
1327 if (! (yysize <= yysize1
1328 && yysize1 <= YYSTACK_ALLOC_MAXIMUM))
1329 return 2;
1330 yysize = yysize1;
1331 }
f953cb20 1332 }
ea13bea8 1333 }]b4_lac_if([[
5f108727 1334# if ]b4_api_PREFIX[DEBUG
ea13bea8
JD
1335 else if (yydebug)
1336 YYFPRINTF (stderr, "No expected tokens.\n");
1337# endif]])[
095a1d11 1338 }
f953cb20
JD
1339
1340 switch (yycount)
b4c1f9d2 1341 {
ea13bea8 1342# define YYCASE_(N, S) \
f953cb20
JD
1343 case N: \
1344 yyformat = S; \
1345 break
095a1d11 1346 YYCASE_(0, YY_("syntax error"));
f953cb20
JD
1347 YYCASE_(1, YY_("syntax error, unexpected %s"));
1348 YYCASE_(2, YY_("syntax error, unexpected %s, expecting %s"));
1349 YYCASE_(3, YY_("syntax error, unexpected %s, expecting %s or %s"));
1350 YYCASE_(4, YY_("syntax error, unexpected %s, expecting %s or %s or %s"));
1351 YYCASE_(5, YY_("syntax error, unexpected %s, expecting %s or %s or %s or %s"));
ea13bea8 1352# undef YYCASE_
f953cb20 1353 }
d3d3628b 1354
4b6d6419
AD
1355 {
1356 YYSIZE_T yysize1 = yysize + yystrlen (yyformat);
1357 if (! (yysize <= yysize1 && yysize1 <= YYSTACK_ALLOC_MAXIMUM))
1358 return 2;
1359 yysize = yysize1;
1360 }
f953cb20
JD
1361
1362 if (*yymsg_alloc < yysize)
1363 {
1364 *yymsg_alloc = 2 * yysize;
1365 if (! (yysize <= *yymsg_alloc
1366 && *yymsg_alloc <= YYSTACK_ALLOC_MAXIMUM))
1367 *yymsg_alloc = YYSTACK_ALLOC_MAXIMUM;
095a1d11 1368 return 1;
f953cb20
JD
1369 }
1370
1371 /* Avoid sprintf, as that infringes on the user's name space.
1372 Don't have undefined behavior even if the translation
1373 produced a string with the wrong number of "%s"s. */
1374 {
1375 char *yyp = *yymsg;
1376 int yyi = 0;
1377 while ((*yyp = *yyformat) != '\0')
1378 if (*yyp == '%' && yyformat[1] == 's' && yyi < yycount)
69a2ab11 1379 {
f953cb20
JD
1380 yyp += yytnamerr (yyp, yyarg[yyi++]);
1381 yyformat += 2;
69a2ab11 1382 }
f953cb20 1383 else
69a2ab11 1384 {
f953cb20
JD
1385 yyp++;
1386 yyformat++;
69a2ab11 1387 }
f953cb20
JD
1388 }
1389 return 0;
1390}
b4c1f9d2 1391#endif /* YYERROR_VERBOSE */
a8289c62 1392
c3e9f08f 1393]b4_yydestruct_generate([b4_c_function_def])[
4a2a22f4 1394
c3e9f08f 1395]b4_pure_if([], [
9ca7f077 1396
93d0103d 1397b4_declare_scanner_communication_variables])[]b4_push_if([[
9ca7f077 1398
93d0103d
JD
1399struct yypstate
1400 {]b4_declare_parser_state_variables[
9ca7f077
JD
1401 /* Used to determine if this is the first time this instance has
1402 been used. */
1403 int yynew;
333e670c 1404 };]b4_pure_if([], [[
a35f64ea 1405
333e670c
JD
1406static char yypstate_allocated = 0;]])b4_pull_if([
1407
1408b4_c_function_def([[yyparse]], [[int]], b4_parse_param)[
9ca7f077 1409{
6557bcce 1410 return yypull_parse (YY_NULL]m4_ifset([b4_parse_param],
9ca7f077 1411 [[, ]b4_c_args(b4_parse_param)])[);
333e670c 1412}
0245f82d 1413
9ca7f077
JD
1414]b4_c_function_def([[yypull_parse]], [[int]],
1415 [[[yypstate *yyps]], [[yyps]]]m4_ifset([b4_parse_param], [,
1416 b4_parse_param]))[
1417{
1418 int yystatus;
333e670c
JD
1419 yypstate *yyps_local;]b4_pure_if([[
1420 int yychar;
1421 YYSTYPE yylval;]b4_locations_if([[
fb4c8a7c
TR
1422 static YYLTYPE yyloc_default][]b4_yyloc_default[;
1423 YYLTYPE yylloc = yyloc_default;]])])[
6557bcce
AD
1424 if (yyps)
1425 yyps_local = yyps;
1426 else
9ca7f077
JD
1427 {
1428 yyps_local = yypstate_new ();
1429 if (!yyps_local)
1430 {]b4_pure_if([[
1431 yyerror (]b4_yyerror_args[YY_("memory exhausted"));]], [[
1432 if (!yypstate_allocated)
1433 yyerror (]b4_yyerror_args[YY_("memory exhausted"));]])[
1434 return 2;
1435 }
1436 }
9ca7f077
JD
1437 do {
1438 yychar = YYLEX;
1439 yystatus =
1440 yypush_parse (yyps_local]b4_pure_if([[, yychar, &yylval]b4_locations_if([[, &yylloc]])])m4_ifset([b4_parse_param], [, b4_c_args(b4_parse_param)])[);
1441 } while (yystatus == YYPUSH_MORE);
6557bcce 1442 if (!yyps)
9ca7f077
JD
1443 yypstate_delete (yyps_local);
1444 return yystatus;
333e670c
JD
1445}]])[
1446
9ca7f077
JD
1447/* Initialize the parser data structure. */
1448]b4_c_function_def([[yypstate_new]], [[yypstate *]])[
1449{
1450 yypstate *yyps;]b4_pure_if([], [[
1451 if (yypstate_allocated)
6557bcce 1452 return YY_NULL;]])[
9ca7f077
JD
1453 yyps = (yypstate *) malloc (sizeof *yyps);
1454 if (!yyps)
6557bcce 1455 return YY_NULL;
9ca7f077
JD
1456 yyps->yynew = 1;]b4_pure_if([], [[
1457 yypstate_allocated = 1;]])[
1458 return yyps;
1459}
1460
1461]b4_c_function_def([[yypstate_delete]], [[void]],
1462 [[[yypstate *yyps]], [[yyps]]])[
1463{
1464#ifndef yyoverflow
1465 /* If the stack was reallocated but the parse did not complete, then the
1466 stack still needs to be freed. */
1467 if (!yyps->yynew && yyps->yyss != yyps->yyssa)
1468 YYSTACK_FREE (yyps->yyss);
723fe7d1
JD
1469#endif]b4_lac_if([[
1470 if (!yyps->yynew && yyps->yyes != yyps->yyesa)
1471 YYSTACK_FREE (yyps->yyes);]])[
9ca7f077
JD
1472 free (yyps);]b4_pure_if([], [[
1473 yypstate_allocated = 0;]])[
1474}
93d0103d
JD
1475]b4_pure_if([[
1476#define ]b4_prefix[nerrs yyps->]b4_prefix[nerrs]])[
1477#define yystate yyps->yystate
9ca7f077
JD
1478#define yyerrstatus yyps->yyerrstatus
1479#define yyssa yyps->yyssa
1480#define yyss yyps->yyss
1481#define yyssp yyps->yyssp
1482#define yyvsa yyps->yyvsa
1483#define yyvs yyps->yyvs
93d0103d
JD
1484#define yyvsp yyps->yyvsp]b4_locations_if([[
1485#define yylsa yyps->yylsa
9ca7f077
JD
1486#define yyls yyps->yyls
1487#define yylsp yyps->yylsp
93d0103d 1488#define yyerror_range yyps->yyerror_range]])[
723fe7d1
JD
1489#define yystacksize yyps->yystacksize]b4_lac_if([[
1490#define yyesa yyps->yyesa
1491#define yyes yyps->yyes
1492#define yyes_capacity yyps->yyes_capacity]])[
93d0103d
JD
1493
1494
1495/*---------------.
1496| yypush_parse. |
1497`---------------*/
1498
1499]b4_c_function_def([[yypush_parse]], [[int]],
9ca7f077
JD
1500 [[[yypstate *yyps]], [[yyps]]]b4_pure_if([,
1501 [[[int yypushed_char]], [[yypushed_char]]],
1502 [[[YYSTYPE const *yypushed_val]], [[yypushed_val]]]b4_locations_if([,
a1d1ab50 1503 [[[YYLTYPE *yypushed_loc]], [[yypushed_loc]]]])])m4_ifset([b4_parse_param], [,
93d0103d
JD
1504 b4_parse_param]))], [[
1505
1506
1507/*----------.
1508| yyparse. |
1509`----------*/
1510
0245f82d 1511#ifdef YYPARSE_PARAM
93d0103d
JD
1512]b4_c_function_def([yyparse], [int],
1513 [[void *YYPARSE_PARAM], [YYPARSE_PARAM]])[
0245f82d 1514#else /* ! YYPARSE_PARAM */
93d0103d
JD
1515]b4_c_function_def([yyparse], [int], b4_parse_param)[
1516#endif]])[
1517{]b4_pure_if([b4_declare_scanner_communication_variables
1518])b4_push_if([b4_pure_if([], [[
1519 int yypushed_char = yychar;
1520 YYSTYPE yypushed_val = yylval;]b4_locations_if([[
1521 YYLTYPE yypushed_loc = yylloc;]])
1522])],
1523 [b4_declare_parser_state_variables
ea13bea8
JD
1524])b4_lac_if([[
1525 int yy_lac_established = 0;]])[
cb530ce9 1526 int yyn;
600f9b0c 1527 int yyresult;
742e4900 1528 /* Lookahead token as an internal (translated) token number. */
e3f8c4ef 1529 int yytoken = 0;
9ca7f077
JD
1530 /* The variables used to return semantic value and location from the
1531 action routines. */
fa6aa7b3
JD
1532 YYSTYPE yyval;]b4_locations_if([[
1533 YYLTYPE yyloc;]])[
1534
b4c1f9d2
PE
1535#if YYERROR_VERBOSE
1536 /* Buffer for error messages, and its allocated size. */
1537 char yymsgbuf[128];
1538 char *yymsg = yymsgbuf;
1539 YYSIZE_T yymsg_alloc = sizeof yymsgbuf;
1540#endif
10fa2066 1541
327afc7c 1542#define YYPOPSTACK(N) (yyvsp -= (N), yyssp -= (N)]b4_locations_if([, yylsp -= (N)])[)
10fa2066 1543
a85284cf 1544 /* The number of symbols on the RHS of the reduced rule.
9d9b8b70 1545 Keep to zero when no symbol should be popped. */
fa6aa7b3
JD
1546 int yylen = 0;]b4_push_if([[
1547
9ca7f077
JD
1548 if (!yyps->yynew)
1549 {
1550 yyn = yypact[yystate];
1551 goto yyread_pushed_token;
fa6aa7b3
JD
1552 }]])[
1553
7d846072
AD
1554 yyssp = yyss = yyssa;
1555 yyvsp = yyvs = yyvsa;]b4_locations_if([[
1556 yylsp = yyls = yylsa;]])[
723fe7d1
JD
1557 yystacksize = YYINITDEPTH;]b4_lac_if([[
1558
1559 yyes = yyesa;
1560 yyes_capacity = sizeof yyesa / sizeof *yyes;
1561 if (YYMAXDEPTH < yyes_capacity)
1562 yyes_capacity = YYMAXDEPTH;]])[
10fa2066 1563
2f4f028d 1564 YYDPRINTF ((stderr, "Starting parse\n"));
10fa2066
RS
1565
1566 yystate = 0;
1567 yyerrstatus = 0;
17da6427 1568 yynerrs = 0;
9ca7f077 1569 yychar = YYEMPTY; /* Cause a token to be read. */
a1d1ab50 1570]m4_ifdef([b4_initial_action], [
cd735a8c 1571b4_dollar_pushdef([m4_define([b4_dollar_dollar_used])yylval], [],
fb4c8a7c 1572 [b4_push_if([b4_pure_if([*])yypushed_loc], [yylloc])])dnl
9ca7f077
JD
1573/* User initialization code. */
1574b4_user_initial_action
cd735a8c 1575b4_dollar_popdef[]dnl
407d4a75 1576m4_ifdef([b4_dollar_dollar_used],[[ yyvsp[0] = yylval;
cd735a8c 1577]])])dnl
a1d1ab50
AD
1578b4_locations_if([[ yylsp[0] = ]b4_push_if([b4_pure_if([*])yypushed_loc], [yylloc])[;
1579]])dnl
cd735a8c 1580[ goto yysetstate;
10fa2066 1581
71da9eea
AD
1582/*------------------------------------------------------------.
1583| yynewstate -- Push a new state, which is found in yystate. |
1584`------------------------------------------------------------*/
342b8b6e 1585 yynewstate:
71da9eea 1586 /* In all cases, when you get here, the value and location stacks
9d9b8b70 1587 have just been pushed. So pushing a state here evens the stacks. */
cbd89906
PE
1588 yyssp++;
1589
342b8b6e 1590 yysetstate:
cbd89906 1591 *yyssp = yystate;
10fa2066 1592
39912f52 1593 if (yyss + yystacksize - 1 <= yyssp)
10fa2066 1594 {
10fa2066 1595 /* Get the current used size of the three stacks, in elements. */
7093d0f5 1596 YYSIZE_T yysize = yyssp - yyss + 1;
10fa2066
RS
1597
1598#ifdef yyoverflow
3d76b07d 1599 {
9d9b8b70 1600 /* Give user a chance to reallocate the stack. Use copies of
3d76b07d
AD
1601 these so that the &'s don't force the real ones into
1602 memory. */
1603 YYSTYPE *yyvs1 = yyvs;
9ca7f077
JD
1604 yytype_int16 *yyss1 = yyss;]b4_locations_if([
1605 YYLTYPE *yyls1 = yyls;])[
3d76b07d
AD
1606
1607 /* Each stack pointer address is followed by the size of the
58612f1d
AD
1608 data in use in that stack, in bytes. This used to be a
1609 conditional around just the two extra args, but that might
1610 be undefined if yyoverflow is a macro. */
1a059451 1611 yyoverflow (YY_("memory exhausted"),
7093d0f5 1612 &yyss1, yysize * sizeof (*yyssp),
9ca7f077
JD
1613 &yyvs1, yysize * sizeof (*yyvsp),]b4_locations_if([
1614 &yyls1, yysize * sizeof (*yylsp),])[
3d76b07d 1615 &yystacksize);
9ca7f077
JD
1616]b4_locations_if([
1617 yyls = yyls1;])[
3d76b07d
AD
1618 yyss = yyss1;
1619 yyvs = yyvs1;
1620 }
10fa2066 1621#else /* no yyoverflow */
cf44a9ae 1622# ifndef YYSTACK_RELOCATE
1a059451 1623 goto yyexhaustedlab;
cf44a9ae 1624# else
10fa2066 1625 /* Extend the stack our own way. */
39912f52 1626 if (YYMAXDEPTH <= yystacksize)
1a059451 1627 goto yyexhaustedlab;
10fa2066 1628 yystacksize *= 2;
39912f52 1629 if (YYMAXDEPTH < yystacksize)
10fa2066 1630 yystacksize = YYMAXDEPTH;
e9e4c321 1631
600f9b0c 1632 {
d42cf844 1633 yytype_int16 *yyss1 = yyss;
2729e106
PE
1634 union yyalloc *yyptr =
1635 (union yyalloc *) YYSTACK_ALLOC (YYSTACK_BYTES (yystacksize));
600f9b0c 1636 if (! yyptr)
1a059451 1637 goto yyexhaustedlab;
9ca7f077
JD
1638 YYSTACK_RELOCATE (yyss_alloc, yyss);
1639 YYSTACK_RELOCATE (yyvs_alloc, yyvs);]b4_locations_if([
1640 YYSTACK_RELOCATE (yyls_alloc, yyls);])[
cf44a9ae 1641# undef YYSTACK_RELOCATE
600f9b0c
PE
1642 if (yyss1 != yyssa)
1643 YYSTACK_FREE (yyss1);
1644 }
cf44a9ae 1645# endif
10fa2066
RS
1646#endif /* no yyoverflow */
1647
7093d0f5 1648 yyssp = yyss + yysize - 1;
9ca7f077
JD
1649 yyvsp = yyvs + yysize - 1;]b4_locations_if([
1650 yylsp = yyls + yysize - 1;])[
10fa2066 1651
30757c8c 1652 YYDPRINTF ((stderr, "Stack size increased to %lu\n",
600f9b0c 1653 (unsigned long int) yystacksize));
10fa2066 1654
39912f52 1655 if (yyss + yystacksize - 1 <= yyssp)
10fa2066
RS
1656 YYABORT;
1657 }
1658
30757c8c 1659 YYDPRINTF ((stderr, "Entering state %d\n", yystate));
10fa2066 1660
868d2d96
JD
1661 if (yystate == YYFINAL)
1662 YYACCEPT;
1663
10fa2066 1664 goto yybackup;
71da9eea 1665
71da9eea
AD
1666/*-----------.
1667| yybackup. |
1668`-----------*/
1669yybackup:
10fa2066 1670
a85284cf 1671 /* Do appropriate processing given the current state. Read a
742e4900 1672 lookahead token if we need one and don't already have one. */
10fa2066 1673
742e4900 1674 /* First try to decide what to do without reference to lookahead token. */
10fa2066 1675 yyn = yypact[yystate];
d5eb0826 1676 if (yypact_value_is_default (yyn))
10fa2066
RS
1677 goto yydefault;
1678
742e4900 1679 /* Not known => get a lookahead token if don't already have one. */
10fa2066 1680
742e4900 1681 /* YYCHAR is either YYEMPTY or YYEOF or a valid lookahead symbol. */
a20713a4 1682 if (yychar == YYEMPTY)
fa6aa7b3
JD
1683 {]b4_push_if([[
1684 if (!yyps->yynew)
1685 {]b4_use_push_for_pull_if([], [[
1686 YYDPRINTF ((stderr, "Return for a new token:\n"));]])[
1687 yyresult = YYPUSH_MORE;
9ca7f077
JD
1688 goto yypushreturn;
1689 }
fa6aa7b3 1690 yyps->yynew = 0;]b4_pure_if([], [[
9ca7f077
JD
1691 /* Restoring the pushed token is only necessary for the first
1692 yypush_parse invocation since subsequent invocations don't overwrite
1693 it before jumping to yyread_pushed_token. */
1694 yychar = yypushed_char;
fa6aa7b3
JD
1695 yylval = yypushed_val;]b4_locations_if([[
1696 yylloc = yypushed_loc;]])])[
1697yyread_pushed_token:]])[
1698 YYDPRINTF ((stderr, "Reading a token: "));]b4_push_if([b4_pure_if([[
1699 yychar = yypushed_char;
9ca7f077 1700 if (yypushed_val)
fa6aa7b3
JD
1701 yylval = *yypushed_val;]b4_locations_if([[
1702 if (yypushed_loc)
1703 yylloc = *yypushed_loc;]])])], [[
1704 yychar = YYLEX;]])[
1705 }
10fa2066 1706
a20713a4 1707 if (yychar <= YYEOF)
10fa2066 1708 {
a20713a4 1709 yychar = yytoken = YYEOF;
2f4f028d 1710 YYDPRINTF ((stderr, "Now at end of input.\n"));
10fa2066
RS
1711 }
1712 else
1713 {
a20713a4 1714 yytoken = YYTRANSLATE (yychar);
30757c8c 1715 YY_SYMBOL_PRINT ("Next token is", yytoken, &yylval, &yylloc);
10fa2066
RS
1716 }
1717
b0400cc6 1718 /* If the proper action on seeing token YYTOKEN is to reduce or to
e5cfd9d8 1719 detect an error, take that action. */
b0400cc6 1720 yyn += yytoken;
ea13bea8
JD
1721 if (yyn < 0 || YYLAST < yyn || yycheck[yyn] != yytoken)]b4_lac_if([[
1722 {
1723 YY_LAC_ESTABLISH;
1724 goto yydefault;
1725 }]], [[
1726 goto yydefault;]])[
e5cfd9d8
PE
1727 yyn = yytable[yyn];
1728 if (yyn <= 0)
10fa2066 1729 {
d5eb0826 1730 if (yytable_value_is_error (yyn))
ea13bea8
JD
1731 goto yyerrlab;]b4_lac_if([[
1732 YY_LAC_ESTABLISH;]])[
10fa2066
RS
1733 yyn = -yyn;
1734 goto yyreduce;
1735 }
10fa2066 1736
a85284cf
AD
1737 /* Count tokens shifted since error; after three, turn off error
1738 status. */
1739 if (yyerrstatus)
1740 yyerrstatus--;
1741
742e4900 1742 /* Shift the lookahead token. */
30757c8c 1743 YY_SYMBOL_PRINT ("Shifting", yytoken, &yylval, &yylloc);
10fa2066 1744
868d2d96 1745 /* Discard the shifted token. */
ea13bea8
JD
1746 yychar = YYEMPTY;]b4_lac_if([[
1747 YY_LAC_DISCARD ("shift");]])[
10fa2066 1748
a85284cf 1749 yystate = yyn;
fa5303b8 1750 YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
17da6427 1751 *++yyvsp = yylval;
fa5303b8 1752 YY_IGNORE_MAYBE_UNINITIALIZED_END
327afc7c 1753]b4_locations_if([ *++yylsp = yylloc;])[
10fa2066
RS
1754 goto yynewstate;
1755
10fa2066 1756
71da9eea
AD
1757/*-----------------------------------------------------------.
1758| yydefault -- do the default action for the current state. |
1759`-----------------------------------------------------------*/
1760yydefault:
10fa2066
RS
1761 yyn = yydefact[yystate];
1762 if (yyn == 0)
1763 goto yyerrlab;
71da9eea 1764 goto yyreduce;
10fa2066 1765
71da9eea
AD
1766
1767/*-----------------------------.
1768| yyreduce -- Do a reduction. |
1769`-----------------------------*/
10fa2066 1770yyreduce:
71da9eea 1771 /* yyn is the number of a rule to reduce with. */
10fa2066 1772 yylen = yyr2[yyn];
da9abf43
AD
1773
1774 /* If YYLEN is nonzero, implement the default value of the action:
573c1d9f 1775 `$$ = $1'.
da9abf43 1776
accea6db
PE
1777 Otherwise, the following line sets YYVAL to garbage.
1778 This behavior is undocumented and Bison
da9abf43
AD
1779 users should not rely upon it. Assigning to YYVAL
1780 unconditionally makes the parser a bit smaller, and it avoids a
1781 GCC warning that YYVAL may be used uninitialized. */
1782 yyval = yyvsp[1-yylen];
3abcd459 1783
327afc7c 1784]b4_locations_if(
9d9b8b70 1785[[ /* Default location. */
401aace6 1786 YYLLOC_DEFAULT (yyloc, (yylsp - yylen), yylen);]])[
ea13bea8
JD
1787 YY_REDUCE_PRINT (yyn);]b4_lac_if([[
1788 {
1789 int yychar_backup = yychar;
1790 switch (yyn)
1791 {
1792 ]b4_user_actions[
1793 default: break;
1794 }
1795 if (yychar_backup != yychar)
1796 YY_LAC_DISCARD ("yychar change");
1797 }]], [[
a8289c62 1798 switch (yyn)
d1ff7a7c 1799 {
8ec0a172 1800 ]b4_user_actions[
95f22ad2 1801 default: break;
ea13bea8 1802 }]])[
abcc7c03
JD
1803 /* User semantic actions sometimes alter yychar, and that requires
1804 that yytoken be updated with the new translation. We take the
1805 approach of translating immediately before every use of yytoken.
1806 One alternative is translating here after every semantic action,
1807 but that translation would be missed if the semantic action invokes
1808 YYABORT, YYACCEPT, or YYERROR immediately after altering yychar or
1809 if it invokes YYBACKUP. In the case of YYABORT or YYACCEPT, an
1810 incorrect destructor might then be invoked immediately. In the
1811 case of YYERROR or YYBACKUP, subsequent parser actions might lead
1812 to an incorrect destructor call or verbose syntax error message
1813 before the lookahead is translated. */
d1ff7a7c 1814 YY_SYMBOL_PRINT ("-> $$ =", yyr1[yyn], &yyval, &yyloc);
897668ee 1815
a85284cf
AD
1816 YYPOPSTACK (yylen);
1817 yylen = 0;
b0937b22 1818 YY_STACK_PRINT (yyss, yyssp);
10fa2066 1819
9ca7f077
JD
1820 *++yyvsp = yyval;]b4_locations_if([
1821 *++yylsp = yyloc;])[
10fa2066 1822
41aca2e0
AD
1823 /* Now `shift' the result of the reduction. Determine what state
1824 that goes to, based on the state we popped back to and the rule
1825 number reduced by. */
10fa2066
RS
1826
1827 yyn = yyr1[yyn];
1828
7742ddeb 1829 yystate = yypgoto[yyn - YYNTOKENS] + *yyssp;
34ec3579 1830 if (0 <= yystate && yystate <= YYLAST && yycheck[yystate] == *yyssp)
10fa2066
RS
1831 yystate = yytable[yystate];
1832 else
7742ddeb 1833 yystate = yydefgoto[yyn - YYNTOKENS];
10fa2066
RS
1834
1835 goto yynewstate;
1836
10fa2066 1837
71da9eea
AD
1838/*------------------------------------.
1839| yyerrlab -- here on detecting error |
1840`------------------------------------*/
1841yyerrlab:
abcc7c03
JD
1842 /* Make sure we have latest lookahead translation. See comments at
1843 user semantic actions for why this is necessary. */
095a1d11 1844 yytoken = yychar == YYEMPTY ? YYEMPTY : YYTRANSLATE (yychar);
abcc7c03 1845
71da9eea
AD
1846 /* If not already recovering from an error, report this error. */
1847 if (!yyerrstatus)
10fa2066 1848 {
17da6427 1849 ++yynerrs;
b4c1f9d2
PE
1850#if ! YYERROR_VERBOSE
1851 yyerror (]b4_yyerror_args[YY_("syntax error"));
1852#else
723fe7d1
JD
1853# define YYSYNTAX_ERROR yysyntax_error (&yymsg_alloc, &yymsg, \]b4_lac_if([[
1854 yyesa, &yyes, &yyes_capacity, \]])[
1855 yyssp, yytoken)
0e0f066b
JD
1856 {
1857 char const *yymsgp = YY_("syntax error");
ea13bea8
JD
1858 int yysyntax_error_status;]b4_lac_if([[
1859 if (yychar != YYEMPTY)
1860 YY_LAC_ESTABLISH;]])[
1861 yysyntax_error_status = YYSYNTAX_ERROR;
0e0f066b
JD
1862 if (yysyntax_error_status == 0)
1863 yymsgp = yymsg;
095a1d11 1864 else if (yysyntax_error_status == 1)
0e0f066b
JD
1865 {
1866 if (yymsg != yymsgbuf)
1867 YYSTACK_FREE (yymsg);
1868 yymsg = (char *) YYSTACK_ALLOC (yymsg_alloc);
1869 if (!yymsg)
1870 {
1871 yymsg = yymsgbuf;
1872 yymsg_alloc = sizeof yymsgbuf;
095a1d11 1873 yysyntax_error_status = 2;
0e0f066b
JD
1874 }
1875 else
1876 {
1877 yysyntax_error_status = YYSYNTAX_ERROR;
1878 yymsgp = yymsg;
1879 }
1880 }
1881 yyerror (]b4_yyerror_args[yymsgp);
1882 if (yysyntax_error_status == 2)
1883 goto yyexhaustedlab;
1884 }
1885# undef YYSYNTAX_ERROR
b4c1f9d2 1886#endif
10fa2066 1887 }
71da9eea 1888
a005dbcb 1889]b4_locations_if([[ yyerror_range[1] = yylloc;]])[
d42f69cd 1890
10fa2066
RS
1891 if (yyerrstatus == 3)
1892 {
742e4900 1893 /* If just tried and failed to reuse lookahead token after an
71da9eea 1894 error, discard it. */
10fa2066 1895
a6b89bb2 1896 if (yychar <= YYEOF)
02650b7f 1897 {
258b75ca 1898 /* Return failure if at end of input. */
a6b89bb2 1899 if (yychar == YYEOF)
80ce3401 1900 YYABORT;
02650b7f 1901 }
a6b89bb2
PE
1902 else
1903 {
4b367315 1904 yydestruct ("Error: discarding",
327afc7c 1905 yytoken, &yylval]b4_locations_if([, &yylloc])[]b4_user_args[);
a6b89bb2 1906 yychar = YYEMPTY;
a6b89bb2 1907 }
10fa2066
RS
1908 }
1909
742e4900 1910 /* Else will try to reuse lookahead token after shifting the error
71da9eea 1911 token. */
8a3eb3c8 1912 goto yyerrlab1;
300a7966 1913
10fa2066 1914
a6b89bb2
PE
1915/*---------------------------------------------------.
1916| yyerrorlab -- error raised explicitly by YYERROR. |
1917`---------------------------------------------------*/
1918yyerrorlab:
1919
c7a65b99
PE
1920 /* Pacify compilers like GCC when the user code never invokes
1921 YYERROR and the label yyerrorlab therefore never appears in user
1922 code. */
2a4647a3 1923 if (/*CONSTCOND*/ 0)
a6b89bb2 1924 goto yyerrorlab;
a6b89bb2 1925
a005dbcb 1926]b4_locations_if([[ yyerror_range[1] = yylsp[1-yylen];
a85284cf 1927]])[ /* Do not reclaim the symbols of the rule which action triggered
9d9b8b70 1928 this YYERROR. */
a85284cf
AD
1929 YYPOPSTACK (yylen);
1930 yylen = 0;
1931 YY_STACK_PRINT (yyss, yyssp);
a6b89bb2 1932 yystate = *yyssp;
3fc16193 1933 goto yyerrlab1;
a6b89bb2
PE
1934
1935
1936/*-------------------------------------------------------------.
1937| yyerrlab1 -- common code for both syntax error and YYERROR. |
1938`-------------------------------------------------------------*/
300a7966 1939yyerrlab1:
cf44a9ae 1940 yyerrstatus = 3; /* Each real token shifted decrements this. */
10fa2066 1941
660bc8dd
PE
1942 for (;;)
1943 {
1944 yyn = yypact[yystate];
d5eb0826 1945 if (!yypact_value_is_default (yyn))
660bc8dd
PE
1946 {
1947 yyn += YYTERROR;
1948 if (0 <= yyn && yyn <= YYLAST && yycheck[yyn] == YYTERROR)
1949 {
1950 yyn = yytable[yyn];
1951 if (0 < yyn)
1952 break;
1953 }
1954 }
10fa2066 1955
660bc8dd
PE
1956 /* Pop the current state because it cannot handle the error token. */
1957 if (yyssp == yyss)
1958 YYABORT;
5504898e 1959
a005dbcb 1960]b4_locations_if([[ yyerror_range[1] = *yylsp;]])[
4b367315 1961 yydestruct ("Error: popping",
327afc7c 1962 yystos[yystate], yyvsp]b4_locations_if([, yylsp])[]b4_user_args[);
a85284cf 1963 YYPOPSTACK (1);
a6b89bb2 1964 yystate = *yyssp;
b0937b22 1965 YY_STACK_PRINT (yyss, yyssp);
ea13bea8
JD
1966 }]b4_lac_if([[
1967
1968 /* If the stack popping above didn't lose the initial context for the
1969 current lookahead token, the shift below will for sure. */
1970 YY_LAC_DISCARD ("error recovery");]])[
10fa2066 1971
fa5303b8 1972 YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
17da6427 1973 *++yyvsp = yylval;
fa5303b8 1974 YY_IGNORE_MAYBE_UNINITIALIZED_END
327afc7c 1975]b4_locations_if([[
a005dbcb 1976 yyerror_range[2] = yylloc;
3fc16193 1977 /* Using YYLLOC is tempting, but would change the location of
742e4900 1978 the lookahead. YYLOC is available though. */
a005dbcb 1979 YYLLOC_DEFAULT (yyloc, yyerror_range, 2);
3fc16193 1980 *++yylsp = yyloc;]])[
10fa2066 1981
9d9b8b70 1982 /* Shift the error token. */
30757c8c 1983 YY_SYMBOL_PRINT ("Shifting", yystos[yyn], yyvsp, yylsp);
1576d44d 1984
10fa2066
RS
1985 yystate = yyn;
1986 goto yynewstate;
70ddf897 1987
71da9eea
AD
1988
1989/*-------------------------------------.
1990| yyacceptlab -- YYACCEPT comes here. |
1991`-------------------------------------*/
1992yyacceptlab:
600f9b0c
PE
1993 yyresult = 0;
1994 goto yyreturn;
71da9eea
AD
1995
1996/*-----------------------------------.
1997| yyabortlab -- YYABORT comes here. |
1998`-----------------------------------*/
1999yyabortlab:
600f9b0c
PE
2000 yyresult = 1;
2001 goto yyreturn;
2002
24bb5f8f 2003#if ]b4_lac_if([[1]], [[!defined yyoverflow || YYERROR_VERBOSE]])[
1a059451
PE
2004/*-------------------------------------------------.
2005| yyexhaustedlab -- memory exhaustion comes here. |
2006`-------------------------------------------------*/
2007yyexhaustedlab:
2008 yyerror (]b4_yyerror_args[YY_("memory exhausted"));
600f9b0c
PE
2009 yyresult = 2;
2010 /* Fall through. */
0bfb02ff 2011#endif
600f9b0c
PE
2012
2013yyreturn:
868d2d96 2014 if (yychar != YYEMPTY)
abcc7c03
JD
2015 {
2016 /* Make sure we have latest lookahead translation. See comments at
2017 user semantic actions for why this is necessary. */
2018 yytoken = YYTRANSLATE (yychar);
2019 yydestruct ("Cleanup: discarding lookahead",
2020 yytoken, &yylval]b4_locations_if([, &yylloc])[]b4_user_args[);
2021 }
a85284cf 2022 /* Do not reclaim the symbols of the rule which action triggered
9d9b8b70 2023 this YYABORT or YYACCEPT. */
a85284cf
AD
2024 YYPOPSTACK (yylen);
2025 YY_STACK_PRINT (yyss, yyssp);
258b75ca
PE
2026 while (yyssp != yyss)
2027 {
dd5f2af2 2028 yydestruct ("Cleanup: popping",
327afc7c 2029 yystos[*yyssp], yyvsp]b4_locations_if([, yylsp])[]b4_user_args[);
a85284cf 2030 YYPOPSTACK (1);
258b75ca 2031 }
600f9b0c
PE
2032#ifndef yyoverflow
2033 if (yyss != yyssa)
2034 YYSTACK_FREE (yyss);
723fe7d1
JD
2035#endif]b4_lac_if([[
2036 if (yyes != yyesa)
2037 YYSTACK_FREE (yyes);]])b4_push_if([[
93d0103d 2038 yyps->yynew = 1;
9ca7f077 2039
93d0103d
JD
2040yypushreturn:]])[
2041#if YYERROR_VERBOSE
b4c1f9d2
PE
2042 if (yymsg != yymsgbuf)
2043 YYSTACK_FREE (yymsg);
70ddf897 2044#endif
7b5cdcbd
JD
2045 /* Make sure YYID is used. */
2046 return YYID (yyresult);
9ca7f077 2047}
be2a1a68 2048
24c0aad7 2049
dcd5344d 2050]b4_epilogue[]dnl
1c7ec959
AD
2051b4_output_end()
2052
327afc7c 2053b4_defines_if(
1c7ec959
AD
2054[b4_output_begin([b4_spec_defines_file])[
2055]b4_copyright([Bison interface for Yacc-like parsers in C],
68f91d58 2056 [1984, 1989-1990, 2000-2013])[
c3e9f08f 2057
ae6bdabb 2058]b4_shared_declarations[
1c7ec959
AD
2059]b4_output_end()
2060])