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  30006
   8
   9 #ifdef PERL_CORE
  10 /* A Bison parser, made by GNU Bison 3.6.4.  */
  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 /* DO NOT RELY ON FEATURES THAT ARE NOT DOCUMENTED in the manual,
  44    especially those whose name start with YY_ or yy_.  They are
  45    private implementation details that can be changed or removed.  */
  46
  47 /* Debug traces.  */
  48 #ifndef YYDEBUG
  49 # define YYDEBUG 0
  50 #endif
  51 #if YYDEBUG
  52 extern int yydebug;
  53 #endif
  54
  55 /* Token kinds.  */
  56 #ifndef YYTOKENTYPE
  57 # define YYTOKENTYPE
  58   enum yytokentype
  59   {
  60     YYEMPTY = -2,
  61     YYEOF = 0,                     /* "end of file"  */
  62     YYerror = 256,                 /* error  */
  63     YYUNDEF = 257,                 /* "invalid token"  */
  64     GRAMPROG = 258,                /* GRAMPROG  */
  65     GRAMEXPR = 259,                /* GRAMEXPR  */
  66     GRAMBLOCK = 260,               /* GRAMBLOCK  */
  67     GRAMBARESTMT = 261,            /* GRAMBARESTMT  */
  68     GRAMFULLSTMT = 262,            /* GRAMFULLSTMT  */
  69     GRAMSTMTSEQ = 263,             /* GRAMSTMTSEQ  */
  70     GRAMSUBSIGNATURE = 264,        /* GRAMSUBSIGNATURE  */
  71     PERLY_AMPERSAND = 265,         /* PERLY_AMPERSAND  */
  72     PERLY_BRACE_OPEN = 266,        /* PERLY_BRACE_OPEN  */
  73     PERLY_BRACE_CLOSE = 267,       /* PERLY_BRACE_CLOSE  */
  74     PERLY_BRACKET_OPEN = 268,      /* PERLY_BRACKET_OPEN  */
  75     PERLY_BRACKET_CLOSE = 269,     /* PERLY_BRACKET_CLOSE  */
  76     PERLY_COMMA = 270,             /* PERLY_COMMA  */
  77     PERLY_DOLLAR = 271,            /* PERLY_DOLLAR  */
  78     PERLY_DOT = 272,               /* PERLY_DOT  */
  79     PERLY_EQUAL_SIGN = 273,        /* PERLY_EQUAL_SIGN  */
  80     PERLY_MINUS = 274,             /* PERLY_MINUS  */
  81     PERLY_PERCENT_SIGN = 275,      /* PERLY_PERCENT_SIGN  */
  82     PERLY_PLUS = 276,              /* PERLY_PLUS  */
  83     PERLY_SEMICOLON = 277,         /* PERLY_SEMICOLON  */
  84     PERLY_SLASH = 278,             /* PERLY_SLASH  */
  85     PERLY_SNAIL = 279,             /* PERLY_SNAIL  */
  86     PERLY_STAR = 280,              /* PERLY_STAR  */
  87     BAREWORD = 281,                /* BAREWORD  */
  88     METHOD = 282,                  /* METHOD  */
  89     FUNCMETH = 283,                /* FUNCMETH  */
  90     THING = 284,                   /* THING  */
  91     PMFUNC = 285,                  /* PMFUNC  */
  92     PRIVATEREF = 286,              /* PRIVATEREF  */
  93     QWLIST = 287,                  /* QWLIST  */
  94     FUNC0OP = 288,                 /* FUNC0OP  */
  95     FUNC0SUB = 289,                /* FUNC0SUB  */
  96     UNIOPSUB = 290,                /* UNIOPSUB  */
  97     LSTOPSUB = 291,                /* LSTOPSUB  */
  98     PLUGEXPR = 292,                /* PLUGEXPR  */
  99     PLUGSTMT = 293,                /* PLUGSTMT  */
 100     LABEL = 294,                   /* LABEL  */
 101     FORMAT = 295,                  /* FORMAT  */
 102     SUB = 296,                     /* SUB  */
 103     SIGSUB = 297,                  /* SIGSUB  */
 104     ANONSUB = 298,                 /* ANONSUB  */
 105     ANON_SIGSUB = 299,             /* ANON_SIGSUB  */
 106     PACKAGE = 300,                 /* PACKAGE  */
 107     USE = 301,                     /* USE  */
 108     WHILE = 302,                   /* WHILE  */
 109     UNTIL = 303,                   /* UNTIL  */
 110     IF = 304,                      /* IF  */
 111     UNLESS = 305,                  /* UNLESS  */
 112     ELSE = 306,                    /* ELSE  */
 113     ELSIF = 307,                   /* ELSIF  */
 114     CONTINUE = 308,                /* CONTINUE  */
 115     FOR = 309,                     /* FOR  */
 116     GIVEN = 310,                   /* GIVEN  */
 117     WHEN = 311,                    /* WHEN  */
 118     DEFAULT = 312,                 /* DEFAULT  */
 119     TRY = 313,                     /* TRY  */
 120     CATCH = 314,                   /* CATCH  */
 121     LOOPEX = 315,                  /* LOOPEX  */
 122     DOTDOT = 316,                  /* DOTDOT  */
 123     YADAYADA = 317,                /* YADAYADA  */
 124     FUNC0 = 318,                   /* FUNC0  */
 125     FUNC1 = 319,                   /* FUNC1  */
 126     FUNC = 320,                    /* FUNC  */
 127     UNIOP = 321,                   /* UNIOP  */
 128     LSTOP = 322,                   /* LSTOP  */
 129     MULOP = 323,                   /* MULOP  */
 130     ADDOP = 324,                   /* ADDOP  */
 131     DOLSHARP = 325,                /* DOLSHARP  */
 132     DO = 326,                      /* DO  */
 133     HASHBRACK = 327,               /* HASHBRACK  */
 134     NOAMP = 328,                   /* NOAMP  */
 135     LOCAL = 329,                   /* LOCAL  */
 136     MY = 330,                      /* MY  */
 137     REQUIRE = 331,                 /* REQUIRE  */
 138     COLONATTR = 332,               /* COLONATTR  */
 139     FORMLBRACK = 333,              /* FORMLBRACK  */
 140     FORMRBRACK = 334,              /* FORMRBRACK  */
 141     SUBLEXSTART = 335,             /* SUBLEXSTART  */
 142     SUBLEXEND = 336,               /* SUBLEXEND  */
 143     DEFER = 337,                   /* DEFER  */
 144     PREC_LOW = 338,                /* PREC_LOW  */
 145     OROP = 339,                    /* OROP  */
 146     ANDOP = 340,                   /* ANDOP  */
 147     NOTOP = 341,                   /* NOTOP  */
 148     ASSIGNOP = 342,                /* ASSIGNOP  */
 149     PERLY_QUESTION_MARK = 343,     /* PERLY_QUESTION_MARK  */
 150     PERLY_COLON = 344,             /* PERLY_COLON  */
 151     OROR = 345,                    /* OROR  */
 152     DORDOR = 346,                  /* DORDOR  */
 153     ANDAND = 347,                  /* ANDAND  */
 154     BITOROP = 348,                 /* BITOROP  */
 155     BITANDOP = 349,                /* BITANDOP  */
 156     CHEQOP = 350,                  /* CHEQOP  */
 157     NCEQOP = 351,                  /* NCEQOP  */
 158     CHRELOP = 352,                 /* CHRELOP  */
 159     NCRELOP = 353,                 /* NCRELOP  */
 160     SHIFTOP = 354,                 /* SHIFTOP  */
 161     MATCHOP = 355,                 /* MATCHOP  */
 162     PERLY_EXCLAMATION_MARK = 356,  /* PERLY_EXCLAMATION_MARK  */
 163     PERLY_TILDE = 357,             /* PERLY_TILDE  */
 164     UMINUS = 358,                  /* UMINUS  */
 165     REFGEN = 359,                  /* REFGEN  */
 166     POWOP = 360,                   /* POWOP  */
 167     PREINC = 361,                  /* PREINC  */
 168     PREDEC = 362,                  /* PREDEC  */
 169     POSTINC = 363,                 /* POSTINC  */
 170     POSTDEC = 364,                 /* POSTDEC  */
 171     POSTJOIN = 365,                /* POSTJOIN  */
 172     ARROW = 366,                   /* ARROW  */
 173     PERLY_PAREN_CLOSE = 367,       /* PERLY_PAREN_CLOSE  */
 174     PERLY_PAREN_OPEN = 368         /* PERLY_PAREN_OPEN  */
 175   };
 176   typedef enum yytokentype yytoken_kind_t;
 177 #endif
 178
 179 /* Value type.  */
 180 #ifdef PERL_IN_TOKE_C
 181 static bool
 182 S_is_opval_token(int type) {
 183     switch (type) {
 184     case BAREWORD:
 185     case FUNC0OP:
 186     case FUNC0SUB:
 187     case FUNCMETH:
 188     case LABEL:
 189     case LSTOPSUB:
 190     case METHOD:
 191     case PLUGEXPR:
 192     case PLUGSTMT:
 193     case PMFUNC:
 194     case PRIVATEREF:
 195     case QWLIST:
 196     case THING:
 197     case UNIOPSUB:
 198         return 1;
 199     }
 200     return 0;
 201 }
 202 #endif /* PERL_IN_TOKE_C */
 203 #endif /* PERL_CORE */
 204 #if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED
 205 union YYSTYPE
 206 {
 207
 208     I32 ival; /* __DEFAULT__ (marker for regen_perly.pl;
 209                                 must always be 1st union member) */
 210     char *pval;
 211     OP *opval;
 212     GV *gvval;
 213
 214
 215 };
 216 typedef union YYSTYPE YYSTYPE;
 217 # define YYSTYPE_IS_TRIVIAL 1
 218 # define YYSTYPE_IS_DECLARED 1
 219 #endif
 220
 221
 222
 223 int yyparse (void);
 224
 225
 226 /* Generated from:
 227  * 0202d23d96cdf036122334ebe94b43491715e1437181e64039e69455620d95a4 perly.y
 228  * acf1cbfd2545faeaaa58b1cf0cf9d7f98b5be0752eb7a54528ef904a9e2e1ca7 regen_perly.pl
 229  * ex: set ro: */