]> git.saurik.com Git - bison.git/blame - data/yacc.c
Work around a bug in bro 0.8, which underparenthesizes its
[bison.git] / data / yacc.c
CommitLineData
d4fb5e3c 1m4_divert(-1) -*- C -*-
a8289c62 2
60491a94 3# Yacc compatible skeleton for Bison
c7a65b99 4
e2a21b6f 5# Copyright (C) 1984, 1989, 1990, 2000, 2001, 2002, 2003, 2004, 2005, 2006
12b0043a 6# Free Software Foundation, Inc.
60491a94
AD
7
8# This program is free software; you can redistribute it and/or modify
9# it under the terms of the GNU General Public License as published by
10# the Free Software Foundation; either version 2 of the License, or
11# (at your option) any later version.
12
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.
17
18# You should have received a copy of the GNU General Public License
19# along with this program; if not, write to the Free Software
0fb669f9
PE
20# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
21# 02110-1301 USA
60491a94 22
0a96ba81 23m4_include(b4_pkgdatadir/[c.m4])
66d30cd4
AD
24
25## ---------------- ##
26## Default values. ##
27## ---------------- ##
28
29# Stack parameters.
30m4_define_default([b4_stack_depth_max], [10000])
31m4_define_default([b4_stack_depth_init], [200])
32
2a8d363a
AD
33
34## ------------------------ ##
35## Pure/impure interfaces. ##
36## ------------------------ ##
37
38
4b367315
AD
39# b4_yacc_pure_if(IF-TRUE, IF-FALSE)
40# ----------------------------------
2a8d363a 41# Expand IF-TRUE, if %pure-parser and %parse-param, IF-FALSE otherwise.
4b367315 42m4_define([b4_yacc_pure_if],
2a8d363a 43[b4_pure_if([m4_ifset([b4_parse_param],
02650b7f
PE
44 [$1], [$2])],
45 [$2])])
2a8d363a
AD
46
47
93724f13
AD
48# b4_yyerror_args
49# ---------------
2a8d363a 50# Arguments passed to yyerror: user args plus yylloc.
93724f13 51m4_define([b4_yyerror_args],
4b367315 52[b4_yacc_pure_if([b4_location_if([&yylloc, ])])dnl
93724f13 53m4_ifset([b4_parse_param], [b4_c_args(b4_parse_param), ])])
2a8d363a
AD
54
55
56# b4_lex_param
57# ------------
d42f69cd 58# Accumulate in b4_lex_param all the yylex arguments.
2a8d363a 59# b4_lex_param arrives quoted twice, but we want to keep only one level.
21964f43
AD
60m4_define([b4_lex_param],
61m4_dquote(b4_pure_if([[[[YYSTYPE *]], [[&yylval]]][]dnl
68cdf747
PE
62b4_location_if([, [[YYLTYPE *], [&yylloc]]])m4_ifdef([b4_lex_param], [, ])])dnl
63m4_ifdef([b4_lex_param], b4_lex_param)))
66d30cd4
AD
64
65
f1886bb2
AD
66
67## ------------ ##
68## Data Types. ##
69## ------------ ##
70
71# b4_int_type(MIN, MAX)
72# ---------------------
73# Return the smallest int type able to handle numbers ranging from
d42cf844
PE
74# MIN to MAX (included). Overwrite the version from c.m4, which
75# uses only C89 types, so that the user can override the shorter
76# types, and so that pre-C89 compilers are handled correctly.
f1886bb2 77m4_define([b4_int_type],
d42cf844
PE
78[m4_if(b4_ints_in($@, [0], [255]), [1], [yytype_uint8],
79 b4_ints_in($@, [-128], [127]), [1], [yytype_int8],
f1886bb2 80
d42cf844
PE
81 b4_ints_in($@, [0], [65535]), [1], [yytype_uint16],
82 b4_ints_in($@, [-32768], [32767]), [1], [yytype_int16],
f1886bb2
AD
83
84 m4_eval([0 <= $1]), [1], [unsigned int],
85
02650b7f 86 [int])])
f1886bb2
AD
87
88
66d30cd4
AD
89## ----------------- ##
90## Semantic Values. ##
91## ----------------- ##
92
93
82b6cb3f
AD
94# b4_lhs_value([TYPE])
95# --------------------
96# Expansion of $<TYPE>$.
97m4_define([b4_lhs_value],
bc82c5a5 98[(yyval[]m4_ifval([$1], [.$1]))])
82b6cb3f
AD
99
100
101# b4_rhs_value(RULE-LENGTH, NUM, [TYPE])
102# --------------------------------------
103# Expansion of $<TYPE>NUM, where the current rule has RULE-LENGTH
104# symbols on RHS.
105m4_define([b4_rhs_value],
d1ff7a7c 106[(yyvsp@{($2) - ($1)@}m4_ifval([$3], [.$3]))])
82b6cb3f
AD
107
108
58612f1d
AD
109
110## ----------- ##
111## Locations. ##
112## ----------- ##
113
82b6cb3f
AD
114# b4_lhs_location()
115# -----------------
116# Expansion of @$.
117m4_define([b4_lhs_location],
bc82c5a5 118[(yyloc)])
82b6cb3f
AD
119
120
121# b4_rhs_location(RULE-LENGTH, NUM)
122# ---------------------------------
123# Expansion of @NUM, where the current rule has RULE-LENGTH symbols
124# on RHS.
125m4_define([b4_rhs_location],
d1ff7a7c 126[(yylsp@{($2) - ($1)@})])
be2a1a68 127
0d8bed56 128
0d8bed56 129
1ae72863
AD
130## --------------------------------------------------------- ##
131## Defining symbol actions, e.g., printers and destructors. ##
132## --------------------------------------------------------- ##
133
b526ee61
AD
134# We do want M4 expansion after # for CPP macros.
135m4_changecom()
be2a1a68 136m4_divert(0)dnl
947427ae 137@output @output_parser_name@
fb8135fa 138b4_copyright([Skeleton parser for Yacc-like parsing with Bison],
e2a21b6f 139 [1984, 1989, 1990, 2000, 2001, 2002, 2003, 2004, 2005, 2006])[
fb8135fa 140
8bb4c753
PE
141/* As a special exception, when this file is copied by Bison into a
142 Bison output file, you may use that output file without restriction.
143 This special exception was added by the Free Software Foundation
144 in version 1.24 of Bison. */
af3412cd
PE
145
146/* C LALR(1) parser skeleton written by Richard Stallman, by
147 simplifying the original so-called "semantic" parser. */
444fbf65 148
cf44a9ae
PE
149/* All symbols defined below should begin with yy or YY, to avoid
150 infringing on user name space. This should be done even for local
151 variables, as they might otherwise be expanded by user macros.
152 There are some unavoidable exceptions within include files to
153 define necessary library symbols; they are noted "INFRINGES ON
154 USER NAME SPACE" below. */
155
9c1e26bd 156]b4_identification
be2a1a68 157m4_if(b4_prefix[], [yy], [],
c5b95ccf 158[/* Substitute the variable and function names. */
be2a1a68
AD
159#define yyparse b4_prefix[]parse
160#define yylex b4_prefix[]lex
161#define yyerror b4_prefix[]error
162#define yylval b4_prefix[]lval
163#define yychar b4_prefix[]char
164#define yydebug b4_prefix[]debug
165#define yynerrs b4_prefix[]nerrs
9c1e26bd 166b4_location_if([#define yylloc b4_prefix[]lloc])])[
17da6427 167
cf147260 168]b4_token_enums_defines(b4_tokens)[
17acead5 169
0dd1580a 170/* Copy the first part of user declarations. */
9c1e26bd 171]b4_pre_prologue[
cce71710 172
d99361e6
AD
173/* Enabling traces. */
174#ifndef YYDEBUG
9c1e26bd 175# define YYDEBUG ]b4_debug[
d99361e6
AD
176#endif
177
178/* Enabling verbose error messages. */
179#ifdef YYERROR_VERBOSE
180# undef YYERROR_VERBOSE
181# define YYERROR_VERBOSE 1
182#else
9c1e26bd 183# define YYERROR_VERBOSE ]b4_error_verbose[
d99361e6
AD
184#endif
185
141f5793
PE
186/* Enabling the token table. */
187#ifndef YYTOKEN_TABLE
188# define YYTOKEN_TABLE ]b4_token_table[
189#endif
190
02650b7f 191#if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED
9c1e26bd 192]m4_ifdef([b4_stype],
02650b7f 193[typedef union[]m4_bregexp(b4_stype, [^{], [ YYSTYPE])
1221b78a 194b4_stype
996b1c7e 195/* Line __line__ of yacc.c. */
1221b78a
PE
196b4_syncline([@oline@], [@ofile@])
197 YYSTYPE;],
050c471b
PE
198[typedef int YYSTYPE;])[
199# define yystype YYSTYPE /* obsolescent; will be withdrawn */
200# define YYSTYPE_IS_DECLARED 1
71cd15d4 201# define YYSTYPE_IS_TRIVIAL 1
fd51e5ff
AD
202#endif
203
02650b7f 204]b4_location_if([#if ! defined YYLTYPE && ! defined YYLTYPE_IS_DECLARED
050c471b 205typedef struct YYLTYPE
fd51e5ff
AD
206{
207 int first_line;
208 int first_column;
209 int last_line;
210 int last_column;
050c471b
PE
211} YYLTYPE;
212# define yyltype YYLTYPE /* obsolescent; will be withdrawn */
213# define YYLTYPE_IS_DECLARED 1
71cd15d4 214# define YYLTYPE_IS_TRIVIAL 1
fd51e5ff 215#endif
1915f133 216])[
fd51e5ff 217
0dd1580a 218/* Copy the second part of user declarations. */
ee41006f 219]b4_post_prologue
0dd1580a 220
996b1c7e 221/* Line __line__ of yacc.c. */
ee41006f 222b4_syncline([@oline@], [@ofile@])[
7093d0f5 223
d42cf844
PE
224#ifdef short
225# undef short
226#endif
227
228#ifdef YYTYPE_UINT8
229typedef YYTYPE_UINT8 yytype_uint8;
230#else
231typedef unsigned char yytype_uint8;
232#endif
233
234#ifdef YYTYPE_INT8
235typedef YYTYPE_INT8 yytype_int8;
236#elif ]b4_c_modern[
237typedef signed char yytype_int8;
238#else
239typedef short int yytype_int8;
240#endif
241
242#ifdef YYTYPE_UINT16
243typedef YYTYPE_UINT16 yytype_uint16;
244#else
245typedef unsigned short int yytype_uint16;
246#endif
247
248#ifdef YYTYPE_INT16
249typedef YYTYPE_INT16 yytype_int16;
250#else
251typedef short int yytype_int16;
252#endif
253
55289366 254#ifndef YYSIZE_T
02650b7f 255# ifdef __SIZE_TYPE__
55289366 256# define YYSIZE_T __SIZE_TYPE__
02650b7f 257# elif defined size_t
55289366 258# define YYSIZE_T size_t
02650b7f 259# elif ! defined YYSIZE_T && ]b4_c_modern[
55289366
PE
260# include <stddef.h> /* INFRINGES ON USER NAME SPACE */
261# define YYSIZE_T size_t
262# else
263# define YYSIZE_T unsigned int
264# endif
bedf57f5 265#endif
7093d0f5 266
b4c1f9d2
PE
267#define YYSIZE_MAXIMUM ((YYSIZE_T) -1)
268
30757c8c
PE
269#ifndef YY_
270# if YYENABLE_NLS
271# if ENABLE_NLS
272# include <libintl.h> /* INFRINGES ON USER NAME SPACE */
273# define YY_(msgid) dgettext ("bison-runtime", msgid)
274# endif
275# endif
276# ifndef YY_
277# define YY_(msgid) msgid
278# endif
279#endif
280
2a4647a3 281/* Suppress unused-variable warnings by "using" E. */
02650b7f 282#if ! defined lint || defined __GNUC__
12ce2df6
PE
283# define YYUSE(e) ((void) (e))
284#else
285# define YYUSE(e) /* empty */
286#endif
287
288/* Identity function, used to suppress warnings about constant conditions. */
289#ifndef lint
290# define YYID(n) (n)
291#else
292]b4_c_function_def([YYID], [static int], [[int i], [i]])[
293{
294 return i;
295}
296#endif
2a4647a3 297
02650b7f 298#if ! defined yyoverflow || YYERROR_VERBOSE
2779e383 299
7093d0f5
AD
300/* The parser invokes alloca or malloc; define the necessary symbols. */
301
b929851a
PE
302# ifdef YYSTACK_USE_ALLOCA
303# if YYSTACK_USE_ALLOCA
b929851a
PE
304# ifdef __GNUC__
305# define YYSTACK_ALLOC __builtin_alloca
02650b7f 306# elif defined __BUILTIN_VA_ARG_INCR
55289366 307# include <alloca.h> /* INFRINGES ON USER NAME SPACE */
02650b7f 308# elif defined _AIX
55289366 309# define YYSTACK_ALLOC __alloca
02650b7f 310# elif defined _MSC_VER
55289366
PE
311# include <malloc.h> /* INFRINGES ON USER NAME SPACE */
312# define alloca _alloca
d7e14fc0
PE
313# else
314# define YYSTACK_ALLOC alloca
02650b7f 315# if ! defined _ALLOCA_H && ! defined _STDLIB_H && ]b4_c_modern[
bedf57f5 316# include <stdlib.h> /* INFRINGES ON USER NAME SPACE */
55289366
PE
317# ifndef _STDLIB_H
318# define _STDLIB_H 1
319# endif
bedf57f5 320# endif
7093d0f5
AD
321# endif
322# endif
323# endif
324
325# ifdef YYSTACK_ALLOC
9d9b8b70 326 /* Pacify GCC's `empty if-body' warning. */
12ce2df6 327# define YYSTACK_FREE(Ptr) do { /* empty */; } while (YYID (0))
506ffb1f 328# ifndef YYSTACK_ALLOC_MAXIMUM
b9c9f761
PE
329 /* The OS might guarantee only one guard page at the bottom of the stack,
330 and a page size can be as small as 4096 bytes. So we cannot safely
331 invoke alloca (N) if N exceeds 4096. Use a slightly smaller number
332 to allow for a few compiler-allocated temporary stack slots. */
e2a21b6f 333# define YYSTACK_ALLOC_MAXIMUM 4032 /* reasonable circa 2006 */
506ffb1f 334# endif
7093d0f5 335# else
2779e383
PE
336# define YYSTACK_ALLOC YYMALLOC
337# define YYSTACK_FREE YYFREE
506ffb1f 338# ifndef YYSTACK_ALLOC_MAXIMUM
b4c1f9d2 339# define YYSTACK_ALLOC_MAXIMUM YYSIZE_MAXIMUM
506ffb1f 340# endif
0925ebb4
PE
341# ifdef __cplusplus
342extern "C" {
343# endif
bedf57f5
PE
344# ifndef YYMALLOC
345# define YYMALLOC malloc
02650b7f 346# if ! defined malloc && ! defined _STDLIB_H && ]b4_c_modern[
bedf57f5
PE
347void *malloc (YYSIZE_T); /* INFRINGES ON USER NAME SPACE */
348# endif
349# endif
350# ifndef YYFREE
351# define YYFREE free
02650b7f 352# if ! defined free && ! defined _STDLIB_H && ]b4_c_modern[
bedf57f5
PE
353void free (void *); /* INFRINGES ON USER NAME SPACE */
354# endif
355# endif
0925ebb4
PE
356# ifdef __cplusplus
357}
358# endif
7093d0f5 359# endif
02650b7f 360#endif /* ! defined yyoverflow || YYERROR_VERBOSE */
cf44a9ae
PE
361
362
02650b7f
PE
363#if (! defined yyoverflow \
364 && (! defined __cplusplus \
365 || (]b4_location_if([[defined YYLTYPE_IS_TRIVIAL && YYLTYPE_IS_TRIVIAL \
366 && ]])[defined YYSTYPE_IS_TRIVIAL && YYSTYPE_IS_TRIVIAL)))
7093d0f5 367
600f9b0c
PE
368/* A type that is properly aligned for any stack member. */
369union yyalloc
370{
d42cf844 371 yytype_int16 yyss;
2729e106 372 YYSTYPE yyvs;
9c1e26bd 373 ]b4_location_if([ YYLTYPE yyls;
58612f1d 374])dnl
9c1e26bd 375[};
600f9b0c
PE
376
377/* The size of the maximum gap between one aligned stack and the next. */
17836590 378# define YYSTACK_GAP_MAXIMUM (sizeof (union yyalloc) - 1)
600f9b0c
PE
379
380/* The size of an array large to enough to hold all stacks, each with
381 N elements. */
9c1e26bd 382]b4_location_if(
58612f1d 383[# define YYSTACK_BYTES(N) \
d42cf844 384 ((N) * (sizeof (yytype_int16) + sizeof (YYSTYPE) + sizeof (YYLTYPE)) \
17836590 385 + 2 * YYSTACK_GAP_MAXIMUM)],
58612f1d 386[# define YYSTACK_BYTES(N) \
d42cf844 387 ((N) * (sizeof (yytype_int16) + sizeof (YYSTYPE)) \
17836590 388 + YYSTACK_GAP_MAXIMUM)])[
600f9b0c 389
5b041382
PE
390/* Copy COUNT objects from FROM to TO. The source and destination do
391 not overlap. */
392# ifndef YYCOPY
02650b7f 393# if defined __GNUC__ && 1 < __GNUC__
5b041382
PE
394# define YYCOPY(To, From, Count) \
395 __builtin_memcpy (To, From, (Count) * sizeof (*(From)))
396# else
397# define YYCOPY(To, From, Count) \
398 do \
399 { \
cb530ce9 400 YYSIZE_T yyi; \
5b041382 401 for (yyi = 0; yyi < (Count); yyi++) \
9c1e26bd 402 (To)[yyi] = (From)[yyi]; \
5b041382 403 } \
12ce2df6 404 while (YYID (0))
5b041382
PE
405# endif
406# endif
407
408/* Relocate STACK from its old location to the new one. The
7093d0f5 409 local variables YYSIZE and YYSTACKSIZE give the old and new number of
600f9b0c
PE
410 elements in the stack, and YYPTR gives the new location of the
411 stack. Advance YYPTR to a properly aligned location for the next
412 stack. */
5b041382 413# define YYSTACK_RELOCATE(Stack) \
7093d0f5
AD
414 do \
415 { \
416 YYSIZE_T yynewbytes; \
5b041382 417 YYCOPY (&yyptr->Stack, Stack, yysize); \
2729e106 418 Stack = &yyptr->Stack; \
17836590 419 yynewbytes = yystacksize * sizeof (*Stack) + YYSTACK_GAP_MAXIMUM; \
2729e106 420 yyptr += yynewbytes / sizeof (*yyptr); \
7093d0f5 421 } \
12ce2df6 422 while (YYID (0))
7093d0f5 423
cf44a9ae 424#endif
8850be4b 425
9d9b8b70 426/* YYFINAL -- State number of the termination state. */
9c1e26bd 427#define YYFINAL ]b4_final_state_number[
39912f52 428/* YYLAST -- Last index in YYTABLE. */
9c1e26bd 429#define YYLAST ]b4_last[
7742ddeb 430
9d9b8b70 431/* YYNTOKENS -- Number of terminals. */
9c1e26bd 432#define YYNTOKENS ]b4_tokens_number[
9d9b8b70 433/* YYNNTS -- Number of nonterminals. */
9c1e26bd 434#define YYNNTS ]b4_nterms_number[
9d9b8b70 435/* YYNRULES -- Number of rules. */
9c1e26bd 436#define YYNRULES ]b4_rules_number[
9d9b8b70 437/* YYNRULES -- Number of states. */
9c1e26bd 438#define YYNSTATES ]b4_states_number[
7742ddeb
AD
439
440/* YYTRANSLATE(YYLEX) -- Bison symbol number corresponding to YYLEX. */
9c1e26bd
AD
441#define YYUNDEFTOK ]b4_undef_token_number[
442#define YYMAXUTOK ]b4_user_token_number_max[
007a50a4 443
04098407 444#define YYTRANSLATE(YYX) \
a20713a4 445 ((unsigned int) (YYX) <= YYMAXUTOK ? yytranslate[YYX] : YYUNDEFTOK)
a8289c62 446
b0400cc6
AD
447/* YYTRANSLATE[YYLEX] -- Bison symbol number corresponding to YYLEX. */
448static const ]b4_int_type_for([b4_translate])[ yytranslate[] =
a8289c62 449{
c5e3e510 450 ]b4_translate[
a8289c62
RA
451};
452
453#if YYDEBUG
c5e3e510 454/* YYPRHS[YYN] -- Index of the first RHS symbol of rule number YYN in
7742ddeb 455 YYRHS. */
c5e3e510 456static const ]b4_int_type_for([b4_prhs])[ yyprhs[] =
a8289c62 457{
c5e3e510 458 ]b4_prhs[
a8289c62
RA
459};
460
9d9b8b70 461/* YYRHS -- A `-1'-separated list of the rules' RHS. */
c5e3e510 462static const ]b4_int_type_for([b4_rhs])[ yyrhs[] =
a8289c62 463{
c5e3e510 464 ]b4_rhs[
a8289c62
RA
465};
466
c5e3e510
AD
467/* YYRLINE[YYN] -- source line where rule number YYN was defined. */
468static const ]b4_int_type_for([b4_rline])[ yyrline[] =
a8289c62 469{
c5e3e510 470 ]b4_rline[
a8289c62
RA
471};
472#endif
473
141f5793 474#if YYDEBUG || YYERROR_VERBOSE || YYTOKEN_TABLE
9e0876fb 475/* YYTNAME[SYMBOL-NUM] -- String name of the symbol SYMBOL-NUM.
9d9b8b70 476 First, the terminals, then, starting at YYNTOKENS, nonterminals. */
c5e3e510 477static const char *const yytname[] =
a8289c62 478{
c5e3e510 479 ]b4_tname[
a8289c62
RA
480};
481#endif
482
c0ad8bf3 483# ifdef YYPRINT
c5e3e510 484/* YYTOKNUM[YYLEX-NUM] -- Internal token number corresponding to
769b430f 485 token YYLEX-NUM. */
c5e3e510 486static const ]b4_int_type_for([b4_toknum])[ yytoknum[] =
a8289c62 487{
c5e3e510 488 ]b4_toknum[
a8289c62 489};
c0ad8bf3 490# endif
a8289c62 491
c5e3e510
AD
492/* YYR1[YYN] -- Symbol number of symbol that rule YYN derives. */
493static const ]b4_int_type_for([b4_r1])[ yyr1[] =
a8289c62 494{
c5e3e510 495 ]b4_r1[
a8289c62
RA
496};
497
c5e3e510
AD
498/* YYR2[YYN] -- Number of symbols composing right hand side of rule YYN. */
499static const ]b4_int_type_for([b4_r2])[ yyr2[] =
a8289c62 500{
c5e3e510 501 ]b4_r2[
a8289c62
RA
502};
503
c5e3e510 504/* YYDEFACT[STATE-NAME] -- Default rule to reduce with in state
5504898e
AD
505 STATE-NUM when YYTABLE doesn't specify something else to do. Zero
506 means the default is an error. */
c5e3e510 507static const ]b4_int_type_for([b4_defact])[ yydefact[] =
a8289c62 508{
c5e3e510 509 ]b4_defact[
a8289c62
RA
510};
511
9d9b8b70 512/* YYDEFGOTO[NTERM-NUM]. */
c5e3e510 513static const ]b4_int_type_for([b4_defgoto])[ yydefgoto[] =
a8289c62 514{
c5e3e510 515 ]b4_defgoto[
a8289c62
RA
516};
517
c5e3e510 518/* YYPACT[STATE-NUM] -- Index in YYTABLE of the portion describing
7742ddeb 519 STATE-NUM. */
c5e3e510
AD
520#define YYPACT_NINF ]b4_pact_ninf[
521static const ]b4_int_type_for([b4_pact])[ yypact[] =
a8289c62 522{
c5e3e510 523 ]b4_pact[
a8289c62
RA
524};
525
c5e3e510
AD
526/* YYPGOTO[NTERM-NUM]. */
527static const ]b4_int_type_for([b4_pgoto])[ yypgoto[] =
a8289c62 528{
c5e3e510 529 ]b4_pgoto[
a8289c62
RA
530};
531
c5e3e510 532/* YYTABLE[YYPACT[STATE-NUM]]. What to do in state STATE-NUM. If
7742ddeb 533 positive, shift that token. If negative, reduce the rule which
f50adbbd 534 number is the opposite. If zero, do what YYDEFACT says.
6e649e65 535 If YYTABLE_NINF, syntax error. */
c5e3e510
AD
536#define YYTABLE_NINF ]b4_table_ninf[
537static const ]b4_int_type_for([b4_table])[ yytable[] =
a8289c62 538{
c5e3e510 539 ]b4_table[
a8289c62
RA
540};
541
c5e3e510 542static const ]b4_int_type_for([b4_check])[ yycheck[] =
a8289c62 543{
c5e3e510 544 ]b4_check[
a8289c62
RA
545};
546
c5e3e510 547/* YYSTOS[STATE-NUM] -- The (internal number of the) accessing
5504898e 548 symbol of state STATE-NUM. */
c5e3e510 549static const ]b4_int_type_for([b4_stos])[ yystos[] =
5504898e 550{
c5e3e510 551 ]b4_stos[
5504898e 552};
7093d0f5 553
10fa2066 554#define yyerrok (yyerrstatus = 0)
a20713a4
PE
555#define yyclearin (yychar = YYEMPTY)
556#define YYEMPTY (-2)
10fa2066 557#define YYEOF 0
a8289c62 558
70ddf897 559#define YYACCEPT goto yyacceptlab
a8289c62 560#define YYABORT goto yyabortlab
a6b89bb2 561#define YYERROR goto yyerrorlab
8a3eb3c8 562
a8289c62 563
71da9eea
AD
564/* Like YYERROR except do call yyerror. This remains here temporarily
565 to ease the transition to the new meaning of YYERROR, for GCC.
10fa2066 566 Once GCC version 2 has supplanted version 1, this can go. */
a8289c62 567
10fa2066 568#define YYFAIL goto yyerrlab
a8289c62 569
10fa2066 570#define YYRECOVERING() (!!yyerrstatus)
a8289c62 571
69b4e0c5 572#define YYBACKUP(Token, Value) \
10fa2066 573do \
a20713a4 574 if (yychar == YYEMPTY && yylen == 1) \
71da9eea 575 { \
17da6427 576 yychar = (Token); \
7742ddeb 577 yylval = (Value); \
b0400cc6 578 yytoken = YYTRANSLATE (yychar); \
a85284cf 579 YYPOPSTACK (1); \
10fa2066
RS
580 goto yybackup; \
581 } \
582 else \
04098407 583 { \
30757c8c 584 yyerror (]b4_yyerror_args[YY_("syntax error: cannot back up")); \
71da9eea
AD
585 YYERROR; \
586 } \
12ce2df6 587while (YYID (0))
10fa2066 588
3fc16193 589
10fa2066
RS
590#define YYTERROR 1
591#define YYERRCODE 256
592
3fc16193 593
b4a20338
AD
594/* YYLLOC_DEFAULT -- Set CURRENT to span from RHS[1] to RHS[N].
595 If N is 0, then set CURRENT to the empty location which ends
596 the previous symbol: RHS[0] (always defined). */
3abcd459 597
24e0cbd0 598#define YYRHSLOC(Rhs, K) ((Rhs)[K])
3abcd459 599#ifndef YYLLOC_DEFAULT
24e0cbd0
PE
600# define YYLLOC_DEFAULT(Current, Rhs, N) \
601 do \
d6cff4dc 602 if (YYID (N)) \
24e0cbd0 603 { \
9bec482e
PE
604 (Current).first_line = YYRHSLOC (Rhs, 1).first_line; \
605 (Current).first_column = YYRHSLOC (Rhs, 1).first_column; \
606 (Current).last_line = YYRHSLOC (Rhs, N).last_line; \
607 (Current).last_column = YYRHSLOC (Rhs, N).last_column; \
24e0cbd0
PE
608 } \
609 else \
610 { \
611 (Current).first_line = (Current).last_line = \
9bec482e 612 YYRHSLOC (Rhs, 0).last_line; \
24e0cbd0 613 (Current).first_column = (Current).last_column = \
9bec482e 614 YYRHSLOC (Rhs, 0).last_column; \
24e0cbd0 615 } \
12ce2df6 616 while (YYID (0))
b8458aa5
AD
617#endif
618
3fc16193
AD
619
620/* YY_LOCATION_PRINT -- Print the location on the stream.
621 This macro was not mandated originally: define only if we know
622 we won't break user code: when these are the locations we know. */
623
3fc16193 624#ifndef YY_LOCATION_PRINT
b8458aa5
AD
625# if YYLTYPE_IS_TRIVIAL
626# define YY_LOCATION_PRINT(File, Loc) \
627 fprintf (File, "%d.%d-%d.%d", \
02650b7f
PE
628 (Loc).first_line, (Loc).first_column, \
629 (Loc).last_line, (Loc).last_column)
0dcca5c2
AD
630# else
631# define YY_LOCATION_PRINT(File, Loc) ((void) 0)
b8458aa5 632# endif
3abcd459
AD
633#endif
634
3fc16193 635
3abcd459 636/* YYLEX -- calling `yylex' with the right arguments. */
553e2b22 637
ae7453f2 638#ifdef YYLEX_PARAM
9c1e26bd 639# define YYLEX yylex (]b4_pure_if([&yylval[]b4_location_if([, &yylloc]), ])[YYLEX_PARAM)
74310291 640#else
9c1e26bd 641# define YYLEX ]b4_c_function_call([yylex], [int], b4_lex_param)[
ae7453f2 642#endif
553e2b22 643
5a35a6cb 644/* Enable debugging if requested. */
0d533154 645#if YYDEBUG
b7575ffe 646
2f4f028d 647# ifndef YYFPRINTF
45119af1
PE
648# include <stdio.h> /* INFRINGES ON USER NAME SPACE */
649# define YYFPRINTF fprintf
b7575ffe
PE
650# endif
651
5a35a6cb
AD
652# define YYDPRINTF(Args) \
653do { \
17da6427 654 if (yydebug) \
b7575ffe 655 YYFPRINTF Args; \
12ce2df6 656} while (YYID (0))
c5e3e510 657
4b367315
AD
658# define YY_SYMBOL_PRINT(Title, Type, Value, Location) \
659do { \
660 if (yydebug) \
661 { \
662 YYFPRINTF (stderr, "%s ", Title); \
a0af42fc 663 yy_symbol_print (stderr, \
02650b7f 664 Type, Value]b4_location_if([, Location])[]b4_user_args[); \
4b367315
AD
665 YYFPRINTF (stderr, "\n"); \
666 } \
12ce2df6 667} while (YYID (0))
9c1e26bd 668
a0af42fc 669]b4_yy_symbol_print_generate([b4_c_function_def])[
d1ff7a7c 670
b0937b22
AD
671/*------------------------------------------------------------------.
672| yy_stack_print -- Print the state stack from its BOTTOM up to its |
5348bfbe 673| TOP (included). |
b0937b22
AD
674`------------------------------------------------------------------*/
675
676]b4_c_function_def([yy_stack_print], [static void],
d42cf844
PE
677 [[yytype_int16 *bottom], [bottom]],
678 [[yytype_int16 *top], [top]])[
b0937b22 679{
2f4f028d 680 YYFPRINTF (stderr, "Stack now");
9d9b8b70 681 for (; bottom <= top; ++bottom)
b0937b22 682 YYFPRINTF (stderr, " %d", *bottom);
2f4f028d 683 YYFPRINTF (stderr, "\n");
b0937b22
AD
684}
685
686# define YY_STACK_PRINT(Bottom, Top) \
687do { \
688 if (yydebug) \
689 yy_stack_print ((Bottom), (Top)); \
12ce2df6 690} while (YYID (0))
b0937b22
AD
691
692
693/*------------------------------------------------.
694| Report that the YYRULE is going to be reduced. |
695`------------------------------------------------*/
696
697]b4_c_function_def([yy_reduce_print], [static void],
02650b7f 698 [[YYSTYPE *yyvsp], [yyvsp]],
d9963c85
PE
699 b4_location_if([[[YYLTYPE *yylsp], [yylsp]],])
700 [[int yyrule], [yyrule]]m4_ifset([b4_parse_param], [,])
02650b7f 701 b4_parse_param)[
b0937b22 702{
d1ff7a7c 703 int yynrhs = yyr2[yyrule];
b0937b22 704 int yyi;
30757c8c 705 unsigned long int yylno = yyrline[yyrule];
d1ff7a7c 706 YYFPRINTF (stderr, "Reducing stack by rule %d (line %lu):\n",
02650b7f 707 yyrule - 1, yylno);
d1ff7a7c
AD
708 /* The symbols being reduced. */
709 for (yyi = 0; yyi < yynrhs; yyi++)
710 {
711 fprintf (stderr, " $%d = ", yyi + 1);
a0af42fc 712 yy_symbol_print (stderr, yyrhs[yyprhs[yyrule] + yyi],
02650b7f
PE
713 &]b4_rhs_value(yynrhs, yyi + 1)[
714 ]b4_location_if([, &]b4_rhs_location(yynrhs, yyi + 1))[]dnl
715 b4_user_args[);
d1ff7a7c
AD
716 fprintf (stderr, "\n");
717 }
b0937b22
AD
718}
719
d9963c85
PE
720# define YY_REDUCE_PRINT(Rule) \
721do { \
722 if (yydebug) \
723 yy_reduce_print (yyvsp, ]b4_location_if([yylsp, ])[Rule]b4_user_args[); \
12ce2df6 724} while (YYID (0))
b0937b22 725
cf44a9ae
PE
726/* Nonzero means print parse trace. It is left uninitialized so that
727 multiple parsers can coexist. */
17da6427 728int yydebug;
5a35a6cb
AD
729#else /* !YYDEBUG */
730# define YYDPRINTF(Args)
284acc8b 731# define YY_SYMBOL_PRINT(Title, Type, Value, Location)
b0937b22 732# define YY_STACK_PRINT(Bottom, Top)
d9963c85 733# define YY_REDUCE_PRINT(Rule)
5a35a6cb
AD
734#endif /* !YYDEBUG */
735
b0937b22 736
5a35a6cb 737/* YYINITDEPTH -- initial size of the parser's stacks. */
10fa2066 738#ifndef YYINITDEPTH
9c1e26bd 739# define YYINITDEPTH ]b4_stack_depth_init[
10fa2066
RS
740#endif
741
5a35a6cb 742/* YYMAXDEPTH -- maximum size the stacks can grow to (effective only
600f9b0c
PE
743 if the built-in stack extension method is used).
744
745 Do not make this value too large; the results are undefined if
506ffb1f 746 YYSTACK_ALLOC_MAXIMUM < YYSTACK_BYTES (YYMAXDEPTH)
600f9b0c
PE
747 evaluated with infinite-precision integer arithmetic. */
748
10fa2066 749#ifndef YYMAXDEPTH
9c1e26bd 750# define YYMAXDEPTH ]b4_stack_depth_max[
10fa2066 751#endif
a8289c62 752
10fa2066 753\f
a8289c62 754
7093d0f5
AD
755#if YYERROR_VERBOSE
756
757# ifndef yystrlen
02650b7f 758# if defined __GLIBC__ && defined _STRING_H
7093d0f5
AD
759# define yystrlen strlen
760# else
761/* Return the length of YYSTR. */
1b9c21fb
PE
762]b4_c_function_def([yystrlen], [static YYSIZE_T],
763 [[const char *yystr], [yystr]])[
7093d0f5 764{
12ce2df6
PE
765 YYSIZE_T yylen;
766 for (yylen = 0; yystr[yylen]; yylen++)
7093d0f5 767 continue;
12ce2df6 768 return yylen;
7093d0f5
AD
769}
770# endif
771# endif
772
773# ifndef yystpcpy
02650b7f 774# if defined __GLIBC__ && defined _STRING_H && defined _GNU_SOURCE
7093d0f5
AD
775# define yystpcpy stpcpy
776# else
777/* Copy YYSRC to YYDEST, returning the address of the terminating '\0' in
778 YYDEST. */
1b9c21fb
PE
779]b4_c_function_def([yystpcpy], [static char *],
780 [[char *yydest], [yydest]], [[const char *yysrc], [yysrc]])[
7093d0f5 781{
cb530ce9
PE
782 char *yyd = yydest;
783 const char *yys = yysrc;
7093d0f5
AD
784
785 while ((*yyd++ = *yys++) != '\0')
786 continue;
787
788 return yyd - 1;
789}
790# endif
791# endif
792
9e0876fb
PE
793# ifndef yytnamerr
794/* Copy to YYRES the contents of YYSTR after stripping away unnecessary
795 quotes and backslashes, so that it's suitable for yyerror. The
796 heuristic is that double-quoting is unnecessary unless the string
797 contains an apostrophe, a comma, or backslash (other than
798 backslash-backslash). YYSTR is taken from yytname. If YYRES is
799 null, do not copy; instead, return the length of what the result
800 would have been. */
801static YYSIZE_T
802yytnamerr (char *yyres, const char *yystr)
803{
804 if (*yystr == '"')
805 {
806 size_t yyn = 0;
807 char const *yyp = yystr;
808
809 for (;;)
810 switch (*++yyp)
811 {
812 case '\'':
813 case ',':
814 goto do_not_strip_quotes;
815
816 case '\\':
817 if (*++yyp != '\\')
818 goto do_not_strip_quotes;
819 /* Fall through. */
820 default:
821 if (yyres)
822 yyres[yyn] = *yyp;
823 yyn++;
824 break;
825
826 case '"':
827 if (yyres)
828 yyres[yyn] = '\0';
829 return yyn;
830 }
831 do_not_strip_quotes: ;
832 }
833
834 if (! yyres)
835 return yystrlen (yystr);
836
837 return yystpcpy (yyres, yystr) - yyres;
838}
839# endif
840
b4c1f9d2
PE
841/* Copy into YYRESULT an error message about the unexpected token
842 YYCHAR while in state YYSTATE. Return the number of bytes copied,
843 including the terminating null byte. If YYRESULT is null, do not
844 copy anything; just return the number of bytes that would be
845 copied. As a special case, return 0 if an ordinary "syntax error"
846 message will do. Return YYSIZE_MAXIMUM if overflow occurs during
847 size calculation. */
848static YYSIZE_T
849yysyntax_error (char *yyresult, int yystate, int yychar)
850{
851 int yyn = yypact[yystate];
7093d0f5 852
b4c1f9d2
PE
853 if (! (YYPACT_NINF < yyn && yyn < YYLAST))
854 return 0;
855 else
856 {
857 int yytype = YYTRANSLATE (yychar);
858 YYSIZE_T yysize0 = yytnamerr (0, yytname[yytype]);
859 YYSIZE_T yysize = yysize0;
860 YYSIZE_T yysize1;
861 int yysize_overflow = 0;
862 enum { YYERROR_VERBOSE_ARGS_MAXIMUM = 5 };
863 char const *yyarg[YYERROR_VERBOSE_ARGS_MAXIMUM];
864 int yyx;
865
866# if 0
867 /* This is so xgettext sees the translatable formats that are
02650b7f 868 constructed on the fly. */
b4c1f9d2
PE
869 YY_("syntax error, unexpected %s");
870 YY_("syntax error, unexpected %s, expecting %s");
871 YY_("syntax error, unexpected %s, expecting %s or %s");
872 YY_("syntax error, unexpected %s, expecting %s or %s or %s");
873 YY_("syntax error, unexpected %s, expecting %s or %s or %s or %s");
874# endif
875 char *yyfmt;
876 char const *yyf;
877 static char const yyunexpected[] = "syntax error, unexpected %s";
878 static char const yyexpecting[] = ", expecting %s";
879 static char const yyor[] = " or %s";
880 char yyformat[sizeof yyunexpected
02650b7f
PE
881 + sizeof yyexpecting - 1
882 + ((YYERROR_VERBOSE_ARGS_MAXIMUM - 2)
883 * (sizeof yyor - 1))];
b4c1f9d2
PE
884 char const *yyprefix = yyexpecting;
885
886 /* Start YYX at -YYN if negative to avoid negative indexes in
02650b7f 887 YYCHECK. */
b4c1f9d2
PE
888 int yyxbegin = yyn < 0 ? -yyn : 0;
889
890 /* Stay within bounds of both yycheck and yytname. */
891 int yychecklim = YYLAST - yyn;
892 int yyxend = yychecklim < YYNTOKENS ? yychecklim : YYNTOKENS;
893 int yycount = 1;
894
895 yyarg[0] = yytname[yytype];
896 yyfmt = yystpcpy (yyformat, yyunexpected);
897
898 for (yyx = yyxbegin; yyx < yyxend; ++yyx)
02650b7f
PE
899 if (yycheck[yyx + yyn] == yyx && yyx != YYTERROR)
900 {
901 if (yycount == YYERROR_VERBOSE_ARGS_MAXIMUM)
902 {
903 yycount = 1;
904 yysize = yysize0;
905 yyformat[sizeof yyunexpected - 1] = '\0';
906 break;
907 }
908 yyarg[yycount++] = yytname[yyx];
909 yysize1 = yysize + yytnamerr (0, yytname[yyx]);
910 yysize_overflow |= (yysize1 < yysize);
911 yysize = yysize1;
912 yyfmt = yystpcpy (yyfmt, yyprefix);
913 yyprefix = yyor;
914 }
b4c1f9d2
PE
915
916 yyf = YY_(yyformat);
917 yysize1 = yysize + yystrlen (yyf);
12ce2df6 918 yysize_overflow |= (yysize1 < yysize);
b4c1f9d2
PE
919 yysize = yysize1;
920
921 if (yysize_overflow)
922 return YYSIZE_MAXIMUM;
923
924 if (yyresult)
925 {
02650b7f
PE
926 /* Avoid sprintf, as that infringes on the user's name space.
927 Don't have undefined behavior even if the translation
928 produced a string with the wrong number of "%s"s. */
929 char *yyp = yyresult;
930 int yyi = 0;
931 while ((*yyp = *yyf) != '\0')
932 {
933 if (*yyp == '%' && yyf[1] == 's' && yyi < yycount)
934 {
935 yyp += yytnamerr (yyp, yyarg[yyi++]);
936 yyf += 2;
937 }
938 else
939 {
940 yyp++;
941 yyf++;
942 }
943 }
944 }
b4c1f9d2
PE
945 return yysize;
946 }
947}
948#endif /* YYERROR_VERBOSE */
10fa2066 949\f
a8289c62 950
d1ff7a7c 951]b4_yydestruct_generate([b4_c_function_def])[
4a2a22f4
AD
952\f
953
0245f82d 954/* Prevent warnings from -Wmissing-prototypes. */
4a2a22f4
AD
955
956#ifdef YYPARSE_PARAM
1b9c21fb
PE
957]b4_c_function_decl([yyparse], [int],
958 [[void *YYPARSE_PARAM], [YYPARSE_PARAM]])[
0245f82d 959#else /* ! YYPARSE_PARAM */
d1ff7a7c 960]b4_c_function_decl([yyparse], [int], b4_parse_param)[
c5e3e510 961#endif /* ! YYPARSE_PARAM */
1b181651 962
0245f82d 963
d1ff7a7c 964]m4_divert_push([KILL])# ======================== M4 code.
74310291
AD
965# b4_declare_parser_variables
966# ---------------------------
967# Declare the variables that are global, or local to YYPARSE if
0245f82d 968# pure-parser.
74310291 969m4_define([b4_declare_parser_variables],
8dd162d3 970[/* The look-ahead symbol. */
74310291
AD
971int yychar;
972
8dd162d3 973/* The semantic value of the look-ahead symbol. */
74310291
AD
974YYSTYPE yylval;
975
6e649e65 976/* Number of syntax errors so far. */
74310291 977int yynerrs;b4_location_if([
8dd162d3 978/* Location data for the look-ahead symbol. */
58612f1d 979YYLTYPE yylloc;])
74310291
AD
980])
981m4_divert_pop([KILL])dnl# ====================== End of M4 code.
58612f1d 982
74310291 983b4_pure_if([],
02650b7f 984 [b4_declare_parser_variables])
a35f64ea 985
0245f82d
AD
986
987/*----------.
988| yyparse. |
989`----------*/
990
991#ifdef YYPARSE_PARAM
1b9c21fb 992b4_c_function_def([yyparse], [int], [[void *YYPARSE_PARAM], [YYPARSE_PARAM]])
0245f82d
AD
993#else /* ! YYPARSE_PARAM */
994b4_c_function_def([yyparse], [int], b4_parse_param)
995#endif
be2a1a68 996{[
74310291 997 ]b4_pure_if([b4_declare_parser_variables])[
cb530ce9
PE
998 int yystate;
999 int yyn;
600f9b0c 1000 int yyresult;
b07b484a
AD
1001 /* Number of tokens to shift before error messages enabled. */
1002 int yyerrstatus;
8dd162d3 1003 /* Look-ahead token as an internal (translated) token number. */
b0400cc6 1004 int yytoken = 0;
b4c1f9d2
PE
1005#if YYERROR_VERBOSE
1006 /* Buffer for error messages, and its allocated size. */
1007 char yymsgbuf[128];
1008 char *yymsg = yymsgbuf;
1009 YYSIZE_T yymsg_alloc = sizeof yymsgbuf;
1010#endif
10fa2066 1011
bb10be54
AD
1012 /* Three stacks and their tools:
1013 `yyss': related to states,
e9e4c321 1014 `yyvs': related to semantic values,
bb10be54
AD
1015 `yyls': related to locations.
1016
1017 Refer to the stacks thru separate pointers, to allow yyoverflow
1018 to reallocate them elsewhere. */
1019
e8cb70b9 1020 /* The state stack. */
d42cf844
PE
1021 yytype_int16 yyssa[YYINITDEPTH];
1022 yytype_int16 *yyss = yyssa;
1023 yytype_int16 *yyssp;
bb10be54 1024
b07b484a
AD
1025 /* The semantic value stack. */
1026 YYSTYPE yyvsa[YYINITDEPTH];
b07b484a 1027 YYSTYPE *yyvs = yyvsa;
cb530ce9 1028 YYSTYPE *yyvsp;
10fa2066 1029
58612f1d
AD
1030]b4_location_if(
1031[[ /* The location stack. */
b07b484a 1032 YYLTYPE yylsa[YYINITDEPTH];
10fa2066 1033 YYLTYPE *yyls = yylsa;
d42f69cd 1034 YYLTYPE *yylsp;
9d9b8b70 1035 /* The locations where the error started and ended. */
3fc16193 1036 YYLTYPE yyerror_range[2];]])[
10fa2066 1037
a85284cf 1038#define YYPOPSTACK(N) (yyvsp -= (N), yyssp -= (N)]b4_location_if([, yylsp -= (N)])[)
10fa2066 1039
7093d0f5 1040 YYSIZE_T yystacksize = YYINITDEPTH;
10fa2066 1041
6666f98f
AD
1042 /* The variables used to return semantic value and location from the
1043 action routines. */
bb10be54 1044 YYSTYPE yyval;
58612f1d 1045]b4_location_if([ YYLTYPE yyloc;])[
10fa2066 1046
a85284cf 1047 /* The number of symbols on the RHS of the reduced rule.
9d9b8b70 1048 Keep to zero when no symbol should be popped. */
a85284cf 1049 int yylen = 0;
10fa2066 1050
2f4f028d 1051 YYDPRINTF ((stderr, "Starting parse\n"));
10fa2066
RS
1052
1053 yystate = 0;
1054 yyerrstatus = 0;
17da6427 1055 yynerrs = 0;
a20713a4 1056 yychar = YYEMPTY; /* Cause a token to be read. */
10fa2066
RS
1057
1058 /* Initialize stack pointers.
1059 Waste one element of value and location stack
1060 so that they stay on the same level as the state stack.
1061 The wasted elements are never initialized. */
1062
cbd89906 1063 yyssp = yyss;
10fa2066 1064 yyvsp = yyvs;
b8458aa5
AD
1065]b4_location_if([[ yylsp = yyls;
1066#if YYLTYPE_IS_TRIVIAL
1067 /* Initialize the default location before parsing starts. */
451364ed
AD
1068 yylloc.first_line = yylloc.last_line = 1;
1069 yylloc.first_column = yylloc.last_column = 0;
b8458aa5
AD
1070#endif
1071]])
1072m4_ifdef([b4_initial_action], [
407d4a75
PE
1073m4_pushdef([b4_at_dollar], [m4_define([b4_at_dollar_used])yylloc])dnl
1074m4_pushdef([b4_dollar_dollar], [m4_define([b4_dollar_dollar_used])yylval])dnl
9d9b8b70 1075 /* User initialization code. */
baf073c6 1076b4_initial_action
cd3684cf
AD
1077m4_popdef([b4_dollar_dollar])dnl
1078m4_popdef([b4_at_dollar])dnl
1079/* Line __line__ of yacc.c. */
407d4a75
PE
1080b4_syncline([@oline@], [@ofile@])
1081])dnl
1082m4_ifdef([b4_dollar_dollar_used],[[ yyvsp[0] = yylval;
1083]])dnl
1084m4_ifdef([b4_at_dollar_used], [[ yylsp[0] = yylloc;
1085]])dnl
1086[ goto yysetstate;
10fa2066 1087
71da9eea
AD
1088/*------------------------------------------------------------.
1089| yynewstate -- Push a new state, which is found in yystate. |
1090`------------------------------------------------------------*/
342b8b6e 1091 yynewstate:
71da9eea 1092 /* In all cases, when you get here, the value and location stacks
9d9b8b70 1093 have just been pushed. So pushing a state here evens the stacks. */
cbd89906
PE
1094 yyssp++;
1095
342b8b6e 1096 yysetstate:
cbd89906 1097 *yyssp = yystate;
10fa2066 1098
39912f52 1099 if (yyss + yystacksize - 1 <= yyssp)
10fa2066 1100 {
10fa2066 1101 /* Get the current used size of the three stacks, in elements. */
7093d0f5 1102 YYSIZE_T yysize = yyssp - yyss + 1;
10fa2066
RS
1103
1104#ifdef yyoverflow
3d76b07d 1105 {
9d9b8b70 1106 /* Give user a chance to reallocate the stack. Use copies of
3d76b07d
AD
1107 these so that the &'s don't force the real ones into
1108 memory. */
1109 YYSTYPE *yyvs1 = yyvs;
d42cf844 1110 yytype_int16 *yyss1 = yyss;
58612f1d 1111]b4_location_if([ YYLTYPE *yyls1 = yyls;])[
3d76b07d
AD
1112
1113 /* Each stack pointer address is followed by the size of the
58612f1d
AD
1114 data in use in that stack, in bytes. This used to be a
1115 conditional around just the two extra args, but that might
1116 be undefined if yyoverflow is a macro. */
1a059451 1117 yyoverflow (YY_("memory exhausted"),
7093d0f5
AD
1118 &yyss1, yysize * sizeof (*yyssp),
1119 &yyvs1, yysize * sizeof (*yyvsp),
58612f1d 1120]b4_location_if([ &yyls1, yysize * sizeof (*yylsp),])[
3d76b07d 1121 &yystacksize);
58612f1d 1122]b4_location_if([ yyls = yyls1;])[
3d76b07d
AD
1123 yyss = yyss1;
1124 yyvs = yyvs1;
1125 }
10fa2066 1126#else /* no yyoverflow */
cf44a9ae 1127# ifndef YYSTACK_RELOCATE
1a059451 1128 goto yyexhaustedlab;
cf44a9ae 1129# else
10fa2066 1130 /* Extend the stack our own way. */
39912f52 1131 if (YYMAXDEPTH <= yystacksize)
1a059451 1132 goto yyexhaustedlab;
10fa2066 1133 yystacksize *= 2;
39912f52 1134 if (YYMAXDEPTH < yystacksize)
10fa2066 1135 yystacksize = YYMAXDEPTH;
e9e4c321 1136
600f9b0c 1137 {
d42cf844 1138 yytype_int16 *yyss1 = yyss;
2729e106
PE
1139 union yyalloc *yyptr =
1140 (union yyalloc *) YYSTACK_ALLOC (YYSTACK_BYTES (yystacksize));
600f9b0c 1141 if (! yyptr)
1a059451 1142 goto yyexhaustedlab;
5b041382
PE
1143 YYSTACK_RELOCATE (yyss);
1144 YYSTACK_RELOCATE (yyvs);
58612f1d 1145]b4_location_if([ YYSTACK_RELOCATE (yyls);])[
cf44a9ae 1146# undef YYSTACK_RELOCATE
600f9b0c
PE
1147 if (yyss1 != yyssa)
1148 YYSTACK_FREE (yyss1);
1149 }
cf44a9ae 1150# endif
10fa2066
RS
1151#endif /* no yyoverflow */
1152
7093d0f5
AD
1153 yyssp = yyss + yysize - 1;
1154 yyvsp = yyvs + yysize - 1;
58612f1d 1155]b4_location_if([ yylsp = yyls + yysize - 1;])[
10fa2066 1156
30757c8c 1157 YYDPRINTF ((stderr, "Stack size increased to %lu\n",
600f9b0c 1158 (unsigned long int) yystacksize));
10fa2066 1159
39912f52 1160 if (yyss + yystacksize - 1 <= yyssp)
10fa2066
RS
1161 YYABORT;
1162 }
1163
30757c8c 1164 YYDPRINTF ((stderr, "Entering state %d\n", yystate));
10fa2066
RS
1165
1166 goto yybackup;
71da9eea 1167
71da9eea
AD
1168/*-----------.
1169| yybackup. |
1170`-----------*/
1171yybackup:
10fa2066 1172
a85284cf
AD
1173 /* Do appropriate processing given the current state. Read a
1174 look-ahead token if we need one and don't already have one. */
10fa2066 1175
8dd162d3 1176 /* First try to decide what to do without reference to look-ahead token. */
10fa2066 1177 yyn = yypact[yystate];
12b0043a 1178 if (yyn == YYPACT_NINF)
10fa2066
RS
1179 goto yydefault;
1180
8dd162d3 1181 /* Not known => get a look-ahead token if don't already have one. */
10fa2066 1182
8dd162d3 1183 /* YYCHAR is either YYEMPTY or YYEOF or a valid look-ahead symbol. */
a20713a4 1184 if (yychar == YYEMPTY)
10fa2066 1185 {
2f4f028d 1186 YYDPRINTF ((stderr, "Reading a token: "));
17da6427 1187 yychar = YYLEX;
10fa2066
RS
1188 }
1189
a20713a4 1190 if (yychar <= YYEOF)
10fa2066 1191 {
a20713a4 1192 yychar = yytoken = YYEOF;
2f4f028d 1193 YYDPRINTF ((stderr, "Now at end of input.\n"));
10fa2066
RS
1194 }
1195 else
1196 {
a20713a4 1197 yytoken = YYTRANSLATE (yychar);
30757c8c 1198 YY_SYMBOL_PRINT ("Next token is", yytoken, &yylval, &yylloc);
10fa2066
RS
1199 }
1200
b0400cc6 1201 /* If the proper action on seeing token YYTOKEN is to reduce or to
e5cfd9d8 1202 detect an error, take that action. */
b0400cc6
AD
1203 yyn += yytoken;
1204 if (yyn < 0 || YYLAST < yyn || yycheck[yyn] != yytoken)
e5cfd9d8
PE
1205 goto yydefault;
1206 yyn = yytable[yyn];
1207 if (yyn <= 0)
10fa2066 1208 {
e5cfd9d8
PE
1209 if (yyn == 0 || yyn == YYTABLE_NINF)
1210 goto yyerrlab;
10fa2066
RS
1211 yyn = -yyn;
1212 goto yyreduce;
1213 }
10fa2066
RS
1214
1215 if (yyn == YYFINAL)
1216 YYACCEPT;
1217
a85284cf
AD
1218 /* Count tokens shifted since error; after three, turn off error
1219 status. */
1220 if (yyerrstatus)
1221 yyerrstatus--;
1222
8dd162d3 1223 /* Shift the look-ahead token. */
30757c8c 1224 YY_SYMBOL_PRINT ("Shifting", yytoken, &yylval, &yylloc);
10fa2066 1225
a85284cf 1226 /* Discard the shifted token unless it is eof. */
a20713a4
PE
1227 if (yychar != YYEOF)
1228 yychar = YYEMPTY;
10fa2066 1229
a85284cf 1230 yystate = yyn;
17da6427 1231 *++yyvsp = yylval;
58612f1d 1232]b4_location_if([ *++yylsp = yylloc;])[
10fa2066
RS
1233 goto yynewstate;
1234
10fa2066 1235
71da9eea
AD
1236/*-----------------------------------------------------------.
1237| yydefault -- do the default action for the current state. |
1238`-----------------------------------------------------------*/
1239yydefault:
10fa2066
RS
1240 yyn = yydefact[yystate];
1241 if (yyn == 0)
1242 goto yyerrlab;
71da9eea 1243 goto yyreduce;
10fa2066 1244
71da9eea
AD
1245
1246/*-----------------------------.
1247| yyreduce -- Do a reduction. |
1248`-----------------------------*/
10fa2066 1249yyreduce:
71da9eea 1250 /* yyn is the number of a rule to reduce with. */
10fa2066 1251 yylen = yyr2[yyn];
da9abf43
AD
1252
1253 /* If YYLEN is nonzero, implement the default value of the action:
573c1d9f 1254 `$$ = $1'.
da9abf43 1255
accea6db
PE
1256 Otherwise, the following line sets YYVAL to garbage.
1257 This behavior is undocumented and Bison
da9abf43
AD
1258 users should not rely upon it. Assigning to YYVAL
1259 unconditionally makes the parser a bit smaller, and it avoids a
1260 GCC warning that YYVAL may be used uninitialized. */
1261 yyval = yyvsp[1-yylen];
3abcd459 1262
58612f1d 1263]b4_location_if(
9d9b8b70 1264[[ /* Default location. */
401aace6 1265 YYLLOC_DEFAULT (yyloc, (yylsp - yylen), yylen);]])[
d9963c85 1266 YY_REDUCE_PRINT (yyn);
a8289c62 1267 switch (yyn)
d1ff7a7c 1268 {
a85284cf
AD
1269 ]b4_actions
1270/* Line __line__ of yacc.c. */
1271b4_syncline([@oline@], [@ofile@])[
95f22ad2 1272 default: break;
a8289c62 1273 }
d1ff7a7c 1274 YY_SYMBOL_PRINT ("-> $$ =", yyr1[yyn], &yyval, &yyloc);
897668ee 1275
a85284cf
AD
1276 YYPOPSTACK (yylen);
1277 yylen = 0;
b0937b22 1278 YY_STACK_PRINT (yyss, yyssp);
10fa2066
RS
1279
1280 *++yyvsp = yyval;
58612f1d 1281]b4_location_if([ *++yylsp = yyloc;])[
10fa2066 1282
41aca2e0
AD
1283 /* Now `shift' the result of the reduction. Determine what state
1284 that goes to, based on the state we popped back to and the rule
1285 number reduced by. */
10fa2066
RS
1286
1287 yyn = yyr1[yyn];
1288
7742ddeb 1289 yystate = yypgoto[yyn - YYNTOKENS] + *yyssp;
12b0043a 1290 if (0 <= yystate && yystate <= YYLAST && yycheck[yystate] == *yyssp)
10fa2066
RS
1291 yystate = yytable[yystate];
1292 else
7742ddeb 1293 yystate = yydefgoto[yyn - YYNTOKENS];
10fa2066
RS
1294
1295 goto yynewstate;
1296
10fa2066 1297
71da9eea
AD
1298/*------------------------------------.
1299| yyerrlab -- here on detecting error |
1300`------------------------------------*/
1301yyerrlab:
1302 /* If not already recovering from an error, report this error. */
1303 if (!yyerrstatus)
10fa2066 1304 {
17da6427 1305 ++yynerrs;
b4c1f9d2
PE
1306#if ! YYERROR_VERBOSE
1307 yyerror (]b4_yyerror_args[YY_("syntax error"));
1308#else
1309 {
1310 YYSIZE_T yysize = yysyntax_error (0, yystate, yychar);
1311 if (yymsg_alloc < yysize && yymsg_alloc < YYSTACK_ALLOC_MAXIMUM)
1312 {
1313 YYSIZE_T yyalloc = 2 * yysize;
1314 if (! (yysize <= yyalloc && yyalloc <= YYSTACK_ALLOC_MAXIMUM))
1315 yyalloc = YYSTACK_ALLOC_MAXIMUM;
1316 if (yymsg != yymsgbuf)
1317 YYSTACK_FREE (yymsg);
1318 yymsg = (char *) YYSTACK_ALLOC (yyalloc);
1319 if (yymsg)
1320 yymsg_alloc = yyalloc;
1321 else
3aa2f55d 1322 {
b4c1f9d2
PE
1323 yymsg = yymsgbuf;
1324 yymsg_alloc = sizeof yymsgbuf;
3aa2f55d 1325 }
b4c1f9d2 1326 }
df5aed8c 1327
b4c1f9d2
PE
1328 if (0 < yysize && yysize <= yymsg_alloc)
1329 {
1330 (void) yysyntax_error (yymsg, yystate, yychar);
1331 yyerror (]b4_yyerror_args[yymsg);
1332 }
1333 else
1334 {
1335 yyerror (]b4_yyerror_args[YY_("syntax error"));
1336 if (yysize != 0)
1a059451 1337 goto yyexhaustedlab;
b4c1f9d2
PE
1338 }
1339 }
1340#endif
10fa2066 1341 }
71da9eea 1342
3fc16193 1343]b4_location_if([[ yyerror_range[0] = yylloc;]])[
d42f69cd 1344
10fa2066
RS
1345 if (yyerrstatus == 3)
1346 {
8dd162d3 1347 /* If just tried and failed to reuse look-ahead token after an
71da9eea 1348 error, discard it. */
10fa2066 1349
a6b89bb2 1350 if (yychar <= YYEOF)
02650b7f 1351 {
258b75ca 1352 /* Return failure if at end of input. */
a6b89bb2 1353 if (yychar == YYEOF)
80ce3401 1354 YYABORT;
02650b7f 1355 }
a6b89bb2
PE
1356 else
1357 {
4b367315 1358 yydestruct ("Error: discarding",
02650b7f 1359 yytoken, &yylval]b4_location_if([, &yylloc])[]b4_user_args[);
a6b89bb2 1360 yychar = YYEMPTY;
a6b89bb2 1361 }
10fa2066
RS
1362 }
1363
8dd162d3 1364 /* Else will try to reuse look-ahead token after shifting the error
71da9eea 1365 token. */
8a3eb3c8 1366 goto yyerrlab1;
300a7966 1367
10fa2066 1368
a6b89bb2
PE
1369/*---------------------------------------------------.
1370| yyerrorlab -- error raised explicitly by YYERROR. |
1371`---------------------------------------------------*/
1372yyerrorlab:
1373
c7a65b99
PE
1374 /* Pacify compilers like GCC when the user code never invokes
1375 YYERROR and the label yyerrorlab therefore never appears in user
1376 code. */
2a4647a3 1377 if (/*CONSTCOND*/ 0)
a6b89bb2 1378 goto yyerrorlab;
a6b89bb2 1379
3fc16193 1380]b4_location_if([[ yyerror_range[0] = yylsp[1-yylen];
a85284cf 1381]])[ /* Do not reclaim the symbols of the rule which action triggered
9d9b8b70 1382 this YYERROR. */
a85284cf
AD
1383 YYPOPSTACK (yylen);
1384 yylen = 0;
1385 YY_STACK_PRINT (yyss, yyssp);
a6b89bb2 1386 yystate = *yyssp;
3fc16193 1387 goto yyerrlab1;
a6b89bb2
PE
1388
1389
1390/*-------------------------------------------------------------.
1391| yyerrlab1 -- common code for both syntax error and YYERROR. |
1392`-------------------------------------------------------------*/
300a7966 1393yyerrlab1:
cf44a9ae 1394 yyerrstatus = 3; /* Each real token shifted decrements this. */
10fa2066 1395
660bc8dd
PE
1396 for (;;)
1397 {
1398 yyn = yypact[yystate];
12b0043a 1399 if (yyn != YYPACT_NINF)
660bc8dd
PE
1400 {
1401 yyn += YYTERROR;
1402 if (0 <= yyn && yyn <= YYLAST && yycheck[yyn] == YYTERROR)
1403 {
1404 yyn = yytable[yyn];
1405 if (0 < yyn)
1406 break;
1407 }
1408 }
10fa2066 1409
660bc8dd
PE
1410 /* Pop the current state because it cannot handle the error token. */
1411 if (yyssp == yyss)
1412 YYABORT;
5504898e 1413
3fc16193 1414]b4_location_if([[ yyerror_range[0] = *yylsp;]])[
4b367315 1415 yydestruct ("Error: popping",
02650b7f 1416 yystos[yystate], yyvsp]b4_location_if([, yylsp])[]b4_user_args[);
a85284cf 1417 YYPOPSTACK (1);
a6b89bb2 1418 yystate = *yyssp;
b0937b22 1419 YY_STACK_PRINT (yyss, yyssp);
10fa2066 1420 }
10fa2066
RS
1421
1422 if (yyn == YYFINAL)
1423 YYACCEPT;
1424
17da6427 1425 *++yyvsp = yylval;
3fc16193
AD
1426]b4_location_if([[
1427 yyerror_range[1] = yylloc;
1428 /* Using YYLLOC is tempting, but would change the location of
9d9b8b70 1429 the look-ahead. YYLOC is available though. */
401aace6 1430 YYLLOC_DEFAULT (yyloc, (yyerror_range - 1), 2);
3fc16193 1431 *++yylsp = yyloc;]])[
10fa2066 1432
9d9b8b70 1433 /* Shift the error token. */
30757c8c 1434 YY_SYMBOL_PRINT ("Shifting", yystos[yyn], yyvsp, yylsp);
1576d44d 1435
10fa2066
RS
1436 yystate = yyn;
1437 goto yynewstate;
70ddf897 1438
71da9eea
AD
1439
1440/*-------------------------------------.
1441| yyacceptlab -- YYACCEPT comes here. |
1442`-------------------------------------*/
1443yyacceptlab:
600f9b0c
PE
1444 yyresult = 0;
1445 goto yyreturn;
71da9eea
AD
1446
1447/*-----------------------------------.
1448| yyabortlab -- YYABORT comes here. |
1449`-----------------------------------*/
1450yyabortlab:
600f9b0c
PE
1451 yyresult = 1;
1452 goto yyreturn;
1453
0bfb02ff 1454#ifndef yyoverflow
1a059451
PE
1455/*-------------------------------------------------.
1456| yyexhaustedlab -- memory exhaustion comes here. |
1457`-------------------------------------------------*/
1458yyexhaustedlab:
1459 yyerror (]b4_yyerror_args[YY_("memory exhausted"));
600f9b0c
PE
1460 yyresult = 2;
1461 /* Fall through. */
0bfb02ff 1462#endif
600f9b0c
PE
1463
1464yyreturn:
cea1469d 1465 if (yychar != YYEOF && yychar != YYEMPTY)
dd5f2af2 1466 yydestruct ("Cleanup: discarding lookahead",
4b367315 1467 yytoken, &yylval]b4_location_if([, &yylloc])[]b4_user_args[);
a85284cf 1468 /* Do not reclaim the symbols of the rule which action triggered
9d9b8b70 1469 this YYABORT or YYACCEPT. */
a85284cf
AD
1470 YYPOPSTACK (yylen);
1471 YY_STACK_PRINT (yyss, yyssp);
258b75ca
PE
1472 while (yyssp != yyss)
1473 {
dd5f2af2 1474 yydestruct ("Cleanup: popping",
4b367315 1475 yystos[*yyssp], yyvsp]b4_location_if([, yylsp])[]b4_user_args[);
a85284cf 1476 YYPOPSTACK (1);
258b75ca 1477 }
600f9b0c
PE
1478#ifndef yyoverflow
1479 if (yyss != yyssa)
1480 YYSTACK_FREE (yyss);
b4c1f9d2
PE
1481#endif
1482#if YYERROR_VERBOSE
1483 if (yymsg != yymsgbuf)
1484 YYSTACK_FREE (yymsg);
70ddf897 1485#endif
600f9b0c 1486 return yyresult;
be2a1a68
AD
1487]}
1488
24c0aad7 1489
be2a1a68
AD
1490b4_epilogue
1491m4_if(b4_defines_flag, 0, [],
947427ae 1492[@output @output_header_name@
c76e14da 1493b4_copyright([Skeleton parser for Yacc-like parsing with Bison],
e2a21b6f 1494 [1984, 1989, 1990, 2000, 2001, 2002, 2003, 2004, 2005, 2006])
0252b55c
PE
1495
1496/* As a special exception, when this file is copied by Bison into a
1497 Bison output file, you may use that output file without restriction.
1498 This special exception was added by the Free Software Foundation
1499 in version 1.24 of Bison. */
c76e14da 1500
cf147260 1501b4_token_enums_defines(b4_tokens)
be2a1a68 1502
02650b7f 1503#if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED
e9955c83 1504m4_ifdef([b4_stype],
02650b7f 1505[typedef union[]m4_bregexp(b4_stype, [^{], [ YYSTYPE])
1221b78a 1506b4_stype
996b1c7e 1507/* Line __line__ of yacc.c. */
1221b78a
PE
1508b4_syncline([@oline@], [@ofile@])
1509 YYSTYPE;],
050c471b
PE
1510[typedef int YYSTYPE;])
1511# define yystype YYSTYPE /* obsolescent; will be withdrawn */
1512# define YYSTYPE_IS_DECLARED 1
947427ae 1513# define YYSTYPE_IS_TRIVIAL 1
be2a1a68
AD
1514#endif
1515
74310291 1516b4_pure_if([],
be2a1a68
AD
1517[extern YYSTYPE b4_prefix[]lval;])
1518
58612f1d 1519b4_location_if(
02650b7f 1520[#if ! defined YYLTYPE && ! defined YYLTYPE_IS_DECLARED
050c471b 1521typedef struct YYLTYPE
be2a1a68
AD
1522{
1523 int first_line;
1524 int first_column;
1525 int last_line;
1526 int last_column;
050c471b
PE
1527} YYLTYPE;
1528# define yyltype YYLTYPE /* obsolescent; will be withdrawn */
1529# define YYLTYPE_IS_DECLARED 1
1530# define YYLTYPE_IS_TRIVIAL 1
be2a1a68 1531#endif
ff48177d 1532
be2a1a68
AD
1533m4_if(b4_pure, [0],
1534[extern YYLTYPE b4_prefix[]lloc;])
1535])
be2a1a68 1536])