| CARVIEW |
Select Language
HTTP/2 302
server: nginx
date: Thu, 31 Jul 2025 01:55:25 GMT
content-type: text/plain; charset=utf-8
content-length: 0
x-archive-redirect-reason: found capture at 20210119155253
location: https://web.archive.org/web/20210119155253/https://perl5.git.perl.org/perl5.git/blob/HEAD:/perly.h
server-timing: captures_list;dur=0.845814, exclusion.robots;dur=0.046565, exclusion.robots.policy;dur=0.029840, esindex;dur=0.012469, cdx.remote;dur=18.263423, LoadShardBlock;dur=174.062722, PetaboxLoader3.datanode;dur=153.987082
x-app-server: wwwb-app202
x-ts: 302
x-tr: 229
server-timing: TR;dur=0,Tw;dur=0,Tc;dur=1
set-cookie: SERVER=wwwb-app202; path=/
x-location: All
x-rl: 0
x-na: 0
x-page-cache: MISS
server-timing: MISS
x-nid: DigitalOcean
referrer-policy: no-referrer-when-downgrade
permissions-policy: interest-cohort=()
HTTP/2 200
server: nginx
date: Thu, 31 Jul 2025 01:55:27 GMT
content-type: application/xhtml+xml; charset=utf-8
x-archive-orig-date: Tue, 19 Jan 2021 15:52:53 GMT
x-archive-orig-server: Apache/2.4.6 (CentOS) OpenSSL/1.0.2k-fips
x-archive-orig-keep-alive: timeout=5, max=100
x-archive-orig-connection: Keep-Alive
x-archive-orig-x-crawler-transfer-encoding: chunked
x-archive-orig-content-length: 37603
x-archive-guessed-content-type: text/html
x-archive-guessed-charset: utf-8
memento-datetime: Tue, 19 Jan 2021 15:52:53 GMT
link: ; rel="original", ; rel="timemap"; type="application/link-format", ; rel="timegate", ; rel="first memento"; datetime="Tue, 19 Jan 2021 15:52:53 GMT", ; rel="memento"; datetime="Tue, 19 Jan 2021 15:52:53 GMT", ; rel="last memento"; datetime="Tue, 19 Jan 2021 15:52:53 GMT"
content-security-policy: default-src 'self' 'unsafe-eval' 'unsafe-inline' data: blob: archive.org web.archive.org web-static.archive.org wayback-api.archive.org athena.archive.org analytics.archive.org pragma.archivelab.org wwwb-events.archive.org
x-archive-src: CC-MAIN-2021-04-1610703519395.23-0012/CC-MAIN-20210119135001-20210119165001-00248.warc.gz
server-timing: captures_list;dur=0.525237, exclusion.robots;dur=0.023373, exclusion.robots.policy;dur=0.014558, esindex;dur=0.011544, cdx.remote;dur=4.676732, LoadShardBlock;dur=1397.821630, PetaboxLoader3.resolve;dur=85.785703, PetaboxLoader3.datanode;dur=98.250928, load_resource;dur=169.986299
x-app-server: wwwb-app202
x-ts: 200
x-tr: 1697
server-timing: TR;dur=0,Tw;dur=0,Tc;dur=1
x-location: All
x-rl: 0
x-na: 0
x-page-cache: MISS
server-timing: MISS
x-nid: DigitalOcean
referrer-policy: no-referrer-when-downgrade
permissions-policy: interest-cohort=()
perl5.git.perl.org Git - perl5.git/blob - 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 */
7 #define PERL_BISON_VERSION 30005
9 #ifdef PERL_CORE
10 /* A Bison parser, made by GNU Bison 3.5.1. */
12 /* Bison interface for Yacc-like parsers in C
14 Copyright (C) 1984, 1989-1990, 2000-2015, 2018-2020 Free Software Foundation,
15 Inc.
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.
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.
27 You should have received a copy of the GNU General Public License
28 along with this program. If not, see <https://www.gnu.org/licenses/>. */
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.
40 This special exception was added by the Free Software Foundation in
41 version 2.2 of Bison. */
43 /* Undocumented macros, especially those whose name start with YY_,
44 are private implementation details. Do not rely on them. */
46 /* Debug traces. */
47 #ifndef YYDEBUG
48 # define YYDEBUG 0
49 #endif
50 #if YYDEBUG
51 extern int yydebug;
52 #endif
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 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,
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
167 };
168 #endif
170 /* Value type. */
171 #ifdef PERL_IN_TOKE_C
172 static bool
173 S_is_opval_token(int type) {
174 switch (type) {
175 case BAREWORD:
176 case FUNC0OP:
177 case FUNC0SUB:
178 case FUNCMETH:
179 case LABEL:
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:
189 return 1;
190 }
191 return 0;
192 }
193 #endif /* PERL_IN_TOKE_C */
194 #endif /* PERL_CORE */
195 #if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED
196 union YYSTYPE
197 {
199 I32 ival; /* __DEFAULT__ (marker for regen_perly.pl;
200 must always be 1st union member) */
201 char *pval;
202 OP *opval;
203 GV *gvval;
206 };
207 typedef union YYSTYPE YYSTYPE;
208 # define YYSTYPE_IS_TRIVIAL 1
209 # define YYSTYPE_IS_DECLARED 1
210 #endif
214 int yyparse (void);
217 /* Generated from:
218 * 9a5909b0af5f61f96907e330008f3cdc9dadcab1417c5bcb188cb3b9f6593c01 perly.y
219 * acf1cbfd2545faeaaa58b1cf0cf9d7f98b5be0752eb7a54528ef904a9e2e1ca7 regen_perly.pl
220 * ex: set ro: */