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