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