Commit | Line | Data |
---|---|---|
35988648 | 1 | /* -*- mode: C; buffer-read-only: t -*- |
e8fb9efb | 2 | !!!!!!! DO NOT EDIT THIS FILE !!!!!!! |
3f5e9543 | 3 | This file is built by regen_perly.pl from perly.y. |
e8fb9efb NC |
4 | Any changes made here will be lost! |
5 | */ | |
6 | ||
75ea41ae | 7 | #define PERL_BISON_VERSION 30003 |
f39ff1f3 | 8 | |
d8118cad | 9 | #ifdef PERL_CORE |
75ea41ae | 10 | /* A Bison parser, made by GNU Bison 3.3. */ |
4e4da3ac | 11 | |
a9f5ab8d | 12 | /* Bison interface for Yacc-like parsers in C |
38c8d7b1 | 13 | |
75ea41ae | 14 | Copyright (C) 1984, 1989-1990, 2000-2015, 2018-2019 Free Software Foundation, |
a3815e44 | 15 | Inc. |
38c8d7b1 | 16 | |
a9f5ab8d | 17 | This program is free software: you can redistribute it and/or modify |
0de566d7 | 18 | it under the terms of the GNU General Public License as published by |
a9f5ab8d LM |
19 | the Free Software Foundation, either version 3 of the License, or |
20 | (at your option) any later version. | |
38c8d7b1 | 21 | |
0de566d7 DM |
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. | |
38c8d7b1 | 26 | |
0de566d7 | 27 | You should have received a copy of the GNU General Public License |
a9f5ab8d | 28 | along with this program. If not, see <http://www.gnu.org/licenses/>. */ |
0de566d7 | 29 | |
f05e27e5 DM |
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. | |
38c8d7b1 | 39 | |
f05e27e5 DM |
40 | This special exception was added by the Free Software Foundation in |
41 | version 2.2 of Bison. */ | |
0de566d7 | 42 | |
0065df43 PE |
43 | /* Undocumented macros, especially those whose name start with YY_, |
44 | are private implementation details. Do not rely on them. */ | |
a3815e44 | 45 | |
a9f5ab8d LM |
46 | /* Debug traces. */ |
47 | #ifndef YYDEBUG | |
48 | # define YYDEBUG 0 | |
49 | #endif | |
50 | #if YYDEBUG | |
51 | extern int yydebug; | |
52 | #endif | |
53 | ||
0065df43 | 54 | /* Token type. */ |
0de566d7 DM |
55 | #ifndef YYTOKENTYPE |
56 | # define YYTOKENTYPE | |
a9f5ab8d LM |
57 | enum yytokentype |
58 | { | |
0065df43 PE |
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, | |
68670bd9 PE |
82 | KW_FORMAT = 281, |
83 | KW_PACKAGE = 282, | |
99b497aa PE |
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 | |
a9f5ab8d | 187 | }; |
0de566d7 | 188 | #endif |
38c8d7b1 | 189 | |
a9f5ab8d | 190 | /* Value type. */ |
6c7ae946 FC |
191 | #ifdef PERL_IN_TOKE_C |
192 | static bool | |
193 | S_is_opval_token(int type) { | |
194 | switch (type) { | |
185c2e96 | 195 | case BAREWORD: |
6c7ae946 FC |
196 | case FUNC0OP: |
197 | case FUNC0SUB: | |
01719201 | 198 | case LABEL: |
6c7ae946 | 199 | case LSTOPSUB: |
b179236d PE |
200 | case METHCALL: |
201 | case METHCALL0: | |
6c7ae946 FC |
202 | case PLUGEXPR: |
203 | case PLUGSTMT: | |
204 | case PMFUNC: | |
205 | case PRIVATEREF: | |
206 | case QWLIST: | |
207 | case THING: | |
208 | case UNIOPSUB: | |
5eab7f7a | 209 | return 1; |
6c7ae946 FC |
210 | } |
211 | return 0; | |
212 | } | |
213 | #endif /* PERL_IN_TOKE_C */ | |
0de566d7 | 214 | #endif /* PERL_CORE */ |
f05e27e5 | 215 | #if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED |
75ea41ae | 216 | |
a9f5ab8d | 217 | union YYSTYPE |
f05e27e5 | 218 | { |
a9f5ab8d | 219 | |
d5c6462e | 220 | I32 ival; /* __DEFAULT__ (marker for regen_perly.pl; |
5eab7f7a | 221 | must always be 1st union member) */ |
db91d049 | 222 | void *pval; |
79072805 LW |
223 | OP *opval; |
224 | GV *gvval; | |
a9f5ab8d | 225 | |
35988648 | 226 | }; |
75ea41ae | 227 | |
a3815e44 | 228 | typedef union YYSTYPE YYSTYPE; |
bdc377e5 | 229 | # define YYSTYPE_IS_TRIVIAL 1 |
a9f5ab8d | 230 | # define YYSTYPE_IS_DECLARED 1 |
0de566d7 DM |
231 | #endif |
232 | ||
233 | ||
234 | ||
a9f5ab8d LM |
235 | int yyparse (void); |
236 | ||
e8fb9efb | 237 | |
c24c946d | 238 | /* Generated from: |
03dbf5c2 | 239 | * ae786f28e8bc303471bcc03fc82e93a348d603252cc8c164a96cc0c26af78217 perly.y |
53443c95 | 240 | * acf1cbfd2545faeaaa58b1cf0cf9d7f98b5be0752eb7a54528ef904a9e2e1ca7 regen_perly.pl |
b7eedb08 | 241 | * ex: set ro ft=c: */ |