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