This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
add "whereis"
[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     ANONSUB = 280,
78     PACKAGE = 281,
79     USE = 282,
80     WHILE = 283,
81     UNTIL = 284,
82     IF = 285,
83     UNLESS = 286,
84     ELSE = 287,
85     ELSIF = 288,
86     CONTINUE = 289,
87     FOR = 290,
88     GIVEN = 291,
89     WHERESO = 292,
90     LOOPEX = 293,
91     DOTDOT = 294,
92     YADAYADA = 295,
93     FUNC0 = 296,
94     FUNC1 = 297,
95     FUNC = 298,
96     UNIOP = 299,
97     LSTOP = 300,
98     RELOP = 301,
99     EQOP = 302,
100     MULOP = 303,
101     ADDOP = 304,
102     DOLSHARP = 305,
103     DO = 306,
104     HASHBRACK = 307,
105     NOAMP = 308,
106     LOCAL = 309,
107     MY = 310,
108     REQUIRE = 311,
109     COLONATTR = 312,
110     FORMLBRACK = 313,
111     FORMRBRACK = 314,
112     PREC_LOW = 315,
113     OROP = 316,
114     DOROP = 317,
115     ANDOP = 318,
116     NOTOP = 319,
117     ASSIGNOP = 320,
118     OROR = 321,
119     DORDOR = 322,
120     ANDAND = 323,
121     BITOROP = 324,
122     BITANDOP = 325,
123     SHIFTOP = 326,
124     MATCHOP = 327,
125     UMINUS = 328,
126     REFGEN = 329,
127     POWOP = 330,
128     PREINC = 331,
129     PREDEC = 332,
130     POSTINC = 333,
131     POSTDEC = 334,
132     POSTJOIN = 335,
133     ARROW = 336
134   };
135 #endif
136
137 /* Value type.  */
138 #ifdef PERL_IN_TOKE_C
139 static bool
140 S_is_opval_token(int type) {
141     switch (type) {
142     case BAREWORD:
143     case FUNC0OP:
144     case FUNC0SUB:
145     case FUNCMETH:
146     case LSTOPSUB:
147     case METHOD:
148     case PLUGEXPR:
149     case PLUGSTMT:
150     case PMFUNC:
151     case PRIVATEREF:
152     case QWLIST:
153     case THING:
154     case UNIOPSUB:
155         return 1;
156     }
157     return 0;
158 }
159 #endif /* PERL_IN_TOKE_C */
160 #endif /* PERL_CORE */
161 #if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED
162 typedef union YYSTYPE YYSTYPE;
163 union YYSTYPE
164 {
165
166     I32 ival; /* __DEFAULT__ (marker for regen_perly.pl;
167                                 must always be 1st union member) */
168     char *pval;
169     OP *opval;
170     GV *gvval;
171
172 };
173 # define YYSTYPE_IS_TRIVIAL 1
174 # define YYSTYPE_IS_DECLARED 1
175 #endif
176
177
178
179 int yyparse (void);
180
181
182 /* Generated from:
183  * 1d0c087affbf85a8f1482eb4d34eefd435666c6d9e1cb4d7f9d1aeb62b37e907 perly.y
184  * b6fae5748f9bef6db4740aa5e122b84ac5181852d42474d0ecad621fa4253306 regen_perly.pl
185  * ex: set ro: */