perl5.git.perl.org Git - perl5.git/blame_incremental

... / ...

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