1/* -*- mode: C; buffer-read-only: t -*-
2   !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!!
3   This file is built by regen_perly.pl from perly.y.
4   Any changes made here will be lost!
5 */
6
7#define PERL_BISON_VERSION  30003
8
9#ifdef PERL_CORE
10/* A Bison parser, made by GNU Bison 3.3.  */
11
12/* Bison interface for Yacc-like parsers in C
13
14   Copyright (C) 1984, 1989-1990, 2000-2015, 2018-2019 Free Software Foundation,
15   Inc.
16
17   This program is free software: you can redistribute it and/or modify
18   it under the terms of the GNU General Public License as published by
19   the Free Software Foundation, either version 3 of the License, or
20   (at your option) any later version.
21
22   This program is distributed in the hope that it will be useful,
23   but WITHOUT ANY WARRANTY; without even the implied warranty of
24   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
25   GNU General Public License for more details.
26
27   You should have received a copy of the GNU General Public License
28   along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
29
30/* As a special exception, you may create a larger work that contains
31   part or all of the Bison parser skeleton and distribute that work
32   under terms of your choice, so long as that work isn't itself a
33   parser generator using the skeleton or a modified version thereof
34   as a parser skeleton.  Alternatively, if you modify or redistribute
35   the parser skeleton itself, you may (at your option) remove this
36   special exception, which will cause the skeleton and the resulting
37   Bison output files to be licensed under the GNU General Public
38   License without this special exception.
39
40   This special exception was added by the Free Software Foundation in
41   version 2.2 of Bison.  */
42
43/* Undocumented macros, especially those whose name start with YY_,
44   are private implementation details.  Do not rely on them.  */
45
46/* Debug traces.  */
47#ifndef YYDEBUG
48# define YYDEBUG 0
49#endif
50#if YYDEBUG
51extern int yydebug;
52#endif
53
54/* Token type.  */
55#ifndef YYTOKENTYPE
56# define YYTOKENTYPE
57  enum yytokentype
58  {
59    GRAMPROG = 258,
60    GRAMEXPR = 259,
61    GRAMBLOCK = 260,
62    GRAMBARESTMT = 261,
63    GRAMFULLSTMT = 262,
64    GRAMSTMTSEQ = 263,
65    GRAMSUBSIGNATURE = 264,
66    PERLY_AMPERSAND = 265,
67    PERLY_BRACE_OPEN = 266,
68    PERLY_BRACE_CLOSE = 267,
69    PERLY_BRACKET_OPEN = 268,
70    PERLY_BRACKET_CLOSE = 269,
71    PERLY_COMMA = 270,
72    PERLY_DOLLAR = 271,
73    PERLY_DOT = 272,
74    PERLY_EQUAL_SIGN = 273,
75    PERLY_MINUS = 274,
76    PERLY_PERCENT_SIGN = 275,
77    PERLY_PLUS = 276,
78    PERLY_SEMICOLON = 277,
79    PERLY_SLASH = 278,
80    PERLY_SNAIL = 279,
81    PERLY_STAR = 280,
82    KW_FORMAT = 281,
83    KW_PACKAGE = 282,
84    KW_CLASS = 283,
85    KW_LOCAL = 284,
86    KW_MY = 285,
87    KW_FIELD = 286,
88    KW_IF = 287,
89    KW_ELSE = 288,
90    KW_ELSIF = 289,
91    KW_UNLESS = 290,
92    KW_FOR = 291,
93    KW_UNTIL = 292,
94    KW_WHILE = 293,
95    KW_CONTINUE = 294,
96    KW_GIVEN = 295,
97    KW_WHEN = 296,
98    KW_DEFAULT = 297,
99    KW_TRY = 298,
100    KW_CATCH = 299,
101    KW_FINALLY = 300,
102    KW_DEFER = 301,
103    KW_REQUIRE = 302,
104    KW_DO = 303,
105    KW_USE_or_NO = 304,
106    KW_SUB_named = 305,
107    KW_SUB_named_sig = 306,
108    KW_SUB_anon = 307,
109    KW_SUB_anon_sig = 308,
110    KW_METHOD_named = 309,
111    KW_METHOD_anon = 310,
112    BAREWORD = 311,
113    METHCALL0 = 312,
114    METHCALL = 313,
115    THING = 314,
116    PMFUNC = 315,
117    PRIVATEREF = 316,
118    QWLIST = 317,
119    FUNC0OP = 318,
120    FUNC0SUB = 319,
121    UNIOPSUB = 320,
122    LSTOPSUB = 321,
123    PLUGEXPR = 322,
124    PLUGSTMT = 323,
125    LABEL = 324,
126    LOOPEX = 325,
127    DOTDOT = 326,
128    YADAYADA = 327,
129    FUNC0 = 328,
130    FUNC1 = 329,
131    FUNC = 330,
132    UNIOP = 331,
133    LSTOP = 332,
134    POWOP = 333,
135    MULOP = 334,
136    ADDOP = 335,
137    DOLSHARP = 336,
138    HASHBRACK = 337,
139    NOAMP = 338,
140    COLONATTR = 339,
141    FORMLBRACK = 340,
142    FORMRBRACK = 341,
143    SUBLEXSTART = 342,
144    SUBLEXEND = 343,
145    PHASER = 344,
146    PREC_LOW = 345,
147    PLUGIN_LOW_OP = 346,
148    OROP = 347,
149    PLUGIN_LOGICAL_OR_LOW_OP = 348,
150    ANDOP = 349,
151    PLUGIN_LOGICAL_AND_LOW_OP = 350,
152    NOTOP = 351,
153    ASSIGNOP = 352,
154    PLUGIN_ASSIGN_OP = 353,
155    PERLY_QUESTION_MARK = 354,
156    PERLY_COLON = 355,
157    OROR = 356,
158    DORDOR = 357,
159    PLUGIN_LOGICAL_OR_OP = 358,
160    ANDAND = 359,
161    PLUGIN_LOGICAL_AND_OP = 360,
162    BITOROP = 361,
163    BITANDOP = 362,
164    CHEQOP = 363,
165    NCEQOP = 364,
166    CHRELOP = 365,
167    NCRELOP = 366,
168    PLUGIN_REL_OP = 367,
169    SHIFTOP = 368,
170    PLUGIN_ADD_OP = 369,
171    PLUGIN_MUL_OP = 370,
172    MATCHOP = 371,
173    PERLY_EXCLAMATION_MARK = 372,
174    PERLY_TILDE = 373,
175    UMINUS = 374,
176    REFGEN = 375,
177    PLUGIN_POW_OP = 376,
178    PREINC = 377,
179    PREDEC = 378,
180    POSTINC = 379,
181    POSTDEC = 380,
182    POSTJOIN = 381,
183    PLUGIN_HIGH_OP = 382,
184    ARROW = 383,
185    PERLY_PAREN_CLOSE = 384,
186    PERLY_PAREN_OPEN = 385
187  };
188#endif
189
190/* Value type.  */
191#ifdef PERL_IN_TOKE_C
192static bool
193S_is_opval_token(int type) {
194    switch (type) {
195    case BAREWORD:
196    case FUNC0OP:
197    case FUNC0SUB:
198    case LABEL:
199    case LSTOPSUB:
200    case METHCALL:
201    case METHCALL0:
202    case PLUGEXPR:
203    case PLUGSTMT:
204    case PMFUNC:
205    case PRIVATEREF:
206    case QWLIST:
207    case THING:
208    case UNIOPSUB:
209	return 1;
210    }
211    return 0;
212}
213#endif /* PERL_IN_TOKE_C */
214#endif /* PERL_CORE */
215#if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED
216
217union YYSTYPE
218{
219
220    I32	ival; /* __DEFAULT__ (marker for regen_perly.pl;
221				must always be 1st union member) */
222    void *pval;
223    OP *opval;
224    GV *gvval;
225
226};
227
228typedef union YYSTYPE YYSTYPE;
229# define YYSTYPE_IS_TRIVIAL 1
230# define YYSTYPE_IS_DECLARED 1
231#endif
232
233
234
235int yyparse (void);
236
237
238/* Generated from:
239 * 0a5fcd15cf0b7afb57ade6ceaf68037a38dd194acd9d60d3e4ad99c15233af75 perly.y
240 * acf1cbfd2545faeaaa58b1cf0cf9d7f98b5be0752eb7a54528ef904a9e2e1ca7 regen_perly.pl
241 * ex: set ro ft=c: */
242