This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Cleanup remnants of 'KEY_err' removal
[perl5.git] / perly.h
CommitLineData
e8fb9efb
NC
1/* -*- buffer-read-only: t -*-
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
53443c95 7#define PERL_BISON_VERSION 30005
f39ff1f3 8
d8118cad 9#ifdef PERL_CORE
53443c95 10/* A Bison parser, made by GNU Bison 3.5.1. */
4e4da3ac 11
a9f5ab8d 12/* Bison interface for Yacc-like parsers in C
38c8d7b1 13
53443c95 14 Copyright (C) 1984, 1989-1990, 2000-2015, 2018-2020 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
a3815e44
DIM
43/* Undocumented macros, especially those whose name start with YY_,
44 are private implementation details. Do not rely on them. */
45
a9f5ab8d
LM
46/* Debug traces. */
47#ifndef YYDEBUG
48# define YYDEBUG 0
49#endif
50#if YYDEBUG
51extern int yydebug;
52#endif
53
54/* Token type. */
0de566d7
DM
55#ifndef YYTOKENTYPE
56# define YYTOKENTYPE
a9f5ab8d
LM
57 enum yytokentype
58 {
59 GRAMPROG = 258,
60 GRAMEXPR = 259,
61 GRAMBLOCK = 260,
62 GRAMBARESTMT = 261,
63 GRAMFULLSTMT = 262,
64 GRAMSTMTSEQ = 263,
996b0cb8 65 GRAMSUBSIGNATURE = 264,
25a50500
BZ
66 PERLY_AMPERSAND = 265,
67 PERLY_BRACE_OPEN = 266,
68 PERLY_BRACE_CLOSE = 267,
69 PERLY_BRACKET_OPEN = 268,
70 PERLY_BRACKET_CLOSE = 269,
581f9a7a 71 PERLY_COMMA = 270,
bfa838cc
BZ
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 BAREWORD = 281,
83 METHOD = 282,
84 FUNCMETH = 283,
85 THING = 284,
86 PMFUNC = 285,
87 PRIVATEREF = 286,
88 QWLIST = 287,
89 FUNC0OP = 288,
90 FUNC0SUB = 289,
91 UNIOPSUB = 290,
92 LSTOPSUB = 291,
93 PLUGEXPR = 292,
94 PLUGSTMT = 293,
95 LABEL = 294,
96 FORMAT = 295,
97 SUB = 296,
98 SIGSUB = 297,
99 ANONSUB = 298,
100 ANON_SIGSUB = 299,
101 PACKAGE = 300,
102 USE = 301,
103 WHILE = 302,
104 UNTIL = 303,
105 IF = 304,
106 UNLESS = 305,
107 ELSE = 306,
108 ELSIF = 307,
109 CONTINUE = 308,
110 FOR = 309,
111 GIVEN = 310,
112 WHEN = 311,
113 DEFAULT = 312,
114 LOOPEX = 313,
115 DOTDOT = 314,
116 YADAYADA = 315,
117 FUNC0 = 316,
118 FUNC1 = 317,
119 FUNC = 318,
120 UNIOP = 319,
121 LSTOP = 320,
122 MULOP = 321,
123 ADDOP = 322,
124 DOLSHARP = 323,
125 DO = 324,
126 HASHBRACK = 325,
127 NOAMP = 326,
128 LOCAL = 327,
129 MY = 328,
130 REQUIRE = 329,
131 COLONATTR = 330,
132 FORMLBRACK = 331,
133 FORMRBRACK = 332,
134 SUBLEXSTART = 333,
135 SUBLEXEND = 334,
136 PREC_LOW = 335,
137 OROP = 336,
6e9e8105
BZ
138 ANDOP = 337,
139 NOTOP = 338,
140 ASSIGNOP = 339,
141 PERLY_QUESTION_MARK = 340,
142 PERLY_COLON = 341,
143 OROR = 342,
144 DORDOR = 343,
145 ANDAND = 344,
146 BITOROP = 345,
147 BITANDOP = 346,
148 CHEQOP = 347,
149 NCEQOP = 348,
150 CHRELOP = 349,
151 NCRELOP = 350,
152 SHIFTOP = 351,
153 MATCHOP = 352,
154 PERLY_EXCLAMATION_MARK = 353,
155 PERLY_TILDE = 354,
156 UMINUS = 355,
157 REFGEN = 356,
158 POWOP = 357,
159 PREINC = 358,
160 PREDEC = 359,
161 POSTINC = 360,
162 POSTDEC = 361,
163 POSTJOIN = 362,
164 ARROW = 363,
165 PERLY_PAREN_CLOSE = 364,
166 PERLY_PAREN_OPEN = 365
a9f5ab8d 167 };
0de566d7 168#endif
38c8d7b1 169
a9f5ab8d 170/* Value type. */
6c7ae946
FC
171#ifdef PERL_IN_TOKE_C
172static bool
173S_is_opval_token(int type) {
174 switch (type) {
185c2e96 175 case BAREWORD:
6c7ae946
FC
176 case FUNC0OP:
177 case FUNC0SUB:
178 case FUNCMETH:
01719201 179 case LABEL:
6c7ae946
FC
180 case LSTOPSUB:
181 case METHOD:
182 case PLUGEXPR:
183 case PLUGSTMT:
184 case PMFUNC:
185 case PRIVATEREF:
186 case QWLIST:
187 case THING:
188 case UNIOPSUB:
6c7ae946
FC
189 return 1;
190 }
191 return 0;
192}
193#endif /* PERL_IN_TOKE_C */
0de566d7 194#endif /* PERL_CORE */
f05e27e5 195#if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED
a9f5ab8d 196union YYSTYPE
f05e27e5 197{
a9f5ab8d 198
d5c6462e
DM
199 I32 ival; /* __DEFAULT__ (marker for regen_perly.pl;
200 must always be 1st union member) */
79072805
LW
201 char *pval;
202 OP *opval;
203 GV *gvval;
a9f5ab8d 204
a3815e44 205
53443c95 206};
a3815e44 207typedef union YYSTYPE YYSTYPE;
bdc377e5 208# define YYSTYPE_IS_TRIVIAL 1
a9f5ab8d 209# define YYSTYPE_IS_DECLARED 1
0de566d7
DM
210#endif
211
212
213
a9f5ab8d
LM
214int yyparse (void);
215
e8fb9efb 216
c24c946d 217/* Generated from:
6e9e8105 218 * 8501134166a6baa08c401894156c496a30dbabab6b166ea837cd490b6db2e410 perly.y
53443c95 219 * acf1cbfd2545faeaaa58b1cf0cf9d7f98b5be0752eb7a54528ef904a9e2e1ca7 regen_perly.pl
c24c946d 220 * ex: set ro: */