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     FINALLY = 315,                 /* FINALLY  */
 122     LOOPEX = 316,                  /* LOOPEX  */
 123     DOTDOT = 317,                  /* DOTDOT  */
 124     YADAYADA = 318,                /* YADAYADA  */
 125     FUNC0 = 319,                   /* FUNC0  */
 126     FUNC1 = 320,                   /* FUNC1  */
 127     FUNC = 321,                    /* FUNC  */
 128     UNIOP = 322,                   /* UNIOP  */
 129     LSTOP = 323,                   /* LSTOP  */
 130     MULOP = 324,                   /* MULOP  */
 131     ADDOP = 325,                   /* ADDOP  */
 132     DOLSHARP = 326,                /* DOLSHARP  */
 133     DO = 327,                      /* DO  */
 134     HASHBRACK = 328,               /* HASHBRACK  */
 135     NOAMP = 329,                   /* NOAMP  */
 136     LOCAL = 330,                   /* LOCAL  */
 137     MY = 331,                      /* MY  */
 138     REQUIRE = 332,                 /* REQUIRE  */
 139     COLONATTR = 333,               /* COLONATTR  */
 140     FORMLBRACK = 334,              /* FORMLBRACK  */
 141     FORMRBRACK = 335,              /* FORMRBRACK  */
 142     SUBLEXSTART = 336,             /* SUBLEXSTART  */
 143     SUBLEXEND = 337,               /* SUBLEXEND  */
 144     DEFER = 338,                   /* DEFER  */
 145     PREC_LOW = 339,                /* PREC_LOW  */
 146     OROP = 340,                    /* OROP  */
 147     ANDOP = 341,                   /* ANDOP  */
 148     NOTOP = 342,                   /* NOTOP  */
 149     ASSIGNOP = 343,                /* ASSIGNOP  */
 150     PERLY_QUESTION_MARK = 344,     /* PERLY_QUESTION_MARK  */
 151     PERLY_COLON = 345,             /* PERLY_COLON  */
 152     OROR = 346,                    /* OROR  */
 153     DORDOR = 347,                  /* DORDOR  */
 154     ANDAND = 348,                  /* ANDAND  */
 155     BITOROP = 349,                 /* BITOROP  */
 156     BITANDOP = 350,                /* BITANDOP  */
 157     CHEQOP = 351,                  /* CHEQOP  */
 158     NCEQOP = 352,                  /* NCEQOP  */
 159     CHRELOP = 353,                 /* CHRELOP  */
 160     NCRELOP = 354,                 /* NCRELOP  */
 161     SHIFTOP = 355,                 /* SHIFTOP  */
 162     MATCHOP = 356,                 /* MATCHOP  */
 163     PERLY_EXCLAMATION_MARK = 357,  /* PERLY_EXCLAMATION_MARK  */
 164     PERLY_TILDE = 358,             /* PERLY_TILDE  */
 165     UMINUS = 359,                  /* UMINUS  */
 166     REFGEN = 360,                  /* REFGEN  */
 167     POWOP = 361,                   /* POWOP  */
 168     PREINC = 362,                  /* PREINC  */
 169     PREDEC = 363,                  /* PREDEC  */
 170     POSTINC = 364,                 /* POSTINC  */
 171     POSTDEC = 365,                 /* POSTDEC  */
 172     POSTJOIN = 366,                /* POSTJOIN  */
 173     ARROW = 367,                   /* ARROW  */
 174     PERLY_PAREN_CLOSE = 368,       /* PERLY_PAREN_CLOSE  */
 175     PERLY_PAREN_OPEN = 369         /* PERLY_PAREN_OPEN  */
 176   };
 177   typedef enum yytokentype yytoken_kind_t;
 178 #endif
 179
 180 /* Value type.  */
 181 #ifdef PERL_IN_TOKE_C
 182 static bool
 183 S_is_opval_token(int type) {
 184     switch (type) {
 185     case BAREWORD:
 186     case FUNC0OP:
 187     case FUNC0SUB:
 188     case FUNCMETH:
 189     case LABEL:
 190     case LSTOPSUB:
 191     case METHOD:
 192     case PLUGEXPR:
 193     case PLUGSTMT:
 194     case PMFUNC:
 195     case PRIVATEREF:
 196     case QWLIST:
 197     case THING:
 198     case UNIOPSUB:
 199         return 1;
 200     }
 201     return 0;
 202 }
 203 #endif /* PERL_IN_TOKE_C */
 204 #endif /* PERL_CORE */
 205 #if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED
 206 union YYSTYPE
 207 {
 208
 209     I32 ival; /* __DEFAULT__ (marker for regen_perly.pl;
 210                                 must always be 1st union member) */
 211     char *pval;
 212     OP *opval;
 213     GV *gvval;
 214
 215
 216 };
 217 typedef union YYSTYPE YYSTYPE;
 218 # define YYSTYPE_IS_TRIVIAL 1
 219 # define YYSTYPE_IS_DECLARED 1
 220 #endif
 221
 222
 223
 224 int yyparse (void);
 225
 226
 227 /* Generated from:
 228  * 0caf1eb1cc4750131dc71e3a22ead383ed9a123dec61ccd23408ff13441fafde perly.y
 229  * acf1cbfd2545faeaaa58b1cf0cf9d7f98b5be0752eb7a54528ef904a9e2e1ca7 regen_perly.pl
 230  * ex: set ro: */