This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
PATCH: [perl #133871] heap-buffer-overflow in S_reginsert
[perl5.git] / perly.h
1 /* -*- 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  30000
8
9 #ifdef PERL_CORE
10 /* A Bison parser, made by GNU Bison 3.0.2.  */
11
12 /* Bison interface for Yacc-like parsers in C
13
14    Copyright (C) 1984, 1989-1990, 2000-2013 Free Software Foundation, Inc.
15
16    This program is free software: you can redistribute it and/or modify
17    it under the terms of the GNU General Public License as published by
18    the Free Software Foundation, either version 3 of the License, or
19    (at your option) any later version.
20
21    This program is distributed in the hope that it will be useful,
22    but WITHOUT ANY WARRANTY; without even the implied warranty of
23    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
24    GNU General Public License for more details.
25
26    You should have received a copy of the GNU General Public License
27    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
28
29 /* As a special exception, you may create a larger work that contains
30    part or all of the Bison parser skeleton and distribute that work
31    under terms of your choice, so long as that work isn't itself a
32    parser generator using the skeleton or a modified version thereof
33    as a parser skeleton.  Alternatively, if you modify or redistribute
34    the parser skeleton itself, you may (at your option) remove this
35    special exception, which will cause the skeleton and the resulting
36    Bison output files to be licensed under the GNU General Public
37    License without this special exception.
38
39    This special exception was added by the Free Software Foundation in
40    version 2.2 of Bison.  */
41
42 /* Debug traces.  */
43 #ifndef YYDEBUG
44 # define YYDEBUG 0
45 #endif
46 #if YYDEBUG
47 extern int yydebug;
48 #endif
49
50 /* Token type.  */
51 #ifndef YYTOKENTYPE
52 # define YYTOKENTYPE
53   enum yytokentype
54   {
55     GRAMPROG = 258,
56     GRAMEXPR = 259,
57     GRAMBLOCK = 260,
58     GRAMBARESTMT = 261,
59     GRAMFULLSTMT = 262,
60     GRAMSTMTSEQ = 263,
61     BAREWORD = 264,
62     METHOD = 265,
63     FUNCMETH = 266,
64     THING = 267,
65     PMFUNC = 268,
66     PRIVATEREF = 269,
67     QWLIST = 270,
68     FUNC0OP = 271,
69     FUNC0SUB = 272,
70     UNIOPSUB = 273,
71     LSTOPSUB = 274,
72     PLUGEXPR = 275,
73     PLUGSTMT = 276,
74     LABEL = 277,
75     FORMAT = 278,
76     SUB = 279,
77     SIGSUB = 280,
78     ANONSUB = 281,
79     ANON_SIGSUB = 282,
80     PACKAGE = 283,
81     USE = 284,
82     WHILE = 285,
83     UNTIL = 286,
84     IF = 287,
85     UNLESS = 288,
86     ELSE = 289,
87     ELSIF = 290,
88     CONTINUE = 291,
89     FOR = 292,
90     GIVEN = 293,
91     WHEN = 294,
92     DEFAULT = 295,
93     LOOPEX = 296,
94     DOTDOT = 297,
95     YADAYADA = 298,
96     FUNC0 = 299,
97     FUNC1 = 300,
98     FUNC = 301,
99     UNIOP = 302,
100     LSTOP = 303,
101     RELOP = 304,
102     EQOP = 305,
103     MULOP = 306,
104     ADDOP = 307,
105     DOLSHARP = 308,
106     DO = 309,
107     HASHBRACK = 310,
108     NOAMP = 311,
109     LOCAL = 312,
110     MY = 313,
111     REQUIRE = 314,
112     COLONATTR = 315,
113     FORMLBRACK = 316,
114     FORMRBRACK = 317,
115     PREC_LOW = 318,
116     OROP = 319,
117     DOROP = 320,
118     ANDOP = 321,
119     NOTOP = 322,
120     ASSIGNOP = 323,
121     OROR = 324,
122     DORDOR = 325,
123     ANDAND = 326,
124     BITOROP = 327,
125     BITANDOP = 328,
126     SHIFTOP = 329,
127     MATCHOP = 330,
128     UMINUS = 331,
129     REFGEN = 332,
130     POWOP = 333,
131     PREINC = 334,
132     PREDEC = 335,
133     POSTINC = 336,
134     POSTDEC = 337,
135     POSTJOIN = 338,
136     ARROW = 339
137   };
138 #endif
139
140 /* Value type.  */
141 #ifdef PERL_IN_TOKE_C
142 static bool
143 S_is_opval_token(int type) {
144     switch (type) {
145     case BAREWORD:
146     case FUNC0OP:
147     case FUNC0SUB:
148     case FUNCMETH:
149     case LSTOPSUB:
150     case METHOD:
151     case PLUGEXPR:
152     case PLUGSTMT:
153     case PMFUNC:
154     case PRIVATEREF:
155     case QWLIST:
156     case THING:
157     case UNIOPSUB:
158         return 1;
159     }
160     return 0;
161 }
162 #endif /* PERL_IN_TOKE_C */
163 #endif /* PERL_CORE */
164 #if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED
165 typedef union YYSTYPE YYSTYPE;
166 union YYSTYPE
167 {
168
169     I32 ival; /* __DEFAULT__ (marker for regen_perly.pl;
170                                 must always be 1st union member) */
171     char *pval;
172     OP *opval;
173     GV *gvval;
174
175 };
176 # define YYSTYPE_IS_TRIVIAL 1
177 # define YYSTYPE_IS_DECLARED 1
178 #endif
179
180
181
182 int yyparse (void);
183
184
185 /* Generated from:
186  * ac323bb6f3cacf4eb8eda6403a58c41f30954d07a4a6d6f7f00de81577b2c79a perly.y
187  * b6fae5748f9bef6db4740aa5e122b84ac5181852d42474d0ecad621fa4253306 regen_perly.pl
188  * ex: set ro: */