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  30005
   8
   9 #ifdef PERL_CORE
  10 /* A Bison parser, made by GNU Bison 3.5.1.  */
  11
  12 /* Bison interface for Yacc-like parsers in C
  13
  14    Copyright (C) 1984, 1989-1990, 2000-2015, 2018-2020 Free Software Foundation,
  15    Inc.
  16
  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.
  21
  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.
  26
  27    You should have received a copy of the GNU General Public License
  28    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
  29
  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.
  39
  40    This special exception was added by the Free Software Foundation in
  41    version 2.2 of Bison.  */
  42
  43 /* Undocumented macros, especially those whose name start with YY_,
  44    are private implementation details.  Do not rely on them.  */
  45
  46 /* Debug traces.  */
  47 #ifndef YYDEBUG
  48 # define YYDEBUG 0
  49 #endif
  50 #if YYDEBUG
  51 extern int yydebug;
  52 #endif
  53
  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     DOROP = 337,
 139     ANDOP = 338,
 140     NOTOP = 339,
 141     ASSIGNOP = 340,
 142     PERLY_QUESTION_MARK = 341,
 143     PERLY_COLON = 342,
 144     OROR = 343,
 145     DORDOR = 344,
 146     ANDAND = 345,
 147     BITOROP = 346,
 148     BITANDOP = 347,
 149     CHEQOP = 348,
 150     NCEQOP = 349,
 151     CHRELOP = 350,
 152     NCRELOP = 351,
 153     SHIFTOP = 352,
 154     MATCHOP = 353,
 155     PERLY_EXCLAMATION_MARK = 354,
 156     PERLY_TILDE = 355,
 157     UMINUS = 356,
 158     REFGEN = 357,
 159     POWOP = 358,
 160     PREINC = 359,
 161     PREDEC = 360,
 162     POSTINC = 361,
 163     POSTDEC = 362,
 164     POSTJOIN = 363,
 165     ARROW = 364,
 166     PERLY_PAREN_CLOSE = 365,
 167     PERLY_PAREN_OPEN = 366
 168   };
 169 #endif
 170
 171 /* Value type.  */
 172 #ifdef PERL_IN_TOKE_C
 173 static bool
 174 S_is_opval_token(int type) {
 175     switch (type) {
 176     case BAREWORD:
 177     case FUNC0OP:
 178     case FUNC0SUB:
 179     case FUNCMETH:
 180     case LABEL:
 181     case LSTOPSUB:
 182     case METHOD:
 183     case PLUGEXPR:
 184     case PLUGSTMT:
 185     case PMFUNC:
 186     case PRIVATEREF:
 187     case QWLIST:
 188     case THING:
 189     case UNIOPSUB:
 190         return 1;
 191     }
 192     return 0;
 193 }
 194 #endif /* PERL_IN_TOKE_C */
 195 #endif /* PERL_CORE */
 196 #if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED
 197 union YYSTYPE
 198 {
 199
 200     I32 ival; /* __DEFAULT__ (marker for regen_perly.pl;
 201                                 must always be 1st union member) */
 202     char *pval;
 203     OP *opval;
 204     GV *gvval;
 205
 206
 207 };
 208 typedef union YYSTYPE YYSTYPE;
 209 # define YYSTYPE_IS_TRIVIAL 1
 210 # define YYSTYPE_IS_DECLARED 1
 211 #endif
 212
 213
 214
 215 int yyparse (void);
 216
 217
 218 /* Generated from:
 219  * 125e373e186e1cf8e055f2faf0d9fa51818b4e2b7b6bfda0b1688f3da43b8c35 perly.y
 220  * acf1cbfd2545faeaaa58b1cf0cf9d7f98b5be0752eb7a54528ef904a9e2e1ca7 regen_perly.pl
 221  * ex: set ro: */