X-Git-Url: https://git.m6w6.name/?p=m6w6%2Fext-psi;a=blobdiff_plain;f=src%2Fparser_proc.c;h=fc3884254edd51b03e6626f6a940a227291f105f;hp=07478fa777ef8e593b38a5c854eb5e46d331163c;hb=b029005e56a8913fbb3d17ab497b4a37a00a211c;hpb=e11280a7b6ed67a4d79b14569ca06131ea2338bd diff --git a/src/parser_proc.c b/src/parser_proc.c index 07478fa..fc38842 100644 --- a/src/parser_proc.c +++ b/src/parser_proc.c @@ -1,3586 +1,7674 @@ -/* -** 2000-05-29 -** -** The author disclaims copyright to this source code. In place of -** a legal notice, here is a blessing: -** -** May you do good and not evil. -** May you find forgiveness for yourself and forgive others. -** May you share freely, never taking more than you give. -** -************************************************************************* -** Driver template for the LEMON parser generator. -** -** The "lemon" program processes an LALR(1) input grammar file, then uses -** this template to construct a parser. The "lemon" program inserts text -** at each "%%" line. Also, any "P-a-r-s-e" identifer prefix (without the -** interstitial "-" characters) contained in this template is changed into -** the value of the %name directive from the grammar. Otherwise, the content -** of this template is copied straight through into the generate parser -** source file. -** -** The following is the concatenation of all %include directives from the -** input grammar file: -*/ -#include -/************ Begin %include sections from the grammar ************************/ -#line 1 "src/parser_proc.y" +/* A Bison parser, made by GNU Bison 3.0.4. */ + +/* Skeleton implementation for Bison GLR parsers in C + + Copyright (C) 2002-2015 Free Software Foundation, Inc. + + This program is free software: you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation, either version 3 of the License, or + (at your option) any later version. + + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program. If not, see . */ + +/* As a special exception, you may create a larger work that contains + part or all of the Bison parser skeleton and distribute that work + under terms of your choice, so long as that work isn't itself a + parser generator using the skeleton or a modified version thereof + as a parser skeleton. Alternatively, if you modify or redistribute + the parser skeleton itself, you may (at your option) remove this + special exception, which will cause the skeleton and the resulting + Bison output files to be licensed under the GNU General Public + License without this special exception. + + This special exception was added by the Free Software Foundation in + version 2.2 of Bison. */ + +/* C GLR parser skeleton written by Paul Hilfinger. */ + +/* Identify Bison output. */ +#define YYBISON 1 + +/* Bison version. */ +#define YYBISON_VERSION "3.0.4" + +/* Skeleton name. */ +#define YYSKELETON_NAME "glr.c" + +/* Pure parsers. */ +#define YYPURE 1 + + +/* "%code top" blocks. */ +#line 1 "src/parser_proc_grammar.y" /* glr.c:222 */ #include "php_psi_stdinc.h" +#line 54 "src/parser_proc.c" /* glr.c:222 */ + + +/* Substitute the variable and function names. */ +#define yyparse psi_parser_proc_parse +#define yylex psi_parser_proc_lex +#define yyerror psi_parser_proc_error +#define yydebug psi_parser_proc_debug + + +/* First part of user declarations. */ + +#line 66 "src/parser_proc.c" /* glr.c:240 */ + +# ifndef YY_NULLPTR +# if defined __cplusplus && 201103L <= __cplusplus +# define YY_NULLPTR nullptr +# else +# define YY_NULLPTR 0 +# endif +# endif + +#include "parser_proc.h" + +/* Enabling verbose error messages. */ +#ifdef YYERROR_VERBOSE +# undef YYERROR_VERBOSE +# define YYERROR_VERBOSE 1 +#else +# define YYERROR_VERBOSE 1 +#endif + +/* Default (constant) value used for initialization for null + right-hand sides. Unlike the standard yacc.c template, here we set + the default value of $$ to a zeroed-out value. Since the default + value is undefined, this behavior is technically correct. */ +static YYSTYPE yyval_default; + +/* Copy the second part of user declarations. */ + +#line 94 "src/parser_proc.c" /* glr.c:263 */ +/* Unqualified %code blocks. */ +#line 5 "src/parser_proc_grammar.y" /* glr.c:264 */ + #include #include #include "plist.h" #include "parser.h" -/* rename lemon symbols, works better than DEF(%name) */ -#define ParseAlloc psi_parser_proc_init_ex -#define Parse psi_parser_proc_parse -#define ParseTrace psi_parser_proc_trace -#define ParseFree psi_parser_proc_free_ex +#define YYDEBUG 1 +#define PSI_PARSER_PROC_DEBUG 1 -/* fwd decls */ -void *ParseAlloc(void *(*mallocProc)(size_t)); -void ParseFree(void *p, void (*freeProc)(void*)); +static int psi_parser_proc_lex(YYSTYPE *u, struct psi_parser *P, struct psi_plist *tokens, size_t *index); +static void psi_parser_proc_error(struct psi_parser *P, struct psi_plist *tokens, size_t *index, const char *msg); -/* wrappers */ -void *psi_parser_proc_init(void) +static inline void psi_parser_proc_add_struct(struct psi_parser *P, struct psi_decl_struct *strct) { - return ParseAlloc(malloc); + assert(strct); + if (!P->structs) { + P->structs = psi_plist_init((psi_plist_dtor) psi_decl_struct_free); + } + P->structs = psi_plist_add(P->structs, &strct); } - -void psi_parser_proc_free(void **parser_proc) +static inline void psi_parser_proc_add_union(struct psi_parser *P, struct psi_decl_union *u) +{ + assert(u); + if (!P->unions) { + P->unions = psi_plist_init((psi_plist_dtor) psi_decl_union_free); + } + P->unions = psi_plist_add(P->unions, &u); +} +static inline void psi_parser_proc_add_enum(struct psi_parser *P, struct psi_decl_enum *e) +{ + assert(e); + if (!P->enums) { + P->enums = psi_plist_init((psi_plist_dtor) psi_decl_enum_free); + } + P->enums = psi_plist_add(P->enums, &e); +} +static inline void psi_parser_proc_deanon_typedef(struct psi_decl_arg *def) +{ + switch (def->type->type) { + case PSI_T_STRUCT: + if (!psi_decl_type_is_anon(def->type->name, "struct")) { + return; + } + break; + case PSI_T_UNION: + if (!psi_decl_type_is_anon(def->type->name, "union")) { + return; + } + break; + case PSI_T_ENUM: + if (!psi_decl_type_is_anon(def->type->name, "enum")) { + return; + } + break; + default: + return; + } + free(def->type->name); + def->type->name = strdup(def->var->name); +} +static inline void psi_parser_proc_add_typedef(struct psi_parser *P, struct psi_decl_arg *def) { - if (*parser_proc) { - ParseFree(*parser_proc, free); - *parser_proc = NULL; + assert(def); + if (!P->types) { + P->types = psi_plist_init((psi_plist_dtor) psi_decl_arg_free); + } + psi_parser_proc_deanon_typedef(def); + P->types = psi_plist_add(P->types, &def); +} +static inline void psi_parser_proc_add_const(struct psi_parser *P, struct psi_const *cnst) { + assert(cnst); + if (!P->consts) { + P->consts = psi_plist_init((psi_plist_dtor) psi_const_free); + } + P->consts = psi_plist_add(P->consts, &cnst); + +} +static inline void psi_parser_proc_add_decl(struct psi_parser *P, struct psi_decl *decl) { + assert(decl); + + if (psi_decl_is_blacklisted(decl->func->var->name)) { + psi_decl_free(&decl); + return; + } + + if (!P->decls) { + P->decls = psi_plist_init((psi_plist_dtor) psi_decl_free); + } + P->decls = psi_plist_add(P->decls, &decl); +} +static inline void psi_parser_proc_add_decl_extvars(struct psi_parser *P, struct psi_plist *list) { + assert(list); + if (!P->vars) { + P->vars = psi_plist_init((psi_plist_dtor) psi_decl_extvar_free); + } + P->vars = psi_plist_add_r(P->vars, psi_plist_count(list), psi_plist_eles(list)); + free(list); +} +static inline void psi_parser_proc_add_impl(struct psi_parser *P, struct psi_impl *impl) { + assert(impl); + if (!P->impls) { + P->impls = psi_plist_init((psi_plist_dtor) psi_impl_free); } + P->impls = psi_plist_add(P->impls, &impl); } -#line 62 "src/parser_proc.c" -/**************** End of %include directives **********************************/ -/* These constants specify the various numeric values for terminal symbols -** in a format understandable to "makeheaders". This section is blank unless -** "lemon" is run with the "-m" command-line option. -***************** Begin makeheaders token definitions *************************/ -/**************** End makeheaders token definitions ***************************/ - -/* The next sections is a series of control #defines. -** various aspects of the generated parser. -** YYCODETYPE is the data type used to store the integer codes -** that represent terminal and non-terminal symbols. -** "unsigned char" is used if there are fewer than -** 256 symbols. Larger types otherwise. -** YYNOCODE is a number of type YYCODETYPE that is not used for -** any terminal or nonterminal symbol. -** YYFALLBACK If defined, this indicates that one or more tokens -** (also known as: "terminal symbols") have fall-back -** values which should be used if the original symbol -** would not parse. This permits keywords to sometimes -** be used as identifiers, for example. -** YYACTIONTYPE is the data type used for "action codes" - numbers -** that indicate what to do in response to the next -** token. -** ParseTOKENTYPE is the data type used for minor type for terminal -** symbols. Background: A "minor type" is a semantic -** value associated with a terminal or non-terminal -** symbols. For example, for an "ID" terminal symbol, -** the minor type might be the name of the identifier. -** Each non-terminal can have a different minor type. -** Terminal symbols all have the same minor type, though. -** This macros defines the minor type for terminal -** symbols. -** YYMINORTYPE is the data type used for all minor types. -** This is typically a union of many types, one of -** which is ParseTOKENTYPE. The entry in the union -** for terminal symbols is called "yy0". -** YYSTACKDEPTH is the maximum depth of the parser's stack. If -** zero the stack is dynamically sized using realloc() -** ParseARG_SDECL A static variable declaration for the %extra_argument -** ParseARG_PDECL A parameter declaration for the %extra_argument -** ParseARG_STORE Code to store %extra_argument into yypParser -** ParseARG_FETCH Code to extract %extra_argument from yypParser -** YYERRORSYMBOL is the code number of the error symbol. If not -** defined, then do no error processing. -** YYNSTATE the combined number of states. -** YYNRULE the number of rules in the grammar -** YY_MAX_SHIFT Maximum value for shift actions -** YY_MIN_SHIFTREDUCE Minimum value for shift-reduce actions -** YY_MAX_SHIFTREDUCE Maximum value for shift-reduce actions -** YY_MIN_REDUCE Maximum value for reduce actions -** YY_ERROR_ACTION The yy_action[] code for syntax error -** YY_ACCEPT_ACTION The yy_action[] code for accept -** YY_NO_ACTION The yy_action[] code for no-op -*/ -#ifndef INTERFACE -# define INTERFACE 1 +/* end code */ + +#line 206 "src/parser_proc.c" /* glr.c:264 */ + +#include +#include +#include + +#ifndef YY_ +# if defined YYENABLE_NLS && YYENABLE_NLS +# if ENABLE_NLS +# include /* INFRINGES ON USER NAME SPACE */ +# define YY_(Msgid) dgettext ("bison-runtime", Msgid) +# endif +# endif +# ifndef YY_ +# define YY_(Msgid) Msgid +# endif +#endif + +#ifndef YYFREE +# define YYFREE free +#endif +#ifndef YYMALLOC +# define YYMALLOC malloc +#endif +#ifndef YYREALLOC +# define YYREALLOC realloc +#endif + +#define YYSIZEMAX ((size_t) -1) + +#ifdef __cplusplus + typedef bool yybool; +#else + typedef unsigned char yybool; +#endif +#define yytrue 1 +#define yyfalse 0 + +#ifndef YYSETJMP +# include +# define YYJMP_BUF jmp_buf +# define YYSETJMP(Env) setjmp (Env) +/* Pacify clang. */ +# define YYLONGJMP(Env, Val) (longjmp (Env, Val), YYASSERT (0)) +#endif + +#ifndef YY_ATTRIBUTE +# if (defined __GNUC__ \ + && (2 < __GNUC__ || (__GNUC__ == 2 && 96 <= __GNUC_MINOR__))) \ + || defined __SUNPRO_C && 0x5110 <= __SUNPRO_C +# define YY_ATTRIBUTE(Spec) __attribute__(Spec) +# else +# define YY_ATTRIBUTE(Spec) /* empty */ +# endif +#endif + +#ifndef YY_ATTRIBUTE_PURE +# define YY_ATTRIBUTE_PURE YY_ATTRIBUTE ((__pure__)) +#endif + +#ifndef YY_ATTRIBUTE_UNUSED +# define YY_ATTRIBUTE_UNUSED YY_ATTRIBUTE ((__unused__)) +#endif + +#if !defined _Noreturn \ + && (!defined __STDC_VERSION__ || __STDC_VERSION__ < 201112) +# if defined _MSC_VER && 1200 <= _MSC_VER +# define _Noreturn __declspec (noreturn) +# else +# define _Noreturn YY_ATTRIBUTE ((__noreturn__)) +# endif +#endif + +/* Suppress unused-variable warnings by "using" E. */ +#if ! defined lint || defined __GNUC__ +# define YYUSE(E) ((void) (E)) +#else +# define YYUSE(E) /* empty */ +#endif + +#if defined __GNUC__ && 407 <= __GNUC__ * 100 + __GNUC_MINOR__ +/* Suppress an incorrect diagnostic about yylval being uninitialized. */ +# define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN \ + _Pragma ("GCC diagnostic push") \ + _Pragma ("GCC diagnostic ignored \"-Wuninitialized\"")\ + _Pragma ("GCC diagnostic ignored \"-Wmaybe-uninitialized\"") +# define YY_IGNORE_MAYBE_UNINITIALIZED_END \ + _Pragma ("GCC diagnostic pop") +#else +# define YY_INITIAL_VALUE(Value) Value +#endif +#ifndef YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN +# define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN +# define YY_IGNORE_MAYBE_UNINITIALIZED_END #endif -/************* Begin control #defines *****************************************/ -#define YYCODETYPE unsigned char -#define YYNOCODE 167 -#define YYACTIONTYPE unsigned short int -#define ParseTOKENTYPE struct psi_token * -typedef union { - int yyinit; - ParseTOKENTYPE yy0; - struct psi_const_type* yy7; - struct psi_let_calloc* yy17; - struct psi_decl_union* yy19; - struct psi_impl_def_val* yy21; - struct psi_token** yy38; - struct psi_num_exp* yy39; - struct psi_impl* yy49; - struct psi_set_exp* yy67; - struct psi_decl_enum_item* yy69; - struct psi_decl* yy71; - struct psi_let_func* yy72; - struct psi_free_stmt* yy76; - struct psi_set_func* yy78; - struct psi_layout* yy81; - struct psi_const* yy106; - struct psi_impl_func* yy120; - struct psi_return_stmt* yy130; - struct psi_let_stmt* yy139; - struct psi_impl_type* yy142; - struct psi_let_exp* yy144; - struct psi_decl_type* yy152; - struct psi_number* yy160; - struct psi_let_callback* yy164; - struct psi_impl_var* yy185; - unsigned yy190; - struct psi_free_exp* yy197; - struct psi_decl_var* yy207; - struct psi_set_stmt* yy226; - struct psi_impl_arg* yy238; - struct psi_decl_abi* yy242; - struct psi_decl_arg* yy260; - struct psi_decl_struct* yy271; - bool yy273; - struct psi_decl_enum * yy279; - struct psi_plist * yy287; - struct psi_plist* yy303; - struct psi_layout yy323; -} YYMINORTYPE; -#ifndef YYSTACKDEPTH -#define YYSTACKDEPTH 100 +#ifndef YY_INITIAL_VALUE +# define YY_INITIAL_VALUE(Value) /* Nothing. */ #endif -#define ParseARG_SDECL struct psi_parser *P; -#define ParseARG_PDECL ,struct psi_parser *P -#define ParseARG_FETCH struct psi_parser *P = yypParser->P -#define ParseARG_STORE yypParser->P = P -#define YYFALLBACK 1 -#define YYNSTATE 197 -#define YYNRULE 157 -#define YY_MAX_SHIFT 196 -#define YY_MIN_SHIFTREDUCE 328 -#define YY_MAX_SHIFTREDUCE 484 -#define YY_MIN_REDUCE 485 -#define YY_MAX_REDUCE 641 -#define YY_ERROR_ACTION 642 -#define YY_ACCEPT_ACTION 643 -#define YY_NO_ACTION 644 -/************* End control #defines *******************************************/ - -/* Define the yytestcase() macro to be a no-op if is not already defined -** otherwise. -** -** Applications can choose to define yytestcase() in the %include section -** to a macro that can assist in verifying code coverage. For production -** code the yytestcase() macro should be turned off. But it is useful -** for testing. -*/ -#ifndef yytestcase -# define yytestcase(X) + + +#ifndef YYASSERT +# define YYASSERT(Condition) ((void) ((Condition) || (abort (), 0))) #endif +/* YYFINAL -- State number of the termination state. */ +#define YYFINAL 168 +/* YYLAST -- Last index in YYTABLE. */ +#define YYLAST 3737 -/* Next are the tables used to determine what action to take based on the -** current state and lookahead token. These tables are used to implement -** functions that take a state number and lookahead value and return an -** action integer. -** -** Suppose the action integer is N. Then the action is determined as -** follows -** -** 0 <= N <= YY_MAX_SHIFT Shift N. That is, push the lookahead -** token onto the stack and goto state N. -** -** N between YY_MIN_SHIFTREDUCE Shift to an arbitrary state then -** and YY_MAX_SHIFTREDUCE reduce by rule N-YY_MIN_SHIFTREDUCE. -** -** N between YY_MIN_REDUCE Reduce by rule N-YY_MIN_REDUCE -** and YY_MAX_REDUCE -** -** N == YY_ERROR_ACTION A syntax error has occurred. -** -** N == YY_ACCEPT_ACTION The parser accepts its input. -** -** N == YY_NO_ACTION No such action. Denotes unused -** slots in the yy_action[] table. -** -** The action table is constructed as a single large table named yy_action[]. -** Given state S and lookahead X, the action is computed as either: -** -** (A) N = yy_action[ yy_shift_ofst[S] + X ] -** (B) N = yy_default[S] -** -** The (A) formula is preferred. The B formula is used instead if: -** (1) The yy_shift_ofst[S]+X value is out of range, or -** (2) yy_lookahead[yy_shift_ofst[S]+X] is not equal to X, or -** (3) yy_shift_ofst[S] equal YY_SHIFT_USE_DFLT. -** (Implementation note: YY_SHIFT_USE_DFLT is chosen so that -** YY_SHIFT_USE_DFLT+X will be out of range for all possible lookaheads X. -** Hence only tests (1) and (2) need to be evaluated.) -** -** The formulas above are for computing the action when the lookahead is -** a terminal symbol. If the lookahead is a non-terminal (as occurs after -** a reduce action) then the yy_reduce_ofst[] array is used in place of -** the yy_shift_ofst[] array and YY_REDUCE_USE_DFLT is used in place of -** YY_SHIFT_USE_DFLT. -** -** The following are the tables generated in this section: -** -** yy_action[] A single table containing all actions. -** yy_lookahead[] A table containing the lookahead for each entry in -** yy_action. Used to detect hash collisions. -** yy_shift_ofst[] For each state, the offset into yy_action for -** shifting terminals. -** yy_reduce_ofst[] For each state, the offset into yy_action for -** shifting non-terminals after a reduce. -** yy_default[] Default action for each state. -** -*********** Begin parsing tables **********************************************/ -#define YY_ACTTAB_COUNT (1024) -static const YYACTIONTYPE yy_action[] = { - /* 0 */ 394, 409, 93, 409, 409, 409, 409, 409, 409, 409, - /* 10 */ 409, 409, 409, 93, 436, 430, 478, 21, 424, 430, - /* 20 */ 425, 427, 15, 427, 411, 27, 27, 478, 475, 428, - /* 30 */ 494, 428, 150, 426, 429, 426, 429, 494, 27, 27, - /* 40 */ 148, 148, 148, 148, 148, 148, 148, 148, 148, 148, - /* 50 */ 432, 101, 124, 439, 441, 83, 423, 438, 452, 110, - /* 60 */ 417, 417, 417, 417, 417, 405, 149, 56, 366, 422, - /* 70 */ 107, 122, 28, 376, 90, 89, 88, 147, 348, 48, - /* 80 */ 35, 133, 478, 164, 116, 390, 81, 67, 65, 64, - /* 90 */ 394, 409, 47, 409, 409, 409, 409, 409, 409, 409, - /* 100 */ 409, 409, 409, 39, 49, 11, 10, 60, 93, 437, - /* 110 */ 430, 158, 115, 141, 430, 353, 353, 353, 353, 478, - /* 120 */ 27, 27, 478, 141, 141, 141, 141, 141, 141, 141, - /* 130 */ 375, 193, 136, 27, 27, 148, 148, 148, 148, 148, - /* 140 */ 148, 148, 148, 148, 148, 83, 349, 352, 394, 409, - /* 150 */ 146, 409, 409, 409, 409, 409, 409, 409, 409, 409, - /* 160 */ 409, 149, 349, 351, 179, 181, 180, 28, 134, 122, - /* 170 */ 35, 122, 153, 109, 471, 390, 81, 67, 65, 64, - /* 180 */ 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, - /* 190 */ 29, 29, 29, 29, 29, 29, 29, 29, 394, 419, - /* 200 */ 419, 419, 419, 41, 124, 145, 394, 409, 416, 409, - /* 210 */ 409, 409, 409, 409, 409, 409, 409, 409, 409, 415, - /* 220 */ 382, 114, 90, 89, 88, 410, 43, 414, 34, 106, - /* 230 */ 147, 123, 344, 390, 81, 67, 65, 64, 29, 29, - /* 240 */ 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, - /* 250 */ 29, 374, 108, 29, 29, 419, 419, 419, 419, 419, - /* 260 */ 421, 83, 113, 397, 394, 409, 405, 409, 409, 409, - /* 270 */ 409, 409, 409, 409, 409, 409, 409, 167, 137, 112, - /* 280 */ 90, 89, 88, 390, 81, 67, 35, 147, 36, 128, - /* 290 */ 122, 390, 81, 67, 65, 64, 458, 458, 458, 458, - /* 300 */ 458, 458, 458, 458, 458, 458, 155, 379, 157, 161, - /* 310 */ 365, 169, 459, 160, 161, 410, 43, 122, 122, 76, - /* 320 */ 119, 479, 394, 409, 431, 409, 409, 409, 409, 409, - /* 330 */ 409, 409, 409, 409, 409, 376, 431, 357, 179, 181, - /* 340 */ 180, 402, 432, 100, 35, 440, 442, 80, 140, 390, - /* 350 */ 81, 67, 65, 64, 432, 99, 405, 163, 161, 144, - /* 360 */ 142, 127, 350, 122, 356, 456, 53, 463, 37, 473, - /* 370 */ 2, 418, 395, 147, 122, 122, 122, 66, 8, 451, - /* 380 */ 394, 409, 431, 409, 409, 409, 409, 409, 409, 409, - /* 390 */ 409, 409, 409, 94, 431, 401, 179, 181, 180, 343, - /* 400 */ 432, 96, 35, 122, 13, 461, 140, 390, 81, 67, - /* 410 */ 65, 64, 432, 99, 39, 49, 11, 10, 60, 470, - /* 420 */ 92, 122, 70, 465, 111, 463, 131, 7, 460, 6, - /* 430 */ 450, 147, 413, 122, 479, 83, 23, 154, 394, 409, - /* 440 */ 431, 409, 409, 409, 409, 409, 409, 409, 409, 409, - /* 450 */ 409, 68, 150, 472, 179, 181, 180, 132, 432, 97, - /* 460 */ 35, 378, 24, 360, 38, 390, 81, 67, 65, 64, - /* 470 */ 432, 101, 20, 439, 441, 479, 383, 438, 453, 122, - /* 480 */ 369, 410, 43, 382, 117, 377, 368, 105, 410, 43, - /* 490 */ 367, 122, 361, 74, 189, 379, 394, 409, 42, 409, - /* 500 */ 409, 409, 409, 409, 409, 409, 409, 409, 409, 479, - /* 510 */ 176, 177, 179, 181, 180, 398, 22, 424, 393, 400, - /* 520 */ 427, 431, 405, 390, 81, 67, 65, 64, 428, 405, - /* 530 */ 44, 391, 426, 429, 118, 196, 483, 484, 2, 432, - /* 540 */ 102, 84, 95, 190, 170, 45, 86, 335, 63, 1, - /* 550 */ 120, 82, 333, 342, 334, 121, 332, 331, 69, 68, - /* 560 */ 122, 329, 183, 19, 46, 341, 340, 192, 345, 337, - /* 570 */ 179, 181, 180, 330, 151, 39, 49, 11, 10, 60, - /* 580 */ 373, 390, 81, 67, 65, 64, 93, 372, 430, 61, - /* 590 */ 57, 126, 430, 412, 125, 475, 182, 58, 27, 27, - /* 600 */ 478, 59, 130, 31, 643, 3, 3, 178, 194, 469, - /* 610 */ 16, 27, 27, 141, 468, 79, 431, 4, 384, 32, - /* 620 */ 410, 43, 447, 141, 141, 141, 141, 141, 141, 141, - /* 630 */ 419, 419, 419, 419, 432, 98, 446, 71, 93, 462, - /* 640 */ 430, 12, 40, 448, 430, 28, 143, 475, 14, 182, - /* 650 */ 27, 27, 478, 5, 50, 122, 418, 194, 87, 85, - /* 660 */ 178, 405, 51, 27, 27, 141, 631, 26, 79, 9, - /* 670 */ 17, 385, 364, 410, 43, 141, 141, 141, 141, 141, - /* 680 */ 141, 141, 152, 363, 18, 72, 419, 419, 419, 419, - /* 690 */ 419, 156, 52, 73, 159, 479, 75, 28, 431, 162, - /* 700 */ 54, 522, 355, 354, 129, 78, 62, 168, 139, 389, - /* 710 */ 194, 87, 85, 171, 405, 172, 432, 104, 173, 29, - /* 720 */ 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, - /* 730 */ 29, 29, 29, 29, 29, 29, 29, 122, 174, 408, - /* 740 */ 175, 29, 29, 29, 29, 29, 29, 29, 29, 29, - /* 750 */ 29, 29, 29, 29, 29, 29, 29, 29, 29, 387, - /* 760 */ 386, 407, 406, 358, 371, 494, 184, 339, 185, 187, - /* 770 */ 186, 188, 91, 449, 29, 29, 29, 29, 29, 29, - /* 780 */ 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, - /* 790 */ 29, 29, 191, 93, 25, 430, 637, 30, 55, 430, - /* 800 */ 328, 195, 475, 431, 487, 27, 27, 478, 487, 487, - /* 810 */ 369, 487, 487, 487, 487, 487, 487, 487, 27, 27, - /* 820 */ 141, 432, 103, 487, 487, 487, 487, 487, 433, 182, - /* 830 */ 141, 141, 141, 141, 141, 141, 141, 487, 487, 487, - /* 840 */ 359, 166, 122, 487, 77, 93, 487, 430, 165, 487, - /* 850 */ 487, 430, 28, 410, 33, 487, 487, 27, 27, 478, - /* 860 */ 487, 487, 487, 487, 487, 196, 483, 484, 487, 487, - /* 870 */ 27, 27, 95, 190, 170, 487, 487, 487, 63, 1, - /* 880 */ 487, 487, 487, 487, 487, 487, 487, 487, 69, 68, - /* 890 */ 194, 87, 85, 335, 405, 487, 150, 487, 333, 487, - /* 900 */ 334, 487, 332, 331, 28, 150, 487, 329, 487, 19, - /* 910 */ 487, 487, 487, 487, 432, 101, 487, 439, 441, 330, - /* 920 */ 151, 438, 445, 432, 101, 487, 439, 441, 487, 487, - /* 930 */ 438, 138, 487, 487, 487, 122, 487, 487, 487, 487, - /* 940 */ 487, 487, 487, 431, 122, 487, 431, 487, 487, 487, - /* 950 */ 487, 487, 482, 487, 194, 140, 487, 487, 140, 487, - /* 960 */ 487, 432, 99, 487, 432, 99, 487, 487, 487, 487, - /* 970 */ 487, 487, 135, 487, 463, 467, 487, 463, 487, 431, - /* 980 */ 147, 487, 122, 147, 431, 122, 487, 487, 487, 487, - /* 990 */ 487, 140, 487, 487, 487, 487, 140, 432, 99, 487, - /* 1000 */ 487, 487, 432, 99, 487, 487, 487, 487, 466, 487, - /* 1010 */ 463, 487, 487, 457, 487, 463, 147, 487, 122, 487, - /* 1020 */ 487, 147, 487, 122, +/* YYNTOKENS -- Number of terminals. */ +#define YYNTOKENS 140 +/* YYNNTS -- Number of nonterminals. */ +#define YYNNTS 136 +/* YYNRULES -- Number of rules. */ +#define YYNRULES 629 +/* YYNRULES -- Number of states. */ +#define YYNSTATES 895 +/* YYMAXRHS -- Maximum number of symbols on right-hand side of rule. */ +#define YYMAXRHS 13 +/* YYMAXLEFT -- Maximum number of symbols to the left of a handle + accessed by $0, $-1, etc., in any rule. */ +#define YYMAXLEFT 0 + +/* YYTRANSLATE(X) -- Bison symbol number corresponding to X. */ +#define YYUNDEFTOK 2 +#define YYMAXUTOK 394 + +#define YYTRANSLATE(YYX) \ + ((unsigned int) (YYX) <= YYMAXUTOK ? yytranslate[YYX] : YYUNDEFTOK) + +/* YYTRANSLATE[YYLEX] -- Bison symbol number corresponding to YYLEX. */ +static const unsigned char yytranslate[] = +{ + 0, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 1, 2, 3, 4, + 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, + 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, + 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, + 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, + 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, + 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, + 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, + 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, + 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, + 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, + 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, + 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, + 125, 126, 127, 128, 129, 130, 131, 132, 133, 134, + 135, 136, 137, 138, 139 }; -static const YYCODETYPE yy_lookahead[] = { - /* 0 */ 2, 3, 14, 5, 6, 7, 8, 9, 10, 11, - /* 10 */ 12, 13, 14, 14, 15, 16, 28, 129, 130, 20, - /* 20 */ 130, 133, 23, 133, 120, 26, 27, 28, 23, 141, - /* 30 */ 72, 141, 113, 145, 146, 145, 146, 79, 39, 40, - /* 40 */ 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, - /* 50 */ 131, 132, 125, 134, 135, 57, 126, 138, 139, 140, - /* 60 */ 15, 16, 17, 18, 19, 161, 67, 68, 14, 126, - /* 70 */ 127, 152, 73, 113, 76, 77, 78, 150, 80, 149, - /* 80 */ 82, 14, 28, 151, 152, 87, 88, 89, 90, 91, - /* 90 */ 2, 3, 149, 5, 6, 7, 8, 9, 10, 11, - /* 100 */ 12, 13, 14, 62, 63, 64, 65, 66, 14, 15, - /* 110 */ 16, 151, 152, 41, 20, 1, 2, 3, 4, 28, - /* 120 */ 26, 27, 28, 51, 52, 53, 54, 55, 56, 57, - /* 130 */ 113, 14, 113, 39, 40, 41, 42, 43, 44, 45, - /* 140 */ 46, 47, 48, 49, 50, 57, 99, 100, 2, 3, - /* 150 */ 165, 5, 6, 7, 8, 9, 10, 11, 12, 13, - /* 160 */ 14, 67, 99, 100, 76, 77, 78, 73, 144, 152, - /* 170 */ 82, 152, 84, 147, 148, 87, 88, 89, 90, 91, - /* 180 */ 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, - /* 190 */ 31, 32, 33, 34, 35, 36, 37, 38, 2, 1, - /* 200 */ 2, 3, 4, 57, 125, 125, 2, 3, 149, 5, - /* 210 */ 6, 7, 8, 9, 10, 11, 12, 13, 14, 149, - /* 220 */ 115, 116, 76, 77, 78, 120, 121, 149, 82, 150, - /* 230 */ 150, 97, 98, 87, 88, 89, 90, 91, 22, 23, - /* 240 */ 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, - /* 250 */ 34, 113, 114, 37, 38, 57, 58, 59, 60, 61, - /* 260 */ 124, 57, 125, 5, 2, 3, 161, 5, 6, 7, - /* 270 */ 8, 9, 10, 11, 12, 13, 14, 124, 113, 113, - /* 280 */ 76, 77, 78, 87, 88, 89, 82, 150, 74, 75, - /* 290 */ 152, 87, 88, 89, 90, 91, 41, 42, 43, 44, - /* 300 */ 45, 46, 47, 48, 49, 50, 111, 14, 151, 152, - /* 310 */ 115, 104, 57, 151, 152, 120, 121, 152, 152, 57, - /* 320 */ 152, 28, 2, 3, 113, 5, 6, 7, 8, 9, - /* 330 */ 10, 11, 12, 13, 14, 113, 113, 113, 76, 77, - /* 340 */ 78, 161, 131, 132, 82, 134, 135, 89, 125, 87, - /* 350 */ 88, 89, 90, 91, 131, 132, 161, 151, 152, 136, - /* 360 */ 137, 84, 71, 152, 113, 142, 73, 144, 74, 75, - /* 370 */ 79, 94, 163, 150, 152, 152, 152, 57, 74, 75, - /* 380 */ 2, 3, 113, 5, 6, 7, 8, 9, 10, 11, - /* 390 */ 12, 13, 14, 74, 113, 161, 76, 77, 78, 80, - /* 400 */ 131, 132, 82, 152, 74, 75, 125, 87, 88, 89, - /* 410 */ 90, 91, 131, 132, 62, 63, 64, 65, 66, 71, - /* 420 */ 14, 152, 74, 142, 143, 144, 150, 74, 75, 74, - /* 430 */ 75, 150, 80, 152, 28, 57, 74, 75, 2, 3, - /* 440 */ 113, 5, 6, 7, 8, 9, 10, 11, 12, 13, - /* 450 */ 14, 93, 113, 148, 76, 77, 78, 123, 131, 132, - /* 460 */ 82, 14, 74, 75, 150, 87, 88, 89, 90, 91, - /* 470 */ 131, 132, 73, 134, 135, 28, 115, 138, 139, 152, - /* 480 */ 14, 120, 121, 115, 116, 109, 109, 152, 120, 121, - /* 490 */ 109, 152, 109, 57, 72, 14, 2, 3, 102, 5, - /* 500 */ 6, 7, 8, 9, 10, 11, 12, 13, 14, 28, - /* 510 */ 72, 119, 76, 77, 78, 164, 129, 130, 2, 2, - /* 520 */ 133, 113, 161, 87, 88, 89, 90, 91, 141, 161, - /* 530 */ 99, 162, 145, 146, 152, 69, 70, 71, 79, 131, - /* 540 */ 132, 102, 76, 77, 78, 99, 102, 96, 82, 83, - /* 550 */ 14, 57, 101, 156, 103, 14, 105, 106, 92, 93, - /* 560 */ 152, 110, 14, 112, 102, 156, 156, 85, 98, 14, - /* 570 */ 76, 77, 78, 122, 123, 62, 63, 64, 65, 66, - /* 580 */ 160, 87, 88, 89, 90, 91, 14, 160, 16, 81, - /* 590 */ 72, 94, 20, 80, 75, 23, 96, 72, 26, 27, - /* 600 */ 28, 72, 20, 73, 153, 154, 155, 107, 157, 71, - /* 610 */ 79, 39, 40, 41, 71, 115, 113, 117, 118, 73, - /* 620 */ 120, 121, 71, 51, 52, 53, 54, 55, 56, 57, - /* 630 */ 1, 2, 3, 4, 131, 132, 71, 81, 14, 75, - /* 640 */ 16, 81, 73, 75, 20, 73, 75, 23, 74, 96, - /* 650 */ 26, 27, 28, 73, 73, 152, 94, 157, 158, 159, - /* 660 */ 107, 161, 73, 39, 40, 41, 94, 73, 115, 81, - /* 670 */ 79, 118, 71, 120, 121, 51, 52, 53, 54, 55, - /* 680 */ 56, 57, 75, 71, 73, 75, 57, 58, 59, 60, - /* 690 */ 61, 14, 73, 75, 14, 28, 75, 73, 113, 14, - /* 700 */ 73, 73, 71, 71, 75, 14, 81, 20, 84, 75, - /* 710 */ 157, 158, 159, 16, 161, 74, 131, 132, 16, 21, - /* 720 */ 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, - /* 730 */ 32, 33, 34, 35, 36, 37, 38, 152, 73, 14, - /* 740 */ 72, 21, 22, 23, 24, 25, 26, 27, 28, 29, - /* 750 */ 30, 31, 32, 33, 34, 35, 36, 37, 38, 71, - /* 760 */ 71, 14, 14, 14, 86, 79, 16, 75, 74, 73, - /* 770 */ 16, 72, 14, 75, 21, 22, 23, 24, 25, 26, - /* 780 */ 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, - /* 790 */ 37, 38, 16, 14, 74, 16, 0, 81, 79, 20, - /* 800 */ 71, 19, 23, 113, 166, 26, 27, 28, 166, 166, - /* 810 */ 14, 166, 166, 166, 166, 166, 166, 166, 39, 40, - /* 820 */ 41, 131, 132, 166, 166, 166, 166, 166, 75, 96, - /* 830 */ 51, 52, 53, 54, 55, 56, 57, 166, 166, 166, - /* 840 */ 107, 108, 152, 166, 111, 14, 166, 16, 115, 166, - /* 850 */ 166, 20, 73, 120, 121, 166, 166, 26, 27, 28, - /* 860 */ 166, 166, 166, 166, 166, 69, 70, 71, 166, 166, - /* 870 */ 39, 40, 76, 77, 78, 166, 166, 166, 82, 83, - /* 880 */ 166, 166, 166, 166, 166, 166, 166, 166, 92, 93, - /* 890 */ 157, 158, 159, 96, 161, 166, 113, 166, 101, 166, - /* 900 */ 103, 166, 105, 106, 73, 113, 166, 110, 166, 112, - /* 910 */ 166, 166, 166, 166, 131, 132, 166, 134, 135, 122, - /* 920 */ 123, 138, 139, 131, 132, 166, 134, 135, 166, 166, - /* 930 */ 138, 139, 166, 166, 166, 152, 166, 166, 166, 166, - /* 940 */ 166, 166, 166, 113, 152, 166, 113, 166, 166, 166, - /* 950 */ 166, 166, 155, 166, 157, 125, 166, 166, 125, 166, - /* 960 */ 166, 131, 132, 166, 131, 132, 166, 166, 166, 166, - /* 970 */ 166, 166, 142, 166, 144, 142, 166, 144, 166, 113, - /* 980 */ 150, 166, 152, 150, 113, 152, 166, 166, 166, 166, - /* 990 */ 166, 125, 166, 166, 166, 166, 125, 131, 132, 166, - /* 1000 */ 166, 166, 131, 132, 166, 166, 166, 166, 142, 166, - /* 1010 */ 144, 166, 166, 142, 166, 144, 150, 166, 152, 166, - /* 1020 */ 166, 150, 166, 152, + +#if YYDEBUG +/* YYRLINE[YYN] -- source line where rule number YYN was defined. */ +static const unsigned short int yyrline[] = +{ + 0, 432, 432, 432, 432, 432, 432, 432, 432, 432, + 432, 432, 432, 432, 432, 432, 432, 432, 432, 432, + 433, 433, 433, 433, 434, 434, 434, 434, 434, 434, + 434, 434, 434, 434, 434, 434, 434, 434, 434, 434, + 434, 434, 434, 435, 435, 435, 435, 435, 435, 435, + 435, 435, 435, 435, 435, 435, 435, 435, 435, 435, + 435, 435, 435, 435, 435, 435, 435, 435, 435, 435, + 435, 435, 435, 435, 435, 435, 435, 435, 435, 435, + 435, 435, 435, 435, 435, 435, 435, 435, 435, 435, + 435, 435, 435, 435, 435, 435, 435, 435, 435, 435, + 435, 435, 435, 435, 435, 435, 435, 435, 435, 435, + 435, 435, 435, 435, 435, 435, 435, 435, 435, 435, + 435, 435, 435, 435, 435, 435, 435, 435, 435, 435, + 435, 435, 435, 435, 435, 435, 435, 435, 435, 435, + 435, 435, 435, 435, 435, 435, 435, 435, 435, 435, + 435, 435, 435, 435, 435, 435, 435, 435, 435, 435, + 435, 436, 436, 436, 436, 436, 436, 436, 436, 436, + 436, 436, 436, 436, 436, 436, 436, 436, 436, 436, + 436, 436, 436, 436, 436, 436, 436, 436, 436, 436, + 436, 436, 436, 436, 436, 436, 436, 436, 436, 436, + 436, 436, 436, 436, 436, 436, 436, 436, 436, 436, + 436, 436, 436, 436, 436, 436, 436, 436, 436, 436, + 436, 436, 436, 436, 436, 436, 436, 436, 436, 436, + 436, 436, 436, 436, 436, 436, 436, 436, 436, 436, + 436, 436, 436, 436, 436, 436, 436, 436, 436, 436, + 436, 436, 436, 436, 436, 436, 436, 436, 436, 436, + 436, 436, 436, 436, 436, 436, 436, 436, 436, 436, + 436, 436, 436, 436, 436, 436, 436, 440, 441, 444, + 445, 448, 449, 450, 451, 457, 465, 468, 471, 474, + 475, 478, 481, 484, 487, 493, 499, 502, 508, 531, + 535, 539, 544, 548, 552, 556, 563, 564, 568, 569, + 573, 574, 575, 579, 580, 584, 585, 589, 590, 591, + 595, 596, 600, 601, 602, 603, 604, 605, 606, 610, + 615, 623, 626, 629, 630, 636, 641, 649, 652, 656, + 660, 667, 671, 675, 679, 684, 694, 704, 709, 714, + 718, 724, 733, 736, 740, 744, 750, 757, 763, 764, + 765, 766, 770, 773, 805, 812, 813, 814, 815, 819, + 822, 831, 837, 840, 846, 849, 855, 856, 864, 875, + 884, 896, 897, 901, 911, 920, 932, 935, 938, 942, + 946, 950, 955, 960, 968, 969, 970, 976, 979, 982, + 988, 989, 993, 996, 999, 1005, 1008, 1011, 1019, 1031, + 1034, 1037, 1040, 1047, 1050, 1060, 1063, 1066, 1069, 1070, + 1071, 1075, 1078, 1081, 1092, 1095, 1101, 1102, 1106, 1107, + 1111, 1141, 1144, 1150, 1153, 1159, 1162, 1165, 1171, 1175, + 1176, 1180, 1181, 1185, 1186, 1193, 1194, 1198, 1205, 1216, + 1223, 1234, 1241, 1252, 1263, 1277, 1278, 1290, 1293, 1296, + 1302, 1305, 1312, 1315, 1321, 1330, 1342, 1350, 1353, 1363, + 1376, 1381, 1389, 1399, 1409, 1412, 1416, 1422, 1436, 1453, + 1456, 1462, 1469, 1479, 1486, 1489, 1495, 1500, 1508, 1512, + 1516, 1520, 1524, 1528, 1535, 1539, 1543, 1547, 1551, 1555, + 1561, 1565, 1572, 1575, 1587, 1591, 1595, 1601, 1614, 1627, + 1640, 1643, 1650, 1651, 1655, 1658, 1661, 1664, 1670, 1674, + 1681, 1684, 1687, 1690, 1701, 1704, 1710, 1711, 1717, 1720, + 1726, 1727, 1737, 1740, 1747, 1752, 1757, 1767, 1770, 1776, + 1779, 1785, 1792, 1799, 1800, 1801, 1802, 1803, 1804, 1805, + 1806, 1807, 1811, 1814, 1820, 1823, 1826, 1829, 1832, 1838, + 1842, 1850, 1851, 1855, 1862, 1865, 1868, 1871, 1875, 1878, + 1884, 1888, 1896, 1903, 1908, 1916, 1924, 1925, 1926, 1927, + 1928, 1929, 1930, 1931, 1932, 1933, 1937, 1940, 1946, 1949, + 1955, 1956, 1960, 1963, 1969, 1972, 1978, 1985, 1989, 1996, + 1999, 2002, 2008, 2015, 2018, 2021, 2028, 2033, 2041, 2042, + 2043, 2044, 2045, 2046, 2047, 2048, 2052, 2055, 2061, 2064, + 2070, 2077, 2078, 2082, 2089, 2092, 2098, 2106, 2109, 2115 }; -#define YY_SHIFT_USE_DFLT (1024) -#define YY_SHIFT_COUNT (196) -#define YY_SHIFT_MIN (-42) -#define YY_SHIFT_MAX (831) -static const short yy_shift_ofst[] = { - /* 0 */ 466, 146, 204, 796, -2, 572, -1, 624, -1, -1, - /* 10 */ -1, 779, 779, 779, 779, 94, 41, 41, 262, 320, - /* 20 */ 262, 352, 513, 88, 378, 831, 831, 831, 831, 831, - /* 30 */ 831, 629, -12, -12, 436, 494, 198, -12, -12, -12, - /* 40 */ -12, 54, 291, -12, -12, -12, 291, 5, 5, 67, - /* 50 */ 5, 5, 91, 91, 91, 117, 255, 198, 198, 198, - /* 60 */ 72, 45, 45, 114, 196, 196, 54, 258, 5, 358, - /* 70 */ 67, 5, 399, 399, 91, 399, 91, 399, 422, 438, - /* 80 */ 517, 516, 91, 91, 459, 422, 459, 422, 536, 541, - /* 90 */ 548, 422, 482, 482, 117, 555, 698, 720, 753, 159, - /* 100 */ 159, 159, 159, 159, 216, 293, 277, 214, 294, 348, - /* 110 */ 304, 330, 353, 355, 362, 406, 447, 388, 481, 447, - /* 120 */ -42, -42, 406, 319, 508, 518, 519, 497, 525, 529, - /* 130 */ 530, 582, 531, 546, 538, 543, 551, 556, 565, 564, - /* 140 */ 560, 569, 574, 568, 571, 580, 581, 562, 589, 594, - /* 150 */ 588, 591, 601, 607, 612, 611, 610, 677, 619, 618, - /* 160 */ 680, 667, 621, 685, 627, 628, 631, 632, 625, 687, - /* 170 */ 691, 634, 697, 641, 702, 665, 668, 688, 689, 725, - /* 180 */ 747, 748, 749, 686, 692, 750, 694, 754, 696, 699, - /* 190 */ 758, 678, 776, 716, 719, 729, 782, +#endif + +#if YYDEBUG || YYERROR_VERBOSE || 1 +/* YYTNAME[SYMBOL-NUM] -- String name of the symbol SYMBOL-NUM. + First, the terminals, then, starting at YYNTOKENS, nonterminals. */ +static const char *const yytname[] = +{ + "\"end of file\"", "error", "$undefined", "BOOL", "CHAR", "SHORT", + "INT", "SIGNED", "UNSIGNED", "LONG", "FLOAT", "DOUBLE", "STRING", + "MIXED", "ARRAY", "OBJECT", "CALLABLE", "VOID", "ZVAL", "NULL", "TRUE", + "FALSE", "NAME", "NSNAME", "DOLLAR_NAME", "NUMBER", "QUOTED_STRING", + "QUOTED_CHAR", "SIZEOF", "VOLATILE", "\"end of line\"", "\";\"", "\"(\"", + "\")\"", "\",\"", "\":\"", "\"{\"", "\"}\"", "\"[\"", "\"]\"", "\"=\"", + "\"#\"", "\"|\"", "\"^\"", "\"&\"", "\"<<\"", "\">>\"", "\"+\"", "\"-\"", + "\"*\"", "\"/\"", "\"%\"", "\"<\"", "\">\"", "\">=\"", "\"<=\"", + "\"||\"", "\"&&\"", "\"==\"", "\"!=\"", "\"~\"", "\"!\"", "\".\"", + "\"\\\\\"", "\"...\"", "\"?\"", "PRAGMA", "PRAGMA_ONCE", "LINE", "ERROR", + "WARNING", "IF", "IFDEF", "IFNDEF", "ELSE", "ELIF", "ENDIF", "DEFINE", + "DEFINED", "UNDEF", "IMPORT", "INCLUDE", "INCLUDE_NEXT", "TYPEDEF", + "STRUCT", "UNION", "ENUM", "CONST", "LIB", "STATIC", "CALLBACK", + "FUNCTION", "LET", "SET", "TEMP", "FREE", "RETURN", "AS", "PRE_ASSERT", + "POST_ASSERT", "BOOLVAL", "INTVAL", "STRVAL", "PATHVAL", "STRLEN", + "FLOATVAL", "ARRVAL", "OBJVAL", "COUNT", "CALLOC", "TO_BOOL", "TO_INT", + "TO_STRING", "TO_FLOAT", "TO_ARRAY", "TO_OBJECT", "COMMENT", + "WHITESPACE", "NO_WHITESPACE", "CPP_HEADER", "CPP_ATTRIBUTE", + "CPP_EXTENSION", "CPP_PASTE", "CPP_INLINE", "CPP_RESTRICT", "CPP_ASM", + "BSLASH", "LONG_DOUBLE", "INT8", "UINT8", "INT16", "UINT16", "INT32", + "UINT32", "INT64", "UINT64", "INT128", "UINT128", "BINARY", "UNARY", + "$accept", "binary_op_token", "unary_op_token", "name_token", + "any_noeol_token", "any_nobrace_token", "file", "blocks", "block", "lib", + "cpp", "cpp_exp", "cpp_ignored_token", "cpp_message_token", + "cpp_include_token", "cpp_header_token", "cpp_no_arg_token", + "cpp_name_arg_token", "cpp_exp_arg_token", "cpp_special_name_token", + "cpp_macro_decl", "cpp_macro_sig", "cpp_macro_sig_args", + "cpp_macro_decl_tokens", "cpp_macro_decl_token_list", "cpp_macro_exp", + "cpp_macro_call_args", "cpp_macro_call_arg_list", "constant", + "constant_type", "constant_type_token", "impl_def_val", + "impl_def_val_token", "decl_typedef", "typedef", "typedef_anon", + "typedef_decl", "typedef_anon_decl", "qualified_decl_type", "decl_type", + "decl_type_complex", "decl_type_simple", "decl_real_type", "int_signed", + "int_width", "decl_int_type", "int_signed_types", "signed_short_types", + "signed_long_types", "int_width_types", "decl_stmt", "decl_asm", + "ignored_quoted_strings", "decl_extvar_stmt", "decl_extvar_list", + "decl_vars", "ignored_decl", "ignored_decl_body", + "ignored_decl_body_stmts", "ignored_decl_body_stmt", "decl", "decl_body", + "decl_func_body", "decl_functor_body", "decl_functor", "decl_func", + "decl_args", "decl_arg_list", "decl_anon_arg", "decl_arg", "decl_var", + "decl_union", "decl_struct", "decl_struct_args", "struct_args_block", + "struct_args", "struct_arg_var_list", "decl_vars_with_layout", + "decl_enum", "decl_enum_items", "decl_enum_item", "num_exp", "number", + "sizeof", "sizeof_body", "sizeof_body_notypes", "enum_name", + "union_name", "struct_name", "optional_name", "optional_comma", + "decl_layout", "align_and_size", "array_size", "indirection", "pointers", + "asterisks", "asterisk", "impl", "impl_func", "impl_args", "impl_arg", + "impl_var", "impl_type", "impl_type_token", "impl_stmts", "impl_stmt", + "let_stmt", "let_exp", "let_exp_byref", "let_exp_assign", "let_calloc", + "let_callback", "let_func", "let_func_token", "let_func_exps", + "let_exps", "callback_rval", "callback_arg_list", "callback_args", + "return_stmt", "return_exp", "call_decl_vars", "set_stmt", "set_exp", + "set_func", "set_func_token", "set_func_exps", "set_exps", "assert_stmt", + "assert_stmt_token", "free_stmt", "free_exps", "free_exp", "reference", + "byref", YY_NULLPTR }; -#define YY_REDUCE_USE_DFLT (-113) -#define YY_REDUCE_COUNT (95) -#define YY_REDUCE_MIN (-112) -#define YY_REDUCE_MAX (871) -static const short yy_reduce_ofst[] = { - /* 0 */ 451, 733, 500, 797, 553, 223, -81, 281, 339, 783, - /* 10 */ 792, 830, 833, 866, 871, 211, -112, 387, 105, 195, - /* 20 */ 368, -110, -110, 361, 361, 269, 327, 408, 503, 585, - /* 30 */ 690, -57, 138, -40, -96, -96, -70, 17, 19, 165, - /* 40 */ 166, -68, 47, 222, 224, 251, 63, -73, 79, 26, - /* 50 */ 80, 137, 157, 162, 206, 134, -15, 59, 70, 78, - /* 60 */ 24, 136, 153, 207, 180, 234, 168, 209, 276, 334, - /* 70 */ 305, 314, 376, 377, 335, 381, 168, 383, 396, 392, - /* 80 */ 351, 369, 382, 168, 431, 439, 446, 444, 397, 409, - /* 90 */ 410, 462, 420, 427, 470, 410, +#endif + +#define YYPACT_NINF -703 +#define YYTABLE_NINF -628 + + /* YYPACT[STATE-NUM] -- Index in YYTABLE of the portion describing + STATE-NUM. */ +static const short int yypact[] = +{ + 1445, -703, -703, -703, -703, -703, 70, -703, -703, 2591, + 1754, 344, -703, -703, 753, 540, 3446, 3446, 3446, 65, + 82, 277, 74, -703, 1721, 1980, 123, 1445, -703, -703, + -703, -703, -703, 2817, -703, -703, -703, -703, 115, 180, + -703, -703, -703, -703, 39, -703, -703, 73, 125, 138, + -703, -703, -703, -703, 136, -703, 144, -703, -703, -703, + -703, -703, 841, -703, 154, 97, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, 2930, -10, -703, -703, + -703, -703, 3446, 3446, 3446, 635, -703, 101, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, 687, -703, -703, -703, -703, 160, 967, 967, 26, + -703, 687, 2478, 2591, 3446, 3446, 2093, 192, -703, -703, + -703, 187, 3446, 193, 193, 59, 59, 196, -703, -703, + 206, 215, -703, 154, 216, -703, -703, 203, 1980, 210, + 212, -703, 224, -703, 2206, 1473, 39, 210, -703, -703, + 213, -703, 217, 3446, -703, 246, -703, 116, -703, -703, + -703, 211, -703, 222, 225, 2398, 2398, 3446, 313, 3446, + -703, -703, 154, -703, -703, -703, -703, -703, -703, 2817, + 244, -703, -703, -703, -703, -703, -703, 137, 967, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, 967, -703, -703, -703, -703, -703, -703, -703, -703, + 135, 2478, -703, -703, -703, -703, 3043, 2478, 245, 3600, + -703, 247, 119, -703, 141, -703, -703, -703, -703, 241, + 243, 243, 49, 49, 3156, 240, -703, 210, 1219, -703, + 313, 257, 259, 260, -703, 1333, -703, 154, 213, -703, + -703, -703, 287, -703, -703, 269, -703, 11, 1503, 2817, + 162, 262, -703, -703, 173, 261, 263, -703, 2817, 2139, + 2817, 3446, 2817, -703, -703, 17, -703, -703, -703, -703, + -703, 2365, -703, 271, 3446, 268, -703, 3446, -703, 273, + -703, -703, -703, -703, 2624, 294, -703, 2921, 3446, -703, + -703, 2478, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + 2478, 2478, -703, 285, 1533, 2817, 2817, -703, -703, -703, + -703, 154, -703, 1687, -703, -703, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, -703, 1093, -703, 174, 297, -703, -703, -703, + -703, -703, -703, 1574, -703, 279, 2365, -703, 3576, -703, + -703, 3446, -703, -703, -703, 58, 2930, 154, 217, 213, + 256, 2432, 213, 258, 2365, 3446, 286, 289, 295, 3624, + 292, 302, -703, 307, 316, 301, 312, 122, -703, 314, + 326, -703, -703, -703, 2799, -703, 325, 2817, 3215, 154, + 337, -703, -703, -703, 342, 3600, 356, 311, 3527, -703, + 322, 2093, 324, -703, -703, 2704, 480, 3446, 193, 193, + -703, -703, 3446, 25, -703, -703, -703, 346, -703, 3624, + -703, -703, -703, -703, -703, -703, -703, -703, -703, -703, + -703, -703, 355, 176, -703, 74, -703, 358, 344, 359, + 3034, -703, -703, -703, 2365, 2365, 360, -703, -703, 3156, + -703, 363, 11, -703, -703, 365, 3624, -703, -703, 1800, + -703, 2139, -703, 2817, -703, 74, 2817, -703, 3446, 3328, + -703, -703, -703, -703, -703, -703, 366, 367, -703, -703, + -703, -703, 2478, 2478, 370, -703, 53, 380, -703, 324, + 243, 243, 369, -703, 368, 381, 368, 379, 2365, -703, + 3552, -703, -703, 213, 213, 109, 323, 157, 388, 3624, + -703, -703, -703, -703, 389, 2252, -703, 391, 2817, 188, + -703, 401, 268, 402, 967, 3387, 3600, 3648, 411, 403, + 407, 2817, 413, 380, 2817, 2817, -703, -703, 368, -703, + 74, 1687, -703, 2365, -703, -703, 388, -703, -703, -703, + 3328, -703, 410, 2365, 74, -703, 1913, 412, 417, -703, + 353, -703, -703, -703, 418, 421, 432, 324, 427, -703, + 433, -703, 33, -703, 3672, 430, 74, 3309, 431, 434, + -703, 436, -703, -703, 130, -703, 440, 442, -703, 2817, + -703, 444, 377, 445, 2365, 1800, 446, -703, 2139, -703, + -703, 448, 441, 453, 324, 450, 486, 2026, 3147, 289, + -703, -703, -703, 458, 2252, -703, -703, 459, 461, -703, + 463, 464, 466, 467, -703, -703, 1800, -703, 481, -703, + 368, 74, 472, 2139, -703, 474, -703, 479, -703, -703, + -703, 2026, 482, 485, -703 }; -static const YYACTIONTYPE yy_default[] = { - /* 0 */ 642, 642, 642, 642, 642, 611, 642, 631, 642, 642, - /* 10 */ 642, 631, 631, 631, 631, 642, 642, 642, 537, 642, - /* 20 */ 537, 642, 642, 642, 642, 642, 642, 642, 642, 642, - /* 30 */ 642, 642, 642, 633, 642, 642, 642, 642, 642, 642, - /* 40 */ 642, 633, 642, 642, 642, 642, 642, 631, 631, 642, - /* 50 */ 631, 631, 633, 633, 633, 642, 642, 642, 642, 642, - /* 60 */ 642, 642, 642, 642, 561, 560, 642, 553, 631, 642, - /* 70 */ 642, 631, 642, 642, 642, 642, 538, 642, 495, 545, - /* 80 */ 556, 549, 642, 642, 642, 495, 642, 495, 493, 493, - /* 90 */ 493, 495, 527, 527, 642, 493, 642, 642, 642, 621, - /* 100 */ 601, 600, 592, 503, 591, 642, 642, 642, 642, 642, - /* 110 */ 642, 642, 642, 642, 642, 634, 634, 642, 642, 642, - /* 120 */ 564, 563, 642, 642, 577, 642, 642, 642, 642, 642, - /* 130 */ 642, 642, 642, 642, 642, 642, 642, 642, 642, 642, - /* 140 */ 642, 642, 612, 642, 642, 642, 642, 642, 642, 642, - /* 150 */ 588, 642, 642, 642, 642, 642, 642, 642, 642, 642, - /* 160 */ 642, 634, 642, 642, 642, 519, 642, 642, 642, 642, - /* 170 */ 642, 642, 642, 642, 642, 642, 642, 642, 642, 642, - /* 180 */ 642, 642, 642, 565, 642, 642, 642, 642, 642, 642, - /* 190 */ 642, 642, 642, 504, 642, 642, 642, + + /* YYDEFACT[STATE-NUM] -- Default reduction number in state STATE-NUM. + Performed when YYTABLE does not specify something else to do. Zero + means the default is an error. */ +static const unsigned short int yydefact[] = +{ + 277, 405, 402, 406, 400, 401, 403, 397, 398, 0, + 396, 0, 282, 281, 0, 0, 0, 0, 510, 0, + 0, 0, 627, 283, 0, 0, 0, 278, 279, 285, + 284, 286, 290, 524, 388, 390, 389, 395, 409, 421, + 394, 287, 288, 289, 426, 443, 445, 446, 0, 0, + 455, 292, 291, 293, 0, 294, 0, 404, 399, 33, + 34, 615, 576, 24, 524, 530, 39, 38, 37, 35, + 36, 32, 31, 25, 29, 28, 26, 27, 40, 584, + 583, 581, 579, 580, 582, 578, 577, 585, 30, 613, + 611, 610, 612, 609, 608, 456, 0, 526, 528, 41, + 42, 396, 0, 0, 0, 0, 444, 431, 387, 296, + 307, 304, 306, 308, 309, 320, 317, 318, 315, 321, + 316, 0, 319, 310, 311, 312, 0, 337, 337, 0, + 300, 0, 0, 0, 510, 510, 0, 0, 372, 377, + 466, 376, 0, 518, 518, 391, 392, 393, 507, 358, + 406, 397, 361, 0, 0, 357, 386, 0, 0, 0, + 0, 629, 0, 628, 396, 0, 426, 0, 1, 280, + 520, 467, 0, 525, 411, 415, 413, 417, 410, 407, + 422, 409, 408, 0, 0, 457, 457, 0, 0, 0, + 525, 531, 524, 469, 527, 529, 391, 392, 393, 0, + 0, 323, 324, 325, 327, 328, 326, 322, 337, 302, + 297, 68, 43, 44, 45, 46, 47, 48, 49, 50, + 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, + 61, 62, 63, 64, 65, 66, 67, 158, 159, 69, + 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, + 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, + 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, + 100, 101, 102, 108, 106, 107, 105, 103, 104, 109, + 110, 111, 112, 113, 114, 115, 116, 117, 118, 119, + 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, + 130, 131, 132, 160, 133, 134, 135, 136, 137, 138, + 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, + 149, 150, 151, 152, 156, 153, 154, 155, 157, 339, + 305, 338, 298, 313, 314, 299, 322, 301, 347, 348, + 0, 0, 22, 23, 20, 21, 0, 0, 350, 303, + 349, 456, 391, 509, 392, 508, 373, 369, 378, 0, + 0, 0, 0, 0, 0, 0, 295, 0, 0, 435, + 0, 0, 0, 0, 436, 0, 471, 524, 520, 416, + 412, 418, 419, 414, 423, 0, 424, 458, 0, 524, + 0, 459, 460, 462, 0, 486, 512, 484, 0, 627, + 0, 0, 0, 621, 622, 0, 552, 555, 554, 556, + 557, 0, 558, 0, 0, 432, 433, 0, 430, 0, + 330, 340, 506, 505, 0, 0, 501, 0, 0, 345, + 342, 352, 2, 3, 4, 5, 6, 7, 8, 9, + 10, 11, 13, 12, 14, 15, 16, 17, 18, 19, + 0, 0, 370, 0, 0, 0, 0, 474, 473, 475, + 472, 524, 468, 362, 437, 186, 161, 162, 163, 164, + 165, 166, 167, 168, 169, 170, 171, 172, 173, 174, + 175, 176, 177, 178, 179, 180, 181, 182, 183, 184, + 185, 274, 275, 187, 188, 189, 190, 191, 192, 193, + 194, 195, 196, 197, 198, 199, 200, 201, 202, 203, + 204, 205, 206, 207, 208, 209, 210, 211, 212, 213, + 214, 215, 216, 217, 218, 224, 222, 223, 221, 219, + 220, 225, 226, 227, 228, 229, 230, 231, 232, 233, + 234, 235, 236, 237, 238, 239, 240, 241, 242, 243, + 244, 245, 246, 247, 248, 276, 249, 250, 251, 252, + 253, 254, 255, 256, 257, 258, 259, 260, 261, 262, + 263, 264, 265, 266, 267, 268, 272, 269, 270, 271, + 273, 441, 442, 0, 439, 0, 0, 371, 425, 497, + 495, 494, 496, 0, 521, 0, 0, 498, 0, 488, + 499, 0, 470, 420, 428, 0, 465, 0, 463, 520, + 0, 0, 520, 0, 0, 513, 0, 0, 0, 604, + 0, 0, 603, 42, 0, 0, 0, 0, 624, 0, + 0, 598, 532, 553, 0, 454, 0, 0, 331, 524, + 0, 502, 504, 341, 0, 354, 0, 353, 0, 343, + 0, 0, 514, 381, 374, 382, 0, 383, 518, 518, + 380, 379, 0, 497, 366, 367, 368, 0, 364, 363, + 438, 440, 533, 545, 546, 547, 548, 544, 549, 550, + 551, 543, 0, 0, 537, 627, 542, 24, 0, 0, + 0, 522, 492, 523, 0, 0, 0, 429, 427, 464, + 449, 0, 0, 461, 447, 0, 487, 485, 483, 0, + 559, 627, 602, 0, 541, 627, 0, 623, 0, 599, + 596, 620, 453, 434, 332, 335, 0, 333, 503, 500, + 346, 351, 0, 0, 0, 375, 0, 479, 476, 514, + 0, 0, 0, 356, 0, 0, 0, 539, 0, 490, + 0, 491, 451, 520, 520, 497, 0, 31, 30, 565, + 570, 566, 568, 569, 41, 0, 605, 616, 0, 0, + 625, 615, 601, 0, 337, 0, 355, 344, 0, 515, + 0, 0, 0, 479, 385, 384, 452, 534, 0, 538, + 627, 362, 489, 0, 450, 448, 0, 567, 590, 576, + 599, 591, 0, 0, 627, 571, 627, 0, 0, 626, + 0, 329, 334, 336, 0, 0, 0, 514, 480, 477, + 0, 535, 0, 540, 493, 0, 627, 0, 586, 0, + 618, 617, 606, 560, 0, 519, 0, 0, 481, 0, + 478, 0, 0, 0, 0, 0, 0, 607, 627, 614, + 597, 0, 0, 0, 514, 0, 0, 592, 0, 498, + 588, 563, 561, 587, 0, 575, 619, 0, 0, 482, + 0, 0, 0, 593, 594, 572, 0, 562, 0, 516, + 0, 627, 0, 627, 589, 0, 536, 0, 573, 595, + 517, 592, 0, 0, 574 }; -/********** End of lemon-generated parsing tables *****************************/ - -/* The next table maps tokens (terminal symbols) into fallback tokens. -** If a construct like the following: -** -** %fallback ID X Y Z. -** -** appears in the grammar, then ID becomes a fallback token for X, Y, -** and Z. Whenever one of the tokens X, Y, or Z is input to the parser -** but it does not parse, the type of the token is changed to ID and -** the parse is retried before an error is thrown. -** -** This feature can be used, for example, to cause some keywords in a language -** to revert to identifiers if they keyword does not apply in the context where -** it appears. -*/ -#ifdef YYFALLBACK -static const YYCODETYPE yyFallback[] = { - 0, /* $ => nothing */ - 0, /* BOOL => nothing */ - 0, /* INT => nothing */ - 0, /* FLOAT => nothing */ - 14, /* STRING => NAME */ - 0, /* DOUBLE => nothing */ - 0, /* INT8 => nothing */ - 0, /* UINT8 => nothing */ - 0, /* INT16 => nothing */ - 0, /* UINT16 => nothing */ - 0, /* INT32 => nothing */ - 0, /* UINT32 => nothing */ - 0, /* INT64 => nothing */ - 0, /* UINT64 => nothing */ - 0, /* NAME => nothing */ - 0, /* NULL => nothing */ - 0, /* NUMBER => nothing */ - 0, /* TRUE => nothing */ - 0, /* FALSE => nothing */ - 0, /* QUOTED_STRING => nothing */ - 0, /* NSNAME => nothing */ - 0, /* PIPE => nothing */ - 0, /* CARET => nothing */ - 0, /* AMPERSAND => nothing */ - 0, /* LSHIFT => nothing */ - 0, /* RSHIFT => nothing */ - 0, /* PLUS => nothing */ - 0, /* MINUS => nothing */ - 0, /* ASTERISK => nothing */ - 0, /* SLASH => nothing */ - 0, /* MODULO => nothing */ - 0, /* RCHEVR => nothing */ - 0, /* LCHEVR => nothing */ - 0, /* CMP_GE => nothing */ - 0, /* CMP_LE => nothing */ - 0, /* OR => nothing */ - 0, /* AND => nothing */ - 0, /* CMP_EQ => nothing */ - 0, /* CMP_NE => nothing */ - 0, /* TILDE => nothing */ - 0, /* NOT => nothing */ - 14, /* ZVAL => NAME */ - 0, /* OBJVAL => nothing */ - 0, /* ARRVAL => nothing */ - 0, /* PATHVAL => nothing */ - 0, /* STRLEN => nothing */ - 0, /* STRVAL => nothing */ - 0, /* FLOATVAL => nothing */ - 0, /* INTVAL => nothing */ - 0, /* BOOLVAL => nothing */ - 14, /* COUNT => NAME */ - 0, /* TO_OBJECT => nothing */ - 0, /* TO_ARRAY => nothing */ - 0, /* TO_STRING => nothing */ - 0, /* TO_INT => nothing */ - 0, /* TO_FLOAT => nothing */ - 0, /* TO_BOOL => nothing */ - 0, /* VOID => nothing */ - 0, /* MIXED => nothing */ - 0, /* ARRAY => nothing */ - 0, /* OBJECT => nothing */ - 0, /* CALLABLE => nothing */ - 14, /* TEMP => NAME */ - 14, /* FREE => NAME */ - 14, /* SET => NAME */ - 14, /* LET => NAME */ - 14, /* RETURN => NAME */ - 14, /* CALLOC => NAME */ - 14, /* CALLBACK => NAME */ - 14, /* LIB => NAME */ + + /* YYPGOTO[NTERM-NUM]. */ +static const short int yypgoto[] = +{ + -703, -324, -123, -4, 181, -703, -703, -703, 487, -703, + -703, -703, -703, -703, -703, -703, -703, -703, -703, 382, + -703, -703, -703, -125, -703, -292, -703, -703, -703, -703, + -703, -272, -703, -703, 361, -136, 32, -130, -156, -9, + -703, -703, -703, 488, -703, -703, 347, -703, -703, -703, + -703, 364, -703, -703, -703, -192, -703, -131, -703, -54, + 501, 41, 0, 40, -703, -703, 345, -703, -79, 8, + -33, -703, -703, 170, -323, -703, -247, -703, 4, -703, + -78, -322, -703, -116, -703, 114, -703, -443, -421, 92, + -703, -691, -124, -359, -58, -1, -703, 443, -703, 518, + -703, -205, -644, -702, -703, 182, -371, -703, -333, -663, + 155, -201, -703, -703, -664, -703, -703, -300, -332, -703, + -703, -703, -242, -703, -373, -385, -375, -703, -703, -703, + -703, -703, -703, -158, -21, -674 }; -#endif /* YYFALLBACK */ - -/* The following structure represents a single element of the -** parser's stack. Information stored includes: -** -** + The state number for the parser at this level of the stack. -** -** + The value of the token stored at this level of the stack. -** (In other words, the "major" token.) -** -** + The semantic value stored at this level of the stack. This is -** the information used by the action routines in the grammar. -** It is sometimes called the "minor" token. -** -** After the "shift" half of a SHIFTREDUCE action, the stateno field -** actually contains the reduce action for the second half of the -** SHIFTREDUCE. -*/ -struct yyStackEntry { - YYACTIONTYPE stateno; /* The state-number, or reduce action in SHIFTREDUCE */ - YYCODETYPE major; /* The major token value. This is the code - ** number for the token at this stack level */ - YYMINORTYPE minor; /* The user-supplied minor token value. This - ** is the value of the token */ + + /* YYDEFGOTO[NTERM-NUM]. */ +static const short int yydefgoto[] = +{ + -1, 695, 596, 170, 329, 581, 26, 27, 28, 29, + 30, 126, 127, 128, 129, 335, 130, 131, 132, 208, + 209, 726, 727, 330, 331, 349, 646, 647, 31, 154, + 155, 667, 668, 32, 137, 652, 653, 654, 33, 34, + 35, 36, 37, 38, 39, 40, 179, 380, 383, 182, + 41, 184, 605, 42, 200, 772, 43, 582, 583, 584, + 44, 45, 46, 140, 48, 49, 390, 391, 392, 50, + 597, 51, 52, 458, 459, 656, 782, 818, 142, 396, + 397, 619, 599, 600, 640, 426, 54, 143, 144, 148, + 616, 737, 360, 376, 172, 417, 97, 98, 55, 56, + 683, 684, 620, 685, 686, 405, 406, 407, 860, 861, + 862, 761, 762, 763, 99, 846, 863, 802, 872, 873, + 408, 630, 773, 409, 874, 622, 100, 807, 831, 410, + 411, 412, 627, 628, 624, 163 }; -typedef struct yyStackEntry yyStackEntry; - -/* The state of the parser is completely contained in an instance of -** the following structure */ -struct yyParser { - yyStackEntry *yytos; /* Pointer to top element of the stack */ -#ifdef YYTRACKMAXSTACKDEPTH - int yyhwm; /* High-water mark of the stack */ -#endif -#ifndef YYNOERRORRECOVERY - int yyerrcnt; /* Shifts left before out of the error */ -#endif - ParseARG_SDECL /* A place to hold %extra_argument */ -#if YYSTACKDEPTH<=0 - int yystksz; /* Current side of the stack */ - yyStackEntry *yystack; /* The parser's stack */ - yyStackEntry yystk0; /* First stack entry */ -#else - yyStackEntry yystack[YYSTACKDEPTH]; /* The parser's stack */ -#endif + + /* YYTABLE[YYPACT[STATE-NUM]] -- What to do in state STATE-NUM. If + positive, shift that token. If negative, reduce the rule whose + number is the opposite. If YYTABLE_NINF, syntax error. */ +static const short int yytable[] = +{ + 171, 162, 108, 332, 53, 95, 189, 415, 96, 347, + 156, 658, 145, 146, 147, 139, 350, 631, 107, 602, + 361, 362, 363, 141, 623, 451, 621, 623, 369, 389, + 389, 53, 173, 659, 633, 765, 374, 455, 456, 65, + 47, 747, 787, 64, 790, 764, 760, 138, 783, 427, + 47, 106, 333, 598, 632, 430, -365, 714, -365, -365, + 65, 47, 159, 190, 47, 47, 167, 47, 149, 1, + 2, 150, 4, 5, 6, 151, 8, 152, 779, 57, + 457, 58, 153, 420, 697, 454, 821, 101, 780, 634, + -518, 698, 193, 801, 359, -518, 156, 841, 196, 197, + 198, 764, 805, 451, -446, -466, 451, -466, 157, 398, + 399, 400, 401, 402, 194, 403, 404, 207, 161, 174, + 175, 176, 381, 168, 177, 382, 838, 336, 348, 351, + 352, 354, 96, -455, 414, 199, 139, 178, 358, 645, + -497, 669, -497, -497, 141, 334, 747, 61, 849, 102, + 103, 104, 364, 717, -391, -511, 718, 185, 648, 649, + 828, 422, 423, 869, 183, 139, 416, 424, 356, 378, + 186, 864, 187, 141, 798, 799, -392, -511, 886, 425, + 188, 764, 843, 395, 191, 413, 180, 4, 5, 800, + 210, 190, 801, 393, 393, 609, 610, 138, 47, 367, + 764, 877, 864, 65, 47, 106, 612, 613, 658, 745, + 746, 672, 764, 658, 633, 174, 175, 176, 347, -455, + 177, 809, 637, 357, 347, 350, 353, 355, 359, -359, + 659, 350, -511, 178, 366, 659, 464, 887, -360, 365, + 89, 90, 91, 92, 93, 94, 368, 371, 370, 377, + 700, 375, 379, 704, 385, 419, 386, 79, 80, 81, + 82, 83, 84, 85, 86, 87, 398, 399, 400, 401, + 402, 690, 403, 404, 692, 418, 453, 431, 452, 454, + 463, 1, 2, 3, 4, 5, 6, 7, 8, 586, + 587, 588, 706, 603, 9, 604, 611, 615, 655, 101, + 673, 614, 637, 674, 635, 638, 11, 675, 347, 676, + 677, 678, 679, 680, 681, 350, 642, 650, 691, 601, + 701, 451, 705, 708, 451, 451, 710, 347, 347, 709, + 682, 608, 711, 712, 350, 350, 623, 348, 766, 713, + 714, 715, 429, 348, 716, 732, 719, 734, 1, 2, + 3, 4, 5, 6, 7, 8, 171, 720, 722, 736, + 462, 102, 103, 104, 105, 617, 101, 625, 22, 629, + 729, 673, 750, 751, 674, 730, 190, 743, 675, 156, + 676, 677, 678, 679, 680, 681, 606, 759, 173, 731, + 744, -24, 748, 752, 794, 795, 753, 626, 754, 774, + 158, 775, 786, 662, 778, 398, 399, 400, 401, 402, + 636, 403, 404, 378, 781, 639, 788, 784, 785, 791, + 803, 804, 660, 661, 644, 806, 792, 348, 102, 103, + 104, 623, 796, 830, -600, 810, 814, 689, 815, 816, + 776, 777, 826, 759, 819, 832, 348, 348, 833, 850, + 834, 835, 451, 451, 139, 389, 836, 837, 657, 851, + 190, 839, 141, 842, 840, 845, 867, 847, 855, 669, + 848, 824, 852, 623, 856, 866, 853, 857, 868, 865, + 713, 827, 623, 870, 1, 2, 3, 4, 5, 6, + 7, 8, 876, 878, 879, 655, 881, 9, 880, 882, + 655, 883, 101, 798, 799, 888, 885, 890, 623, 11, + 889, 891, 421, 337, 169, 893, 623, 738, 894, 823, + 739, 735, 858, 759, 769, 166, 372, 181, 384, 671, + 373, 394, 703, 460, 740, 741, 820, 707, 641, 160, + 195, 789, 759, 884, 1, 2, 3, 4, 5, 6, + 7, 8, 585, 618, 759, 797, 871, 133, 825, 892, + 770, 0, 101, 0, 134, 135, 18, 105, 0, 11, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 728, 0, 0, 0, 0, 79, 80, 81, 82, + 83, 84, 85, 86, 87, 0, 0, 696, 0, 0, + 0, 651, 193, 0, 723, 0, 699, 0, 0, 347, + 347, 395, 0, 0, 0, 0, 350, 350, 0, 393, + 0, 0, 171, 0, 134, 135, 18, 105, 0, 0, + 0, 0, 0, 0, 725, 0, 0, 0, 190, 1, + 2, 3, 4, 5, 6, 7, 8, 0, 0, 811, + 0, 139, 153, 358, 173, 657, 139, 101, 742, 141, + 657, 136, 0, 0, 141, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 156, + 767, 0, 0, 416, 0, 0, 416, 0, 0, 0, + 59, 0, 0, 0, 768, 462, 0, 0, 0, 60, + 0, 606, 0, 0, 61, 62, 201, 202, 203, 63, + 0, 0, 0, 0, 626, 0, 0, 0, 0, 102, + 103, 104, 0, 0, 0, 0, 0, 0, 348, 348, + 0, 0, 0, 0, 0, 808, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 817, 0, + 0, 660, 661, 66, 67, 68, 69, 70, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 416, 0, 822, + 0, 813, 0, 0, 0, 71, 0, 72, 73, 74, + 75, 76, 77, 109, 78, 0, 0, 79, 80, 81, + 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, + 92, 93, 94, 0, 0, 0, 854, 0, 204, 0, + 205, 206, 859, 0, 0, 0, 0, 0, 0, 110, + 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, + 121, 0, 122, 123, 124, 125, 0, 0, 0, 0, + 0, -576, 0, 859, -576, -576, -576, -576, -576, -576, + -576, -576, -576, -576, -576, -576, -576, -576, -576, -576, + -576, -576, -576, -576, -576, -576, -576, -576, -576, -576, + -576, -576, -576, -576, -576, -576, -576, -576, -576, -576, + -576, -576, -576, -576, -576, -576, -576, -576, -576, -576, + -576, -576, -576, -576, -576, -576, -576, -576, -576, -576, + -576, -576, -576, -576, -576, -576, -576, -576, -576, -576, + -576, -576, -576, -576, -576, -576, -576, -576, -576, -576, + -576, 0, -576, 0, -576, -576, -576, -576, -576, -576, + -576, -576, -576, -576, -576, -576, -576, -576, -576, -576, + -576, -576, -576, -576, -576, -576, -576, -576, -576, -576, + -576, -576, -576, -576, -576, -576, -576, -576, 0, -576, + -576, 0, -576, -576, -576, -576, -576, 211, 0, 0, + 212, 213, 214, 215, 216, 217, 218, 219, 220, 221, + 222, 223, 224, 225, 226, 227, 228, 229, 230, 231, + 232, 233, 234, 235, 236, 237, 238, 0, 239, 240, + 241, 242, 243, 244, 245, 246, 247, 248, 249, 250, + 251, 252, 253, 254, 255, 256, 257, 258, 259, 260, + 261, 262, 263, 264, 265, 266, 267, 268, 269, 270, + 271, 272, 273, 274, 275, 276, 277, 278, 279, 280, + 281, 282, 283, 284, 285, 286, 287, 0, 288, 0, + 289, 290, 291, 292, 293, 294, 295, 296, 297, 298, + 299, 300, 301, 302, 303, 304, 305, 306, 307, 308, + 309, 310, 311, 312, 313, 314, 315, 316, 317, 318, + 319, 320, 321, 322, 0, 0, 323, 0, 324, 325, + 326, 327, 328, 465, 0, 0, 466, 467, 468, 469, + 470, 471, 472, 473, 474, 475, 476, 477, 478, 479, + 480, 481, 482, 483, 484, 485, 486, 487, 488, 489, + 490, 491, 492, 0, 493, 494, 495, 496, 497, 368, + 670, 498, 499, 500, 501, 502, 503, 504, 505, 506, + 507, 508, 509, 510, 511, 512, 513, 514, 515, 516, + 517, 518, 519, 520, 521, 522, 523, 524, 525, 526, + 527, 528, 529, 530, 531, 532, 533, 534, 535, 536, + 537, 538, 539, 0, 540, 0, 541, 542, 543, 544, + 545, 546, 547, 548, 549, 550, 551, 552, 553, 554, + 555, 556, 557, 558, 559, 560, 561, 562, 563, 564, + 565, 566, 567, 568, 569, 570, 571, 572, 573, 574, + 0, 0, 575, 0, 576, 577, 578, 579, 580, 465, + 0, 0, 466, 467, 468, 469, 470, 471, 472, 473, + 474, 475, 476, 477, 478, 479, 480, 481, 482, 483, + 484, 485, 486, 487, 488, 489, 490, 491, 492, 0, + 493, 494, 495, 496, 497, 368, 0, 498, 499, 500, + 501, 502, 503, 504, 505, 506, 507, 508, 509, 510, + 511, 512, 513, 514, 515, 516, 517, 518, 519, 520, + 521, 522, 523, 524, 525, 526, 527, 528, 529, 530, + 531, 532, 533, 534, 535, 536, 537, 538, 539, 0, + 540, 0, 541, 542, 543, 544, 545, 546, 547, 548, + 549, 550, 551, 552, 553, 554, 555, 556, 557, 558, + 559, 560, 561, 562, 563, 564, 565, 566, 567, 568, + 569, 570, 571, 572, 573, 574, 59, 0, 575, 0, + 576, 577, 578, 579, 580, 60, 0, 0, 0, 0, + 61, 62, 589, 0, 0, 63, 590, 0, 591, 0, + 592, 340, 0, 0, 0, 593, 0, 0, 0, 0, + 0, 0, 594, 0, 0, 0, 0, 0, 0, 0, + 342, 343, 65, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 344, 345, 0, 0, 0, 0, 66, + 67, 68, 69, 70, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 71, 0, 72, 73, 74, 75, 76, 77, 0, + 78, 0, 0, 79, 80, 81, 82, 83, 84, 85, + 86, 87, 88, 89, 90, 91, 92, 93, 94, 1, + 2, 3, 4, 5, 6, 7, 8, 595, 0, 0, + 0, 0, 9, 0, 0, 0, 0, 10, 0, 0, + 0, 0, 0, 0, 11, 12, 13, 1, 2, 3, + 4, 5, 6, 7, 8, 0, 14, 0, 0, 0, + 9, 0, 0, 0, 0, 101, 0, 0, 0, 0, + 0, 0, 11, 0, 0, 0, 0, 1, 2, 3, + 4, 5, 6, 7, 8, 0, 0, 0, 0, 0, + 607, 0, 0, 0, 0, 101, 0, 0, 15, 16, + 17, 18, 19, 20, 21, 0, 22, 1, 2, 3, + 4, 5, 6, 7, 8, 0, 0, 0, 0, 0, + 9, 0, 0, 0, 0, 101, 0, 134, 135, 18, + 105, 23, 11, 0, 0, 0, 24, 0, 25, 0, + 0, 0, 0, 0, 0, 0, 0, 59, 1, 2, + 3, 4, 5, 6, 7, 8, 60, 102, 103, 104, + 0, 61, 62, 589, 136, 0, 687, 590, 0, 591, + 0, 592, 340, 11, 0, 0, 593, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 134, 135, 18, + 105, 342, 343, 65, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 344, 345, 0, 0, 0, 0, + 66, 67, 68, 69, 70, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 651, 0, 0, 0, 102, 103, + 104, 688, 71, 0, 72, 73, 74, 75, 76, 77, + 0, 78, 0, 0, 79, 80, 81, 82, 83, 84, + 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, + 59, 0, 0, 0, 0, 0, 0, 0, 0, 60, + 0, 0, 0, 0, 61, 62, 663, 664, 665, 63, + 590, 0, 591, 666, 592, 340, 0, 0, 0, 593, + 0, 0, 0, 0, 0, 1, 2, 3, 4, 5, + 6, 7, 8, 0, 342, 343, 65, 0, 9, 0, + 0, 0, 0, 164, 0, 0, 0, 344, 345, 0, + 11, 0, 0, 66, 67, 68, 69, 70, 1, 2, + 3, 4, 5, 6, 7, 8, 0, 0, 0, 0, + 0, 9, 0, 0, 0, 71, 101, 72, 73, 74, + 75, 76, 77, 11, 78, 0, 0, 79, 80, 81, + 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, + 92, 93, 94, 59, 165, 102, 103, 104, 105, 0, + 0, 0, 60, 0, 0, 0, 0, 61, 62, 755, + 0, 0, 63, 590, 0, 591, 0, 592, 340, 0, + 0, 0, 593, 0, 0, 0, 0, 0, 102, 103, + 104, 105, 0, 0, 161, 0, 0, 342, 343, 65, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 344, 345, 0, 0, 0, 0, 66, 67, 68, 69, + 70, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 71, 756, + 757, 73, 74, 75, 76, 77, 0, 78, 0, 0, + 79, 80, 81, 82, 83, 84, 85, 86, 87, 758, + 89, 90, 91, 92, 93, 94, 59, 0, 0, 0, + 0, 0, 0, 0, 0, 60, 0, 0, 0, 0, + 61, 62, 589, 0, 0, 63, 590, 0, 591, 0, + 592, 340, 0, 0, 0, 593, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 161, 0, 0, + 342, 343, 65, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 344, 345, 0, 0, 829, 0, 66, + 67, 68, 69, 70, 1, 2, 3, 4, 5, 6, + 7, 8, 0, 0, 0, 0, 0, 9, 0, 0, + 0, 71, 101, 72, 73, 74, 75, 76, 77, 11, + 78, 0, 0, 79, 80, 81, 82, 83, 84, 85, + 86, 87, 88, 89, 90, 91, 92, 93, 94, 59, + 0, 0, 0, 0, 0, 0, 0, 0, 60, 0, + 0, 0, 0, 61, 62, 589, 0, 0, 63, 590, + -627, 591, 0, 592, 340, 0, 0, 0, 593, 0, + 0, 0, 0, 0, 102, 103, 104, 105, 0, 0, + 161, 0, 0, 342, 343, 65, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 344, 345, 0, 0, + 0, 0, 66, 67, 68, 69, 70, 1, 2, 3, + 4, 5, 6, 7, 8, 0, 0, 0, 0, 0, + 9, 0, 0, 0, 71, 101, 72, 73, 74, 75, + 76, 77, 11, 78, 0, 0, 79, 80, 81, 82, + 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, + 93, 94, 59, 0, 0, 0, 0, 0, 0, 0, + 0, 60, 0, 0, 0, 0, 61, 62, 589, 0, + 0, 63, 590, 0, 591, 0, 592, 340, 0, 0, + 0, 593, 0, 0, 0, 0, 0, 134, 135, 18, + 105, 0, 0, 161, 0, 0, 342, 343, 65, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 344, + 345, 0, 0, 0, 0, 66, 67, 68, 69, 70, + 1, 2, 3, 4, 5, 6, 7, 8, 0, 0, + 0, 0, 0, 9, 0, 0, 0, 71, 101, 72, + 73, 74, 75, 76, 77, 11, 78, 0, 0, 79, + 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, + 90, 91, 92, 93, 94, 59, 0, 0, 0, 0, + 0, 0, 0, 0, 60, 0, 0, 0, 0, 61, + 62, 755, 0, 0, 63, 590, 0, 591, 0, 592, + 340, 0, 0, 0, 593, 0, 0, 0, 0, 0, + 102, 103, 104, 105, 0, 0, 0, 0, 0, 342, + 343, 65, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 344, 345, 0, 0, 0, 0, 66, 67, + 68, 69, 70, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 71, 756, 757, 73, 74, 75, 76, 77, 0, 78, + 0, 0, 79, 80, 81, 82, 83, 84, 85, 86, + 87, 758, 89, 90, 91, 92, 93, 94, 59, 0, + 0, 0, 0, 0, 0, 0, 0, 60, 0, 0, + 0, 0, 61, 62, 589, 0, 0, 63, 590, 0, + 591, 0, 592, 340, 0, 0, 0, 593, 0, 0, + 0, 0, 1, 2, 3, 4, 5, 6, 7, 8, + 0, 0, 342, 343, 65, 387, 0, 0, 0, 0, + 101, 0, 0, 0, 0, 344, 345, 11, 0, 0, + 0, 66, 67, 68, 69, 70, 1, 2, 3, 4, + 5, 6, 7, 8, 0, 0, 0, 0, 0, 702, + 0, 0, 0, 71, 101, 72, 73, 74, 75, 76, + 77, 11, 78, 0, 0, 79, 80, 81, 82, 83, + 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, + 94, 59, 102, 103, 104, 388, 0, 0, 0, 0, + 60, 0, 0, 0, 0, 61, 62, 0, 0, 0, + 63, 0, 0, 338, 0, 339, 340, 0, 0, 0, + 341, 0, 0, 0, 0, 0, 102, 103, 104, 388, + 0, 0, 0, 0, 0, 342, 343, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 344, 345, + 0, 0, 0, 0, 66, 67, 68, 69, 70, 0, + 0, 0, 0, 0, 0, 0, 346, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 71, 0, 72, 73, + 74, 75, 76, 77, 0, 78, 0, 0, 79, 80, + 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, + 91, 92, 93, 94, 59, 0, 0, 0, 0, 0, + 0, 0, 0, 60, 0, 0, 0, 0, 61, 62, + 0, 0, 0, 63, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 64, 0, 0, 0, 0, 1, 2, + 3, 4, 5, 6, 7, 8, 0, 0, 0, 0, + 65, 0, 0, 0, 0, 0, 101, 0, 0, 0, + 422, 423, 0, 0, 0, 0, 0, 66, 67, 68, + 69, 70, 0, 0, 0, 0, 0, 0, 425, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 71, + 0, 72, 73, 74, 75, 76, 77, 0, 78, 0, + 0, 79, 80, 81, 82, 83, 84, 85, 86, 87, + 88, 89, 90, 91, 92, 93, 94, 59, 102, 103, + 104, 0, 0, 0, 0, 0, 60, 0, 0, 0, + 0, 61, 62, 0, 0, 0, 63, 0, 0, 0, + 0, 0, 0, 0, 0, 0, -524, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 65, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 66, 67, 68, 69, 70, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 71, 0, 72, 73, 74, 75, 76, 77, + 0, 78, 0, 0, 79, 80, 81, 82, 83, 84, + 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, + 59, 0, 0, 0, 0, 0, 0, 0, 0, 60, + 721, 0, 0, 0, 61, 62, 0, 0, 0, 63, + 0, 432, 433, 434, 435, 436, 437, 438, 439, 440, + 441, 442, 443, 444, 445, 446, 447, 448, 449, 0, + 0, 0, 0, 0, 694, 0, 65, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 66, 67, 68, 69, 70, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 71, 0, 72, 73, 74, + 75, 76, 77, 0, 78, 0, 0, 79, 80, 81, + 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, + 92, 93, 94, 59, 0, 0, 0, 0, 0, 0, + 0, 0, 60, 0, 0, 0, 0, 61, 62, 0, + 0, 0, 63, 0, 643, 0, 0, 0, 0, 0, + 0, 0, 192, 432, 433, 434, 435, 436, 437, 438, + 439, 440, 441, 442, 443, 444, 445, 446, 447, 448, + 449, 0, 0, 0, 0, 0, 450, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 66, 67, 68, 69, + 70, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 71, 0, + 72, 73, 74, 75, 76, 77, 0, 78, 0, 0, + 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, + 89, 90, 91, 92, 93, 94, 59, 0, 0, 0, + 0, 0, 0, 0, 0, 60, 0, 0, 0, 0, + 61, 62, 0, 0, 0, 63, 0, 749, 0, 0, + 0, 0, 0, 0, 0, 428, 432, 433, 434, 435, + 436, 437, 438, 439, 440, 441, 442, 443, 444, 445, + 446, 447, 448, 449, 0, 0, 0, 0, 0, 694, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 66, + 67, 68, 69, 70, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 71, 0, 72, 73, 74, 75, 76, 77, 0, + 78, 0, 0, 79, 80, 81, 82, 83, 84, 85, + 86, 87, 88, 89, 90, 91, 92, 93, 94, 59, + 0, 0, 0, 0, 0, 0, 0, 0, 60, 0, + 0, 0, 0, 61, 62, 0, 0, 0, 63, 0, + 875, 0, 0, 0, 0, 0, 0, 0, 461, 432, + 433, 434, 435, 436, 437, 438, 439, 440, 441, 442, + 443, 444, 445, 446, 447, 448, 449, 0, 0, 0, + 0, 0, 694, 0, 0, 0, 0, 0, 59, 0, + 0, 0, 66, 67, 68, 69, 70, 60, 0, 0, + 0, 0, 61, 62, 0, 0, 0, 63, 0, 0, + 0, 0, 0, 0, 71, 0, 72, 73, 74, 75, + 76, 77, 0, 78, 0, 0, 79, 80, 81, 82, + 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, + 93, 94, 0, 0, 0, 0, 0, 0, 0, 724, + 0, 66, 67, 68, 69, 70, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 71, 0, 72, 73, 74, 75, 76, + 77, 0, 78, 0, 0, 79, 80, 81, 82, 83, + 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, + 94, 59, 0, 0, 0, 0, 0, 0, 0, 0, + 60, 0, 0, 844, 0, 771, 62, 0, 0, 0, + 63, 432, 433, 434, 435, 436, 437, 438, 439, 440, + 441, 442, 443, 444, 445, 446, 447, 448, 449, 0, + 0, 0, 0, 0, 694, 0, 0, 65, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 59, 0, 0, 0, 66, 67, 68, 69, 70, 60, + 0, 0, 0, 0, 61, 62, 0, 0, 0, 63, + 0, 0, 0, 0, 0, 0, 71, 0, 72, 73, + 74, 75, 76, 77, 0, 78, 0, 0, 79, 80, + 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, + 91, 92, 93, 94, 0, 0, 0, 0, 0, 59, + 0, 812, 0, 66, 67, 68, 69, 70, 60, 0, + 0, 0, 0, 61, 62, 0, 0, 0, 63, 0, + 0, 0, 0, 0, 0, 71, 0, 72, 73, 74, + 75, 76, 77, 0, 78, 0, 0, 79, 80, 81, + 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, + 92, 93, 94, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 66, 67, 68, 69, 70, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 71, 0, 72, 73, 74, 75, + 76, 77, 0, 78, 0, 0, 79, 80, 81, 82, + 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, + 93, 94, 733, 0, 0, 0, 0, 0, 0, 432, + 433, 434, 435, 436, 437, 438, 439, 440, 441, 442, + 443, 444, 445, 446, 447, 448, 449, 793, 0, 0, + 0, 0, 450, 0, 432, 433, 434, 435, 436, 437, + 438, 439, 440, 441, 442, 443, 444, 445, 446, 447, + 448, 449, 0, 0, 0, 693, 0, 694, 432, 433, + 434, 435, 436, 437, 438, 439, 440, 441, 442, 443, + 444, 445, 446, 447, 448, 449, 0, 0, 0, 0, + 0, 694, 432, 433, 434, 435, 436, 437, 438, 439, + 440, 441, 442, 443, 444, 445, 446, 447, 448, 449, + 0, 0, 0, 0, 0, 450, 432, 433, 434, 435, + 436, 437, 438, 439, 440, 441, 442, 443, 444, 445, + 446, 447, 448, 449, 0, 0, 0, 0, 0, 694, + 432, 433, 434, 435, 436, 437, 438, 439, 440, 441, + 442, 443, 444, 445, 446, 447, 448, 449, 0, 0, + 0, 0, 0, 450, 432, 433, 434, 435, 436, 437, + 438, 439, 440, 441, 442, 443, 444, 445, 446, 447, + 448, 449, 0, 0, 0, 0, 0, 694 }; -typedef struct yyParser yyParser; -#ifndef NDEBUG -#include -static FILE *yyTraceFILE = 0; -static char *yyTracePrompt = 0; -#endif /* NDEBUG */ - -#ifndef NDEBUG -/* -** Turn parser tracing on by giving a stream to which to write the trace -** and a prompt to preface each trace message. Tracing is turned off -** by making either argument NULL -** -** Inputs: -**
    -**
  • A FILE* to which trace output should be written. -** If NULL, then tracing is turned off. -**
  • A prefix string written at the beginning of every -** line of trace output. If NULL, then tracing is -** turned off. -**
-** -** Outputs: -** None. -*/ -void ParseTrace(FILE *TraceFILE, char *zTracePrompt){ - yyTraceFILE = TraceFILE; - yyTracePrompt = zTracePrompt; - if( yyTraceFILE==0 ) yyTracePrompt = 0; - else if( yyTracePrompt==0 ) yyTraceFILE = 0; -} -#endif /* NDEBUG */ - -#ifndef NDEBUG -/* For tracing shifts, the names of all terminals and nonterminals -** are required. The following table supplies these names */ -static const char *const yyTokenName[] = { - "$", "BOOL", "INT", "FLOAT", - "STRING", "DOUBLE", "INT8", "UINT8", - "INT16", "UINT16", "INT32", "UINT32", - "INT64", "UINT64", "NAME", "NULL", - "NUMBER", "TRUE", "FALSE", "QUOTED_STRING", - "NSNAME", "PIPE", "CARET", "AMPERSAND", - "LSHIFT", "RSHIFT", "PLUS", "MINUS", - "ASTERISK", "SLASH", "MODULO", "RCHEVR", - "LCHEVR", "CMP_GE", "CMP_LE", "OR", - "AND", "CMP_EQ", "CMP_NE", "TILDE", - "NOT", "ZVAL", "OBJVAL", "ARRVAL", - "PATHVAL", "STRLEN", "STRVAL", "FLOATVAL", - "INTVAL", "BOOLVAL", "COUNT", "TO_OBJECT", - "TO_ARRAY", "TO_STRING", "TO_INT", "TO_FLOAT", - "TO_BOOL", "VOID", "MIXED", "ARRAY", - "OBJECT", "CALLABLE", "TEMP", "FREE", - "SET", "LET", "RETURN", "CALLOC", - "CALLBACK", "LIB", "EOF", "EOS", - "COLON", "LPAREN", "COMMA", "RPAREN", - "ENUM", "STRUCT", "UNION", "LBRACE", - "RBRACE", "EQUALS", "CONST", "TYPEDEF", - "ELLIPSIS", "LBRACKET", "RBRACKET", "CHAR", - "SHORT", "LONG", "UNSIGNED", "SIGNED", - "STATIC", "FUNCTION", "DOLLAR_NAME", "error", - "decl_enum", "decl_enum_items", "decl_enum_item", "decl_struct_args_block", - "decl_struct_args", "decl_struct", "align_and_size", "decl_union", - "const_type", "constant", "decl_typedef", "decl_typedef_body_ex", - "decl_typedef_body", "decl_typedef_body_fn_args", "decl", "decl_func", - "decl_abi", "decl_var", "decl_vars", "decl_arg", - "decl_args", "struct_args", "struct_arg", "decl_layout", - "decl_type", "const_decl_type", "impl", "impl_func", - "impl_def_val", "impl_var", "impl_arg", "impl_args", - "impl_vararg", "impl_stmts", "impl_stmt", "number", - "num_exp", "let_stmt", "let_calloc", "let_func", - "callback_arg_list", "callback_args", "let_callback", "let_exp", - "let_exps", "set_stmt", "set_exp", "set_exps", - "set_func", "return_stmt", "free_stmt", "free_exps", - "free_exp", "impl_type", "reference", "indirection", - "pointers", "file", "blocks", "block", - "optional_name", "enum_name", "struct_name", "union_name", - "decl_var_array_size", "decl_scalar_type", "decl_scalar_type_short", "decl_scalar_type_long", - "decl_scalar_type_long_long", "callback_rval", +static const short int yycheck[] = +{ + 33, 22, 11, 128, 0, 9, 64, 199, 9, 132, + 19, 454, 16, 17, 18, 15, 132, 402, 10, 378, + 144, 145, 146, 15, 399, 349, 399, 402, 159, 185, + 186, 27, 33, 454, 405, 709, 167, 360, 361, 49, + 0, 685, 744, 32, 746, 709, 709, 15, 739, 341, + 10, 10, 26, 375, 37, 347, 31, 24, 33, 34, + 49, 21, 21, 64, 24, 25, 25, 27, 3, 4, + 5, 6, 7, 8, 9, 10, 11, 12, 25, 9, + 31, 11, 17, 208, 26, 36, 788, 22, 35, 411, + 31, 33, 96, 757, 35, 36, 105, 64, 102, 103, + 104, 765, 765, 427, 31, 32, 430, 34, 26, 92, + 93, 94, 95, 96, 124, 98, 99, 121, 44, 4, + 5, 6, 6, 0, 9, 9, 817, 131, 132, 133, + 134, 135, 133, 32, 192, 34, 136, 22, 142, 431, + 31, 463, 33, 34, 136, 119, 790, 17, 18, 84, + 85, 86, 153, 31, 35, 36, 34, 32, 450, 451, + 804, 26, 27, 854, 125, 165, 199, 32, 136, 173, + 32, 845, 36, 165, 17, 18, 35, 36, 880, 44, + 36, 845, 826, 187, 87, 189, 6, 7, 8, 32, + 30, 192, 856, 185, 186, 33, 34, 165, 158, 158, + 864, 864, 876, 49, 164, 164, 33, 34, 651, 33, + 34, 37, 876, 656, 585, 4, 5, 6, 341, 32, + 9, 33, 34, 31, 347, 341, 134, 135, 35, 23, + 651, 347, 36, 22, 31, 656, 367, 881, 23, 23, + 110, 111, 112, 113, 114, 115, 36, 23, 36, 32, + 609, 38, 6, 612, 32, 118, 31, 100, 101, 102, + 103, 104, 105, 106, 107, 108, 92, 93, 94, 95, + 96, 593, 98, 99, 596, 31, 35, 32, 31, 36, + 40, 4, 5, 6, 7, 8, 9, 10, 11, 32, + 31, 31, 614, 6, 17, 26, 34, 34, 454, 22, + 3, 40, 34, 6, 33, 32, 29, 10, 431, 12, + 13, 14, 15, 16, 17, 431, 22, 32, 39, 377, + 64, 645, 64, 37, 648, 649, 31, 450, 451, 40, + 33, 389, 40, 31, 450, 451, 711, 341, 711, 32, + 24, 40, 346, 347, 32, 34, 32, 25, 4, 5, + 6, 7, 8, 9, 10, 11, 389, 31, 33, 35, + 364, 84, 85, 86, 87, 398, 22, 400, 91, 402, + 33, 3, 694, 695, 6, 33, 377, 31, 10, 388, + 12, 13, 14, 15, 16, 17, 387, 709, 389, 33, + 35, 33, 33, 33, 753, 754, 33, 401, 33, 33, + 123, 34, 33, 461, 34, 92, 93, 94, 95, 96, + 414, 98, 99, 417, 34, 424, 35, 740, 741, 40, + 32, 32, 455, 456, 428, 34, 748, 431, 84, 85, + 86, 806, 109, 806, 33, 33, 25, 593, 35, 32, + 732, 733, 32, 765, 31, 33, 450, 451, 31, 834, + 97, 33, 776, 777, 454, 611, 35, 25, 454, 834, + 461, 34, 454, 33, 31, 34, 25, 33, 24, 791, + 34, 793, 32, 848, 97, 848, 34, 32, 25, 33, + 32, 803, 857, 33, 4, 5, 6, 7, 8, 9, + 10, 11, 34, 34, 33, 651, 32, 17, 35, 33, + 656, 34, 22, 17, 18, 33, 25, 33, 883, 29, + 883, 32, 331, 131, 27, 33, 891, 37, 33, 791, + 656, 651, 844, 845, 716, 24, 165, 39, 181, 583, + 166, 186, 611, 363, 658, 659, 783, 615, 424, 21, + 97, 746, 864, 876, 4, 5, 6, 7, 8, 9, + 10, 11, 370, 398, 876, 756, 856, 17, 800, 891, + 718, -1, 22, -1, 84, 85, 86, 87, -1, 29, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, 639, -1, -1, -1, -1, 100, 101, 102, 103, + 104, 105, 106, 107, 108, -1, -1, 601, -1, -1, + -1, 121, 606, -1, 637, -1, 607, -1, -1, 732, + 733, 615, -1, -1, -1, -1, 732, 733, -1, 611, + -1, -1, 655, -1, 84, 85, 86, 87, -1, -1, + -1, -1, -1, -1, 638, -1, -1, -1, 639, 4, + 5, 6, 7, 8, 9, 10, 11, -1, -1, 774, + -1, 651, 17, 657, 655, 651, 656, 22, 662, 651, + 656, 121, -1, -1, 656, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, 688, + 713, -1, -1, 716, -1, -1, 719, -1, -1, -1, + 3, -1, -1, -1, 715, 699, -1, -1, -1, 12, + -1, 702, -1, -1, 17, 18, 19, 20, 21, 22, + -1, -1, -1, -1, 718, -1, -1, -1, -1, 84, + 85, 86, -1, -1, -1, -1, -1, -1, 732, 733, + -1, -1, -1, -1, -1, 768, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, 781, -1, + -1, 784, 785, 66, 67, 68, 69, 70, -1, -1, + -1, -1, -1, -1, -1, -1, -1, 800, -1, 790, + -1, 775, -1, -1, -1, 88, -1, 90, 91, 92, + 93, 94, 95, 30, 97, -1, -1, 100, 101, 102, + 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, + 113, 114, 115, -1, -1, -1, 839, -1, 121, -1, + 123, 124, 845, -1, -1, -1, -1, -1, -1, 66, + 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, + 77, -1, 79, 80, 81, 82, -1, -1, -1, -1, + -1, 0, -1, 876, 3, 4, 5, 6, 7, 8, + 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, + 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, + 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, + 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, + 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, + 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, + 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, + 79, -1, 81, -1, 83, 84, 85, 86, 87, 88, + 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, + 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, + 109, 110, 111, 112, 113, 114, 115, 116, -1, 118, + 119, -1, 121, 122, 123, 124, 125, 0, -1, -1, + 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, + 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, + 23, 24, 25, 26, 27, 28, 29, -1, 31, 32, + 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, + 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, + 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, + 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, + 73, 74, 75, 76, 77, 78, 79, -1, 81, -1, + 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, + 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, + 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, + 113, 114, 115, 116, -1, -1, 119, -1, 121, 122, + 123, 124, 125, 0, -1, -1, 3, 4, 5, 6, + 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, + 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, + 27, 28, 29, -1, 31, 32, 33, 34, 35, 36, + 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, + 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, + 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, + 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, + 77, 78, 79, -1, 81, -1, 83, 84, 85, 86, + 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, + 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, + 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, + -1, -1, 119, -1, 121, 122, 123, 124, 125, 0, + -1, -1, 3, 4, 5, 6, 7, 8, 9, 10, + 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, + 21, 22, 23, 24, 25, 26, 27, 28, 29, -1, + 31, 32, 33, 34, 35, 36, -1, 38, 39, 40, + 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, + 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, + 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, + 71, 72, 73, 74, 75, 76, 77, 78, 79, -1, + 81, -1, 83, 84, 85, 86, 87, 88, 89, 90, + 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, + 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, + 111, 112, 113, 114, 115, 116, 3, -1, 119, -1, + 121, 122, 123, 124, 125, 12, -1, -1, -1, -1, + 17, 18, 19, -1, -1, 22, 23, -1, 25, -1, + 27, 28, -1, -1, -1, 32, -1, -1, -1, -1, + -1, -1, 39, -1, -1, -1, -1, -1, -1, -1, + 47, 48, 49, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, 60, 61, -1, -1, -1, -1, 66, + 67, 68, 69, 70, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, 88, -1, 90, 91, 92, 93, 94, 95, -1, + 97, -1, -1, 100, 101, 102, 103, 104, 105, 106, + 107, 108, 109, 110, 111, 112, 113, 114, 115, 4, + 5, 6, 7, 8, 9, 10, 11, 124, -1, -1, + -1, -1, 17, -1, -1, -1, -1, 22, -1, -1, + -1, -1, -1, -1, 29, 30, 31, 4, 5, 6, + 7, 8, 9, 10, 11, -1, 41, -1, -1, -1, + 17, -1, -1, -1, -1, 22, -1, -1, -1, -1, + -1, -1, 29, -1, -1, -1, -1, 4, 5, 6, + 7, 8, 9, 10, 11, -1, -1, -1, -1, -1, + 17, -1, -1, -1, -1, 22, -1, -1, 83, 84, + 85, 86, 87, 88, 89, -1, 91, 4, 5, 6, + 7, 8, 9, 10, 11, -1, -1, -1, -1, -1, + 17, -1, -1, -1, -1, 22, -1, 84, 85, 86, + 87, 116, 29, -1, -1, -1, 121, -1, 123, -1, + -1, -1, -1, -1, -1, -1, -1, 3, 4, 5, + 6, 7, 8, 9, 10, 11, 12, 84, 85, 86, + -1, 17, 18, 19, 121, -1, 22, 23, -1, 25, + -1, 27, 28, 29, -1, -1, 32, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, 84, 85, 86, + 87, 47, 48, 49, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, 60, 61, -1, -1, -1, -1, + 66, 67, 68, 69, 70, -1, -1, -1, -1, -1, + -1, -1, -1, -1, 121, -1, -1, -1, 84, 85, + 86, 87, 88, -1, 90, 91, 92, 93, 94, 95, + -1, 97, -1, -1, 100, 101, 102, 103, 104, 105, + 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, + 3, -1, -1, -1, -1, -1, -1, -1, -1, 12, + -1, -1, -1, -1, 17, 18, 19, 20, 21, 22, + 23, -1, 25, 26, 27, 28, -1, -1, -1, 32, + -1, -1, -1, -1, -1, 4, 5, 6, 7, 8, + 9, 10, 11, -1, 47, 48, 49, -1, 17, -1, + -1, -1, -1, 22, -1, -1, -1, 60, 61, -1, + 29, -1, -1, 66, 67, 68, 69, 70, 4, 5, + 6, 7, 8, 9, 10, 11, -1, -1, -1, -1, + -1, 17, -1, -1, -1, 88, 22, 90, 91, 92, + 93, 94, 95, 29, 97, -1, -1, 100, 101, 102, + 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, + 113, 114, 115, 3, 83, 84, 85, 86, 87, -1, + -1, -1, 12, -1, -1, -1, -1, 17, 18, 19, + -1, -1, 22, 23, -1, 25, -1, 27, 28, -1, + -1, -1, 32, -1, -1, -1, -1, -1, 84, 85, + 86, 87, -1, -1, 44, -1, -1, 47, 48, 49, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + 60, 61, -1, -1, -1, -1, 66, 67, 68, 69, + 70, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, 88, 89, + 90, 91, 92, 93, 94, 95, -1, 97, -1, -1, + 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, + 110, 111, 112, 113, 114, 115, 3, -1, -1, -1, + -1, -1, -1, -1, -1, 12, -1, -1, -1, -1, + 17, 18, 19, -1, -1, 22, 23, -1, 25, -1, + 27, 28, -1, -1, -1, 32, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, 44, -1, -1, + 47, 48, 49, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, 60, 61, -1, -1, 64, -1, 66, + 67, 68, 69, 70, 4, 5, 6, 7, 8, 9, + 10, 11, -1, -1, -1, -1, -1, 17, -1, -1, + -1, 88, 22, 90, 91, 92, 93, 94, 95, 29, + 97, -1, -1, 100, 101, 102, 103, 104, 105, 106, + 107, 108, 109, 110, 111, 112, 113, 114, 115, 3, + -1, -1, -1, -1, -1, -1, -1, -1, 12, -1, + -1, -1, -1, 17, 18, 19, -1, -1, 22, 23, + 24, 25, -1, 27, 28, -1, -1, -1, 32, -1, + -1, -1, -1, -1, 84, 85, 86, 87, -1, -1, + 44, -1, -1, 47, 48, 49, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, 60, 61, -1, -1, + -1, -1, 66, 67, 68, 69, 70, 4, 5, 6, + 7, 8, 9, 10, 11, -1, -1, -1, -1, -1, + 17, -1, -1, -1, 88, 22, 90, 91, 92, 93, + 94, 95, 29, 97, -1, -1, 100, 101, 102, 103, + 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, + 114, 115, 3, -1, -1, -1, -1, -1, -1, -1, + -1, 12, -1, -1, -1, -1, 17, 18, 19, -1, + -1, 22, 23, -1, 25, -1, 27, 28, -1, -1, + -1, 32, -1, -1, -1, -1, -1, 84, 85, 86, + 87, -1, -1, 44, -1, -1, 47, 48, 49, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, 60, + 61, -1, -1, -1, -1, 66, 67, 68, 69, 70, + 4, 5, 6, 7, 8, 9, 10, 11, -1, -1, + -1, -1, -1, 17, -1, -1, -1, 88, 22, 90, + 91, 92, 93, 94, 95, 29, 97, -1, -1, 100, + 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, + 111, 112, 113, 114, 115, 3, -1, -1, -1, -1, + -1, -1, -1, -1, 12, -1, -1, -1, -1, 17, + 18, 19, -1, -1, 22, 23, -1, 25, -1, 27, + 28, -1, -1, -1, 32, -1, -1, -1, -1, -1, + 84, 85, 86, 87, -1, -1, -1, -1, -1, 47, + 48, 49, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, 60, 61, -1, -1, -1, -1, 66, 67, + 68, 69, 70, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + 88, 89, 90, 91, 92, 93, 94, 95, -1, 97, + -1, -1, 100, 101, 102, 103, 104, 105, 106, 107, + 108, 109, 110, 111, 112, 113, 114, 115, 3, -1, + -1, -1, -1, -1, -1, -1, -1, 12, -1, -1, + -1, -1, 17, 18, 19, -1, -1, 22, 23, -1, + 25, -1, 27, 28, -1, -1, -1, 32, -1, -1, + -1, -1, 4, 5, 6, 7, 8, 9, 10, 11, + -1, -1, 47, 48, 49, 17, -1, -1, -1, -1, + 22, -1, -1, -1, -1, 60, 61, 29, -1, -1, + -1, 66, 67, 68, 69, 70, 4, 5, 6, 7, + 8, 9, 10, 11, -1, -1, -1, -1, -1, 17, + -1, -1, -1, 88, 22, 90, 91, 92, 93, 94, + 95, 29, 97, -1, -1, 100, 101, 102, 103, 104, + 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, + 115, 3, 84, 85, 86, 87, -1, -1, -1, -1, + 12, -1, -1, -1, -1, 17, 18, -1, -1, -1, + 22, -1, -1, 25, -1, 27, 28, -1, -1, -1, + 32, -1, -1, -1, -1, -1, 84, 85, 86, 87, + -1, -1, -1, -1, -1, 47, 48, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, 60, 61, + -1, -1, -1, -1, 66, 67, 68, 69, 70, -1, + -1, -1, -1, -1, -1, -1, 78, -1, -1, -1, + -1, -1, -1, -1, -1, -1, 88, -1, 90, 91, + 92, 93, 94, 95, -1, 97, -1, -1, 100, 101, + 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, + 112, 113, 114, 115, 3, -1, -1, -1, -1, -1, + -1, -1, -1, 12, -1, -1, -1, -1, 17, 18, + -1, -1, -1, 22, -1, -1, -1, -1, -1, -1, + -1, -1, -1, 32, -1, -1, -1, -1, 4, 5, + 6, 7, 8, 9, 10, 11, -1, -1, -1, -1, + 49, -1, -1, -1, -1, -1, 22, -1, -1, -1, + 26, 27, -1, -1, -1, -1, -1, 66, 67, 68, + 69, 70, -1, -1, -1, -1, -1, -1, 44, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, 88, + -1, 90, 91, 92, 93, 94, 95, -1, 97, -1, + -1, 100, 101, 102, 103, 104, 105, 106, 107, 108, + 109, 110, 111, 112, 113, 114, 115, 3, 84, 85, + 86, -1, -1, -1, -1, -1, 12, -1, -1, -1, + -1, 17, 18, -1, -1, -1, 22, -1, -1, -1, + -1, -1, -1, -1, -1, -1, 32, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, 49, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + 66, 67, 68, 69, 70, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, 88, -1, 90, 91, 92, 93, 94, 95, + -1, 97, -1, -1, 100, 101, 102, 103, 104, 105, + 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, + 3, -1, -1, -1, -1, -1, -1, -1, -1, 12, + 31, -1, -1, -1, 17, 18, -1, -1, -1, 22, + -1, 42, 43, 44, 45, 46, 47, 48, 49, 50, + 51, 52, 53, 54, 55, 56, 57, 58, 59, -1, + -1, -1, -1, -1, 65, -1, 49, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, 66, 67, 68, 69, 70, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, 88, -1, 90, 91, 92, + 93, 94, 95, -1, 97, -1, -1, 100, 101, 102, + 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, + 113, 114, 115, 3, -1, -1, -1, -1, -1, -1, + -1, -1, 12, -1, -1, -1, -1, 17, 18, -1, + -1, -1, 22, -1, 33, -1, -1, -1, -1, -1, + -1, -1, 32, 42, 43, 44, 45, 46, 47, 48, + 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, + 59, -1, -1, -1, -1, -1, 65, -1, -1, -1, + -1, -1, -1, -1, -1, -1, 66, 67, 68, 69, + 70, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, 88, -1, + 90, 91, 92, 93, 94, 95, -1, 97, -1, -1, + 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, + 110, 111, 112, 113, 114, 115, 3, -1, -1, -1, + -1, -1, -1, -1, -1, 12, -1, -1, -1, -1, + 17, 18, -1, -1, -1, 22, -1, 33, -1, -1, + -1, -1, -1, -1, -1, 32, 42, 43, 44, 45, + 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, + 56, 57, 58, 59, -1, -1, -1, -1, -1, 65, + -1, -1, -1, -1, -1, -1, -1, -1, -1, 66, + 67, 68, 69, 70, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, 88, -1, 90, 91, 92, 93, 94, 95, -1, + 97, -1, -1, 100, 101, 102, 103, 104, 105, 106, + 107, 108, 109, 110, 111, 112, 113, 114, 115, 3, + -1, -1, -1, -1, -1, -1, -1, -1, 12, -1, + -1, -1, -1, 17, 18, -1, -1, -1, 22, -1, + 33, -1, -1, -1, -1, -1, -1, -1, 32, 42, + 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, + 53, 54, 55, 56, 57, 58, 59, -1, -1, -1, + -1, -1, 65, -1, -1, -1, -1, -1, 3, -1, + -1, -1, 66, 67, 68, 69, 70, 12, -1, -1, + -1, -1, 17, 18, -1, -1, -1, 22, -1, -1, + -1, -1, -1, -1, 88, -1, 90, 91, 92, 93, + 94, 95, -1, 97, -1, -1, 100, 101, 102, 103, + 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, + 114, 115, -1, -1, -1, -1, -1, -1, -1, 64, + -1, 66, 67, 68, 69, 70, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, 88, -1, 90, 91, 92, 93, 94, + 95, -1, 97, -1, -1, 100, 101, 102, 103, 104, + 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, + 115, 3, -1, -1, -1, -1, -1, -1, -1, -1, + 12, -1, -1, 34, -1, 17, 18, -1, -1, -1, + 22, 42, 43, 44, 45, 46, 47, 48, 49, 50, + 51, 52, 53, 54, 55, 56, 57, 58, 59, -1, + -1, -1, -1, -1, 65, -1, -1, 49, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + 3, -1, -1, -1, 66, 67, 68, 69, 70, 12, + -1, -1, -1, -1, 17, 18, -1, -1, -1, 22, + -1, -1, -1, -1, -1, -1, 88, -1, 90, 91, + 92, 93, 94, 95, -1, 97, -1, -1, 100, 101, + 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, + 112, 113, 114, 115, -1, -1, -1, -1, -1, 3, + -1, 64, -1, 66, 67, 68, 69, 70, 12, -1, + -1, -1, -1, 17, 18, -1, -1, -1, 22, -1, + -1, -1, -1, -1, -1, 88, -1, 90, 91, 92, + 93, 94, 95, -1, 97, -1, -1, 100, 101, 102, + 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, + 113, 114, 115, -1, -1, -1, -1, -1, -1, -1, + -1, -1, 66, 67, 68, 69, 70, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, 88, -1, 90, 91, 92, 93, + 94, 95, -1, 97, -1, -1, 100, 101, 102, 103, + 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, + 114, 115, 35, -1, -1, -1, -1, -1, -1, 42, + 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, + 53, 54, 55, 56, 57, 58, 59, 35, -1, -1, + -1, -1, 65, -1, 42, 43, 44, 45, 46, 47, + 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, + 58, 59, -1, -1, -1, 39, -1, 65, 42, 43, + 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, + 54, 55, 56, 57, 58, 59, -1, -1, -1, -1, + -1, 65, 42, 43, 44, 45, 46, 47, 48, 49, + 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, + -1, -1, -1, -1, -1, 65, 42, 43, 44, 45, + 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, + 56, 57, 58, 59, -1, -1, -1, -1, -1, 65, + 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, + 52, 53, 54, 55, 56, 57, 58, 59, -1, -1, + -1, -1, -1, 65, 42, 43, 44, 45, 46, 47, + 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, + 58, 59, -1, -1, -1, -1, -1, 65 }; -#endif /* NDEBUG */ - -#ifndef NDEBUG -/* For tracing reduce actions, the names of all rules are required. -*/ -static const char *const yyRuleName[] = { - /* 0 */ "block ::= LIB QUOTED_STRING EOS", - /* 1 */ "block ::= decl", - /* 2 */ "block ::= impl", - /* 3 */ "block ::= decl_typedef", - /* 4 */ "block ::= constant", - /* 5 */ "block ::= decl_struct", - /* 6 */ "block ::= decl_union", - /* 7 */ "block ::= decl_enum", - /* 8 */ "optional_name ::=", - /* 9 */ "optional_name ::= NAME", - /* 10 */ "align_and_size ::=", - /* 11 */ "align_and_size ::= COLON COLON LPAREN NUMBER COMMA NUMBER RPAREN", - /* 12 */ "enum_name ::= ENUM optional_name", - /* 13 */ "struct_name ::= STRUCT optional_name", - /* 14 */ "union_name ::= UNION optional_name", - /* 15 */ "decl_enum ::= enum_name LBRACE decl_enum_items RBRACE", - /* 16 */ "decl_enum_items ::= decl_enum_item", - /* 17 */ "decl_enum_items ::= decl_enum_items COMMA decl_enum_item", - /* 18 */ "decl_enum_item ::= NAME EQUALS num_exp", - /* 19 */ "decl_enum_item ::= NAME", - /* 20 */ "decl_struct_args_block ::= LBRACE struct_args RBRACE", - /* 21 */ "decl_struct_args ::= decl_struct_args_block", - /* 22 */ "decl_struct_args ::= EOS", - /* 23 */ "decl_struct ::= STRUCT NAME align_and_size decl_struct_args", - /* 24 */ "decl_union ::= UNION NAME align_and_size decl_struct_args", - /* 25 */ "const_type ::= BOOL|INT|FLOAT|STRING", - /* 26 */ "constant ::= CONST const_type NSNAME EQUALS impl_def_val EOS", - /* 27 */ "decl_typedef ::= TYPEDEF decl_typedef_body EOS", - /* 28 */ "decl_typedef_body_ex ::= struct_name align_and_size decl_struct_args_block decl_var", - /* 29 */ "decl_typedef_body_ex ::= union_name align_and_size decl_struct_args_block decl_var", - /* 30 */ "decl_typedef_body_ex ::= decl_enum NAME", - /* 31 */ "decl_typedef_body ::= decl_typedef_body_ex", - /* 32 */ "decl_typedef_body_fn_args ::= LPAREN decl_args RPAREN", - /* 33 */ "decl_typedef_body ::= decl_func decl_typedef_body_fn_args", - /* 34 */ "decl_typedef_body ::= decl_arg", - /* 35 */ "decl ::= decl_abi decl_func LPAREN decl_args RPAREN EOS", - /* 36 */ "decl ::= decl_abi decl_func LPAREN decl_args COMMA ELLIPSIS RPAREN EOS", - /* 37 */ "decl_func ::= decl_arg", - /* 38 */ "decl_func ::= VOID NAME", - /* 39 */ "decl_typedef_body ::= VOID indirection LPAREN indirection NAME RPAREN decl_typedef_body_fn_args", - /* 40 */ "decl_typedef_body ::= CONST VOID pointers LPAREN indirection NAME RPAREN decl_typedef_body_fn_args", - /* 41 */ "decl_abi ::= NAME", - /* 42 */ "decl_var_array_size ::=", - /* 43 */ "decl_var_array_size ::= LBRACKET NUMBER RBRACKET", - /* 44 */ "decl_var ::= NAME decl_var_array_size", - /* 45 */ "decl_var ::= pointers NAME decl_var_array_size", - /* 46 */ "decl_vars ::= decl_var", - /* 47 */ "decl_vars ::= decl_vars COMMA decl_var", - /* 48 */ "decl_arg ::= const_decl_type decl_var", - /* 49 */ "decl_typedef_body ::= const_decl_type indirection LPAREN indirection NAME RPAREN decl_typedef_body_fn_args", - /* 50 */ "decl_arg ::= VOID pointers NAME", - /* 51 */ "decl_arg ::= CONST VOID pointers NAME", - /* 52 */ "decl_args ::=", - /* 53 */ "decl_args ::= VOID", - /* 54 */ "decl_args ::= decl_arg", - /* 55 */ "decl_args ::= decl_args COMMA decl_arg", - /* 56 */ "struct_args ::= struct_arg", - /* 57 */ "struct_args ::= struct_args struct_arg", - /* 58 */ "struct_arg ::= decl_typedef_body_ex EOS", - /* 59 */ "struct_arg ::= decl_arg decl_layout EOS", - /* 60 */ "decl_layout ::=", - /* 61 */ "decl_layout ::= COLON COLON LPAREN NUMBER COMMA NUMBER RPAREN", - /* 62 */ "decl_scalar_type ::= CHAR", - /* 63 */ "decl_scalar_type ::= SHORT decl_scalar_type_short", - /* 64 */ "decl_scalar_type_short ::=", - /* 65 */ "decl_scalar_type_short ::= INT", - /* 66 */ "decl_scalar_type ::= INT", - /* 67 */ "decl_scalar_type ::= LONG decl_scalar_type_long", - /* 68 */ "decl_scalar_type_long ::=", - /* 69 */ "decl_scalar_type_long ::= DOUBLE", - /* 70 */ "decl_scalar_type_long ::= LONG decl_scalar_type_long_long", - /* 71 */ "decl_scalar_type_long_long ::=", - /* 72 */ "decl_scalar_type_long_long ::= INT", - /* 73 */ "decl_type ::= UNSIGNED decl_scalar_type", - /* 74 */ "decl_type ::= SIGNED decl_scalar_type", - /* 75 */ "decl_type ::= UNSIGNED", - /* 76 */ "decl_type ::= SIGNED", - /* 77 */ "decl_type ::= decl_scalar_type", - /* 78 */ "decl_type ::= STRUCT NAME", - /* 79 */ "decl_type ::= UNION NAME", - /* 80 */ "decl_type ::= ENUM NAME", - /* 81 */ "decl_type ::= FLOAT|DOUBLE|INT8|UINT8|INT16|UINT16|INT32|UINT32|INT64|UINT64|NAME", - /* 82 */ "const_decl_type ::= decl_type", - /* 83 */ "const_decl_type ::= CONST decl_type", - /* 84 */ "impl ::= impl_func LBRACE impl_stmts RBRACE", - /* 85 */ "impl ::= STATIC impl_func LBRACE impl_stmts RBRACE", - /* 86 */ "impl_func ::= FUNCTION reference NSNAME LPAREN RPAREN COLON impl_type", - /* 87 */ "impl_func ::= FUNCTION reference NSNAME LPAREN impl_args RPAREN COLON impl_type", - /* 88 */ "impl_func ::= FUNCTION reference NSNAME LPAREN impl_args COMMA impl_type reference ELLIPSIS DOLLAR_NAME RPAREN COLON impl_type", - /* 89 */ "impl_def_val ::= NULL|NUMBER|TRUE|FALSE|QUOTED_STRING", - /* 90 */ "impl_var ::= reference DOLLAR_NAME", - /* 91 */ "impl_type ::= VOID|MIXED|BOOL|INT|FLOAT|STRING|ARRAY|OBJECT|CALLABLE", - /* 92 */ "impl_arg ::= impl_type impl_var", - /* 93 */ "impl_arg ::= impl_type impl_var EQUALS impl_def_val", - /* 94 */ "impl_args ::= impl_arg", - /* 95 */ "impl_args ::= impl_args COMMA impl_arg", - /* 96 */ "impl_stmts ::= impl_stmt", - /* 97 */ "impl_stmts ::= impl_stmts impl_stmt", - /* 98 */ "impl_stmt ::= return_stmt", - /* 99 */ "impl_stmt ::= let_stmt", - /* 100 */ "impl_stmt ::= set_stmt", - /* 101 */ "impl_stmt ::= free_stmt", - /* 102 */ "number ::= NUMBER|NSNAME", - /* 103 */ "number ::= decl_var", - /* 104 */ "num_exp ::= number", - /* 105 */ "num_exp ::= LPAREN num_exp RPAREN", - /* 106 */ "num_exp ::= num_exp PIPE|CARET|AMPERSAND|LSHIFT|RSHIFT|PLUS|MINUS|ASTERISK|SLASH|MODULO|RCHEVR|LCHEVR|CMP_GE|CMP_LE|OR|AND|CMP_EQ|CMP_NE num_exp", - /* 107 */ "num_exp ::= TILDE|NOT|PLUS|MINUS num_exp", - /* 108 */ "let_exp ::= NULL", - /* 109 */ "let_exp ::= AMPERSAND NULL", - /* 110 */ "let_exp ::= let_callback", - /* 111 */ "let_exp ::= let_calloc", - /* 112 */ "let_exp ::= AMPERSAND let_calloc", - /* 113 */ "let_exp ::= let_func", - /* 114 */ "let_exp ::= AMPERSAND let_func", - /* 115 */ "let_exp ::= num_exp", - /* 116 */ "let_exp ::= AMPERSAND num_exp", - /* 117 */ "let_exp ::= decl_var EQUALS let_exp", - /* 118 */ "let_stmt ::= LET let_exp EOS", - /* 119 */ "let_stmt ::= TEMP decl_var EQUALS reference decl_var EOS", - /* 120 */ "let_callback ::= CALLBACK callback_rval LPAREN impl_var LPAREN callback_arg_list RPAREN RPAREN", - /* 121 */ "let_calloc ::= CALLOC LPAREN num_exp COMMA num_exp RPAREN", - /* 122 */ "let_func ::= ZVAL|OBJVAL|ARRVAL|PATHVAL|STRLEN|STRVAL|FLOATVAL|INTVAL|BOOLVAL|COUNT LPAREN impl_var RPAREN", - /* 123 */ "let_func ::= ZVAL|OBJVAL|ARRVAL|PATHVAL|STRLEN|STRVAL|FLOATVAL|INTVAL|BOOLVAL|COUNT LPAREN impl_var COMMA let_exps RPAREN", - /* 124 */ "let_exps ::= let_exp", - /* 125 */ "let_exps ::= let_exps COMMA let_exp", - /* 126 */ "callback_arg_list ::=", - /* 127 */ "callback_arg_list ::= callback_args", - /* 128 */ "callback_args ::= set_exp", - /* 129 */ "callback_args ::= callback_args COMMA set_exp", - /* 130 */ "callback_rval ::= ZVAL|OBJVAL|ARRVAL|PATHVAL|STRLEN|STRVAL|FLOATVAL|INTVAL|BOOLVAL|COUNT", - /* 131 */ "callback_rval ::= VOID", - /* 132 */ "set_func ::= TO_OBJECT|TO_ARRAY|TO_STRING|TO_INT|TO_FLOAT|TO_BOOL|ZVAL|VOID LPAREN decl_var RPAREN", - /* 133 */ "set_func ::= TO_OBJECT|TO_ARRAY|TO_STRING|TO_INT|TO_FLOAT|TO_BOOL|ZVAL|VOID LPAREN decl_var COMMA set_exps RPAREN", - /* 134 */ "set_func ::= TO_OBJECT|TO_ARRAY|TO_STRING|TO_INT|TO_FLOAT|TO_BOOL|ZVAL|VOID LPAREN decl_var COMMA ELLIPSIS RPAREN", - /* 135 */ "set_exp ::= set_func", - /* 136 */ "set_exp ::= num_exp", - /* 137 */ "set_exps ::= set_exp", - /* 138 */ "set_exps ::= set_exps COMMA set_exp", - /* 139 */ "set_exp ::= impl_var EQUALS set_exp", - /* 140 */ "set_stmt ::= SET set_exp EOS", - /* 141 */ "return_stmt ::= RETURN set_func EOS", - /* 142 */ "free_stmt ::= FREE free_exps EOS", - /* 143 */ "free_exps ::= free_exp", - /* 144 */ "free_exps ::= free_exps COMMA free_exp", - /* 145 */ "free_exp ::= NAME LPAREN decl_vars RPAREN", - /* 146 */ "reference ::=", - /* 147 */ "reference ::= AMPERSAND", - /* 148 */ "indirection ::=", - /* 149 */ "indirection ::= pointers", - /* 150 */ "pointers ::= ASTERISK", - /* 151 */ "pointers ::= pointers ASTERISK", - /* 152 */ "file ::= blocks", - /* 153 */ "blocks ::= block", - /* 154 */ "blocks ::= blocks block", - /* 155 */ "block ::= EOF", - /* 156 */ "block ::= EOS", + + /* YYSTOS[STATE-NUM] -- The (internal number of the) accessing + symbol of state STATE-NUM. */ +static const unsigned short int yystos[] = +{ + 0, 4, 5, 6, 7, 8, 9, 10, 11, 17, + 22, 29, 30, 31, 41, 83, 84, 85, 86, 87, + 88, 89, 91, 116, 121, 123, 146, 147, 148, 149, + 150, 168, 173, 178, 179, 180, 181, 182, 183, 184, + 185, 190, 193, 196, 200, 201, 202, 203, 204, 205, + 209, 211, 212, 218, 226, 238, 239, 9, 11, 3, + 12, 17, 18, 22, 32, 49, 66, 67, 68, 69, + 70, 88, 90, 91, 92, 93, 94, 95, 97, 100, + 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, + 111, 112, 113, 114, 115, 143, 235, 236, 237, 254, + 266, 22, 84, 85, 86, 87, 201, 209, 179, 30, + 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, + 76, 77, 79, 80, 81, 82, 151, 152, 153, 154, + 156, 157, 158, 17, 84, 85, 121, 174, 176, 202, + 203, 209, 218, 227, 228, 143, 143, 143, 229, 3, + 6, 10, 12, 17, 169, 170, 179, 26, 123, 201, + 239, 44, 274, 275, 22, 83, 200, 201, 0, 148, + 143, 210, 234, 235, 4, 5, 6, 9, 22, 186, + 6, 183, 189, 125, 191, 32, 32, 36, 36, 234, + 235, 87, 32, 143, 124, 237, 143, 143, 143, 34, + 194, 19, 20, 21, 121, 123, 124, 143, 159, 160, + 30, 0, 3, 4, 5, 6, 7, 8, 9, 10, + 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, + 21, 22, 23, 24, 25, 26, 27, 28, 29, 31, + 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, + 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, + 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, + 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, + 72, 73, 74, 75, 76, 77, 78, 79, 81, 83, + 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, + 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, + 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, + 114, 115, 116, 119, 121, 122, 123, 124, 125, 144, + 163, 164, 163, 26, 119, 155, 143, 159, 25, 27, + 28, 32, 47, 48, 60, 61, 78, 142, 143, 165, + 223, 143, 143, 229, 143, 229, 176, 31, 143, 35, + 232, 232, 232, 232, 235, 23, 31, 201, 36, 197, + 36, 23, 174, 191, 197, 38, 233, 32, 143, 6, + 187, 6, 9, 188, 186, 32, 31, 17, 87, 178, + 206, 207, 208, 209, 206, 143, 219, 220, 92, 93, + 94, 95, 96, 98, 99, 245, 246, 247, 260, 263, + 269, 270, 271, 143, 234, 195, 210, 235, 31, 118, + 163, 144, 26, 27, 32, 44, 225, 165, 32, 143, + 165, 32, 42, 43, 44, 45, 46, 47, 48, 49, + 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, + 65, 141, 31, 35, 36, 214, 214, 31, 213, 214, + 213, 32, 143, 40, 197, 0, 3, 4, 5, 6, + 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, + 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, + 27, 28, 29, 31, 32, 33, 34, 35, 38, 39, + 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, + 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, + 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, + 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, + 81, 83, 84, 85, 86, 87, 88, 89, 90, 91, + 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, + 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, + 112, 113, 114, 115, 116, 119, 121, 122, 123, 124, + 125, 145, 197, 198, 199, 245, 32, 31, 31, 19, + 23, 25, 27, 32, 39, 124, 142, 210, 221, 222, + 223, 234, 233, 6, 26, 192, 235, 17, 234, 33, + 34, 34, 33, 34, 40, 34, 230, 210, 250, 221, + 242, 264, 265, 266, 274, 210, 143, 272, 273, 210, + 261, 265, 37, 246, 221, 33, 143, 34, 32, 179, + 224, 225, 22, 33, 143, 165, 166, 167, 165, 165, + 32, 121, 175, 176, 177, 178, 215, 218, 227, 228, + 210, 210, 234, 19, 20, 21, 26, 171, 172, 221, + 37, 199, 37, 3, 6, 10, 12, 13, 14, 15, + 16, 17, 33, 240, 241, 243, 244, 22, 87, 178, + 221, 39, 221, 39, 65, 141, 143, 26, 33, 235, + 233, 64, 17, 208, 233, 64, 221, 220, 37, 40, + 31, 40, 31, 32, 24, 40, 32, 31, 34, 32, + 31, 31, 33, 210, 64, 143, 161, 162, 234, 33, + 33, 33, 34, 35, 25, 177, 35, 231, 37, 175, + 232, 232, 143, 31, 35, 33, 34, 242, 33, 33, + 221, 221, 33, 33, 33, 19, 89, 90, 109, 221, + 249, 251, 252, 253, 254, 275, 264, 210, 274, 195, + 273, 17, 195, 262, 33, 34, 165, 165, 34, 25, + 35, 34, 216, 231, 214, 214, 33, 243, 35, 241, + 243, 40, 221, 35, 233, 233, 109, 251, 17, 18, + 32, 254, 257, 32, 32, 249, 34, 267, 210, 33, + 33, 163, 64, 143, 25, 35, 32, 210, 217, 31, + 216, 243, 274, 171, 221, 262, 32, 221, 242, 64, + 264, 268, 33, 31, 97, 33, 35, 25, 231, 34, + 31, 64, 33, 242, 34, 34, 255, 33, 34, 18, + 265, 266, 32, 34, 210, 24, 97, 32, 221, 210, + 248, 249, 250, 256, 275, 33, 264, 25, 25, 231, + 33, 257, 258, 259, 264, 33, 34, 249, 34, 33, + 35, 32, 33, 34, 248, 25, 243, 242, 33, 264, + 33, 32, 258, 33, 33 }; -#endif /* NDEBUG */ - - -#if YYSTACKDEPTH<=0 -/* -** Try to increase the size of the parser stack. Return the number -** of errors. Return 0 on success. -*/ -static int yyGrowStack(yyParser *p){ - int newSize; - int idx; - yyStackEntry *pNew; - - newSize = p->yystksz*2 + 100; - idx = p->yytos ? (int)(p->yytos - p->yystack) : 0; - if( p->yystack==&p->yystk0 ){ - pNew = malloc(newSize*sizeof(pNew[0])); - if( pNew ) pNew[0] = p->yystk0; - }else{ - pNew = realloc(p->yystack, newSize*sizeof(pNew[0])); - } - if( pNew ){ - p->yystack = pNew; - p->yytos = &p->yystack[idx]; -#ifndef NDEBUG - if( yyTraceFILE ){ - fprintf(yyTraceFILE,"%sStack grows from %d to %d entries.\n", - yyTracePrompt, p->yystksz, newSize); - } + + /* YYR1[YYN] -- Symbol number of symbol that rule YYN derives. */ +static const unsigned short int yyr1[] = +{ + 0, 140, 141, 141, 141, 141, 141, 141, 141, 141, + 141, 141, 141, 141, 141, 141, 141, 141, 141, 141, + 142, 142, 142, 142, 143, 143, 143, 143, 143, 143, + 143, 143, 143, 143, 143, 143, 143, 143, 143, 143, + 143, 143, 143, 144, 144, 144, 144, 144, 144, 144, + 144, 144, 144, 144, 144, 144, 144, 144, 144, 144, + 144, 144, 144, 144, 144, 144, 144, 144, 144, 144, + 144, 144, 144, 144, 144, 144, 144, 144, 144, 144, + 144, 144, 144, 144, 144, 144, 144, 144, 144, 144, + 144, 144, 144, 144, 144, 144, 144, 144, 144, 144, + 144, 144, 144, 144, 144, 144, 144, 144, 144, 144, + 144, 144, 144, 144, 144, 144, 144, 144, 144, 144, + 144, 144, 144, 144, 144, 144, 144, 144, 144, 144, + 144, 144, 144, 144, 144, 144, 144, 144, 144, 144, + 144, 144, 144, 144, 144, 144, 144, 144, 144, 144, + 144, 144, 144, 144, 144, 144, 144, 144, 144, 144, + 144, 145, 145, 145, 145, 145, 145, 145, 145, 145, + 145, 145, 145, 145, 145, 145, 145, 145, 145, 145, + 145, 145, 145, 145, 145, 145, 145, 145, 145, 145, + 145, 145, 145, 145, 145, 145, 145, 145, 145, 145, + 145, 145, 145, 145, 145, 145, 145, 145, 145, 145, + 145, 145, 145, 145, 145, 145, 145, 145, 145, 145, + 145, 145, 145, 145, 145, 145, 145, 145, 145, 145, + 145, 145, 145, 145, 145, 145, 145, 145, 145, 145, + 145, 145, 145, 145, 145, 145, 145, 145, 145, 145, + 145, 145, 145, 145, 145, 145, 145, 145, 145, 145, + 145, 145, 145, 145, 145, 145, 145, 145, 145, 145, + 145, 145, 145, 145, 145, 145, 145, 146, 146, 147, + 147, 148, 148, 148, 148, 148, 148, 148, 148, 148, + 148, 148, 148, 148, 148, 149, 150, 150, 151, 151, + 151, 151, 151, 151, 151, 151, 152, 152, 153, 153, + 154, 154, 154, 155, 155, 156, 156, 157, 157, 157, + 158, 158, 159, 159, 159, 159, 159, 159, 159, 160, + 160, 161, 161, 161, 161, 162, 162, 163, 163, 164, + 164, 165, 165, 165, 165, 165, 165, 165, 165, 165, + 165, 165, 166, 166, 167, 167, 168, 169, 170, 170, + 170, 170, 171, 171, 171, 172, 172, 172, 172, 173, + 173, 173, 174, 174, 175, 175, 176, 176, 176, 176, + 176, 177, 177, 177, 177, 177, 178, 178, 178, 179, + 179, 180, 180, 180, 181, 181, 181, 182, 182, 182, + 183, 183, 184, 184, 184, 185, 185, 185, 185, 186, + 186, 186, 186, 186, 186, 187, 187, 188, 188, 188, + 188, 189, 189, 189, 190, 190, 191, 191, 192, 192, + 193, 194, 194, 195, 195, 196, 196, 196, 197, 198, + 198, 199, 199, 200, 200, 201, 201, 202, 202, 203, + 203, 204, 204, 204, 204, 205, 205, 206, 206, 206, + 207, 207, 208, 208, 208, 208, 209, 209, 209, 209, + 210, 210, 211, 212, 213, 213, 214, 215, 215, 216, + 216, 217, 217, 218, 219, 219, 220, 220, 221, 221, + 221, 221, 221, 221, 222, 222, 222, 222, 222, 222, + 223, 223, 224, 224, 225, 225, 225, 226, 227, 228, + 229, 229, 230, 230, 231, 231, 231, 231, 232, 232, + 233, 233, 233, 233, 234, 234, 235, 235, 236, 236, + 237, 237, 238, 238, 239, 239, 239, 240, 240, 241, + 241, 242, 243, 244, 244, 244, 244, 244, 244, 244, + 244, 244, 245, 245, 246, 246, 246, 246, 246, 247, + 247, 248, 248, 248, 249, 249, 249, 249, 249, 249, + 250, 250, 251, 252, 252, 253, 254, 254, 254, 254, + 254, 254, 254, 254, 254, 254, 255, 255, 256, 256, + 257, 257, 258, 258, 259, 259, 260, 261, 261, 262, + 262, 262, 263, 264, 264, 264, 265, 265, 266, 266, + 266, 266, 266, 266, 266, 266, 267, 267, 268, 268, + 269, 270, 270, 271, 272, 272, 273, 274, 274, 275 +}; + + /* YYR2[YYN] -- Number of symbols on the right hand side of rule YYN. */ +static const unsigned char yyr2[] = +{ + 0, 2, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, + 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 3, 2, 3, 2, 2, + 1, 2, 2, 2, 1, 2, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 6, + 2, 0, 1, 1, 3, 1, 3, 0, 1, 1, + 2, 3, 2, 3, 5, 2, 4, 1, 1, 1, + 1, 4, 0, 1, 1, 3, 6, 1, 1, 1, + 1, 1, 0, 1, 1, 1, 1, 1, 1, 3, + 4, 4, 1, 2, 1, 2, 1, 1, 2, 4, + 4, 1, 1, 1, 3, 3, 2, 2, 1, 1, + 1, 2, 2, 2, 1, 1, 1, 1, 1, 2, + 1, 1, 1, 1, 2, 1, 1, 2, 2, 0, + 1, 1, 2, 1, 2, 0, 1, 0, 1, 1, + 2, 0, 1, 2, 3, 4, 0, 4, 1, 2, + 4, 0, 2, 1, 3, 3, 3, 4, 3, 1, + 2, 1, 1, 1, 2, 1, 1, 5, 7, 5, + 7, 6, 7, 6, 5, 1, 2, 0, 1, 1, + 1, 3, 1, 2, 3, 2, 1, 2, 4, 3, + 3, 2, 4, 4, 1, 1, 3, 4, 5, 0, + 2, 2, 4, 5, 1, 3, 1, 3, 1, 4, + 3, 3, 2, 5, 1, 1, 1, 1, 1, 1, + 4, 2, 1, 2, 2, 1, 1, 2, 2, 2, + 0, 1, 0, 1, 0, 2, 7, 9, 0, 7, + 0, 2, 3, 3, 0, 1, 1, 2, 1, 2, + 1, 2, 4, 5, 7, 8, 13, 1, 3, 2, + 4, 2, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 2, 1, 1, 1, 1, 1, 3, + 6, 1, 2, 1, 1, 1, 1, 2, 1, 1, + 3, 4, 6, 8, 12, 5, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 0, 2, 1, 3, + 1, 1, 0, 1, 1, 3, 3, 6, 1, 0, + 1, 1, 3, 1, 1, 3, 5, 6, 1, 1, + 1, 1, 1, 1, 1, 1, 0, 2, 1, 3, + 3, 1, 1, 3, 1, 3, 4, 0, 1, 1 +}; + + +/* YYDPREC[RULE-NUM] -- Dynamic precedence of rule #RULE-NUM (0 if none). */ +static const unsigned char yydprec[] = +{ + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, 2, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 2, 1, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 2, 1, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 2, 1, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 +}; + +/* YYMERGER[RULE-NUM] -- Index of merging function for rule #RULE-NUM. */ +static const unsigned char yymerger[] = +{ + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 +}; + +/* YYIMMEDIATE[RULE-NUM] -- True iff rule #RULE-NUM is not to be deferred, as + in the case of predicates. */ +static const yybool yyimmediate[] = +{ + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 +}; + +/* YYCONFLP[YYPACT[STATE-NUM]] -- Pointer into YYCONFL of start of + list of conflicting reductions corresponding to action entry for + state STATE-NUM in yytable. 0 means no conflicts. The list in + yyconfl is terminated by a rule number of 0. */ +static const unsigned short int yyconflp[] = +{ + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 263, 0, 265, 267, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 7, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, + 271, 0, 273, 275, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 255, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 257, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 253, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 259, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 261, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 269, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 277, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 9, 0, 0, 11, 13, 15, 17, 19, 21, + 23, 25, 27, 29, 31, 33, 35, 37, 39, 41, + 43, 45, 47, 49, 51, 53, 55, 57, 59, 61, + 63, 65, 67, 69, 71, 73, 75, 77, 79, 81, + 83, 85, 87, 89, 91, 93, 95, 97, 99, 101, + 103, 105, 107, 109, 111, 113, 115, 117, 119, 121, + 123, 125, 127, 129, 131, 133, 135, 137, 139, 141, + 143, 145, 147, 149, 151, 153, 155, 157, 159, 161, + 163, 0, 165, 0, 167, 169, 171, 173, 175, 177, + 179, 181, 183, 185, 187, 189, 191, 193, 195, 197, + 199, 201, 203, 205, 207, 209, 211, 213, 215, 217, + 219, 221, 223, 225, 227, 229, 231, 233, 0, 235, + 237, 0, 239, 241, 243, 245, 247, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 1, 0, 0, 0, 0, 3, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 249, 0, 0, 0, 0, 251, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 279, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 281 +}; + +/* YYCONFL[I] -- lists of conflicting rule numbers, each terminated by + 0, pointed into by YYCONFLP. */ +static const short int yyconfl[] = +{ + 0, 396, 0, 396, 0, 409, 0, 466, 0, 614, + 0, 614, 0, 614, 0, 614, 0, 614, 0, 614, + 0, 614, 0, 614, 0, 614, 0, 614, 0, 614, + 0, 614, 0, 614, 0, 614, 0, 614, 0, 614, + 0, 614, 0, 614, 0, 614, 0, 614, 0, 614, + 0, 614, 0, 614, 0, 614, 0, 614, 0, 614, + 0, 614, 0, 614, 0, 614, 0, 614, 0, 614, + 0, 614, 0, 614, 0, 614, 0, 614, 0, 614, + 0, 614, 0, 614, 0, 614, 0, 614, 0, 614, + 0, 614, 0, 614, 0, 614, 0, 614, 0, 614, + 0, 614, 0, 614, 0, 614, 0, 614, 0, 614, + 0, 614, 0, 614, 0, 614, 0, 614, 0, 614, + 0, 614, 0, 614, 0, 614, 0, 614, 0, 614, + 0, 614, 0, 614, 0, 614, 0, 614, 0, 614, + 0, 614, 0, 614, 0, 614, 0, 614, 0, 614, + 0, 614, 0, 614, 0, 614, 0, 614, 0, 614, + 0, 614, 0, 614, 0, 614, 0, 614, 0, 614, + 0, 614, 0, 614, 0, 614, 0, 614, 0, 614, + 0, 614, 0, 614, 0, 614, 0, 614, 0, 614, + 0, 614, 0, 614, 0, 614, 0, 614, 0, 614, + 0, 614, 0, 614, 0, 614, 0, 614, 0, 614, + 0, 614, 0, 614, 0, 614, 0, 614, 0, 614, + 0, 614, 0, 614, 0, 614, 0, 614, 0, 614, + 0, 614, 0, 614, 0, 614, 0, 614, 0, 614, + 0, 614, 0, 614, 0, 614, 0, 614, 0, 396, + 0, 396, 0, 409, 0, 511, 0, 511, 0, 459, + 0, 42, 0, 497, 0, 497, 0, 497, 0, 396, + 0, 564, 0, 564, 0, 564, 0, 615, 0, 344, + 0, 493, 0 +}; + +/* Error token number */ +#define YYTERROR 1 + + + + +#undef yynerrs +#define yynerrs (yystackp->yyerrcnt) +#undef yychar +#define yychar (yystackp->yyrawchar) +#undef yylval +#define yylval (yystackp->yyval) +#undef yylloc +#define yylloc (yystackp->yyloc) +#define psi_parser_proc_nerrs yynerrs +#define psi_parser_proc_char yychar +#define psi_parser_proc_lval yylval +#define psi_parser_proc_lloc yylloc + +static const int YYEOF = 0; +static const int YYEMPTY = -2; + +typedef enum { yyok, yyaccept, yyabort, yyerr } YYRESULTTAG; + +#define YYCHK(YYE) \ + do { \ + YYRESULTTAG yychk_flag = YYE; \ + if (yychk_flag != yyok) \ + return yychk_flag; \ + } while (0) + +#if YYDEBUG + +# ifndef YYFPRINTF +# define YYFPRINTF fprintf +# endif + +/* This macro is provided for backward compatibility. */ +#ifndef YY_LOCATION_PRINT +# define YY_LOCATION_PRINT(File, Loc) ((void) 0) #endif - p->yystksz = newSize; - } - return pNew==0; + + +# define YYDPRINTF(Args) \ + do { \ + if (yydebug) \ + YYFPRINTF Args; \ + } while (0) + + +/*----------------------------------------. +| Print this symbol's value on YYOUTPUT. | +`----------------------------------------*/ + +static void +yy_symbol_value_print (FILE *yyoutput, int yytype, YYSTYPE const * const yyvaluep, struct psi_parser *P, struct psi_plist *tokens, size_t *index) +{ + FILE *yyo = yyoutput; + YYUSE (yyo); + YYUSE (P); + YYUSE (tokens); + YYUSE (index); + if (!yyvaluep) + return; + YYUSE (yytype); } -#endif -/* Datatype of the argument to the memory allocated passed as the -** second argument to ParseAlloc() below. This can be changed by -** putting an appropriate #define in the %include section of the input -** grammar. -*/ -#ifndef YYMALLOCARGTYPE -# define YYMALLOCARGTYPE size_t + +/*--------------------------------. +| Print this symbol on YYOUTPUT. | +`--------------------------------*/ + +static void +yy_symbol_print (FILE *yyoutput, int yytype, YYSTYPE const * const yyvaluep, struct psi_parser *P, struct psi_plist *tokens, size_t *index) +{ + YYFPRINTF (yyoutput, "%s %s (", + yytype < YYNTOKENS ? "token" : "nterm", yytname[yytype]); + + yy_symbol_value_print (yyoutput, yytype, yyvaluep, P, tokens, index); + YYFPRINTF (yyoutput, ")"); +} + +# define YY_SYMBOL_PRINT(Title, Type, Value, Location) \ + do { \ + if (yydebug) \ + { \ + YYFPRINTF (stderr, "%s ", Title); \ + yy_symbol_print (stderr, Type, Value, P, tokens, index); \ + YYFPRINTF (stderr, "\n"); \ + } \ + } while (0) + +/* Nonzero means print parse trace. It is left uninitialized so that + multiple parsers can coexist. */ +int yydebug; + +struct yyGLRStack; +static void yypstack (struct yyGLRStack* yystackp, size_t yyk) + YY_ATTRIBUTE_UNUSED; +static void yypdumpstack (struct yyGLRStack* yystackp) + YY_ATTRIBUTE_UNUSED; + +#else /* !YYDEBUG */ + +# define YYDPRINTF(Args) +# define YY_SYMBOL_PRINT(Title, Type, Value, Location) + +#endif /* !YYDEBUG */ + +/* YYINITDEPTH -- initial size of the parser's stacks. */ +#ifndef YYINITDEPTH +# define YYINITDEPTH 200 #endif -/* Initialize a new parser that has already been allocated. -*/ -void ParseInit(void *yypParser){ - yyParser *pParser = (yyParser*)yypParser; -#ifdef YYTRACKMAXSTACKDEPTH - pParser->yyhwm = 0; +/* YYMAXDEPTH -- maximum size the stacks can grow to (effective only + if the built-in stack extension method is used). + + Do not make this value too large; the results are undefined if + SIZE_MAX < YYMAXDEPTH * sizeof (GLRStackItem) + evaluated with infinite-precision integer arithmetic. */ + +#ifndef YYMAXDEPTH +# define YYMAXDEPTH 10000 #endif -#if YYSTACKDEPTH<=0 - pParser->yytos = NULL; - pParser->yystack = NULL; - pParser->yystksz = 0; - if( yyGrowStack(pParser) ){ - pParser->yystack = &pParser->yystk0; - pParser->yystksz = 1; - } + +/* Minimum number of free items on the stack allowed after an + allocation. This is to allow allocation and initialization + to be completed by functions that call yyexpandGLRStack before the + stack is expanded, thus insuring that all necessary pointers get + properly redirected to new data. */ +#define YYHEADROOM 2 + +#ifndef YYSTACKEXPANDABLE +# define YYSTACKEXPANDABLE 1 #endif -#ifndef YYNOERRORRECOVERY - pParser->yyerrcnt = -1; + +#if YYSTACKEXPANDABLE +# define YY_RESERVE_GLRSTACK(Yystack) \ + do { \ + if (Yystack->yyspaceLeft < YYHEADROOM) \ + yyexpandGLRStack (Yystack); \ + } while (0) +#else +# define YY_RESERVE_GLRSTACK(Yystack) \ + do { \ + if (Yystack->yyspaceLeft < YYHEADROOM) \ + yyMemoryExhausted (Yystack); \ + } while (0) #endif - pParser->yytos = pParser->yystack; - pParser->yystack[0].stateno = 0; - pParser->yystack[0].major = 0; -} - -#ifndef Parse_ENGINEALWAYSONSTACK -/* -** This function allocates a new parser. -** The only argument is a pointer to a function which works like -** malloc. -** -** Inputs: -** A pointer to the function used to allocate memory. -** -** Outputs: -** A pointer to a parser. This pointer is used in subsequent calls -** to Parse and ParseFree. -*/ -void *ParseAlloc(void *(*mallocProc)(YYMALLOCARGTYPE)){ - yyParser *pParser; - pParser = (yyParser*)(*mallocProc)( (YYMALLOCARGTYPE)sizeof(yyParser) ); - if( pParser ) ParseInit(pParser); - return pParser; -} -#endif /* Parse_ENGINEALWAYSONSTACK */ - - -/* The following function deletes the "minor type" or semantic value -** associated with a symbol. The symbol can be either a terminal -** or nonterminal. "yymajor" is the symbol code, and "yypminor" is -** a pointer to the value to be deleted. The code used to do the -** deletions is derived from the %destructor and/or %token_destructor -** directives of the input grammar. -*/ -static void yy_destructor( - yyParser *yypParser, /* The parser */ - YYCODETYPE yymajor, /* Type code for object to destroy */ - YYMINORTYPE *yypminor /* The object to be destroyed */ -){ - ParseARG_FETCH; - switch( yymajor ){ - /* Here is inserted the actions which take place when a - ** terminal or non-terminal is destroyed. This can happen - ** when the symbol is popped from the stack during a - ** reduce or during error processing or when a parser is - ** being destroyed before it is finished parsing. - ** - ** Note: during a reduce, the only symbols destroyed are those - ** which appear on the RHS of the rule, but which are *not* used - ** inside the C code. - */ -/********* Begin destructor definitions ***************************************/ - /* TERMINAL Destructor */ - case 1: /* BOOL */ - case 2: /* INT */ - case 3: /* FLOAT */ - case 4: /* STRING */ - case 5: /* DOUBLE */ - case 6: /* INT8 */ - case 7: /* UINT8 */ - case 8: /* INT16 */ - case 9: /* UINT16 */ - case 10: /* INT32 */ - case 11: /* UINT32 */ - case 12: /* INT64 */ - case 13: /* UINT64 */ - case 14: /* NAME */ - case 15: /* NULL */ - case 16: /* NUMBER */ - case 17: /* TRUE */ - case 18: /* FALSE */ - case 19: /* QUOTED_STRING */ - case 20: /* NSNAME */ - case 21: /* PIPE */ - case 22: /* CARET */ - case 23: /* AMPERSAND */ - case 24: /* LSHIFT */ - case 25: /* RSHIFT */ - case 26: /* PLUS */ - case 27: /* MINUS */ - case 28: /* ASTERISK */ - case 29: /* SLASH */ - case 30: /* MODULO */ - case 31: /* RCHEVR */ - case 32: /* LCHEVR */ - case 33: /* CMP_GE */ - case 34: /* CMP_LE */ - case 35: /* OR */ - case 36: /* AND */ - case 37: /* CMP_EQ */ - case 38: /* CMP_NE */ - case 39: /* TILDE */ - case 40: /* NOT */ - case 41: /* ZVAL */ - case 42: /* OBJVAL */ - case 43: /* ARRVAL */ - case 44: /* PATHVAL */ - case 45: /* STRLEN */ - case 46: /* STRVAL */ - case 47: /* FLOATVAL */ - case 48: /* INTVAL */ - case 49: /* BOOLVAL */ - case 50: /* COUNT */ - case 51: /* TO_OBJECT */ - case 52: /* TO_ARRAY */ - case 53: /* TO_STRING */ - case 54: /* TO_INT */ - case 55: /* TO_FLOAT */ - case 56: /* TO_BOOL */ - case 57: /* VOID */ - case 58: /* MIXED */ - case 59: /* ARRAY */ - case 60: /* OBJECT */ - case 61: /* CALLABLE */ - case 62: /* TEMP */ - case 63: /* FREE */ - case 64: /* SET */ - case 65: /* LET */ - case 66: /* RETURN */ - case 67: /* CALLOC */ - case 68: /* CALLBACK */ - case 69: /* LIB */ - case 70: /* EOF */ - case 71: /* EOS */ - case 72: /* COLON */ - case 73: /* LPAREN */ - case 74: /* COMMA */ - case 75: /* RPAREN */ - case 76: /* ENUM */ - case 77: /* STRUCT */ - case 78: /* UNION */ - case 79: /* LBRACE */ - case 80: /* RBRACE */ - case 81: /* EQUALS */ - case 82: /* CONST */ - case 83: /* TYPEDEF */ - case 84: /* ELLIPSIS */ - case 85: /* LBRACKET */ - case 86: /* RBRACKET */ - case 87: /* CHAR */ - case 88: /* SHORT */ - case 89: /* LONG */ - case 90: /* UNSIGNED */ - case 91: /* SIGNED */ - case 92: /* STATIC */ - case 93: /* FUNCTION */ - case 94: /* DOLLAR_NAME */ -{ -#line 37 "src/parser_proc.y" -free((yypminor->yy0)); -#line 1124 "src/parser_proc.c" + + +#if YYERROR_VERBOSE + +# ifndef yystpcpy +# if defined __GLIBC__ && defined _STRING_H && defined _GNU_SOURCE +# define yystpcpy stpcpy +# else +/* Copy YYSRC to YYDEST, returning the address of the terminating '\0' in + YYDEST. */ +static char * +yystpcpy (char *yydest, const char *yysrc) +{ + char *yyd = yydest; + const char *yys = yysrc; + + while ((*yyd++ = *yys++) != '\0') + continue; + + return yyd - 1; } - break; - /* Default NON-TERMINAL Destructor */ - case 95: /* error */ - case 102: /* align_and_size */ - case 150: /* reference */ - case 151: /* indirection */ - case 152: /* pointers */ - case 153: /* file */ - case 154: /* blocks */ - case 155: /* block */ - case 156: /* optional_name */ - case 157: /* enum_name */ - case 158: /* struct_name */ - case 159: /* union_name */ - case 160: /* decl_var_array_size */ - case 161: /* decl_scalar_type */ - case 162: /* decl_scalar_type_short */ - case 163: /* decl_scalar_type_long */ - case 164: /* decl_scalar_type_long_long */ - case 165: /* callback_rval */ -{ -#line 38 "src/parser_proc.y" -(void)P; -#line 1149 "src/parser_proc.c" +# endif +# endif + +# ifndef yytnamerr +/* Copy to YYRES the contents of YYSTR after stripping away unnecessary + quotes and backslashes, so that it's suitable for yyerror. The + heuristic is that double-quoting is unnecessary unless the string + contains an apostrophe, a comma, or backslash (other than + backslash-backslash). YYSTR is taken from yytname. If YYRES is + null, do not copy; instead, return the length of what the result + would have been. */ +static size_t +yytnamerr (char *yyres, const char *yystr) +{ + if (*yystr == '"') + { + size_t yyn = 0; + char const *yyp = yystr; + + for (;;) + switch (*++yyp) + { + case '\'': + case ',': + goto do_not_strip_quotes; + + case '\\': + if (*++yyp != '\\') + goto do_not_strip_quotes; + /* Fall through. */ + default: + if (yyres) + yyres[yyn] = *yyp; + yyn++; + break; + + case '"': + if (yyres) + yyres[yyn] = '\0'; + return yyn; + } + do_not_strip_quotes: ; + } + + if (! yyres) + return strlen (yystr); + + return yystpcpy (yyres, yystr) - yyres; } - break; - case 96: /* decl_enum */ +# endif + +#endif /* !YYERROR_VERBOSE */ + +/** State numbers, as in LALR(1) machine */ +typedef int yyStateNum; + +/** Rule numbers, as in LALR(1) machine */ +typedef int yyRuleNum; + +/** Grammar symbol */ +typedef int yySymbol; + +/** Item references, as in LALR(1) machine */ +typedef short int yyItemNum; + +typedef struct yyGLRState yyGLRState; +typedef struct yyGLRStateSet yyGLRStateSet; +typedef struct yySemanticOption yySemanticOption; +typedef union yyGLRStackItem yyGLRStackItem; +typedef struct yyGLRStack yyGLRStack; + +struct yyGLRState { + /** Type tag: always true. */ + yybool yyisState; + /** Type tag for yysemantics. If true, yysval applies, otherwise + * yyfirstVal applies. */ + yybool yyresolved; + /** Number of corresponding LALR(1) machine state. */ + yyStateNum yylrState; + /** Preceding state in this stack */ + yyGLRState* yypred; + /** Source position of the last token produced by my symbol */ + size_t yyposn; + union { + /** First in a chain of alternative reductions producing the + * non-terminal corresponding to this state, threaded through + * yynext. */ + yySemanticOption* yyfirstVal; + /** Semantic value for this state. */ + YYSTYPE yysval; + } yysemantics; +}; + +struct yyGLRStateSet { + yyGLRState** yystates; + /** During nondeterministic operation, yylookaheadNeeds tracks which + * stacks have actually needed the current lookahead. During deterministic + * operation, yylookaheadNeeds[0] is not maintained since it would merely + * duplicate yychar != YYEMPTY. */ + yybool* yylookaheadNeeds; + size_t yysize, yycapacity; +}; + +struct yySemanticOption { + /** Type tag: always false. */ + yybool yyisState; + /** Rule number for this reduction */ + yyRuleNum yyrule; + /** The last RHS state in the list of states to be reduced. */ + yyGLRState* yystate; + /** The lookahead for this reduction. */ + int yyrawchar; + YYSTYPE yyval; + /** Next sibling in chain of options. To facilitate merging, + * options are chained in decreasing order by address. */ + yySemanticOption* yynext; +}; + +/** Type of the items in the GLR stack. The yyisState field + * indicates which item of the union is valid. */ +union yyGLRStackItem { + yyGLRState yystate; + yySemanticOption yyoption; +}; + +struct yyGLRStack { + int yyerrState; + + + int yyerrcnt; + int yyrawchar; + YYSTYPE yyval; + + YYJMP_BUF yyexception_buffer; + yyGLRStackItem* yyitems; + yyGLRStackItem* yynextFree; + size_t yyspaceLeft; + yyGLRState* yysplitPoint; + yyGLRState* yylastDeleted; + yyGLRStateSet yytops; +}; + +#if YYSTACKEXPANDABLE +static void yyexpandGLRStack (yyGLRStack* yystackp); +#endif + +static _Noreturn void +yyFail (yyGLRStack* yystackp, struct psi_parser *P, struct psi_plist *tokens, size_t *index, const char* yymsg) { -#line 63 "src/parser_proc.y" -psi_decl_enum_free(&(yypminor->yy279)); -#line 1156 "src/parser_proc.c" -} - break; - case 97: /* decl_enum_items */ - case 99: /* decl_struct_args_block */ - case 100: /* decl_struct_args */ - case 109: /* decl_typedef_body_fn_args */ - case 114: /* decl_vars */ - case 116: /* decl_args */ - case 117: /* struct_args */ - case 127: /* impl_args */ - case 129: /* impl_stmts */ - case 140: /* let_exps */ - case 143: /* set_exps */ - case 147: /* free_exps */ -{ -#line 65 "src/parser_proc.y" -psi_plist_free((yypminor->yy303)); -#line 1174 "src/parser_proc.c" + if (yymsg != YY_NULLPTR) + yyerror (P, tokens, index, yymsg); + YYLONGJMP (yystackp->yyexception_buffer, 1); } - break; - case 98: /* decl_enum_item */ + +static _Noreturn void +yyMemoryExhausted (yyGLRStack* yystackp) { -#line 67 "src/parser_proc.y" -psi_decl_enum_item_free(&(yypminor->yy69)); -#line 1181 "src/parser_proc.c" + YYLONGJMP (yystackp->yyexception_buffer, 2); } - break; - case 101: /* decl_struct */ + +#if YYDEBUG || YYERROR_VERBOSE +/** A printable representation of TOKEN. */ +static inline const char* +yytokenName (yySymbol yytoken) { -#line 73 "src/parser_proc.y" -psi_decl_struct_free(&(yypminor->yy271)); -#line 1188 "src/parser_proc.c" + if (yytoken == YYEMPTY) + return ""; + + return yytname[yytoken]; } - break; - case 103: /* decl_union */ +#endif + +/** Fill in YYVSP[YYLOW1 .. YYLOW0-1] from the chain of states starting + * at YYVSP[YYLOW0].yystate.yypred. Leaves YYVSP[YYLOW1].yystate.yypred + * containing the pointer to the next state in the chain. */ +static void yyfillin (yyGLRStackItem *, int, int) YY_ATTRIBUTE_UNUSED; +static void +yyfillin (yyGLRStackItem *yyvsp, int yylow0, int yylow1) { -#line 76 "src/parser_proc.y" -psi_decl_union_free(&(yypminor->yy19)); -#line 1195 "src/parser_proc.c" + int i; + yyGLRState *s = yyvsp[yylow0].yystate.yypred; + for (i = yylow0-1; i >= yylow1; i -= 1) + { +#if YYDEBUG + yyvsp[i].yystate.yylrState = s->yylrState; +#endif + yyvsp[i].yystate.yyresolved = s->yyresolved; + if (s->yyresolved) + yyvsp[i].yystate.yysemantics.yysval = s->yysemantics.yysval; + else + /* The effect of using yysval or yyloc (in an immediate rule) is + * undefined. */ + yyvsp[i].yystate.yysemantics.yyfirstVal = YY_NULLPTR; + s = yyvsp[i].yystate.yypred = s->yypred; + } } - break; - case 104: /* const_type */ -{ -#line 78 "src/parser_proc.y" -psi_const_type_free(&(yypminor->yy7)); -#line 1202 "src/parser_proc.c" + +/* Do nothing if YYNORMAL or if *YYLOW <= YYLOW1. Otherwise, fill in + * YYVSP[YYLOW1 .. *YYLOW-1] as in yyfillin and set *YYLOW = YYLOW1. + * For convenience, always return YYLOW1. */ +static inline int yyfill (yyGLRStackItem *, int *, int, yybool) + YY_ATTRIBUTE_UNUSED; +static inline int +yyfill (yyGLRStackItem *yyvsp, int *yylow, int yylow1, yybool yynormal) +{ + if (!yynormal && yylow1 < *yylow) + { + yyfillin (yyvsp, *yylow, yylow1); + *yylow = yylow1; + } + return yylow1; } - break; - case 105: /* constant */ -{ -#line 80 "src/parser_proc.y" -psi_const_free(&(yypminor->yy106)); -#line 1209 "src/parser_proc.c" + +/** Perform user action for rule number YYN, with RHS length YYRHSLEN, + * and top stack item YYVSP. YYLVALP points to place to put semantic + * value ($$), and yylocp points to place for location information + * (@$). Returns yyok for normal return, yyaccept for YYACCEPT, + * yyerr for YYERROR, yyabort for YYABORT. */ +static YYRESULTTAG +yyuserAction (yyRuleNum yyn, size_t yyrhslen, yyGLRStackItem* yyvsp, + yyGLRStack* yystackp, + YYSTYPE* yyvalp, struct psi_parser *P, struct psi_plist *tokens, size_t *index) +{ + yybool yynormal YY_ATTRIBUTE_UNUSED = (yystackp->yysplitPoint == YY_NULLPTR); + int yylow; + YYUSE (yyvalp); + YYUSE (P); + YYUSE (tokens); + YYUSE (index); + YYUSE (yyrhslen); +# undef yyerrok +# define yyerrok (yystackp->yyerrState = 0) +# undef YYACCEPT +# define YYACCEPT return yyaccept +# undef YYABORT +# define YYABORT return yyabort +# undef YYERROR +# define YYERROR return yyerrok, yyerr +# undef YYRECOVERING +# define YYRECOVERING() (yystackp->yyerrState != 0) +# undef yyclearin +# define yyclearin (yychar = YYEMPTY) +# undef YYFILL +# define YYFILL(N) yyfill (yyvsp, &yylow, N, yynormal) +# undef YYBACKUP +# define YYBACKUP(Token, Value) \ + return yyerror (P, tokens, index, YY_("syntax error: cannot back up")), \ + yyerrok, yyerr + + yylow = 1; + if (yyrhslen == 0) + *yyvalp = yyval_default; + else + *yyvalp = yyvsp[YYFILL (1-yyrhslen)].yystate.yysemantics.yysval; + switch (yyn) + { + case 284: +#line 451 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + if ((*(struct psi_cpp_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))) { + psi_cpp_exp_exec((*(struct psi_cpp_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)), P->preproc, PSI_DATA(P)); + psi_cpp_exp_free(&(*(struct psi_cpp_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + } } - break; - case 106: /* decl_typedef */ - case 107: /* decl_typedef_body_ex */ - case 108: /* decl_typedef_body */ - case 111: /* decl_func */ - case 115: /* decl_arg */ - case 118: /* struct_arg */ -{ -#line 82 "src/parser_proc.y" -psi_decl_arg_free(&(yypminor->yy260)); -#line 1221 "src/parser_proc.c" +#line 2796 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 285: +#line 457 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + if (P->file.ln) { + P->error(PSI_DATA(P), (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)), PSI_WARNING, + "Extra 'lib \"%s\"' statement has no effect", (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->text); + } else { + P->file.ln = strndup((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->text, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->size); + } } - break; - case 110: /* decl */ -{ -#line 90 "src/parser_proc.y" -psi_decl_free(&(yypminor->yy71)); -#line 1228 "src/parser_proc.c" +#line 2809 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 286: +#line 465 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + psi_parser_proc_add_const(P, (*(struct psi_const **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } - break; - case 112: /* decl_abi */ -{ -#line 94 "src/parser_proc.y" -psi_decl_abi_free(&(yypminor->yy242)); -#line 1235 "src/parser_proc.c" +#line 2817 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 287: +#line 468 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + psi_parser_proc_add_decl(P, (*(struct psi_decl **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } - break; - case 113: /* decl_var */ -{ -#line 96 "src/parser_proc.y" -psi_decl_var_free(&(yypminor->yy207)); -#line 1242 "src/parser_proc.c" +#line 2825 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 288: +#line 471 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + psi_parser_proc_add_decl_extvars(P, (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } - break; - case 119: /* decl_layout */ -{ -#line 108 "src/parser_proc.y" -psi_layout_free(&(yypminor->yy81)); -#line 1249 "src/parser_proc.c" +#line 2833 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 290: +#line 475 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + psi_parser_proc_add_typedef(P, (*(struct psi_decl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } - break; - case 120: /* decl_type */ - case 121: /* const_decl_type */ -{ -#line 110 "src/parser_proc.y" -psi_decl_type_free(&(yypminor->yy152)); -#line 1257 "src/parser_proc.c" +#line 2841 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 291: +#line 478 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + psi_parser_proc_add_struct(P, (*(struct psi_decl_struct **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } - break; - case 122: /* impl */ -{ -#line 114 "src/parser_proc.y" -psi_impl_free(&(yypminor->yy49)); -#line 1264 "src/parser_proc.c" +#line 2849 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 292: +#line 481 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + psi_parser_proc_add_union(P, (*(struct psi_decl_union **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } - break; - case 123: /* impl_func */ -{ -#line 116 "src/parser_proc.y" -psi_impl_func_free(&(yypminor->yy120)); -#line 1271 "src/parser_proc.c" +#line 2857 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 293: +#line 484 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + psi_parser_proc_add_enum(P, (*(struct psi_decl_enum **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } - break; - case 124: /* impl_def_val */ -{ -#line 118 "src/parser_proc.y" -psi_impl_def_val_free(&(yypminor->yy21)); -#line 1278 "src/parser_proc.c" +#line 2865 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 294: +#line 487 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + psi_parser_proc_add_impl(P, (*(struct psi_impl **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } - break; - case 125: /* impl_var */ -{ -#line 120 "src/parser_proc.y" -psi_impl_var_free(&(yypminor->yy185)); -#line 1285 "src/parser_proc.c" +#line 2873 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 295: +#line 493 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&(*yyvalp))) = (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)); } - break; - case 126: /* impl_arg */ - case 128: /* impl_vararg */ -{ -#line 122 "src/parser_proc.y" -psi_impl_arg_free(&(yypminor->yy238)); -#line 1293 "src/parser_proc.c" +#line 2881 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 296: +#line 499 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_cpp_exp **)(&(*yyvalp))) = NULL; } - break; - case 130: /* impl_stmt */ -{ -#line 130 "src/parser_proc.y" -psi_impl_stmt_free(&(yypminor->yy38)); -#line 1300 "src/parser_proc.c" +#line 2889 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 297: +#line 502 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_cpp_exp **)(&(*yyvalp))) = (*(struct psi_cpp_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)); } - break; - case 131: /* number */ -{ -#line 132 "src/parser_proc.y" -psi_number_free(&(yypminor->yy160)); -#line 1307 "src/parser_proc.c" +#line 2897 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 298: +#line 508 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + if ((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))) { + struct psi_token *msg = NULL; + + if (psi_plist_get((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)), 0, &msg)) { + size_t index = 1; + struct psi_token *next; + + msg = psi_token_copy(msg); + while (psi_plist_get((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)), index++, &next)) { + struct psi_token *old = msg; + msg = psi_token_cat(" ", 2, msg, next); + free(old); + } + } + psi_plist_free((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + + (*(struct psi_cpp_exp **)(&(*yyvalp))) = psi_cpp_exp_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->type, msg); + } else { + (*(struct psi_cpp_exp **)(&(*yyvalp))) = psi_cpp_exp_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->type, NULL); + } + (*(struct psi_cpp_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); } - break; - case 132: /* num_exp */ -{ -#line 134 "src/parser_proc.y" -psi_num_exp_free(&(yypminor->yy39)); -#line 1314 "src/parser_proc.c" -} - break; - case 133: /* let_stmt */ -{ -#line 136 "src/parser_proc.y" -psi_let_stmt_free(&(yypminor->yy139)); -#line 1321 "src/parser_proc.c" -} - break; - case 134: /* let_calloc */ -{ -#line 138 "src/parser_proc.y" -psi_let_calloc_free(&(yypminor->yy17)); -#line 1328 "src/parser_proc.c" +#line 2925 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 299: +#line 531 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_cpp_exp **)(&(*yyvalp))) = psi_cpp_exp_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->type, psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)))); + (*(struct psi_cpp_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); +} +#line 2934 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 300: +#line 535 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_cpp_exp **)(&(*yyvalp))) = psi_cpp_exp_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->type, NULL); + (*(struct psi_cpp_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); +} +#line 2943 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 301: +#line 539 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + (*(struct psi_cpp_exp **)(&(*yyvalp))) = psi_cpp_exp_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->type, psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)))); + (*(struct psi_cpp_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); +} +#line 2953 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 302: +#line 544 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_cpp_exp **)(&(*yyvalp))) = psi_cpp_exp_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->type, (*(struct psi_cpp_macro_decl **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_cpp_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); +} +#line 2962 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 303: +#line 548 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_cpp_exp **)(&(*yyvalp))) = psi_cpp_exp_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->type, (*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_cpp_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); +} +#line 2971 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 304: +#line 552 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_cpp_exp **)(&(*yyvalp))) = psi_cpp_exp_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->type, NULL); + (*(struct psi_cpp_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); +} +#line 2980 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 305: +#line 556 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + psi_plist_free((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_cpp_exp **)(&(*yyvalp))) = NULL; +} +#line 2989 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 329: +#line 610 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-5)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + (*(struct psi_cpp_macro_decl **)(&(*yyvalp))) = psi_cpp_macro_decl_init((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)), (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)), NULL); + (*(struct psi_cpp_macro_decl **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-5)].yystate.yysemantics.yysval))); +} +#line 2999 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 330: +#line 615 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + (*(struct psi_cpp_macro_decl **)(&(*yyvalp))) = psi_cpp_macro_decl_init(NULL, (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)), NULL); + (*(struct psi_cpp_macro_decl **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); +} +#line 3009 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 331: +#line 623 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_init(NULL); } - break; - case 135: /* let_func */ -{ -#line 140 "src/parser_proc.y" -psi_let_func_free(&(yypminor->yy72)); -#line 1335 "src/parser_proc.c" +#line 3017 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 332: +#line 626 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_init(NULL); /* FIXME */ } - break; - case 136: /* callback_arg_list */ - case 137: /* callback_args */ -{ -#line 142 "src/parser_proc.y" -psi_plist_free((yypminor->yy287)); -#line 1343 "src/parser_proc.c" +#line 3025 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 334: +#line 630 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)); } - break; - case 138: /* let_callback */ -{ -#line 146 "src/parser_proc.y" -psi_let_callback_free(&(yypminor->yy164)); -#line 1350 "src/parser_proc.c" +#line 3033 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 335: +#line 636 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)) = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add(psi_plist_init((psi_plist_dtor) psi_token_free), &(*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); +} +#line 3043 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 336: +#line 641 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)) = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)), &(*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); +} +#line 3053 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 337: +#line 649 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = NULL; } - break; - case 139: /* let_exp */ -{ -#line 148 "src/parser_proc.y" -psi_let_exp_free(&(yypminor->yy144)); -#line 1357 "src/parser_proc.c" +#line 3061 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 339: +#line 656 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)) = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add(psi_plist_init((psi_plist_dtor) psi_token_free), &(*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); +} +#line 3070 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 340: +#line 660 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)) = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)), &(*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); +} +#line 3079 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 341: +#line 667 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_num_exp **)(&(*yyvalp))) = psi_num_exp_init_unary((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))->type, (*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + (*(struct psi_num_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))); +} +#line 3088 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 342: +#line 671 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_num_exp **)(&(*yyvalp))) = psi_num_exp_init_unary((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->type, (*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_num_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); +} +#line 3097 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 343: +#line 675 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_num_exp **)(&(*yyvalp))) = psi_num_exp_init_binary((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->type, (*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)), (*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_num_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); +} +#line 3106 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 344: +#line 679 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_num_exp **)(&(*yyvalp))) = psi_num_exp_init_ternary((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))->type, (*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval)), (*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)), (*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_num_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))); +} +#line 3115 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 345: +#line 684 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + { + uint8_t exists; + + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + exists = psi_cpp_defined(P->preproc, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_num_exp **)(&(*yyvalp))) = psi_num_exp_init_num(psi_number_init(PSI_T_UINT8, &exists, 0)); + (*(struct psi_num_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + } } - break; - case 141: /* set_stmt */ -{ -#line 152 "src/parser_proc.y" -psi_set_stmt_free(&(yypminor->yy226)); -#line 1364 "src/parser_proc.c" +#line 3130 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 346: +#line 694 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + { + uint8_t exists; + + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + exists = psi_cpp_defined(P->preproc, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + (*(struct psi_num_exp **)(&(*yyvalp))) = psi_num_exp_init_num(psi_number_init(PSI_T_UINT8, &exists, 0)); + (*(struct psi_num_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + } } - break; - case 142: /* set_exp */ -{ -#line 154 "src/parser_proc.y" -psi_set_exp_free(&(yypminor->yy67)); -#line 1371 "src/parser_proc.c" +#line 3145 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 347: +#line 704 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_num_exp **)(&(*yyvalp))) = psi_num_exp_init_num(psi_number_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->text, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->flags)); + (*(struct psi_num_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_num_exp **)(&(*yyvalp)))->data.n->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); +} +#line 3155 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 348: +#line 709 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_num_exp **)(&(*yyvalp))) = psi_num_exp_init_num(psi_number_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->text, 0)); + (*(struct psi_num_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_num_exp **)(&(*yyvalp)))->data.n->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); +} +#line 3165 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 349: +#line 714 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_num_exp **)(&(*yyvalp))) = psi_num_exp_init_num((*(struct psi_number **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_num_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_number **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->token); +} +#line 3174 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 350: +#line 718 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + (*(struct psi_num_exp **)(&(*yyvalp))) = psi_num_exp_init_num(psi_number_init(PSI_T_DEFINE, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->text, 0)); + (*(struct psi_num_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_num_exp **)(&(*yyvalp)))->data.n->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); +} +#line 3185 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 351: +#line 724 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + (*(struct psi_num_exp **)(&(*yyvalp))) = psi_num_exp_init_num(psi_number_init(PSI_T_FUNCTION, + psi_cpp_macro_call_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))->text, (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))), 0)); + (*(struct psi_num_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))); +} +#line 3196 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 352: +#line 733 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = NULL; } - break; - case 144: /* set_func */ -{ -#line 158 "src/parser_proc.y" -psi_set_func_free(&(yypminor->yy78)); -#line 1378 "src/parser_proc.c" +#line 3204 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 354: +#line 740 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add(psi_plist_init((psi_plist_dtor) psi_num_exp_free), + &(*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); +} +#line 3213 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 355: +#line 744 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)), &(*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } - break; - case 145: /* return_stmt */ -{ -#line 160 "src/parser_proc.y" -psi_return_stmt_free(&(yypminor->yy130)); -#line 1385 "src/parser_proc.c" +#line 3221 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 356: +#line 750 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_const **)(&(*yyvalp))) = psi_const_init((*(struct psi_const_type **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval)), (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))->text, (*(struct psi_impl_def_val **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + (*(struct psi_const **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))); +} +#line 3230 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 357: +#line 757 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_const_type **)(&(*yyvalp))) = psi_const_type_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->text); } - break; - case 146: /* free_stmt */ -{ -#line 162 "src/parser_proc.y" -psi_free_stmt_free(&(yypminor->yy76)); -#line 1392 "src/parser_proc.c" +#line 3238 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 362: +#line 770 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_impl_def_val **)(&(*yyvalp))) = NULL; } - break; - case 148: /* free_exp */ -{ -#line 166 "src/parser_proc.y" -psi_free_exp_free(&(yypminor->yy197)); -#line 1399 "src/parser_proc.c" +#line 3246 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 363: +#line 773 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + /* FIXME */ + if (psi_num_exp_validate(PSI_DATA(P), (*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)), NULL, NULL, NULL, NULL, NULL)) { + impl_val res = {0}; + token_t type = psi_num_exp_exec((*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)), &res, NULL, &P->preproc->defs); + + if (type == PSI_T_FLOAT || type == PSI_T_DOUBLE) { + (*(struct psi_impl_def_val **)(&(*yyvalp))) = psi_impl_def_val_init(type, NULL); + } else { + (*(struct psi_impl_def_val **)(&(*yyvalp))) = psi_impl_def_val_init(PSI_T_INT, NULL); + } + + switch (type) { + case PSI_T_UINT8: (*(struct psi_impl_def_val **)(&(*yyvalp)))->ival.zend.lval = res.u8; break; + case PSI_T_UINT16: (*(struct psi_impl_def_val **)(&(*yyvalp)))->ival.zend.lval = res.u16; break; + case PSI_T_UINT32: (*(struct psi_impl_def_val **)(&(*yyvalp)))->ival.zend.lval = res.u32; break; + case PSI_T_UINT64: (*(struct psi_impl_def_val **)(&(*yyvalp)))->ival.zend.lval = res.u64; break; /* FIXME */ + case PSI_T_INT8: (*(struct psi_impl_def_val **)(&(*yyvalp)))->ival.zend.lval = res.i8; break; + case PSI_T_INT16: (*(struct psi_impl_def_val **)(&(*yyvalp)))->ival.zend.lval = res.i16; break; + case PSI_T_INT32: (*(struct psi_impl_def_val **)(&(*yyvalp)))->ival.zend.lval = res.i32; break; + case PSI_T_INT64: (*(struct psi_impl_def_val **)(&(*yyvalp)))->ival.zend.lval = res.i64; break; + case PSI_T_FLOAT: (*(struct psi_impl_def_val **)(&(*yyvalp)))->ival.dval = res.fval; break; + case PSI_T_DOUBLE: (*(struct psi_impl_def_val **)(&(*yyvalp)))->ival.dval = res.dval; break; + default: + assert(0); + + } + } else { + (*(struct psi_impl_def_val **)(&(*yyvalp))) = NULL; + } + psi_num_exp_free(&(*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } - break; - case 149: /* impl_type */ -{ -#line 168 "src/parser_proc.y" -psi_impl_type_free(&(yypminor->yy142)); -#line 1406 "src/parser_proc.c" +#line 3283 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 364: +#line 805 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_impl_def_val **)(&(*yyvalp))) = psi_impl_def_val_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->text); + (*(struct psi_impl_def_val **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); +} +#line 3292 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 369: +#line 819 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_arg **)(&(*yyvalp))) = (*(struct psi_decl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)); } - break; -/********* End destructor definitions *****************************************/ - default: break; /* If no destructor action specified: do nothing */ - } +#line 3300 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 370: +#line 822 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_arg **)(&(*yyvalp))) = psi_decl_arg_init( + psi_decl_type_init(PSI_T_VOID, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))->text), + psi_decl_var_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->text, 0, 0) + ); + (*(struct psi_decl_arg **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->var->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); +} +#line 3314 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 371: +#line 831 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_arg **)(&(*yyvalp))) = (*(struct psi_decl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)); } +#line 3322 "src/parser_proc.c" /* glr.c:816 */ + break; -/* -** Pop the parser's stack once. -** -** If there is a destructor routine associated with the token which -** is popped from the stack, then call it. -*/ -static void yy_pop_parser_stack(yyParser *pParser){ - yyStackEntry *yytos; - assert( pParser->yytos!=0 ); - assert( pParser->yytos > pParser->yystack ); - yytos = pParser->yytos--; -#ifndef NDEBUG - if( yyTraceFILE ){ - fprintf(yyTraceFILE,"%sPopping %s\n", - yyTracePrompt, - yyTokenName[yytos->major]); - } -#endif - yy_destructor(pParser, yytos->major, &yytos->minor); + case 372: +#line 837 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_arg **)(&(*yyvalp))) = (*(struct psi_decl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); } +#line 3330 "src/parser_proc.c" /* glr.c:816 */ + break; -/* -** Clear all secondary memory allocations from the parser -*/ -void ParseFinalize(void *p){ - yyParser *pParser = (yyParser*)p; - while( pParser->yytos>pParser->yystack ) yy_pop_parser_stack(pParser); -#if YYSTACKDEPTH<=0 - if( pParser->yystack!=&pParser->yystk0 ) free(pParser->yystack); -#endif + case 373: +#line 840 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_arg **)(&(*yyvalp))) = (*(struct psi_decl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); } +#line 3338 "src/parser_proc.c" /* glr.c:816 */ + break; -#ifndef Parse_ENGINEALWAYSONSTACK -/* -** Deallocate and destroy a parser. Destructors are called for -** all stack elements before shutting the parser down. -** -** If the YYPARSEFREENEVERNULL macro exists (for example because it -** is defined in a %include section of the input grammar) then it is -** assumed that the input pointer is never NULL. -*/ -void ParseFree( - void *p, /* The parser to be deleted */ - void (*freeProc)(void*) /* Function used to reclaim memory */ -){ -#ifndef YYPARSEFREENEVERNULL - if( p==0 ) return; -#endif - ParseFinalize(p); - (*freeProc)(p); + case 374: +#line 846 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_arg **)(&(*yyvalp))) = (*(struct psi_decl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); } -#endif /* Parse_ENGINEALWAYSONSTACK */ +#line 3346 "src/parser_proc.c" /* glr.c:816 */ + break; -/* -** Return the peak depth of the stack for a parser. -*/ -#ifdef YYTRACKMAXSTACKDEPTH -int ParseStackPeak(void *p){ - yyParser *pParser = (yyParser*)p; - return pParser->yyhwm; + case 375: +#line 849 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_arg **)(&(*yyvalp))) = (*(struct psi_decl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); } -#endif +#line 3354 "src/parser_proc.c" /* glr.c:816 */ + break; -/* -** Find the appropriate action for a parser given the terminal -** look-ahead token iLookAhead. -*/ -static unsigned int yy_find_shift_action( - yyParser *pParser, /* The parser */ - YYCODETYPE iLookAhead /* The look-ahead token */ -){ - int i; - int stateno = pParser->yytos->stateno; - - if( stateno>=YY_MIN_REDUCE ) return stateno; - assert( stateno <= YY_SHIFT_COUNT ); - do{ - i = yy_shift_ofst[stateno]; - assert( iLookAhead!=YYNOCODE ); - i += iLookAhead; - if( i<0 || i>=YY_ACTTAB_COUNT || yy_lookahead[i]!=iLookAhead ){ -#ifdef YYFALLBACK - YYCODETYPE iFallback; /* Fallback token */ - if( iLookAhead %s\n", - yyTracePrompt, yyTokenName[iLookAhead], yyTokenName[iFallback]); - } -#endif - assert( yyFallback[iFallback]==0 ); /* Fallback loop must terminate */ - iLookAhead = iFallback; - continue; - } -#endif -#ifdef YYWILDCARD - { - int j = i - iLookAhead + YYWILDCARD; - if( -#if YY_SHIFT_MIN+YYWILDCARD<0 - j>=0 && -#endif -#if YY_SHIFT_MAX+YYWILDCARD>=YY_ACTTAB_COUNT - j0 - ){ -#ifndef NDEBUG - if( yyTraceFILE ){ - fprintf(yyTraceFILE, "%sWILDCARD %s => %s\n", - yyTracePrompt, yyTokenName[iLookAhead], - yyTokenName[YYWILDCARD]); - } -#endif /* NDEBUG */ - return yy_action[j]; - } - } -#endif /* YYWILDCARD */ - return yy_default[stateno]; - }else{ - return yy_action[i]; - } - }while(1); + case 377: +#line 856 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_arg **)(&(*yyvalp))) = psi_decl_arg_init( + psi_decl_type_init(PSI_T_FUNCTION, (*(struct psi_decl **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->func->var->name), + psi_decl_var_copy((*(struct psi_decl **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->func->var) + ); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->token = psi_token_copy((*(struct psi_decl **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->func->token); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->real.func = (*(struct psi_decl **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); +} +#line 3367 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 378: +#line 864 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + (*(struct psi_decl_arg **)(&(*yyvalp))) = psi_decl_arg_init( + psi_decl_type_init(PSI_T_ENUM, (*(struct psi_decl_enum **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->name), + psi_decl_var_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->text, 0, 0) + ); + (*(struct psi_decl_arg **)(&(*yyvalp)))->var->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->token = psi_token_copy((*(struct psi_decl_enum **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->token); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->real.enm = (*(struct psi_decl_enum **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)); + psi_parser_proc_add_enum(P, (*(struct psi_decl_enum **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); +} +#line 3383 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 379: +#line 875 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_arg **)(&(*yyvalp))) = psi_decl_arg_init(psi_decl_type_init(PSI_T_STRUCT, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))->text), (*(struct psi_decl_var **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->token = (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval)); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->real.strct = psi_decl_struct_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))->text, (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->real.strct->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->real.strct->align = (*(struct psi_layout*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)).pos; + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->real.strct->size = (*(struct psi_layout*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)).len; + psi_parser_proc_add_struct(P, (*(struct psi_decl_arg **)(&(*yyvalp)))->type->real.strct); +} +#line 3397 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 380: +#line 884 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_arg **)(&(*yyvalp))) = psi_decl_arg_init(psi_decl_type_init(PSI_T_UNION, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))->text), (*(struct psi_decl_var **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->token = (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval)); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->real.unn = psi_decl_union_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))->text, (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->real.unn->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->real.unn->align = (*(struct psi_layout*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)).pos; + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->real.unn->size = (*(struct psi_layout*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)).len; + psi_parser_proc_add_union(P, (*(struct psi_decl_arg **)(&(*yyvalp)))->type->real.unn); +} +#line 3411 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 382: +#line 897 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_arg **)(&(*yyvalp))) = psi_decl_arg_init((*(struct psi_decl_type **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)), psi_decl_var_init(NULL, 0, 0)); + (*(struct psi_decl_arg **)(&(*yyvalp)))->var->token = psi_token_copy((*(struct psi_decl_type **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->token); +} +#line 3420 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 383: +#line 901 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_arg **)(&(*yyvalp))) = psi_decl_arg_init( + psi_decl_type_init(PSI_T_ENUM, (*(struct psi_decl_enum **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->name), + psi_decl_var_init(NULL, 0, 0) + ); + (*(struct psi_decl_arg **)(&(*yyvalp)))->var->token = psi_token_copy((*(struct psi_decl_enum **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->token); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->token = psi_token_copy((*(struct psi_decl_enum **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->token); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->real.enm = (*(struct psi_decl_enum **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); + psi_parser_proc_add_enum(P, (*(struct psi_decl_enum **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); +} +#line 3435 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 384: +#line 911 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_arg **)(&(*yyvalp))) = psi_decl_arg_init(psi_decl_type_init(PSI_T_STRUCT, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))->text), psi_decl_var_init(NULL, 0, 0)); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->token = (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->real.strct = psi_decl_struct_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))->text, (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->real.strct->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->real.strct->align = (*(struct psi_layout*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)).pos; + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->real.strct->size = (*(struct psi_layout*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)).len; + psi_parser_proc_add_struct(P, (*(struct psi_decl_arg **)(&(*yyvalp)))->type->real.strct); +} +#line 3449 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 385: +#line 920 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_arg **)(&(*yyvalp))) = psi_decl_arg_init(psi_decl_type_init(PSI_T_UNION, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))->text), psi_decl_var_init(NULL, 0, 0)); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->token = (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->real.unn = psi_decl_union_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))->text, (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->real.unn->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->real.unn->align = (*(struct psi_layout*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)).pos; + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->real.unn->size = (*(struct psi_layout*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)).len; + psi_parser_proc_add_union(P, (*(struct psi_decl_arg **)(&(*yyvalp)))->type->real.unn); +} +#line 3463 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 386: +#line 932 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_type **)(&(*yyvalp))) = (*(struct psi_decl_type **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); } +#line 3471 "src/parser_proc.c" /* glr.c:816 */ + break; -/* -** Find the appropriate action for a parser given the non-terminal -** look-ahead token iLookAhead. -*/ -static int yy_find_reduce_action( - int stateno, /* Current state number */ - YYCODETYPE iLookAhead /* The look-ahead token */ -){ - int i; -#ifdef YYERRORSYMBOL - if( stateno>YY_REDUCE_COUNT ){ - return yy_default[stateno]; - } -#else - assert( stateno<=YY_REDUCE_COUNT ); -#endif - i = yy_reduce_ofst[stateno]; - assert( i!=YY_REDUCE_USE_DFLT ); - assert( iLookAhead!=YYNOCODE ); - i += iLookAhead; -#ifdef YYERRORSYMBOL - if( i<0 || i>=YY_ACTTAB_COUNT || yy_lookahead[i]!=iLookAhead ){ - return yy_default[stateno]; - } -#else - assert( i>=0 && iyytos>yypParser->yystack ) yy_pop_parser_stack(yypParser); - /* Here code is inserted which will execute if the parser - ** stack every overflows */ -/******** Begin %stack_overflow code ******************************************/ -/******** End %stack_overflow code ********************************************/ - ParseARG_STORE; /* Suppress warning about unused %extra_argument var */ -} - -/* -** Print tracing information for a SHIFT action -*/ -#ifndef NDEBUG -static void yyTraceShift(yyParser *yypParser, int yyNewState){ - if( yyTraceFILE ){ - if( yyNewStateyytos->major], - yyNewState); - }else{ - fprintf(yyTraceFILE,"%sShift '%s'\n", - yyTracePrompt,yyTokenName[yypParser->yytos->major]); - } - } + case 387: +#line 935 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_type **)(&(*yyvalp))) = (*(struct psi_decl_type **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); } -#else -# define yyTraceShift(X,Y) -#endif +#line 3479 "src/parser_proc.c" /* glr.c:816 */ + break; -/* -** Perform a shift action. -*/ -static void yy_shift( - yyParser *yypParser, /* The parser to be shifted */ - int yyNewState, /* The new state to shift in */ - int yyMajor, /* The major token to shift in */ - ParseTOKENTYPE yyMinor /* The minor token to shift in */ -){ - yyStackEntry *yytos; - yypParser->yytos++; -#ifdef YYTRACKMAXSTACKDEPTH - if( (int)(yypParser->yytos - yypParser->yystack)>yypParser->yyhwm ){ - yypParser->yyhwm++; - assert( yypParser->yyhwm == (int)(yypParser->yytos - yypParser->yystack) ); - } -#endif -#if YYSTACKDEPTH>0 - if( yypParser->yytos>=&yypParser->yystack[YYSTACKDEPTH] ){ - yypParser->yytos--; - yyStackOverflow(yypParser); - return; - } -#else - if( yypParser->yytos>=&yypParser->yystack[yypParser->yystksz] ){ - if( yyGrowStack(yypParser) ){ - yypParser->yytos--; - yyStackOverflow(yypParser); - return; - } - } -#endif - if( yyNewState > YY_MAX_SHIFT ){ - yyNewState += YY_MIN_REDUCE - YY_MIN_SHIFTREDUCE; - } - yytos = yypParser->yytos; - yytos->stateno = (YYACTIONTYPE)yyNewState; - yytos->major = (YYCODETYPE)yyMajor; - yytos->minor.yy0 = yyMinor; - yyTraceShift(yypParser, yyNewState); -} - -/* The following table contains information about every rule that -** is used during the reduce. -*/ -static const struct { - YYCODETYPE lhs; /* Symbol on the left-hand side of the rule */ - unsigned char nrhs; /* Number of right-hand side symbols in the rule */ -} yyRuleInfo[] = { - { 155, 3 }, - { 155, 1 }, - { 155, 1 }, - { 155, 1 }, - { 155, 1 }, - { 155, 1 }, - { 155, 1 }, - { 155, 1 }, - { 156, 0 }, - { 156, 1 }, - { 102, 0 }, - { 102, 7 }, - { 157, 2 }, - { 158, 2 }, - { 159, 2 }, - { 96, 4 }, - { 97, 1 }, - { 97, 3 }, - { 98, 3 }, - { 98, 1 }, - { 99, 3 }, - { 100, 1 }, - { 100, 1 }, - { 101, 4 }, - { 103, 4 }, - { 104, 1 }, - { 105, 6 }, - { 106, 3 }, - { 107, 4 }, - { 107, 4 }, - { 107, 2 }, - { 108, 1 }, - { 109, 3 }, - { 108, 2 }, - { 108, 1 }, - { 110, 6 }, - { 110, 8 }, - { 111, 1 }, - { 111, 2 }, - { 108, 7 }, - { 108, 8 }, - { 112, 1 }, - { 160, 0 }, - { 160, 3 }, - { 113, 2 }, - { 113, 3 }, - { 114, 1 }, - { 114, 3 }, - { 115, 2 }, - { 108, 7 }, - { 115, 3 }, - { 115, 4 }, - { 116, 0 }, - { 116, 1 }, - { 116, 1 }, - { 116, 3 }, - { 117, 1 }, - { 117, 2 }, - { 118, 2 }, - { 118, 3 }, - { 119, 0 }, - { 119, 7 }, - { 161, 1 }, - { 161, 2 }, - { 162, 0 }, - { 162, 1 }, - { 161, 1 }, - { 161, 2 }, - { 163, 0 }, - { 163, 1 }, - { 163, 2 }, - { 164, 0 }, - { 164, 1 }, - { 120, 2 }, - { 120, 2 }, - { 120, 1 }, - { 120, 1 }, - { 120, 1 }, - { 120, 2 }, - { 120, 2 }, - { 120, 2 }, - { 120, 1 }, - { 121, 1 }, - { 121, 2 }, - { 122, 4 }, - { 122, 5 }, - { 123, 7 }, - { 123, 8 }, - { 123, 13 }, - { 124, 1 }, - { 125, 2 }, - { 149, 1 }, - { 126, 2 }, - { 126, 4 }, - { 127, 1 }, - { 127, 3 }, - { 129, 1 }, - { 129, 2 }, - { 130, 1 }, - { 130, 1 }, - { 130, 1 }, - { 130, 1 }, - { 131, 1 }, - { 131, 1 }, - { 132, 1 }, - { 132, 3 }, - { 132, 3 }, - { 132, 2 }, - { 139, 1 }, - { 139, 2 }, - { 139, 1 }, - { 139, 1 }, - { 139, 2 }, - { 139, 1 }, - { 139, 2 }, - { 139, 1 }, - { 139, 2 }, - { 139, 3 }, - { 133, 3 }, - { 133, 6 }, - { 138, 8 }, - { 134, 6 }, - { 135, 4 }, - { 135, 6 }, - { 140, 1 }, - { 140, 3 }, - { 136, 0 }, - { 136, 1 }, - { 137, 1 }, - { 137, 3 }, - { 165, 1 }, - { 165, 1 }, - { 144, 4 }, - { 144, 6 }, - { 144, 6 }, - { 142, 1 }, - { 142, 1 }, - { 143, 1 }, - { 143, 3 }, - { 142, 3 }, - { 141, 3 }, - { 145, 3 }, - { 146, 3 }, - { 147, 1 }, - { 147, 3 }, - { 148, 4 }, - { 150, 0 }, - { 150, 1 }, - { 151, 0 }, - { 151, 1 }, - { 152, 1 }, - { 152, 2 }, - { 153, 1 }, - { 154, 1 }, - { 154, 2 }, - { 155, 1 }, - { 155, 1 }, -}; + case 389: +#line 942 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_type **)(&(*yyvalp))) = psi_decl_type_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->text); + (*(struct psi_decl_type **)(&(*yyvalp)))->token = (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); +} +#line 3488 "src/parser_proc.c" /* glr.c:816 */ + break; -static void yy_accept(yyParser*); /* Forward Declaration */ - -/* -** Perform a reduce action and the shift that must immediately -** follow the reduce. -*/ -static void yy_reduce( - yyParser *yypParser, /* The parser */ - unsigned int yyruleno /* Number of the rule by which to reduce */ -){ - int yygoto; /* The next state */ - int yyact; /* The next action */ - yyStackEntry *yymsp; /* The top of the parser's stack */ - int yysize; /* Amount to pop the stack */ - ParseARG_FETCH; - yymsp = yypParser->yytos; -#ifndef NDEBUG - if( yyTraceFILE && yyruleno<(int)(sizeof(yyRuleName)/sizeof(yyRuleName[0])) ){ - yysize = yyRuleInfo[yyruleno].nrhs; - fprintf(yyTraceFILE, "%sReduce [%s], go to state %d.\n", yyTracePrompt, - yyRuleName[yyruleno], yymsp[-yysize].stateno); - } -#endif /* NDEBUG */ - - /* Check that the stack is large enough to grow by a single entry - ** if the RHS of the rule is empty. This ensures that there is room - ** enough on the stack to push the LHS value */ - if( yyRuleInfo[yyruleno].nrhs==0 ){ -#ifdef YYTRACKMAXSTACKDEPTH - if( (int)(yypParser->yytos - yypParser->yystack)>yypParser->yyhwm ){ - yypParser->yyhwm++; - assert( yypParser->yyhwm == (int)(yypParser->yytos - yypParser->yystack)); - } -#endif -#if YYSTACKDEPTH>0 - if( yypParser->yytos>=&yypParser->yystack[YYSTACKDEPTH-1] ){ - yyStackOverflow(yypParser); - return; - } -#else - if( yypParser->yytos>=&yypParser->yystack[yypParser->yystksz-1] ){ - if( yyGrowStack(yypParser) ){ - yyStackOverflow(yypParser); - return; - } - yymsp = yypParser->yytos; - } -#endif - } + case 391: +#line 950 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + (*(struct psi_decl_type **)(&(*yyvalp))) = psi_decl_type_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->text); + (*(struct psi_decl_type **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); +} +#line 3498 "src/parser_proc.c" /* glr.c:816 */ + break; - switch( yyruleno ){ - /* Beginning here are the reduction cases. A typical example - ** follows: - ** case 0: - ** #line - ** { ... } // User supplied code - ** #line - ** break; - */ -/********** Begin reduce actions **********************************************/ - YYMINORTYPE yylhsminor; - case 0: /* block ::= LIB QUOTED_STRING EOS */ -#line 177 "src/parser_proc.y" -{ - if (P->file.ln) { - P->error(PSI_DATA(P), yymsp[-2].minor.yy0, PSI_WARNING, "Extra 'lib %s' statement has no effect", yymsp[-1].minor.yy0->text); - } else { - P->file.ln = strndup(yymsp[-1].minor.yy0->text + 1, yymsp[-1].minor.yy0->size - 2); - } - free(yymsp[-1].minor.yy0); - free(yymsp[-2].minor.yy0); -} -#line 1889 "src/parser_proc.c" - yy_destructor(yypParser,71,&yymsp[0].minor); - break; - case 1: /* block ::= decl */ -#line 186 "src/parser_proc.y" -{ - if (!P->decls) { - P->decls = psi_plist_init((psi_plist_dtor) psi_decl_free); - } - P->decls = psi_plist_add(P->decls, &yymsp[0].minor.yy71); -} -#line 1900 "src/parser_proc.c" - break; - case 2: /* block ::= impl */ -#line 192 "src/parser_proc.y" -{ - if (!P->impls) { - P->impls = psi_plist_init((psi_plist_dtor) psi_impl_free); - } - P->impls = psi_plist_add(P->impls, &yymsp[0].minor.yy49); -} -#line 1910 "src/parser_proc.c" - break; - case 3: /* block ::= decl_typedef */ -#line 198 "src/parser_proc.y" -{ - if (!P->types) { - P->types = psi_plist_init((psi_plist_dtor) psi_decl_arg_free); - } - P->types = psi_plist_add(P->types, &yymsp[0].minor.yy260); - switch (yymsp[0].minor.yy260->type->type) { - case PSI_T_STRUCT: - if (yymsp[0].minor.yy260->type->real.strct) { - if (!P->structs) { - P->structs = psi_plist_init((psi_plist_dtor) psi_decl_struct_free); - } - P->structs = psi_plist_add(P->structs, &yymsp[0].minor.yy260->type->real.strct); - } - break; - case PSI_T_UNION: - if (yymsp[0].minor.yy260->type->real.unn) { - if (!P->unions) { - P->unions = psi_plist_init((psi_plist_dtor) psi_decl_union_free); - } - P->unions = psi_plist_add(P->unions, &yymsp[0].minor.yy260->type->real.unn); - } - break; - case PSI_T_ENUM: - if (yymsp[0].minor.yy260->type->real.enm) { - if (!P->enums) { - P->enums = psi_plist_init((psi_plist_dtor) psi_decl_enum_free); - } - P->enums = psi_plist_add(P->enums, &yymsp[0].minor.yy260->type->real.enm); - } - break; - } + case 392: +#line 955 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + (*(struct psi_decl_type **)(&(*yyvalp))) = psi_decl_type_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->text); + (*(struct psi_decl_type **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); +} +#line 3508 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 393: +#line 960 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + (*(struct psi_decl_type **)(&(*yyvalp))) = psi_decl_type_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->text); + (*(struct psi_decl_type **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); +} +#line 3518 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 396: +#line 970 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&(*yyvalp))) = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 1946 "src/parser_proc.c" - break; - case 4: /* block ::= constant */ -#line 230 "src/parser_proc.y" -{ - if (!P->consts) { - P->consts = psi_plist_init((psi_plist_dtor) psi_const_free); - } - P->consts = psi_plist_add(P->consts, &yymsp[0].minor.yy106); +#line 3526 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 397: +#line 976 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&(*yyvalp))) = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 1956 "src/parser_proc.c" - break; - case 5: /* block ::= decl_struct */ -#line 236 "src/parser_proc.y" -{ - if (!P->structs) { - P->structs = psi_plist_init((psi_plist_dtor) psi_decl_struct_free); - } - P->structs = psi_plist_add(P->structs, &yymsp[0].minor.yy271); +#line 3534 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 398: +#line 979 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&(*yyvalp))) = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 1966 "src/parser_proc.c" - break; - case 6: /* block ::= decl_union */ -#line 242 "src/parser_proc.y" -{ - if (!P->unions) { - P->unions = psi_plist_init((psi_plist_dtor) psi_decl_union_free); - } - P->unions = psi_plist_add(P->unions, &yymsp[0].minor.yy19); +#line 3542 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 399: +#line 982 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&(*yyvalp))) = psi_token_cat(" ", 2, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)), (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 1976 "src/parser_proc.c" - break; - case 7: /* block ::= decl_enum */ -#line 248 "src/parser_proc.y" -{ - if (!P->enums) { - P->enums = psi_plist_init((psi_plist_dtor) psi_decl_enum_free); - } - P->enums = psi_plist_add(P->enums, &yymsp[0].minor.yy279); +#line 3550 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 402: +#line 993 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&(*yyvalp))) = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 1986 "src/parser_proc.c" - break; - case 8: /* optional_name ::= */ - case 42: /* decl_var_array_size ::= */ yytestcase(yyruleno==42); - case 64: /* decl_scalar_type_short ::= */ yytestcase(yyruleno==64); - case 68: /* decl_scalar_type_long ::= */ yytestcase(yyruleno==68); - case 71: /* decl_scalar_type_long_long ::= */ yytestcase(yyruleno==71); -#line 254 "src/parser_proc.y" -{ - yymsp[1].minor.yy0 = NULL; +#line 3558 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 403: +#line 996 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&(*yyvalp))) = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 1997 "src/parser_proc.c" - break; - case 9: /* optional_name ::= NAME */ - case 62: /* decl_scalar_type ::= CHAR */ yytestcase(yyruleno==62); - case 65: /* decl_scalar_type_short ::= INT */ yytestcase(yyruleno==65); - case 66: /* decl_scalar_type ::= INT */ yytestcase(yyruleno==66); - case 69: /* decl_scalar_type_long ::= DOUBLE */ yytestcase(yyruleno==69); - case 72: /* decl_scalar_type_long_long ::= INT */ yytestcase(yyruleno==72); - case 130: /* callback_rval ::= ZVAL|OBJVAL|ARRVAL|PATHVAL|STRLEN|STRVAL|FLOATVAL|INTVAL|BOOLVAL|COUNT */ yytestcase(yyruleno==130); - case 131: /* callback_rval ::= VOID */ yytestcase(yyruleno==131); -#line 257 "src/parser_proc.y" -{ - yylhsminor.yy0 = yymsp[0].minor.yy0; +#line 3566 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 404: +#line 999 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&(*yyvalp))) = psi_token_cat(" ", 2, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)), (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2011 "src/parser_proc.c" - yymsp[0].minor.yy0 = yylhsminor.yy0; - break; - case 10: /* align_and_size ::= */ -#line 260 "src/parser_proc.y" -{ - yymsp[1].minor.yy323.pos = 0; - yymsp[1].minor.yy323.len = 0; +#line 3574 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 405: +#line 1005 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&(*yyvalp))) = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2020 "src/parser_proc.c" - break; - case 11: /* align_and_size ::= COLON COLON LPAREN NUMBER COMMA NUMBER RPAREN */ -{ yy_destructor(yypParser,72,&yymsp[-6].minor); -#line 264 "src/parser_proc.y" -{ - yymsp[-6].minor.yy323.pos = atol(yymsp[-3].minor.yy0->text); - yymsp[-6].minor.yy323.len = atol(yymsp[-1].minor.yy0->text); - free(yymsp[-3].minor.yy0); - free(yymsp[-1].minor.yy0); +#line 3582 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 406: +#line 1008 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&(*yyvalp))) = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2031 "src/parser_proc.c" - yy_destructor(yypParser,72,&yymsp[-5].minor); - yy_destructor(yypParser,73,&yymsp[-4].minor); - yy_destructor(yypParser,74,&yymsp[-2].minor); - yy_destructor(yypParser,75,&yymsp[0].minor); +#line 3590 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 407: +#line 1011 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + if ((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))) { + (*(struct psi_token **)(&(*yyvalp))) = psi_token_cat(" ", 2, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)), (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + free((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + } else { + (*(struct psi_token **)(&(*yyvalp))) = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + } } - break; - case 12: /* enum_name ::= ENUM optional_name */ - case 13: /* struct_name ::= STRUCT optional_name */ yytestcase(yyruleno==13); - case 14: /* union_name ::= UNION optional_name */ yytestcase(yyruleno==14); -#line 270 "src/parser_proc.y" -{ - if (yymsp[0].minor.yy0) { - yylhsminor.yy0 = yymsp[0].minor.yy0; - free(yymsp[-1].minor.yy0); - } else { - char digest[17]; - psi_token_hash(yymsp[-1].minor.yy0, digest); - yylhsminor.yy0 = psi_token_translit(psi_token_append(yymsp[-1].minor.yy0, 1, digest), " ", "@"); - } +#line 3603 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 408: +#line 1019 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + if ((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))) { + (*(struct psi_token **)(&(*yyvalp))) = psi_token_cat(" ", 2, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)), (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + free((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + free((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + } else { + (*(struct psi_token **)(&(*yyvalp))) = (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)); + } } -#line 2052 "src/parser_proc.c" - yymsp[-1].minor.yy0 = yylhsminor.yy0; - break; - case 15: /* decl_enum ::= enum_name LBRACE decl_enum_items RBRACE */ -#line 300 "src/parser_proc.y" -{ - yylhsminor.yy279 = psi_decl_enum_init(yymsp[-3].minor.yy0->text, yymsp[-1].minor.yy303); - yylhsminor.yy279->token = yymsp[-3].minor.yy0; +#line 3617 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 409: +#line 1031 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&(*yyvalp))) = NULL; } -#line 2061 "src/parser_proc.c" - yy_destructor(yypParser,79,&yymsp[-2].minor); - yy_destructor(yypParser,80,&yymsp[0].minor); - yymsp[-3].minor.yy279 = yylhsminor.yy279; - break; - case 16: /* decl_enum_items ::= decl_enum_item */ -#line 304 "src/parser_proc.y" -{ - yylhsminor.yy303 = psi_plist_add(psi_plist_init((psi_plist_dtor) psi_decl_enum_item_free), - &yymsp[0].minor.yy69); +#line 3625 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 410: +#line 1034 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&(*yyvalp))) = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2072 "src/parser_proc.c" - yymsp[0].minor.yy303 = yylhsminor.yy303; - break; - case 17: /* decl_enum_items ::= decl_enum_items COMMA decl_enum_item */ -#line 308 "src/parser_proc.y" -{ - yylhsminor.yy303 = psi_plist_add(yymsp[-2].minor.yy303, &yymsp[0].minor.yy69); +#line 3633 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 411: +#line 1037 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&(*yyvalp))) = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2080 "src/parser_proc.c" - yy_destructor(yypParser,74,&yymsp[-1].minor); - yymsp[-2].minor.yy303 = yylhsminor.yy303; - break; - case 18: /* decl_enum_item ::= NAME EQUALS num_exp */ -#line 311 "src/parser_proc.y" -{ - yylhsminor.yy69 = psi_decl_enum_item_init(yymsp[-2].minor.yy0->text, yymsp[0].minor.yy39); - yylhsminor.yy69->token = yymsp[-2].minor.yy0; +#line 3641 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 412: +#line 1040 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + if ((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))) { + (*(struct psi_token **)(&(*yyvalp))) = psi_token_cat(" ", 2, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)), (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + } else { + (*(struct psi_token **)(&(*yyvalp))) = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + } } -#line 2090 "src/parser_proc.c" - yy_destructor(yypParser,81,&yymsp[-1].minor); - yymsp[-2].minor.yy69 = yylhsminor.yy69; - break; - case 19: /* decl_enum_item ::= NAME */ -#line 315 "src/parser_proc.y" -{ - yylhsminor.yy69 = psi_decl_enum_item_init(yymsp[0].minor.yy0->text, NULL); - yylhsminor.yy69->token = yymsp[0].minor.yy0; +#line 3653 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 413: +#line 1047 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&(*yyvalp))) = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2100 "src/parser_proc.c" - yymsp[0].minor.yy69 = yylhsminor.yy69; - break; - case 20: /* decl_struct_args_block ::= LBRACE struct_args RBRACE */ -{ yy_destructor(yypParser,79,&yymsp[-2].minor); -#line 319 "src/parser_proc.y" -{ - yymsp[-2].minor.yy303 = yymsp[-1].minor.yy303; +#line 3661 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 414: +#line 1050 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + if ((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))) { + (*(struct psi_token **)(&(*yyvalp))) = psi_token_cat(" ", 2, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)), (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + } else { + (*(struct psi_token **)(&(*yyvalp))) = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + } } -#line 2109 "src/parser_proc.c" - yy_destructor(yypParser,80,&yymsp[0].minor); +#line 3673 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 415: +#line 1060 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&(*yyvalp))) = NULL; } - break; - case 21: /* decl_struct_args ::= decl_struct_args_block */ -#line 322 "src/parser_proc.y" -{ - yylhsminor.yy303 = yymsp[0].minor.yy303; +#line 3681 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 417: +#line 1066 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&(*yyvalp))) = NULL; } -#line 2118 "src/parser_proc.c" - yymsp[0].minor.yy303 = yylhsminor.yy303; - break; - case 22: /* decl_struct_args ::= EOS */ -{ yy_destructor(yypParser,71,&yymsp[0].minor); -#line 325 "src/parser_proc.y" -{ - yymsp[0].minor.yy303 = psi_plist_init((psi_plist_dtor) psi_decl_arg_free); +#line 3689 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 421: +#line 1075 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&(*yyvalp))) = NULL; } -#line 2127 "src/parser_proc.c" +#line 3697 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 422: +#line 1078 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&(*yyvalp))) = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } - break; - case 23: /* decl_struct ::= STRUCT NAME align_and_size decl_struct_args */ -{ yy_destructor(yypParser,77,&yymsp[-3].minor); -#line 328 "src/parser_proc.y" -{ - yymsp[-3].minor.yy271 = psi_decl_struct_init(yymsp[-2].minor.yy0->text, yymsp[0].minor.yy303); - yymsp[-3].minor.yy271->align = yymsp[-1].minor.yy323.pos; - yymsp[-3].minor.yy271->size = yymsp[-1].minor.yy323.len; - yymsp[-3].minor.yy271->token = yymsp[-2].minor.yy0; +#line 3705 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 423: +#line 1081 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + if ((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))) { + (*(struct psi_token **)(&(*yyvalp))) = psi_token_cat(" ", 2, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)), (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + free((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + } else { + (*(struct psi_token **)(&(*yyvalp))) = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + } } -#line 2139 "src/parser_proc.c" +#line 3718 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 424: +#line 1092 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl **)(&(*yyvalp))) = (*(struct psi_decl **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)); } - break; - case 24: /* decl_union ::= UNION NAME align_and_size decl_struct_args */ -{ yy_destructor(yypParser,78,&yymsp[-3].minor); -#line 334 "src/parser_proc.y" -{ - yymsp[-3].minor.yy19 = psi_decl_union_init(yymsp[-2].minor.yy0->text, yymsp[0].minor.yy303); - yymsp[-3].minor.yy19->align = yymsp[-1].minor.yy323.pos; - yymsp[-3].minor.yy19->size = yymsp[-1].minor.yy323.len; - yymsp[-3].minor.yy19->token = yymsp[-2].minor.yy0; +#line 3726 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 425: +#line 1095 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl **)(&(*yyvalp))) = (*(struct psi_decl **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)); } -#line 2151 "src/parser_proc.c" +#line 3734 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 430: +#line 1111 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + struct psi_plist *list = psi_plist_init((psi_plist_dtor) psi_decl_extvar_free); + + if ((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))) { + size_t i = 0; + struct psi_decl_var *var; + + while (psi_plist_get((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)), i++, &var)) { + if (psi_decl_extvar_is_blacklisted(var->name)) { + psi_decl_var_free(&var); + } else { + list = psi_plist_add(list, psi_decl_extvar_init( + psi_decl_arg_init(psi_decl_type_copy((*(struct psi_decl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))->type), var))); + } + } + free((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + } + + if (psi_decl_extvar_is_blacklisted((*(struct psi_decl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))->var->name)) { + psi_decl_arg_free(&(*(struct psi_decl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))); + } else { + struct psi_decl_extvar *evar = psi_decl_extvar_init((*(struct psi_decl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))); + list = psi_plist_add(list, &evar); + } + + (*(struct psi_plist **)(&(*yyvalp))) = list; } - break; - case 25: /* const_type ::= BOOL|INT|FLOAT|STRING */ -#line 340 "src/parser_proc.y" -{ - yylhsminor.yy7 = psi_const_type_init(yymsp[0].minor.yy0->type, yymsp[0].minor.yy0->text); - free(yymsp[0].minor.yy0); +#line 3766 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 431: +#line 1141 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = NULL; } -#line 2160 "src/parser_proc.c" - yymsp[0].minor.yy7 = yylhsminor.yy7; - break; - case 26: /* constant ::= CONST const_type NSNAME EQUALS impl_def_val EOS */ -{ yy_destructor(yypParser,82,&yymsp[-5].minor); -#line 344 "src/parser_proc.y" -{ - yymsp[-5].minor.yy106 = psi_const_init(yymsp[-4].minor.yy7, yymsp[-3].minor.yy0->text, yymsp[-1].minor.yy21); - yymsp[-5].minor.yy106->token = yymsp[-3].minor.yy0; +#line 3774 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 432: +#line 1144 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); } -#line 2170 "src/parser_proc.c" - yy_destructor(yypParser,81,&yymsp[-2].minor); - yy_destructor(yypParser,71,&yymsp[0].minor); +#line 3782 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 433: +#line 1150 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add(psi_plist_init((psi_plist_dtor) psi_decl_var_free), &(*(struct psi_decl_var **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } - break; - case 27: /* decl_typedef ::= TYPEDEF decl_typedef_body EOS */ -#line 348 "src/parser_proc.y" -{ - yylhsminor.yy260 = yymsp[-1].minor.yy260; - yylhsminor.yy260->token = yymsp[-2].minor.yy0; +#line 3790 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 434: +#line 1153 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)), &(*(struct psi_decl_var **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2181 "src/parser_proc.c" - yy_destructor(yypParser,71,&yymsp[0].minor); - yymsp[-2].minor.yy260 = yylhsminor.yy260; - break; - case 28: /* decl_typedef_body_ex ::= struct_name align_and_size decl_struct_args_block decl_var */ -#line 352 "src/parser_proc.y" -{ - yylhsminor.yy260 = psi_decl_arg_init(psi_decl_type_init(PSI_T_STRUCT, yymsp[-3].minor.yy0->text), yymsp[0].minor.yy207); - yylhsminor.yy260->type->token = psi_token_copy(yymsp[-3].minor.yy0); - yylhsminor.yy260->type->real.strct = psi_decl_struct_init(yymsp[-3].minor.yy0->text, yymsp[-1].minor.yy303); - yylhsminor.yy260->type->real.strct->token = yymsp[-3].minor.yy0; - yylhsminor.yy260->type->real.strct->align = yymsp[-2].minor.yy323.pos; - yylhsminor.yy260->type->real.strct->size = yymsp[-2].minor.yy323.len; +#line 3798 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 435: +#line 1159 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + psi_decl_free(&(*(struct psi_decl **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); } -#line 2195 "src/parser_proc.c" - yymsp[-3].minor.yy260 = yylhsminor.yy260; - break; - case 29: /* decl_typedef_body_ex ::= union_name align_and_size decl_struct_args_block decl_var */ -#line 360 "src/parser_proc.y" -{ - yylhsminor.yy260 = psi_decl_arg_init(psi_decl_type_init(PSI_T_UNION, yymsp[-3].minor.yy0->text), yymsp[0].minor.yy207); - yylhsminor.yy260->type->token = psi_token_copy(yymsp[-3].minor.yy0); - yylhsminor.yy260->type->real.unn = psi_decl_union_init(yymsp[-3].minor.yy0->text, yymsp[-1].minor.yy303); - yylhsminor.yy260->type->real.unn->token = yymsp[-3].minor.yy0; - yylhsminor.yy260->type->real.unn->align = yymsp[-2].minor.yy323.pos; - yylhsminor.yy260->type->real.unn->size = yymsp[-2].minor.yy323.len; +#line 3806 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 436: +#line 1162 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + psi_decl_free(&(*(struct psi_decl **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); } -#line 2208 "src/parser_proc.c" - yymsp[-3].minor.yy260 = yylhsminor.yy260; - break; - case 30: /* decl_typedef_body_ex ::= decl_enum NAME */ -#line 368 "src/parser_proc.y" -{ - yylhsminor.yy260 = psi_decl_arg_init(psi_decl_type_init(PSI_T_ENUM, yymsp[-1].minor.yy279->name), psi_decl_var_init(yymsp[0].minor.yy0->text, 0, 0)); - yylhsminor.yy260->var->token = yymsp[0].minor.yy0; - yylhsminor.yy260->type->token = psi_token_copy(yymsp[-1].minor.yy279->token); - yylhsminor.yy260->type->real.enm = yymsp[-1].minor.yy279; +#line 3814 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 437: +#line 1165 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + psi_decl_free(&(*(struct psi_decl **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); } -#line 2219 "src/parser_proc.c" - yymsp[-1].minor.yy260 = yylhsminor.yy260; - break; - case 31: /* decl_typedef_body ::= decl_typedef_body_ex */ - case 34: /* decl_typedef_body ::= decl_arg */ yytestcase(yyruleno==34); - case 37: /* decl_func ::= decl_arg */ yytestcase(yyruleno==37); -#line 374 "src/parser_proc.y" -{ - yylhsminor.yy260 = yymsp[0].minor.yy260; +#line 3822 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 444: +#line 1186 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl **)(&(*yyvalp))) = (*(struct psi_decl **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); + (*(struct psi_decl **)(&(*yyvalp)))->abi = psi_decl_abi_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->text); +} +#line 3831 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 447: +#line 1198 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl **)(&(*yyvalp))) = psi_decl_init((*(struct psi_decl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval)), (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))); + if ((*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))) { + (*(struct psi_decl **)(&(*yyvalp)))->func->var->pointer_level += 1; + (*(struct psi_decl **)(&(*yyvalp)))->func->var->array_size = (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); + } } -#line 2229 "src/parser_proc.c" - yymsp[0].minor.yy260 = yylhsminor.yy260; - break; - case 32: /* decl_typedef_body_fn_args ::= LPAREN decl_args RPAREN */ -{ yy_destructor(yypParser,73,&yymsp[-2].minor); -#line 377 "src/parser_proc.y" -{ - yymsp[-2].minor.yy303 = yymsp[-1].minor.yy303; +#line 3843 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 448: +#line 1205 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl **)(&(*yyvalp))) = psi_decl_init((*(struct psi_decl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-6)].yystate.yysemantics.yysval)), (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval))); + (*(struct psi_decl **)(&(*yyvalp)))->varargs = 1; + if ((*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))) { + (*(struct psi_decl **)(&(*yyvalp)))->func->var->pointer_level += 1; + (*(struct psi_decl **)(&(*yyvalp)))->func->var->array_size = (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); + } } -#line 2238 "src/parser_proc.c" - yy_destructor(yypParser,75,&yymsp[0].minor); +#line 3856 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 449: +#line 1216 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl **)(&(*yyvalp))) = psi_decl_init((*(struct psi_decl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval)), (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))); + if ((*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))) { + (*(struct psi_decl **)(&(*yyvalp)))->func->var->pointer_level += 1; + (*(struct psi_decl **)(&(*yyvalp)))->func->var->array_size = (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); + } } - break; - case 33: /* decl_typedef_body ::= decl_func decl_typedef_body_fn_args */ -#line 380 "src/parser_proc.y" -{ - yylhsminor.yy260 = psi_decl_arg_init(psi_decl_type_init(PSI_T_FUNCTION, yymsp[-1].minor.yy260->var->name), psi_decl_var_copy(yymsp[-1].minor.yy260->var)); - yylhsminor.yy260->type->token = psi_token_copy(yymsp[-1].minor.yy260->token); - yylhsminor.yy260->type->real.func = psi_decl_init(psi_decl_abi_init("default"), yymsp[-1].minor.yy260, yymsp[0].minor.yy303); +#line 3868 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 450: +#line 1223 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl **)(&(*yyvalp))) = psi_decl_init((*(struct psi_decl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-6)].yystate.yysemantics.yysval)), (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval))); + (*(struct psi_decl **)(&(*yyvalp)))->varargs = 1; + if ((*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))) { + (*(struct psi_decl **)(&(*yyvalp)))->func->var->pointer_level += 1; + (*(struct psi_decl **)(&(*yyvalp)))->func->var->array_size = (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); + } } -#line 2249 "src/parser_proc.c" - yymsp[-1].minor.yy260 = yylhsminor.yy260; - break; - case 35: /* decl ::= decl_abi decl_func LPAREN decl_args RPAREN EOS */ -#line 388 "src/parser_proc.y" -{ - yylhsminor.yy71 = psi_decl_init(yymsp[-5].minor.yy242, yymsp[-4].minor.yy260, yymsp[-2].minor.yy303); +#line 3881 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 451: +#line 1234 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (void) (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)); + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + (*(struct psi_decl_arg **)(&(*yyvalp))) = psi_decl_arg_init((*(struct psi_decl_type **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-5)].yystate.yysemantics.yysval)), psi_decl_var_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->text, (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval)), 0)); + (*(struct psi_decl_arg **)(&(*yyvalp)))->var->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); +} +#line 3893 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 452: +#line 1241 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (void) (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)); + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + (*(struct psi_decl_arg **)(&(*yyvalp))) = psi_decl_arg_init( + psi_decl_type_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-5)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-5)].yystate.yysemantics.yysval))->text), + psi_decl_var_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->text, (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval)), 0) + ); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-5)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->var->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); +} +#line 3909 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 453: +#line 1252 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (void) (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)); + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + (*(struct psi_decl_arg **)(&(*yyvalp))) = psi_decl_arg_init( + psi_decl_type_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-5)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-5)].yystate.yysemantics.yysval))->text), + psi_decl_var_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->text, (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval)), 0) + ); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-5)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->var->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); +} +#line 3925 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 454: +#line 1263 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (void) (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)); + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + (*(struct psi_decl_arg **)(&(*yyvalp))) = psi_decl_arg_init( + psi_decl_type_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval))->text), + psi_decl_var_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->text, 0, 0) + ); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->var->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); +} +#line 3941 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 456: +#line 1278 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_arg **)(&(*yyvalp))) = psi_decl_arg_init( + psi_decl_type_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->text), + psi_decl_var_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->text, 0, 0) + ); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->var->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); +} +#line 3955 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 457: +#line 1290 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = NULL; } -#line 2257 "src/parser_proc.c" - yy_destructor(yypParser,73,&yymsp[-3].minor); - yy_destructor(yypParser,75,&yymsp[-1].minor); - yy_destructor(yypParser,71,&yymsp[0].minor); - yymsp[-5].minor.yy71 = yylhsminor.yy71; - break; - case 36: /* decl ::= decl_abi decl_func LPAREN decl_args COMMA ELLIPSIS RPAREN EOS */ -#line 391 "src/parser_proc.y" -{ - yylhsminor.yy71 = psi_decl_init(yymsp[-7].minor.yy242, yymsp[-6].minor.yy260, yymsp[-4].minor.yy303); - yylhsminor.yy71->varargs = 1; +#line 3963 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 458: +#line 1293 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = NULL; } -#line 2269 "src/parser_proc.c" - yy_destructor(yypParser,73,&yymsp[-5].minor); - yy_destructor(yypParser,74,&yymsp[-3].minor); - yy_destructor(yypParser,84,&yymsp[-2].minor); - yy_destructor(yypParser,75,&yymsp[-1].minor); - yy_destructor(yypParser,71,&yymsp[0].minor); - yymsp[-7].minor.yy71 = yylhsminor.yy71; - break; - case 38: /* decl_func ::= VOID NAME */ -#line 398 "src/parser_proc.y" -{ - yylhsminor.yy260 = psi_decl_arg_init( - psi_decl_type_init(yymsp[-1].minor.yy0->type, yymsp[-1].minor.yy0->text), - psi_decl_var_init(yymsp[0].minor.yy0->text, 0, 0) - ); - yylhsminor.yy260->type->token = yymsp[-1].minor.yy0; - yylhsminor.yy260->var->token = yymsp[0].minor.yy0; - yylhsminor.yy260->token = yymsp[0].minor.yy0; +#line 3971 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 459: +#line 1296 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); } -#line 2288 "src/parser_proc.c" - yymsp[-1].minor.yy260 = yylhsminor.yy260; - break; - case 39: /* decl_typedef_body ::= VOID indirection LPAREN indirection NAME RPAREN decl_typedef_body_fn_args */ -#line 407 "src/parser_proc.y" -{ - struct psi_decl_arg *func_ = psi_decl_arg_init( - psi_decl_type_init(yymsp[-6].minor.yy0->type, yymsp[-6].minor.yy0->text), - psi_decl_var_init(yymsp[-2].minor.yy0->text, yymsp[-5].minor.yy190, 0) - ); - func_->type->token = yymsp[-6].minor.yy0; - func_->var->token = yymsp[-2].minor.yy0; - func_->token = yymsp[-2].minor.yy0; - yylhsminor.yy260 = psi_decl_arg_init( - psi_decl_type_init(PSI_T_FUNCTION, func_->var->name), - psi_decl_var_copy(func_->var) - ); - yylhsminor.yy260->var->pointer_level = yymsp[-3].minor.yy190; - yylhsminor.yy260->type->token = psi_token_copy(func_->token); - yylhsminor.yy260->type->real.func = psi_decl_init(psi_decl_abi_init("default"), func_, yymsp[0].minor.yy303); +#line 3979 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 460: +#line 1302 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add(psi_plist_init((psi_plist_dtor) psi_decl_arg_free), &(*(struct psi_decl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2309 "src/parser_proc.c" - yy_destructor(yypParser,73,&yymsp[-4].minor); - yy_destructor(yypParser,75,&yymsp[-1].minor); - yymsp[-6].minor.yy260 = yylhsminor.yy260; - break; - case 40: /* decl_typedef_body ::= CONST VOID pointers LPAREN indirection NAME RPAREN decl_typedef_body_fn_args */ -{ yy_destructor(yypParser,82,&yymsp[-7].minor); -#line 423 "src/parser_proc.y" -{ - struct psi_decl_arg *func_ = psi_decl_arg_init( - psi_decl_type_init(yymsp[-6].minor.yy0->type, yymsp[-6].minor.yy0->text), - psi_decl_var_init(yymsp[-2].minor.yy0->text, yymsp[-5].minor.yy190, 0) - ); - func_->type->token = yymsp[-6].minor.yy0; - func_->var->token = yymsp[-2].minor.yy0; - func_->token = yymsp[-2].minor.yy0; - yymsp[-7].minor.yy260 = psi_decl_arg_init( - psi_decl_type_init(PSI_T_FUNCTION, func_->var->name), - psi_decl_var_copy(func_->var) - ); - yymsp[-7].minor.yy260->var->pointer_level = yymsp[-3].minor.yy190; - yymsp[-7].minor.yy260->type->token = psi_token_copy(func_->token); - yymsp[-7].minor.yy260->type->real.func = psi_decl_init(psi_decl_abi_init("default"), func_, yymsp[0].minor.yy303); -} -#line 2333 "src/parser_proc.c" - yy_destructor(yypParser,73,&yymsp[-4].minor); - yy_destructor(yypParser,75,&yymsp[-1].minor); -} - break; - case 41: /* decl_abi ::= NAME */ -#line 439 "src/parser_proc.y" -{ - yylhsminor.yy242 = psi_decl_abi_init(yymsp[0].minor.yy0->text); - yylhsminor.yy242->token = yymsp[0].minor.yy0; -} -#line 2344 "src/parser_proc.c" - yymsp[0].minor.yy242 = yylhsminor.yy242; - break; - case 43: /* decl_var_array_size ::= LBRACKET NUMBER RBRACKET */ -{ yy_destructor(yypParser,85,&yymsp[-2].minor); -#line 446 "src/parser_proc.y" -{ - yymsp[-2].minor.yy0 = yymsp[-1].minor.yy0; -} -#line 2353 "src/parser_proc.c" - yy_destructor(yypParser,86,&yymsp[0].minor); -} - break; - case 44: /* decl_var ::= NAME decl_var_array_size */ -#line 449 "src/parser_proc.y" -{ - yylhsminor.yy207 = psi_decl_var_init(yymsp[-1].minor.yy0->text, 0, yymsp[0].minor.yy0?atol(yymsp[0].minor.yy0->text):0); - yylhsminor.yy207->token = yymsp[-1].minor.yy0; - if (yymsp[0].minor.yy0) { - free(yymsp[0].minor.yy0); - } -} -#line 2366 "src/parser_proc.c" - yymsp[-1].minor.yy207 = yylhsminor.yy207; - break; - case 45: /* decl_var ::= pointers NAME decl_var_array_size */ -#line 456 "src/parser_proc.y" -{ - yylhsminor.yy207 = psi_decl_var_init(yymsp[-1].minor.yy0->text, yymsp[-2].minor.yy190+!!yymsp[0].minor.yy0, yymsp[0].minor.yy0?atol(yymsp[0].minor.yy0->text):0); - yylhsminor.yy207->token = yymsp[-1].minor.yy0; - if (yymsp[0].minor.yy0) { - free(yymsp[0].minor.yy0); - } +#line 3987 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 461: +#line 1305 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)), &(*(struct psi_decl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2378 "src/parser_proc.c" - yymsp[-2].minor.yy207 = yylhsminor.yy207; - break; - case 46: /* decl_vars ::= decl_var */ -#line 463 "src/parser_proc.y" -{ - yylhsminor.yy303 = psi_plist_add(psi_plist_init((psi_plist_dtor) psi_decl_var_free), - &yymsp[0].minor.yy207); +#line 3995 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 462: +#line 1312 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_arg **)(&(*yyvalp))) = (*(struct psi_decl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); } -#line 2387 "src/parser_proc.c" - yymsp[0].minor.yy303 = yylhsminor.yy303; - break; - case 47: /* decl_vars ::= decl_vars COMMA decl_var */ -#line 467 "src/parser_proc.y" -{ - yylhsminor.yy303 = psi_plist_add(yymsp[-2].minor.yy303, &yymsp[0].minor.yy207); +#line 4003 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 463: +#line 1315 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_arg **)(&(*yyvalp))) = psi_decl_arg_init( + (*(struct psi_decl_type **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)), + psi_decl_var_init(NULL, (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)), 0) + ); +} +#line 4014 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 464: +#line 1321 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_arg **)(&(*yyvalp))) = psi_decl_arg_init( + psi_decl_type_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->text), + psi_decl_var_init(NULL, (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)), 0) + ); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->var->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); +} +#line 4028 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 465: +#line 1330 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_arg **)(&(*yyvalp))) = psi_decl_arg_init( + psi_decl_type_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->text), + psi_decl_var_init(NULL, (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)), 0) + ); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->var->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); +} +#line 4042 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 466: +#line 1342 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_arg **)(&(*yyvalp))) = psi_decl_arg_init( + psi_decl_type_init(PSI_T_FUNCTION, (*(struct psi_decl **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->func->var->name), + psi_decl_var_copy((*(struct psi_decl **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->func->var) + ); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->token = psi_token_copy((*(struct psi_decl **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->func->token); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->real.func = (*(struct psi_decl **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); +} +#line 4055 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 467: +#line 1350 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_arg **)(&(*yyvalp))) = psi_decl_arg_init((*(struct psi_decl_type **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)), (*(struct psi_decl_var **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2395 "src/parser_proc.c" - yy_destructor(yypParser,74,&yymsp[-1].minor); - yymsp[-2].minor.yy303 = yylhsminor.yy303; - break; - case 48: /* decl_arg ::= const_decl_type decl_var */ -#line 470 "src/parser_proc.y" -{ - yylhsminor.yy260 = psi_decl_arg_init(yymsp[-1].minor.yy152, yymsp[0].minor.yy207); +#line 4063 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 468: +#line 1353 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + (*(struct psi_decl_arg **)(&(*yyvalp))) = psi_decl_arg_init( + psi_decl_type_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))->text), + psi_decl_var_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->text, (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)), 0) + ); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->var->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); +} +#line 4078 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 469: +#line 1363 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + (*(struct psi_decl_arg **)(&(*yyvalp))) = psi_decl_arg_init( + psi_decl_type_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))->text), + psi_decl_var_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->text, (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)), 0) + ); + (*(struct psi_decl_arg **)(&(*yyvalp)))->type->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->var->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_decl_arg **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); +} +#line 4093 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 470: +#line 1376 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + (*(struct psi_decl_var **)(&(*yyvalp))) = psi_decl_var_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->text, (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)) + !! (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)), (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_decl_var **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); +} +#line 4103 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 471: +#line 1381 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + (*(struct psi_decl_var **)(&(*yyvalp))) = psi_decl_var_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->text, !! (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)), (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_decl_var **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); +} +#line 4113 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 472: +#line 1389 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + (*(struct psi_decl_union **)(&(*yyvalp))) = psi_decl_union_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))->text, (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_decl_union **)(&(*yyvalp)))->align = (*(struct psi_layout*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)).pos; + (*(struct psi_decl_union **)(&(*yyvalp)))->size = (*(struct psi_layout*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)).len; + (*(struct psi_decl_union **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))); +} +#line 4125 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 473: +#line 1399 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + (*(struct psi_decl_struct **)(&(*yyvalp))) = psi_decl_struct_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))->text, (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_decl_struct **)(&(*yyvalp)))->align = (*(struct psi_layout*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)).pos; + (*(struct psi_decl_struct **)(&(*yyvalp)))->size = (*(struct psi_layout*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)).len; + (*(struct psi_decl_struct **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))); +} +#line 4137 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 474: +#line 1409 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = NULL; } -#line 2404 "src/parser_proc.c" - yymsp[-1].minor.yy260 = yylhsminor.yy260; - break; - case 49: /* decl_typedef_body ::= const_decl_type indirection LPAREN indirection NAME RPAREN decl_typedef_body_fn_args */ -#line 473 "src/parser_proc.y" -{ - struct psi_decl_arg *func_ = psi_decl_arg_init( - yymsp[-6].minor.yy152, - psi_decl_var_init(yymsp[-2].minor.yy0->text, yymsp[-5].minor.yy190, 0) - ); - func_->var->token = yymsp[-2].minor.yy0; - func_->token = yymsp[-2].minor.yy0; - yylhsminor.yy260 = psi_decl_arg_init( - psi_decl_type_init(PSI_T_FUNCTION, func_->var->name), - psi_decl_var_copy(func_->var) - ); - yylhsminor.yy260->var->pointer_level = yymsp[-3].minor.yy190; - yylhsminor.yy260->type->token = psi_token_copy(func_->token); - yylhsminor.yy260->type->real.func = psi_decl_init(psi_decl_abi_init("default"), func_, yymsp[0].minor.yy303); +#line 4145 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 476: +#line 1416 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)); } -#line 2424 "src/parser_proc.c" - yy_destructor(yypParser,73,&yymsp[-4].minor); - yy_destructor(yypParser,75,&yymsp[-1].minor); - yymsp[-6].minor.yy260 = yylhsminor.yy260; - break; - case 50: /* decl_arg ::= VOID pointers NAME */ -#line 488 "src/parser_proc.y" -{ - yylhsminor.yy260 = psi_decl_arg_init( - psi_decl_type_init(yymsp[-2].minor.yy0->type, yymsp[-2].minor.yy0->text), - psi_decl_var_init(yymsp[0].minor.yy0->text, yymsp[-1].minor.yy190, 0) - ); - yylhsminor.yy260->type->token = yymsp[-2].minor.yy0; - yylhsminor.yy260->var->token = yymsp[0].minor.yy0; - yylhsminor.yy260->token = yymsp[0].minor.yy0; +#line 4153 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 477: +#line 1422 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))->layout = (*(struct psi_layout **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)); + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add(psi_plist_init((psi_plist_dtor) psi_decl_arg_free), &(*(struct psi_decl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))); + if ((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))) { + size_t i = 0; + struct psi_decl_arg *arg; + + while (psi_plist_get((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)), i++, &arg)) { + arg->type = psi_decl_type_copy((*(struct psi_decl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))->type); + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add((*(struct psi_plist **)(&(*yyvalp))), &arg); + } + free((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + } } -#line 2440 "src/parser_proc.c" - yymsp[-2].minor.yy260 = yylhsminor.yy260; - break; - case 51: /* decl_arg ::= CONST VOID pointers NAME */ -{ yy_destructor(yypParser,82,&yymsp[-3].minor); -#line 497 "src/parser_proc.y" -{ - yymsp[-3].minor.yy260 = psi_decl_arg_init( - psi_decl_type_init(yymsp[-2].minor.yy0->type, yymsp[-2].minor.yy0->text), - psi_decl_var_init(yymsp[0].minor.yy0->text, yymsp[-1].minor.yy190, 0) - ); - yymsp[-3].minor.yy260->type->token = yymsp[-2].minor.yy0; - yymsp[-3].minor.yy260->var->token = yymsp[0].minor.yy0; - yymsp[-3].minor.yy260->token = yymsp[0].minor.yy0; +#line 4172 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 478: +#line 1436 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))->layout = (*(struct psi_layout **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)); + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval)), &(*(struct psi_decl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))); + if ((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))) { + size_t i = 0; + struct psi_decl_arg *arg; + + while (psi_plist_get((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)), i++, &arg)) { + arg->type = psi_decl_type_copy((*(struct psi_decl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))->type); + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add((*(struct psi_plist **)(&(*yyvalp))), &arg); + } + free((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + } } -#line 2455 "src/parser_proc.c" +#line 4191 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 479: +#line 1453 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = NULL; } - break; - case 52: /* decl_args ::= */ -#line 506 "src/parser_proc.y" -{ - yymsp[1].minor.yy303 = NULL; +#line 4199 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 480: +#line 1456 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); } -#line 2463 "src/parser_proc.c" - break; - case 53: /* decl_args ::= VOID */ -{ yy_destructor(yypParser,57,&yymsp[0].minor); -#line 509 "src/parser_proc.y" -{ - yymsp[0].minor.yy303 = NULL; +#line 4207 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 481: +#line 1462 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + { + struct psi_decl_arg *arg = psi_decl_arg_init(NULL, (*(struct psi_decl_var **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + arg->layout = (*(struct psi_layout **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add(psi_plist_init((psi_plist_dtor) psi_decl_arg_free), &arg); + } } -#line 2471 "src/parser_proc.c" +#line 4219 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 482: +#line 1469 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + { + struct psi_decl_arg *arg = psi_decl_arg_init(NULL, (*(struct psi_decl_var **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + arg->layout = (*(struct psi_layout **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval)), &arg); + } } - break; - case 54: /* decl_args ::= decl_arg */ - case 56: /* struct_args ::= struct_arg */ yytestcase(yyruleno==56); -#line 512 "src/parser_proc.y" -{ - yylhsminor.yy303 = psi_plist_add(psi_plist_init((psi_plist_dtor) psi_decl_arg_free), - &yymsp[0].minor.yy260); +#line 4231 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 483: +#line 1479 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_decl_enum **)(&(*yyvalp))) = psi_decl_enum_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval))->text, (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))); + (*(struct psi_decl_enum **)(&(*yyvalp)))->token = (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval)); +} +#line 4240 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 484: +#line 1486 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add(psi_plist_init((psi_plist_dtor) psi_decl_enum_item_free), &(*(struct psi_decl_enum_item **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2481 "src/parser_proc.c" - yymsp[0].minor.yy303 = yylhsminor.yy303; - break; - case 55: /* decl_args ::= decl_args COMMA decl_arg */ -#line 516 "src/parser_proc.y" -{ - yylhsminor.yy303 = psi_plist_add(yymsp[-2].minor.yy303, &yymsp[0].minor.yy260); +#line 4248 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 485: +#line 1489 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)), &(*(struct psi_decl_enum_item **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2489 "src/parser_proc.c" - yy_destructor(yypParser,74,&yymsp[-1].minor); - yymsp[-2].minor.yy303 = yylhsminor.yy303; - break; - case 57: /* struct_args ::= struct_args struct_arg */ -#line 523 "src/parser_proc.y" -{ - yylhsminor.yy303 = psi_plist_add(yymsp[-1].minor.yy303, &yymsp[0].minor.yy260); +#line 4256 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 486: +#line 1495 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + (*(struct psi_decl_enum_item **)(&(*yyvalp))) = psi_decl_enum_item_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->text, NULL); + (*(struct psi_decl_enum_item **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); +} +#line 4266 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 487: +#line 1500 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + (*(struct psi_decl_enum_item **)(&(*yyvalp))) = psi_decl_enum_item_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))->text, (*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_decl_enum_item **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))); +} +#line 4276 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 488: +#line 1508 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_num_exp **)(&(*yyvalp))) = psi_num_exp_init_num((*(struct psi_number **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_num_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_number **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->token); +} +#line 4285 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 489: +#line 1512 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_num_exp **)(&(*yyvalp))) = psi_num_exp_init_cast((*(struct psi_decl_type **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)), (*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_num_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_decl_type **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))->token); +} +#line 4294 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 490: +#line 1516 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_num_exp **)(&(*yyvalp))) = psi_num_exp_init_unary(PSI_T_LPAREN, (*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + (*(struct psi_num_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))); +} +#line 4303 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 491: +#line 1520 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_num_exp **)(&(*yyvalp))) = psi_num_exp_init_binary((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->type, (*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)), (*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_num_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); +} +#line 4312 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 492: +#line 1524 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_num_exp **)(&(*yyvalp))) = psi_num_exp_init_unary((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->type, (*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_num_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); +} +#line 4321 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 493: +#line 1528 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_num_exp **)(&(*yyvalp))) = psi_num_exp_init_ternary((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))->type, (*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval)), (*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)), (*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_num_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))); +} +#line 4330 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 494: +#line 1535 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_number **)(&(*yyvalp))) = psi_number_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->text, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->flags); + (*(struct psi_number **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); +} +#line 4339 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 495: +#line 1539 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_number **)(&(*yyvalp))) = psi_number_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->text, 0); + (*(struct psi_number **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); +} +#line 4348 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 496: +#line 1543 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_number **)(&(*yyvalp))) = psi_number_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->text, 0); + (*(struct psi_number **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); +} +#line 4357 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 497: +#line 1547 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_number **)(&(*yyvalp))) = psi_number_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->text, 0); + (*(struct psi_number **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); +} +#line 4366 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 498: +#line 1551 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_number **)(&(*yyvalp))) = psi_number_init(PSI_T_NAME, (*(struct psi_decl_var **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)), 0); + (*(struct psi_number **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_decl_var **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->token); +} +#line 4375 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 499: +#line 1555 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_number **)(&(*yyvalp))) = (*(struct psi_number **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); } -#line 2498 "src/parser_proc.c" - yymsp[-1].minor.yy303 = yylhsminor.yy303; - break; - case 58: /* struct_arg ::= decl_typedef_body_ex EOS */ -#line 526 "src/parser_proc.y" -{ - yylhsminor.yy260 = yymsp[-1].minor.yy260; - switch (yymsp[-1].minor.yy260->type->type) { - case PSI_T_STRUCT: - if (yymsp[-1].minor.yy260->type->real.strct) { - if (!P->structs) { - P->structs = psi_plist_init((psi_plist_dtor) psi_decl_struct_free); - } - P->structs = psi_plist_add(P->structs, &yymsp[-1].minor.yy260->type->real.strct); - } - break; - case PSI_T_UNION: - if (yymsp[-1].minor.yy260->type->real.unn) { - if (!P->unions) { - P->unions = psi_plist_init((psi_plist_dtor) psi_decl_union_free); - } - P->unions = psi_plist_add(P->unions, &yymsp[-1].minor.yy260->type->real.unn); - } - break; - case PSI_T_ENUM: - if (yymsp[-1].minor.yy260->type->real.enm) { - if (!P->enums) { - P->enums = psi_plist_init((psi_plist_dtor) psi_decl_enum_free); - } - P->enums = psi_plist_add(P->enums, &yymsp[-1].minor.yy260->type->real.enm); - } - break; - } +#line 4383 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 500: +#line 1561 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_number **)(&(*yyvalp))) = (*(struct psi_number **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)); + (*(struct psi_number **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))); +} +#line 4392 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 501: +#line 1565 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_number **)(&(*yyvalp))) = (*(struct psi_number **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); + (*(struct psi_number **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); +} +#line 4401 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 502: +#line 1572 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_number **)(&(*yyvalp))) = (*(struct psi_number **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); } -#line 2532 "src/parser_proc.c" - yy_destructor(yypParser,71,&yymsp[0].minor); - yymsp[-1].minor.yy260 = yylhsminor.yy260; - break; - case 59: /* struct_arg ::= decl_arg decl_layout EOS */ -#line 555 "src/parser_proc.y" -{ - yymsp[-2].minor.yy260->layout = yymsp[-1].minor.yy81; - yylhsminor.yy260 = yymsp[-2].minor.yy260; +#line 4409 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 503: +#line 1575 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + if ((*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))) { + int8_t sizeof_void_p = sizeof(void *); + (*(struct psi_number **)(&(*yyvalp))) = psi_number_init(PSI_T_INT8, &sizeof_void_p, 0); + psi_decl_type_free(&(*(struct psi_decl_type **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + } else { + (*(struct psi_number **)(&(*yyvalp))) = psi_number_init(PSI_T_SIZEOF, (*(struct psi_decl_type **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)), 0); + } } -#line 2542 "src/parser_proc.c" - yy_destructor(yypParser,71,&yymsp[0].minor); - yymsp[-2].minor.yy260 = yylhsminor.yy260; - break; - case 60: /* decl_layout ::= */ -#line 559 "src/parser_proc.y" -{ - yymsp[1].minor.yy81 = NULL; +#line 4423 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 504: +#line 1587 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + int8_t sizeof_void_p = sizeof(void *); + (*(struct psi_number **)(&(*yyvalp))) = psi_number_init(PSI_T_INT8, &sizeof_void_p, 0); +} +#line 4432 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 505: +#line 1591 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + int8_t sizeof_a = sizeof('a'); + (*(struct psi_number **)(&(*yyvalp))) = psi_number_init(PSI_T_INT8, &sizeof_a, 0); +} +#line 4441 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 506: +#line 1595 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_number **)(&(*yyvalp))) = psi_number_init(PSI_T_INT64, &(*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->size, 0); } -#line 2551 "src/parser_proc.c" - break; - case 61: /* decl_layout ::= COLON COLON LPAREN NUMBER COMMA NUMBER RPAREN */ -{ yy_destructor(yypParser,72,&yymsp[-6].minor); -#line 562 "src/parser_proc.y" -{ - yymsp[-6].minor.yy81 = psi_layout_init(atol(yymsp[-3].minor.yy0->text), atol(yymsp[-1].minor.yy0->text)); - free(yymsp[-3].minor.yy0); - free(yymsp[-1].minor.yy0); +#line 4449 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 507: +#line 1601 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + if ((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))) { + (*(struct psi_token **)(&(*yyvalp))) = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + } else { + char digest[17]; + + psi_token_hash((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)), digest); + (*(struct psi_token **)(&(*yyvalp))) = psi_token_append("@", psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))), 1, digest); + } } -#line 2561 "src/parser_proc.c" - yy_destructor(yypParser,72,&yymsp[-5].minor); - yy_destructor(yypParser,73,&yymsp[-4].minor); - yy_destructor(yypParser,74,&yymsp[-2].minor); - yy_destructor(yypParser,75,&yymsp[0].minor); +#line 4464 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 508: +#line 1614 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + if ((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))) { + (*(struct psi_token **)(&(*yyvalp))) = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + } else { + char digest[17]; + + psi_token_hash((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)), digest); + (*(struct psi_token **)(&(*yyvalp))) = psi_token_append("@", psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))), 1, digest); + } } - break; - case 63: /* decl_scalar_type ::= SHORT decl_scalar_type_short */ - case 67: /* decl_scalar_type ::= LONG decl_scalar_type_long */ yytestcase(yyruleno==67); - case 70: /* decl_scalar_type_long ::= LONG decl_scalar_type_long_long */ yytestcase(yyruleno==70); -#line 570 "src/parser_proc.y" -{ - if (yymsp[0].minor.yy0) { - yylhsminor.yy0 = psi_token_cat(2, yymsp[-1].minor.yy0, yymsp[0].minor.yy0); - free(yymsp[-1].minor.yy0); - free(yymsp[0].minor.yy0); - } else { - yylhsminor.yy0 = yymsp[-1].minor.yy0; - } +#line 4479 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 509: +#line 1627 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + if ((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))) { + (*(struct psi_token **)(&(*yyvalp))) = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + } else { + char digest[17]; + + psi_token_hash((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)), digest); + (*(struct psi_token **)(&(*yyvalp))) = psi_token_append("@", psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))), 1, digest); + } } -#line 2581 "src/parser_proc.c" - yymsp[-1].minor.yy0 = yylhsminor.yy0; - break; - case 73: /* decl_type ::= UNSIGNED decl_scalar_type */ - case 74: /* decl_type ::= SIGNED decl_scalar_type */ yytestcase(yyruleno==74); -#line 618 "src/parser_proc.y" -{ - struct psi_token *T = psi_token_cat(2, yymsp[-1].minor.yy0, yymsp[0].minor.yy0); - yylhsminor.yy152 = psi_decl_type_init(T->type, T->text); - yylhsminor.yy152->token = T; - free(yymsp[-1].minor.yy0); - free(yymsp[0].minor.yy0); +#line 4494 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 510: +#line 1640 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&(*yyvalp))) = NULL; } -#line 2594 "src/parser_proc.c" - yymsp[-1].minor.yy152 = yylhsminor.yy152; - break; - case 75: /* decl_type ::= UNSIGNED */ - case 76: /* decl_type ::= SIGNED */ yytestcase(yyruleno==76); -#line 632 "src/parser_proc.y" -{ - yylhsminor.yy152 = psi_decl_type_init(PSI_T_NAME, yymsp[0].minor.yy0->text); - yylhsminor.yy152->token = yymsp[0].minor.yy0; +#line 4502 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 511: +#line 1643 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&(*yyvalp))) = (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); + (*(struct psi_token **)(&(*yyvalp)))->type = PSI_T_NAME; +} +#line 4511 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 514: +#line 1655 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_layout **)(&(*yyvalp))) = NULL; } -#line 2604 "src/parser_proc.c" - yymsp[0].minor.yy152 = yylhsminor.yy152; - break; - case 77: /* decl_type ::= decl_scalar_type */ - case 81: /* decl_type ::= FLOAT|DOUBLE|INT8|UINT8|INT16|UINT16|INT32|UINT32|INT64|UINT64|NAME */ yytestcase(yyruleno==81); -#line 640 "src/parser_proc.y" -{ - yylhsminor.yy152 = psi_decl_type_init(yymsp[0].minor.yy0->type, yymsp[0].minor.yy0->text); - yylhsminor.yy152->token = yymsp[0].minor.yy0; +#line 4519 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 515: +#line 1658 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_layout **)(&(*yyvalp))) = psi_layout_init(0, 0, psi_layout_init(0, atol((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->text), NULL)); } -#line 2614 "src/parser_proc.c" - yymsp[0].minor.yy152 = yylhsminor.yy152; - break; - case 78: /* decl_type ::= STRUCT NAME */ - case 79: /* decl_type ::= UNION NAME */ yytestcase(yyruleno==79); - case 80: /* decl_type ::= ENUM NAME */ yytestcase(yyruleno==80); -#line 644 "src/parser_proc.y" -{ - yylhsminor.yy152 = psi_decl_type_init(yymsp[-1].minor.yy0->type, yymsp[0].minor.yy0->text); - yylhsminor.yy152->token = yymsp[0].minor.yy0; - free(yymsp[-1].minor.yy0); +#line 4527 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 516: +#line 1661 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_layout **)(&(*yyvalp))) = psi_layout_init(atol((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))->text), atol((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->text), NULL); } -#line 2626 "src/parser_proc.c" - yymsp[-1].minor.yy152 = yylhsminor.yy152; - break; - case 82: /* const_decl_type ::= decl_type */ -#line 663 "src/parser_proc.y" -{ - yylhsminor.yy152 = yymsp[0].minor.yy152; +#line 4535 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 517: +#line 1664 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_layout **)(&(*yyvalp))) = psi_layout_init(atol((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))->text), atol((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->text), psi_layout_init(0, atol((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-7)].yystate.yysemantics.yysval))->text), NULL)); } -#line 2634 "src/parser_proc.c" - yymsp[0].minor.yy152 = yylhsminor.yy152; - break; - case 83: /* const_decl_type ::= CONST decl_type */ -{ yy_destructor(yypParser,82,&yymsp[-1].minor); -#line 666 "src/parser_proc.y" -{ - yymsp[-1].minor.yy152 = yymsp[0].minor.yy152; +#line 4543 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 518: +#line 1670 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_layout*)(&(*yyvalp))).pos = 0; + (*(struct psi_layout*)(&(*yyvalp))).len = 0; +} +#line 4552 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 519: +#line 1674 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_layout*)(&(*yyvalp))).pos = atol((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))->text); + (*(struct psi_layout*)(&(*yyvalp))).len = atol((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->text); +} +#line 4561 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 520: +#line 1681 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(size_t*)(&(*yyvalp))) = 0; } -#line 2643 "src/parser_proc.c" +#line 4569 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 521: +#line 1684 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(size_t*)(&(*yyvalp))) = 0; } - break; - case 84: /* impl ::= impl_func LBRACE impl_stmts RBRACE */ -#line 669 "src/parser_proc.y" -{ - yylhsminor.yy49 = psi_impl_init(yymsp[-3].minor.yy120, yymsp[-1].minor.yy303); +#line 4577 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 522: +#line 1687 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(size_t*)(&(*yyvalp))) = 0; } -#line 2651 "src/parser_proc.c" - yy_destructor(yypParser,79,&yymsp[-2].minor); - yy_destructor(yypParser,80,&yymsp[0].minor); - yymsp[-3].minor.yy49 = yylhsminor.yy49; - break; - case 85: /* impl ::= STATIC impl_func LBRACE impl_stmts RBRACE */ -{ yy_destructor(yypParser,92,&yymsp[-4].minor); -#line 672 "src/parser_proc.y" -{ - yymsp[-3].minor.yy120->static_memory = 1; - yymsp[-4].minor.yy49 = psi_impl_init(yymsp[-3].minor.yy120, yymsp[-1].minor.yy303); +#line 4585 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 523: +#line 1690 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + if (psi_num_exp_validate(PSI_DATA(P), (*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)), NULL, NULL, NULL, NULL, NULL)) { + (*(size_t*)(&(*yyvalp))) = psi_long_num_exp((*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)), NULL, &P->preproc->defs); + } else { + (*(size_t*)(&(*yyvalp))) = 0; + } + psi_num_exp_free(&(*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); } -#line 2663 "src/parser_proc.c" - yy_destructor(yypParser,79,&yymsp[-2].minor); - yy_destructor(yypParser,80,&yymsp[0].minor); +#line 4598 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 524: +#line 1701 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(size_t*)(&(*yyvalp))) = 0; } - break; - case 86: /* impl_func ::= FUNCTION reference NSNAME LPAREN RPAREN COLON impl_type */ -{ yy_destructor(yypParser,93,&yymsp[-6].minor); -#line 676 "src/parser_proc.y" -{ - yymsp[-6].minor.yy120 = psi_impl_func_init(yymsp[-4].minor.yy0->text, NULL, yymsp[0].minor.yy142); - yymsp[-6].minor.yy120->token = yymsp[-4].minor.yy0; - yymsp[-6].minor.yy120->return_reference = yymsp[-5].minor.yy273; +#line 4606 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 525: +#line 1704 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(size_t*)(&(*yyvalp))) = (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); } -#line 2676 "src/parser_proc.c" - yy_destructor(yypParser,73,&yymsp[-3].minor); - yy_destructor(yypParser,75,&yymsp[-2].minor); - yy_destructor(yypParser,72,&yymsp[-1].minor); +#line 4614 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 527: +#line 1711 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(size_t*)(&(*yyvalp))) = (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)); } - break; - case 87: /* impl_func ::= FUNCTION reference NSNAME LPAREN impl_args RPAREN COLON impl_type */ -{ yy_destructor(yypParser,93,&yymsp[-7].minor); -#line 681 "src/parser_proc.y" -{ - yymsp[-7].minor.yy120 = psi_impl_func_init(yymsp[-5].minor.yy0->text, yymsp[-3].minor.yy303, yymsp[0].minor.yy142); - yymsp[-7].minor.yy120->token = yymsp[-5].minor.yy0; - yymsp[-7].minor.yy120->return_reference = yymsp[-6].minor.yy273; +#line 4622 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 528: +#line 1717 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(size_t*)(&(*yyvalp))) = 1; } -#line 2690 "src/parser_proc.c" - yy_destructor(yypParser,73,&yymsp[-4].minor); - yy_destructor(yypParser,75,&yymsp[-2].minor); - yy_destructor(yypParser,72,&yymsp[-1].minor); +#line 4630 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 529: +#line 1720 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(size_t*)(&(*yyvalp))) = (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)) + 1; } - break; - case 88: /* impl_func ::= FUNCTION reference NSNAME LPAREN impl_args COMMA impl_type reference ELLIPSIS DOLLAR_NAME RPAREN COLON impl_type */ -{ yy_destructor(yypParser,93,&yymsp[-12].minor); -#line 686 "src/parser_proc.y" -{ - yymsp[-12].minor.yy120 = psi_impl_func_init(yymsp[-10].minor.yy0->text, yymsp[-8].minor.yy303, yymsp[0].minor.yy142); - yymsp[-12].minor.yy120->token = yymsp[-10].minor.yy0; - yymsp[-12].minor.yy120->return_reference = yymsp[-11].minor.yy273; - yymsp[-12].minor.yy120->vararg = psi_impl_arg_init(yymsp[-6].minor.yy142, psi_impl_var_init(yymsp[-3].minor.yy0->text, yymsp[-5].minor.yy273), NULL); - free(yymsp[-3].minor.yy0); +#line 4638 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 532: +#line 1737 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_impl **)(&(*yyvalp))) = psi_impl_init((*(struct psi_impl_func **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval)), (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); } -#line 2706 "src/parser_proc.c" - yy_destructor(yypParser,73,&yymsp[-9].minor); - yy_destructor(yypParser,74,&yymsp[-7].minor); - yy_destructor(yypParser,84,&yymsp[-4].minor); - yy_destructor(yypParser,75,&yymsp[-2].minor); - yy_destructor(yypParser,72,&yymsp[-1].minor); +#line 4646 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 533: +#line 1740 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_impl **)(&(*yyvalp))) = psi_impl_init((*(struct psi_impl_func **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval)), (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + (*(struct psi_impl_func **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))->static_memory = 1; +} +#line 4655 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 534: +#line 1747 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_impl_func **)(&(*yyvalp))) = psi_impl_func_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval))->text, NULL, (*(struct psi_impl_type **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_impl_func **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval))); + (*(struct psi_impl_func **)(&(*yyvalp)))->return_reference = (*(bool*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-5)].yystate.yysemantics.yysval)); +} +#line 4665 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 535: +#line 1752 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_impl_func **)(&(*yyvalp))) = psi_impl_func_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-5)].yystate.yysemantics.yysval))->text, (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval)), (*(struct psi_impl_type **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_impl_func **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-5)].yystate.yysemantics.yysval))); + (*(struct psi_impl_func **)(&(*yyvalp)))->return_reference = (*(bool*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-6)].yystate.yysemantics.yysval)); +} +#line 4675 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 536: +#line 1757 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_impl_func **)(&(*yyvalp))) = psi_impl_func_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-10)].yystate.yysemantics.yysval))->text, (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-8)].yystate.yysemantics.yysval)), (*(struct psi_impl_type **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_impl_func **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-10)].yystate.yysemantics.yysval))); + (*(struct psi_impl_func **)(&(*yyvalp)))->return_reference = (*(bool*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-11)].yystate.yysemantics.yysval)); + (*(struct psi_impl_func **)(&(*yyvalp)))->vararg = psi_impl_arg_init((*(struct psi_impl_type **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-6)].yystate.yysemantics.yysval)), psi_impl_var_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))->text, (*(bool*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-5)].yystate.yysemantics.yysval))), NULL); + (*(struct psi_impl_func **)(&(*yyvalp)))->vararg->var->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))); +} +#line 4687 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 537: +#line 1767 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add(psi_plist_init((psi_plist_dtor) psi_impl_arg_free), &(*(struct psi_impl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } - break; - case 89: /* impl_def_val ::= NULL|NUMBER|TRUE|FALSE|QUOTED_STRING */ -#line 693 "src/parser_proc.y" -{ - yylhsminor.yy21 = psi_impl_def_val_init(yymsp[0].minor.yy0->type, yymsp[0].minor.yy0->text); - yylhsminor.yy21->token = yymsp[0].minor.yy0; +#line 4695 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 538: +#line 1770 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)), &(*(struct psi_impl_arg **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2720 "src/parser_proc.c" - yymsp[0].minor.yy21 = yylhsminor.yy21; - break; - case 90: /* impl_var ::= reference DOLLAR_NAME */ -#line 697 "src/parser_proc.y" -{ - yylhsminor.yy185 = psi_impl_var_init(yymsp[0].minor.yy0->text, yymsp[-1].minor.yy273); - yylhsminor.yy185->token = yymsp[0].minor.yy0; +#line 4703 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 539: +#line 1776 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_impl_arg **)(&(*yyvalp))) = psi_impl_arg_init((*(struct psi_impl_type **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)), (*(struct psi_impl_var **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)), NULL); } -#line 2729 "src/parser_proc.c" - yymsp[-1].minor.yy185 = yylhsminor.yy185; - break; - case 91: /* impl_type ::= VOID|MIXED|BOOL|INT|FLOAT|STRING|ARRAY|OBJECT|CALLABLE */ -#line 701 "src/parser_proc.y" -{ - yylhsminor.yy142 = psi_impl_type_init(yymsp[0].minor.yy0->type, yymsp[0].minor.yy0->text); - free(yymsp[0].minor.yy0); +#line 4711 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 540: +#line 1779 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_impl_arg **)(&(*yyvalp))) = psi_impl_arg_init((*(struct psi_impl_type **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval)), (*(struct psi_impl_var **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)), (*(struct psi_impl_def_val **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2738 "src/parser_proc.c" - yymsp[0].minor.yy142 = yylhsminor.yy142; - break; - case 92: /* impl_arg ::= impl_type impl_var */ -#line 705 "src/parser_proc.y" -{ - yylhsminor.yy238 = psi_impl_arg_init(yymsp[-1].minor.yy142, yymsp[0].minor.yy185, NULL); +#line 4719 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 541: +#line 1785 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_impl_var **)(&(*yyvalp))) = psi_impl_var_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->text, (*(bool*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + (*(struct psi_impl_var **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); +} +#line 4728 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 542: +#line 1792 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_impl_type **)(&(*yyvalp))) = psi_impl_type_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->text); + (*(struct psi_impl_type **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); +} +#line 4737 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 552: +#line 1811 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add(psi_plist_init((psi_plist_dtor) psi_impl_stmt_free), &(*(struct psi_token ***)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2746 "src/parser_proc.c" - yymsp[-1].minor.yy238 = yylhsminor.yy238; - break; - case 93: /* impl_arg ::= impl_type impl_var EQUALS impl_def_val */ -#line 708 "src/parser_proc.y" -{ - yylhsminor.yy238 = psi_impl_arg_init(yymsp[-3].minor.yy142, yymsp[-2].minor.yy185, yymsp[0].minor.yy21); +#line 4745 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 553: +#line 1814 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)), &(*(struct psi_token ***)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2754 "src/parser_proc.c" - yy_destructor(yypParser,81,&yymsp[-1].minor); - yymsp[-3].minor.yy238 = yylhsminor.yy238; - break; - case 94: /* impl_args ::= impl_arg */ -#line 711 "src/parser_proc.y" -{ - yylhsminor.yy303 = psi_plist_add(psi_plist_init((psi_plist_dtor) psi_impl_arg_free), - &yymsp[0].minor.yy238); +#line 4753 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 554: +#line 1820 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token ***)(&(*yyvalp))) = (struct psi_token **) (*(struct psi_return_stmt **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); } -#line 2764 "src/parser_proc.c" - yymsp[0].minor.yy303 = yylhsminor.yy303; - break; - case 95: /* impl_args ::= impl_args COMMA impl_arg */ -#line 715 "src/parser_proc.y" -{ - yylhsminor.yy303 = psi_plist_add(yymsp[-2].minor.yy303, &yymsp[0].minor.yy238); +#line 4761 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 555: +#line 1823 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token ***)(&(*yyvalp))) = (struct psi_token **) (*(struct psi_let_stmt **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); } -#line 2772 "src/parser_proc.c" - yy_destructor(yypParser,74,&yymsp[-1].minor); - yymsp[-2].minor.yy303 = yylhsminor.yy303; - break; - case 96: /* impl_stmts ::= impl_stmt */ -#line 718 "src/parser_proc.y" -{ - yylhsminor.yy303 = psi_plist_add(psi_plist_init((psi_plist_dtor) psi_impl_stmt_free), - &yymsp[0].minor.yy38); +#line 4769 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 556: +#line 1826 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token ***)(&(*yyvalp))) = (struct psi_token **) (*(struct psi_set_stmt **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); } -#line 2782 "src/parser_proc.c" - yymsp[0].minor.yy303 = yylhsminor.yy303; - break; - case 97: /* impl_stmts ::= impl_stmts impl_stmt */ -#line 722 "src/parser_proc.y" -{ - yylhsminor.yy303 = psi_plist_add(yymsp[-1].minor.yy303, &yymsp[0].minor.yy38); +#line 4777 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 557: +#line 1829 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token ***)(&(*yyvalp))) = (struct psi_token **) (*(struct psi_assert_stmt **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); } -#line 2790 "src/parser_proc.c" - yymsp[-1].minor.yy303 = yylhsminor.yy303; - break; - case 98: /* impl_stmt ::= return_stmt */ -#line 725 "src/parser_proc.y" -{ - yylhsminor.yy38 = (struct psi_token**) yymsp[0].minor.yy130; +#line 4785 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 558: +#line 1832 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token ***)(&(*yyvalp))) = (struct psi_token **) (*(struct psi_free_stmt **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); } -#line 2798 "src/parser_proc.c" - yymsp[0].minor.yy38 = yylhsminor.yy38; - break; - case 99: /* impl_stmt ::= let_stmt */ -#line 728 "src/parser_proc.y" -{ - yylhsminor.yy38 = (struct psi_token**) yymsp[0].minor.yy139; +#line 4793 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 559: +#line 1838 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_let_stmt **)(&(*yyvalp))) = psi_let_stmt_init((*(struct psi_let_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + (*(struct psi_let_stmt **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))); +} +#line 4802 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 560: +#line 1842 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_let_stmt **)(&(*yyvalp))) = psi_let_stmt_init(psi_let_exp_init_ex((*(struct psi_decl_var **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval)), PSI_LET_TMP, (*(struct psi_decl_var **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)))); + (*(struct psi_let_stmt **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-5)].yystate.yysemantics.yysval))); + (*(struct psi_let_stmt **)(&(*yyvalp)))->exp->is_reference = (*(bool*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)); +} +#line 4812 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 562: +#line 1851 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_let_exp **)(&(*yyvalp))) = (*(struct psi_let_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); + (*(struct psi_let_exp **)(&(*yyvalp)))->is_reference = true; +} +#line 4821 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 563: +#line 1855 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_let_exp **)(&(*yyvalp))) = (*(struct psi_let_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); + (*(struct psi_let_exp **)(&(*yyvalp)))->is_reference = false; +} +#line 4830 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 564: +#line 1862 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_let_exp **)(&(*yyvalp))) = psi_let_exp_init(PSI_LET_NULL, NULL); } -#line 2806 "src/parser_proc.c" - yymsp[0].minor.yy38 = yylhsminor.yy38; - break; - case 100: /* impl_stmt ::= set_stmt */ -#line 731 "src/parser_proc.y" -{ - yylhsminor.yy38 = (struct psi_token**) yymsp[0].minor.yy226; +#line 4838 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 565: +#line 1865 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_let_exp **)(&(*yyvalp))) = psi_let_exp_init_ex(NULL, PSI_LET_NUMEXP, (*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2814 "src/parser_proc.c" - yymsp[0].minor.yy38 = yylhsminor.yy38; - break; - case 101: /* impl_stmt ::= free_stmt */ -#line 734 "src/parser_proc.y" -{ - yylhsminor.yy38 = (struct psi_token**) yymsp[0].minor.yy76; +#line 4846 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 566: +#line 1868 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_let_exp **)(&(*yyvalp))) = psi_let_exp_init(PSI_LET_CALLOC, (*(struct psi_let_calloc **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2822 "src/parser_proc.c" - yymsp[0].minor.yy38 = yylhsminor.yy38; - break; - case 102: /* number ::= NUMBER|NSNAME */ -#line 737 "src/parser_proc.y" -{ - yylhsminor.yy160 = psi_number_init(yymsp[0].minor.yy0->type, yymsp[0].minor.yy0->text); - yylhsminor.yy160->token = yymsp[0].minor.yy0; +#line 4854 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 567: +#line 1871 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_let_exp **)(&(*yyvalp))) = psi_let_exp_init(PSI_LET_CALLOC, (*(struct psi_let_calloc **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); + (*(struct psi_let_calloc **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->static_memory = 1; +} +#line 4863 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 568: +#line 1875 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_let_exp **)(&(*yyvalp))) = psi_let_exp_init(PSI_LET_CALLBACK, (*(struct psi_let_callback **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2831 "src/parser_proc.c" - yymsp[0].minor.yy160 = yylhsminor.yy160; - break; - case 103: /* number ::= decl_var */ -#line 741 "src/parser_proc.y" -{ - yylhsminor.yy160 = psi_number_init(PSI_T_NAME, yymsp[0].minor.yy207); - yylhsminor.yy160->token = psi_token_copy(yymsp[0].minor.yy207->token); +#line 4871 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 569: +#line 1878 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_let_exp **)(&(*yyvalp))) = psi_let_exp_init_ex(NULL, PSI_LET_FUNC, (*(struct psi_let_func **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2840 "src/parser_proc.c" - yymsp[0].minor.yy160 = yylhsminor.yy160; - break; - case 104: /* num_exp ::= number */ -#line 745 "src/parser_proc.y" -{ - yylhsminor.yy39 = psi_num_exp_init_num(yymsp[0].minor.yy160); - yylhsminor.yy39->token = psi_token_copy(yymsp[0].minor.yy160->token); +#line 4879 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 570: +#line 1884 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_let_exp **)(&(*yyvalp))) = (*(struct psi_let_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); + (*(struct psi_let_exp **)(&(*yyvalp)))->var = (*(struct psi_decl_var **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)); +} +#line 4888 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 571: +#line 1888 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_let_exp **)(&(*yyvalp))) = (*(struct psi_let_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); + (*(struct psi_let_exp **)(&(*yyvalp)))->is_reference = 1; + (*(struct psi_let_exp **)(&(*yyvalp)))->var = (*(struct psi_decl_var **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval)); +} +#line 4898 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 572: +#line 1896 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_let_calloc **)(&(*yyvalp))) = psi_let_calloc_init((*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval)), (*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + (*(struct psi_let_calloc **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-5)].yystate.yysemantics.yysval))); +} +#line 4907 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 573: +#line 1903 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_let_callback **)(&(*yyvalp))) = psi_let_callback_init(psi_let_func_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-6)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-6)].yystate.yysemantics.yysval))->text, (*(struct psi_impl_var **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval))), (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)), NULL); + (*(struct psi_let_callback **)(&(*yyvalp)))->func->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-6)].yystate.yysemantics.yysval))); + (*(struct psi_let_callback **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-7)].yystate.yysemantics.yysval))); +} +#line 4917 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 574: +#line 1908 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_let_callback **)(&(*yyvalp))) = psi_let_callback_init(psi_let_func_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-6)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-6)].yystate.yysemantics.yysval))->text, (*(struct psi_impl_var **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval))), (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)), (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-9)].yystate.yysemantics.yysval))); + (*(struct psi_let_callback **)(&(*yyvalp)))->func->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-6)].yystate.yysemantics.yysval))); + (*(struct psi_let_callback **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-11)].yystate.yysemantics.yysval))); +} +#line 4927 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 575: +#line 1916 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_let_func **)(&(*yyvalp))) = psi_let_func_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval))->text, (*(struct psi_impl_var **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))); + (*(struct psi_let_func **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval))); + (*(struct psi_let_func **)(&(*yyvalp)))->inner = (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)); +} +#line 4937 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 586: +#line 1937 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = NULL; } -#line 2849 "src/parser_proc.c" - yymsp[0].minor.yy39 = yylhsminor.yy39; - break; - case 105: /* num_exp ::= LPAREN num_exp RPAREN */ -#line 749 "src/parser_proc.y" -{ - yylhsminor.yy39 = psi_num_exp_init_unary(PSI_T_LPAREN, yymsp[-1].minor.yy39); - yylhsminor.yy39->token = yymsp[-2].minor.yy0; +#line 4945 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 587: +#line 1940 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); } -#line 2858 "src/parser_proc.c" - yy_destructor(yypParser,75,&yymsp[0].minor); - yymsp[-2].minor.yy39 = yylhsminor.yy39; - break; - case 106: /* num_exp ::= num_exp PIPE|CARET|AMPERSAND|LSHIFT|RSHIFT|PLUS|MINUS|ASTERISK|SLASH|MODULO|RCHEVR|LCHEVR|CMP_GE|CMP_LE|OR|AND|CMP_EQ|CMP_NE num_exp */ -#line 753 "src/parser_proc.y" -{ - yylhsminor.yy39 = psi_num_exp_init_binary(yymsp[-1].minor.yy0->type, yymsp[-2].minor.yy39, yymsp[0].minor.yy39); - yylhsminor.yy39->token = yymsp[-1].minor.yy0; +#line 4953 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 588: +#line 1946 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add(psi_plist_init((psi_plist_dtor) psi_let_exp_free), &(*(struct psi_let_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2868 "src/parser_proc.c" - yymsp[-2].minor.yy39 = yylhsminor.yy39; - break; - case 107: /* num_exp ::= TILDE|NOT|PLUS|MINUS num_exp */ -#line 757 "src/parser_proc.y" -{ - yylhsminor.yy39 = psi_num_exp_init_unary(yymsp[-1].minor.yy0->type, yymsp[0].minor.yy39); - yylhsminor.yy39->token = yymsp[-1].minor.yy0; +#line 4961 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 589: +#line 1949 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)), &(*(struct psi_let_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2877 "src/parser_proc.c" - yymsp[-1].minor.yy39 = yylhsminor.yy39; - break; - case 108: /* let_exp ::= NULL */ -{ yy_destructor(yypParser,15,&yymsp[0].minor); -#line 761 "src/parser_proc.y" -{ - yymsp[0].minor.yy144 = psi_let_exp_init(PSI_LET_NULL, NULL); +#line 4969 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 592: +#line 1960 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = NULL; } -#line 2886 "src/parser_proc.c" +#line 4977 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 593: +#line 1963 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); } - break; - case 109: /* let_exp ::= AMPERSAND NULL */ -{ yy_destructor(yypParser,23,&yymsp[-1].minor); -#line 764 "src/parser_proc.y" -{ - yymsp[-1].minor.yy144 = psi_let_exp_init(PSI_LET_NULL, NULL); - yymsp[-1].minor.yy144->is_reference = 1; +#line 4985 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 594: +#line 1969 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add(psi_plist_init((psi_plist_dtor) psi_set_exp_free), &(*(struct psi_set_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2896 "src/parser_proc.c" - yy_destructor(yypParser,15,&yymsp[0].minor); +#line 4993 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 595: +#line 1972 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)), &(*(struct psi_set_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } - break; - case 110: /* let_exp ::= let_callback */ -#line 768 "src/parser_proc.y" -{ - yylhsminor.yy144 = psi_let_exp_init(PSI_LET_CALLBACK, yymsp[0].minor.yy164); +#line 5001 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 596: +#line 1978 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_return_stmt **)(&(*yyvalp))) = psi_return_stmt_init((*(struct psi_return_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + (*(struct psi_return_stmt **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))); +} +#line 5010 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 597: +#line 1985 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_return_exp **)(&(*yyvalp))) = psi_return_exp_init((*(struct psi_decl_var **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-5)].yystate.yysemantics.yysval)), (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval)), psi_set_exp_init(PSI_SET_FUNC, (*(struct psi_set_func **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)))); + (*(struct psi_return_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_decl_var **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-5)].yystate.yysemantics.yysval))->token); +} +#line 5019 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 598: +#line 1989 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_return_exp **)(&(*yyvalp))) = psi_return_exp_init(NULL, NULL, psi_set_exp_init(PSI_SET_FUNC, (*(struct psi_set_func **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)))); + (*(struct psi_return_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_set_func **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))->token); +} +#line 5028 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 599: +#line 1996 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = NULL; } -#line 2905 "src/parser_proc.c" - yymsp[0].minor.yy144 = yylhsminor.yy144; - break; - case 111: /* let_exp ::= let_calloc */ -#line 771 "src/parser_proc.y" -{ - yylhsminor.yy144 = psi_let_exp_init(PSI_LET_CALLOC, yymsp[0].minor.yy17); +#line 5036 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 600: +#line 1999 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = NULL; } -#line 2913 "src/parser_proc.c" - yymsp[0].minor.yy144 = yylhsminor.yy144; - break; - case 112: /* let_exp ::= AMPERSAND let_calloc */ -{ yy_destructor(yypParser,23,&yymsp[-1].minor); -#line 774 "src/parser_proc.y" -{ - yymsp[-1].minor.yy144 = psi_let_exp_init(PSI_LET_CALLOC, yymsp[0].minor.yy17); - yymsp[-1].minor.yy144->is_reference = 1; +#line 5044 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 601: +#line 2002 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); } -#line 2923 "src/parser_proc.c" +#line 5052 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 602: +#line 2008 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_set_stmt **)(&(*yyvalp))) = psi_set_stmt_init((*(struct psi_set_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + (*(struct psi_set_stmt **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))); +} +#line 5061 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 603: +#line 2015 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_set_exp **)(&(*yyvalp))) = psi_set_exp_init(PSI_SET_FUNC, (*(struct psi_set_func **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } - break; - case 113: /* let_exp ::= let_func */ -#line 778 "src/parser_proc.y" -{ - yylhsminor.yy144 = psi_let_exp_init_ex(NULL, PSI_LET_FUNC, yymsp[0].minor.yy72); +#line 5069 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 604: +#line 2018 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_set_exp **)(&(*yyvalp))) = psi_set_exp_init(PSI_SET_NUMEXP, (*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2931 "src/parser_proc.c" - yymsp[0].minor.yy144 = yylhsminor.yy144; - break; - case 114: /* let_exp ::= AMPERSAND let_func */ -{ yy_destructor(yypParser,23,&yymsp[-1].minor); -#line 781 "src/parser_proc.y" -{ - yymsp[-1].minor.yy144 = psi_let_exp_init_ex(NULL, PSI_LET_FUNC, yymsp[0].minor.yy72); - yymsp[-1].minor.yy144->is_reference = 1; +#line 5077 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 605: +#line 2021 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_set_exp **)(&(*yyvalp))) = (*(struct psi_set_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); + (*(struct psi_set_exp **)(&(*yyvalp)))->var = (*(struct psi_impl_var **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)); +} +#line 5086 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 606: +#line 2028 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_set_func **)(&(*yyvalp))) = psi_set_func_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval))->text, (*(struct psi_decl_var **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))); + (*(struct psi_set_func **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-4)].yystate.yysemantics.yysval))); + (*(struct psi_set_func **)(&(*yyvalp)))->inner = (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)); +} +#line 5096 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 607: +#line 2033 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_set_func **)(&(*yyvalp))) = psi_set_func_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-5)].yystate.yysemantics.yysval))->type, (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-5)].yystate.yysemantics.yysval))->text, (*(struct psi_decl_var **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))); + (*(struct psi_set_func **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-5)].yystate.yysemantics.yysval))); + (*(struct psi_set_func **)(&(*yyvalp)))->recursive = 1; +} +#line 5106 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 616: +#line 2052 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = NULL; } -#line 2941 "src/parser_proc.c" +#line 5114 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 617: +#line 2055 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval)); } - break; - case 115: /* let_exp ::= num_exp */ -#line 785 "src/parser_proc.y" -{ - yylhsminor.yy144 = psi_let_exp_init_ex(NULL, PSI_LET_NUMEXP, yymsp[0].minor.yy39); +#line 5122 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 618: +#line 2061 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add(psi_plist_init((psi_plist_dtor) psi_set_exp_free), &(*(struct psi_set_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2949 "src/parser_proc.c" - yymsp[0].minor.yy144 = yylhsminor.yy144; - break; - case 116: /* let_exp ::= AMPERSAND num_exp */ -{ yy_destructor(yypParser,23,&yymsp[-1].minor); -#line 788 "src/parser_proc.y" -{ - yymsp[-1].minor.yy144 = psi_let_exp_init_ex(NULL, PSI_LET_NUMEXP, yymsp[0].minor.yy39); - yymsp[-1].minor.yy144->is_reference = 1; +#line 5130 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 619: +#line 2064 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)), &(*(struct psi_set_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2959 "src/parser_proc.c" +#line 5138 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 620: +#line 2070 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_assert_stmt **)(&(*yyvalp))) = psi_assert_stmt_init((enum psi_assert_kind) (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))->type, (*(struct psi_num_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + (*(struct psi_assert_stmt **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))); +} +#line 5147 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 623: +#line 2082 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_free_stmt **)(&(*yyvalp))) = psi_free_stmt_init((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + (*(struct psi_free_stmt **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval))); +} +#line 5156 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 624: +#line 2089 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add(psi_plist_init((psi_plist_dtor) psi_free_exp_free), &(*(struct psi_free_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } - break; - case 117: /* let_exp ::= decl_var EQUALS let_exp */ -#line 792 "src/parser_proc.y" -{ - yylhsminor.yy144 = yymsp[0].minor.yy144; - yylhsminor.yy144->var = yymsp[-2].minor.yy207; +#line 5164 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 625: +#line 2092 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_add((*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].yystate.yysemantics.yysval)), &(*(struct psi_free_exp **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval))); } -#line 2968 "src/parser_proc.c" - yy_destructor(yypParser,81,&yymsp[-1].minor); - yymsp[-2].minor.yy144 = yylhsminor.yy144; - break; - case 118: /* let_stmt ::= LET let_exp EOS */ -#line 796 "src/parser_proc.y" -{ - yylhsminor.yy139 = psi_let_stmt_init(yymsp[-1].minor.yy144); - yylhsminor.yy139->token = yymsp[-2].minor.yy0; +#line 5172 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 626: +#line 2098 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))->type = PSI_T_NAME; + (*(struct psi_free_exp **)(&(*yyvalp))) = psi_free_exp_init((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))->text, (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))); + (*(struct psi_free_exp **)(&(*yyvalp)))->token = psi_token_copy((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval))); +} +#line 5182 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 627: +#line 2106 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(bool*)(&(*yyvalp))) = false; } -#line 2978 "src/parser_proc.c" - yy_destructor(yypParser,71,&yymsp[0].minor); - yymsp[-2].minor.yy139 = yylhsminor.yy139; - break; - case 119: /* let_stmt ::= TEMP decl_var EQUALS reference decl_var EOS */ -#line 800 "src/parser_proc.y" -{ - yylhsminor.yy139 = psi_let_stmt_init(psi_let_exp_init_ex(yymsp[-4].minor.yy207, PSI_LET_TMP, yymsp[-1].minor.yy207)); - yylhsminor.yy139->token = yymsp[-5].minor.yy0; - yylhsminor.yy139->exp->is_reference = yymsp[-2].minor.yy273 ? 1 : 0; +#line 5190 "src/parser_proc.c" /* glr.c:816 */ + break; + + case 628: +#line 2109 "src/parser_proc_grammar.y" /* glr.c:816 */ + { + (*(bool*)(&(*yyvalp))) = true; } -#line 2989 "src/parser_proc.c" - yy_destructor(yypParser,81,&yymsp[-3].minor); - yy_destructor(yypParser,71,&yymsp[0].minor); - yymsp[-5].minor.yy139 = yylhsminor.yy139; - break; - case 120: /* let_callback ::= CALLBACK callback_rval LPAREN impl_var LPAREN callback_arg_list RPAREN RPAREN */ -#line 805 "src/parser_proc.y" -{ - yylhsminor.yy164 = psi_let_callback_init(psi_let_func_init(yymsp[-6].minor.yy0->type, yymsp[-6].minor.yy0->text, yymsp[-4].minor.yy185), yymsp[-2].minor.yy287); - yylhsminor.yy164->token = yymsp[-7].minor.yy0; - free(yymsp[-6].minor.yy0); +#line 5198 "src/parser_proc.c" /* glr.c:816 */ + break; + + +#line 5202 "src/parser_proc.c" /* glr.c:816 */ + default: break; + } + + return yyok; +# undef yyerrok +# undef YYABORT +# undef YYACCEPT +# undef YYERROR +# undef YYBACKUP +# undef yyclearin +# undef YYRECOVERING } -#line 3001 "src/parser_proc.c" - yy_destructor(yypParser,73,&yymsp[-5].minor); - yy_destructor(yypParser,73,&yymsp[-3].minor); - yy_destructor(yypParser,75,&yymsp[-1].minor); - yy_destructor(yypParser,75,&yymsp[0].minor); - yymsp[-7].minor.yy164 = yylhsminor.yy164; - break; - case 121: /* let_calloc ::= CALLOC LPAREN num_exp COMMA num_exp RPAREN */ -#line 810 "src/parser_proc.y" + + +static void +yyuserMerge (int yyn, YYSTYPE* yy0, YYSTYPE* yy1) { - yylhsminor.yy17 = psi_let_calloc_init(yymsp[-3].minor.yy39, yymsp[-1].minor.yy39); - yylhsminor.yy17->token = yymsp[-5].minor.yy0; + YYUSE (yy0); + YYUSE (yy1); + + switch (yyn) + { + + default: break; + } } -#line 3014 "src/parser_proc.c" - yy_destructor(yypParser,73,&yymsp[-4].minor); - yy_destructor(yypParser,74,&yymsp[-2].minor); - yy_destructor(yypParser,75,&yymsp[0].minor); - yymsp[-5].minor.yy17 = yylhsminor.yy17; + + /* Bison grammar-table manipulation. */ + +/*-----------------------------------------------. +| Release the memory associated to this symbol. | +`-----------------------------------------------*/ + +static void +yydestruct (const char *yymsg, int yytype, YYSTYPE *yyvaluep, struct psi_parser *P, struct psi_plist *tokens, size_t *index) +{ + YYUSE (yyvaluep); + YYUSE (P); + YYUSE (tokens); + YYUSE (index); + if (!yymsg) + yymsg = "Deleting"; + YY_SYMBOL_PRINT (yymsg, yytype, yyvaluep, yylocationp); + + YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN + switch (yytype) + { + case 141: /* binary_op_token */ +#line 315 "src/parser_proc_grammar.y" /* glr.c:846 */ + {} +#line 5253 "src/parser_proc.c" /* glr.c:846 */ break; - case 122: /* let_func ::= ZVAL|OBJVAL|ARRVAL|PATHVAL|STRLEN|STRVAL|FLOATVAL|INTVAL|BOOLVAL|COUNT LPAREN impl_var RPAREN */ -#line 814 "src/parser_proc.y" -{ - yylhsminor.yy72 = psi_let_func_init(yymsp[-3].minor.yy0->type, yymsp[-3].minor.yy0->text, yymsp[-1].minor.yy185); - yylhsminor.yy72->token = yymsp[-3].minor.yy0; -} -#line 3026 "src/parser_proc.c" - yy_destructor(yypParser,73,&yymsp[-2].minor); - yy_destructor(yypParser,75,&yymsp[0].minor); - yymsp[-3].minor.yy72 = yylhsminor.yy72; + + case 142: /* unary_op_token */ +#line 315 "src/parser_proc_grammar.y" /* glr.c:846 */ + {} +#line 5259 "src/parser_proc.c" /* glr.c:846 */ break; - case 123: /* let_func ::= ZVAL|OBJVAL|ARRVAL|PATHVAL|STRLEN|STRVAL|FLOATVAL|INTVAL|BOOLVAL|COUNT LPAREN impl_var COMMA let_exps RPAREN */ -#line 818 "src/parser_proc.y" -{ - yylhsminor.yy72 = psi_let_func_init(yymsp[-5].minor.yy0->type, yymsp[-5].minor.yy0->text, yymsp[-3].minor.yy185); - yylhsminor.yy72->token = yymsp[-5].minor.yy0; - yylhsminor.yy72->inner = yymsp[-1].minor.yy303; -} -#line 3038 "src/parser_proc.c" - yy_destructor(yypParser,73,&yymsp[-4].minor); - yy_destructor(yypParser,74,&yymsp[-2].minor); - yy_destructor(yypParser,75,&yymsp[0].minor); - yymsp[-5].minor.yy72 = yylhsminor.yy72; + + case 143: /* name_token */ +#line 315 "src/parser_proc_grammar.y" /* glr.c:846 */ + {} +#line 5265 "src/parser_proc.c" /* glr.c:846 */ break; - case 124: /* let_exps ::= let_exp */ -#line 823 "src/parser_proc.y" -{ - yylhsminor.yy303 = psi_plist_add(psi_plist_init((psi_plist_dtor) psi_let_exp_free), - &yymsp[0].minor.yy144); -} -#line 3050 "src/parser_proc.c" - yymsp[0].minor.yy303 = yylhsminor.yy303; + + case 144: /* any_noeol_token */ +#line 315 "src/parser_proc_grammar.y" /* glr.c:846 */ + {} +#line 5271 "src/parser_proc.c" /* glr.c:846 */ break; - case 125: /* let_exps ::= let_exps COMMA let_exp */ -#line 827 "src/parser_proc.y" -{ - yylhsminor.yy303 = psi_plist_add(yymsp[-2].minor.yy303, &yymsp[0].minor.yy144); -} -#line 3058 "src/parser_proc.c" - yy_destructor(yypParser,74,&yymsp[-1].minor); - yymsp[-2].minor.yy303 = yylhsminor.yy303; + + case 149: /* lib */ +#line 309 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));} +#line 5277 "src/parser_proc.c" /* glr.c:846 */ break; - case 126: /* callback_arg_list ::= */ -#line 830 "src/parser_proc.y" -{ - yymsp[1].minor.yy287 = NULL; -} -#line 3067 "src/parser_proc.c" + + case 150: /* cpp */ +#line 324 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_cpp_exp_free(&(*(struct psi_cpp_exp **)(&(*yyvaluep))));} +#line 5283 "src/parser_proc.c" /* glr.c:846 */ break; - case 127: /* callback_arg_list ::= callback_args */ -#line 833 "src/parser_proc.y" -{ - yylhsminor.yy287 = yymsp[0].minor.yy287; -} -#line 3074 "src/parser_proc.c" - yymsp[0].minor.yy287 = yylhsminor.yy287; + + case 151: /* cpp_exp */ +#line 324 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_cpp_exp_free(&(*(struct psi_cpp_exp **)(&(*yyvaluep))));} +#line 5289 "src/parser_proc.c" /* glr.c:846 */ break; - case 128: /* callback_args ::= set_exp */ -#line 836 "src/parser_proc.y" -{ - yylhsminor.yy287 = psi_plist_add(psi_plist_init((psi_plist_dtor) psi_set_exp_free), - &yymsp[0].minor.yy67); -} -#line 3083 "src/parser_proc.c" - yymsp[0].minor.yy287 = yylhsminor.yy287; + + case 153: /* cpp_message_token */ +#line 312 "src/parser_proc_grammar.y" /* glr.c:846 */ + {} +#line 5295 "src/parser_proc.c" /* glr.c:846 */ break; - case 129: /* callback_args ::= callback_args COMMA set_exp */ -#line 840 "src/parser_proc.y" -{ - yylhsminor.yy287 = psi_plist_add(yymsp[-2].minor.yy287, &yymsp[0].minor.yy67); -} -#line 3091 "src/parser_proc.c" - yy_destructor(yypParser,74,&yymsp[-1].minor); - yymsp[-2].minor.yy287 = yylhsminor.yy287; + + case 154: /* cpp_include_token */ +#line 312 "src/parser_proc_grammar.y" /* glr.c:846 */ + {} +#line 5301 "src/parser_proc.c" /* glr.c:846 */ break; - case 132: /* set_func ::= TO_OBJECT|TO_ARRAY|TO_STRING|TO_INT|TO_FLOAT|TO_BOOL|ZVAL|VOID LPAREN decl_var RPAREN */ -#line 849 "src/parser_proc.y" -{ - yylhsminor.yy78 = psi_set_func_init(yymsp[-3].minor.yy0->type, yymsp[-3].minor.yy0->text, yymsp[-1].minor.yy207); - yylhsminor.yy78->token = yymsp[-3].minor.yy0; -} -#line 3101 "src/parser_proc.c" - yy_destructor(yypParser,73,&yymsp[-2].minor); - yy_destructor(yypParser,75,&yymsp[0].minor); - yymsp[-3].minor.yy78 = yylhsminor.yy78; + + case 155: /* cpp_header_token */ +#line 312 "src/parser_proc_grammar.y" /* glr.c:846 */ + {} +#line 5307 "src/parser_proc.c" /* glr.c:846 */ break; - case 133: /* set_func ::= TO_OBJECT|TO_ARRAY|TO_STRING|TO_INT|TO_FLOAT|TO_BOOL|ZVAL|VOID LPAREN decl_var COMMA set_exps RPAREN */ -#line 853 "src/parser_proc.y" -{ - yylhsminor.yy78 = psi_set_func_init(yymsp[-5].minor.yy0->type, yymsp[-5].minor.yy0->text, yymsp[-3].minor.yy207); - yylhsminor.yy78->token = yymsp[-5].minor.yy0; - yylhsminor.yy78->inner = yymsp[-1].minor.yy303; -} -#line 3113 "src/parser_proc.c" - yy_destructor(yypParser,73,&yymsp[-4].minor); - yy_destructor(yypParser,74,&yymsp[-2].minor); - yy_destructor(yypParser,75,&yymsp[0].minor); - yymsp[-5].minor.yy78 = yylhsminor.yy78; + + case 156: /* cpp_no_arg_token */ +#line 312 "src/parser_proc_grammar.y" /* glr.c:846 */ + {} +#line 5313 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 157: /* cpp_name_arg_token */ +#line 312 "src/parser_proc_grammar.y" /* glr.c:846 */ + {} +#line 5319 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 158: /* cpp_exp_arg_token */ +#line 312 "src/parser_proc_grammar.y" /* glr.c:846 */ + {} +#line 5325 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 159: /* cpp_special_name_token */ +#line 312 "src/parser_proc_grammar.y" /* glr.c:846 */ + {} +#line 5331 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 160: /* cpp_macro_decl */ +#line 326 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_cpp_macro_decl_free(&(*(struct psi_cpp_macro_decl **)(&(*yyvaluep))));} +#line 5337 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 161: /* cpp_macro_sig */ +#line 328 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5343 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 162: /* cpp_macro_sig_args */ +#line 328 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5349 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 163: /* cpp_macro_decl_tokens */ +#line 328 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5355 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 164: /* cpp_macro_decl_token_list */ +#line 328 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5361 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 165: /* cpp_macro_exp */ +#line 330 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_num_exp_free(&(*(struct psi_num_exp **)(&(*yyvaluep))));} +#line 5367 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 166: /* cpp_macro_call_args */ +#line 328 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5373 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 167: /* cpp_macro_call_arg_list */ +#line 328 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5379 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 168: /* constant */ +#line 336 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_const_free(&(*(struct psi_const **)(&(*yyvaluep))));} +#line 5385 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 169: /* constant_type */ +#line 338 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_const_type_free(&(*(struct psi_const_type **)(&(*yyvaluep))));} +#line 5391 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 170: /* constant_type_token */ +#line 333 "src/parser_proc_grammar.y" /* glr.c:846 */ + {} +#line 5397 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 171: /* impl_def_val */ +#line 340 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_impl_def_val_free(&(*(struct psi_impl_def_val **)(&(*yyvaluep))));} +#line 5403 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 172: /* impl_def_val_token */ +#line 333 "src/parser_proc_grammar.y" /* glr.c:846 */ + {} +#line 5409 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 173: /* decl_typedef */ +#line 350 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_decl_arg_free(&(*(struct psi_decl_arg **)(&(*yyvaluep))));} +#line 5415 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 174: /* typedef */ +#line 350 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_decl_arg_free(&(*(struct psi_decl_arg **)(&(*yyvaluep))));} +#line 5421 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 175: /* typedef_anon */ +#line 350 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_decl_arg_free(&(*(struct psi_decl_arg **)(&(*yyvaluep))));} +#line 5427 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 176: /* typedef_decl */ +#line 350 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_decl_arg_free(&(*(struct psi_decl_arg **)(&(*yyvaluep))));} +#line 5433 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 177: /* typedef_anon_decl */ +#line 350 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_decl_arg_free(&(*(struct psi_decl_arg **)(&(*yyvaluep))));} +#line 5439 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 178: /* qualified_decl_type */ +#line 346 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_decl_type_free(&(*(struct psi_decl_type **)(&(*yyvaluep))));} +#line 5445 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 179: /* decl_type */ +#line 346 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_decl_type_free(&(*(struct psi_decl_type **)(&(*yyvaluep))));} +#line 5451 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 180: /* decl_type_complex */ +#line 346 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_decl_type_free(&(*(struct psi_decl_type **)(&(*yyvaluep))));} +#line 5457 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 181: /* decl_type_simple */ +#line 343 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));} +#line 5463 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 182: /* decl_real_type */ +#line 343 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));} +#line 5469 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 183: /* int_signed */ +#line 321 "src/parser_proc_grammar.y" /* glr.c:846 */ + {} +#line 5475 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 184: /* int_width */ +#line 318 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));} +#line 5481 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 185: /* decl_int_type */ +#line 343 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));} +#line 5487 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 186: /* int_signed_types */ +#line 318 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));} +#line 5493 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 187: /* signed_short_types */ +#line 321 "src/parser_proc_grammar.y" /* glr.c:846 */ + {} +#line 5499 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 188: /* signed_long_types */ +#line 321 "src/parser_proc_grammar.y" /* glr.c:846 */ + {} +#line 5505 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 189: /* int_width_types */ +#line 318 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));} +#line 5511 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 190: /* decl_stmt */ +#line 348 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_decl_free(&(*(struct psi_decl **)(&(*yyvaluep))));} +#line 5517 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 193: /* decl_extvar_stmt */ +#line 362 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5523 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 194: /* decl_extvar_list */ +#line 362 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5529 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 195: /* decl_vars */ +#line 362 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5535 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 200: /* decl */ +#line 348 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_decl_free(&(*(struct psi_decl **)(&(*yyvaluep))));} +#line 5541 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 201: /* decl_body */ +#line 348 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_decl_free(&(*(struct psi_decl **)(&(*yyvaluep))));} +#line 5547 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 202: /* decl_func_body */ +#line 348 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_decl_free(&(*(struct psi_decl **)(&(*yyvaluep))));} +#line 5553 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 203: /* decl_functor_body */ +#line 348 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_decl_free(&(*(struct psi_decl **)(&(*yyvaluep))));} +#line 5559 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 204: /* decl_functor */ +#line 350 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_decl_arg_free(&(*(struct psi_decl_arg **)(&(*yyvaluep))));} +#line 5565 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 205: /* decl_func */ +#line 350 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_decl_arg_free(&(*(struct psi_decl_arg **)(&(*yyvaluep))));} +#line 5571 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 206: /* decl_args */ +#line 362 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5577 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 207: /* decl_arg_list */ +#line 362 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5583 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 208: /* decl_anon_arg */ +#line 350 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_decl_arg_free(&(*(struct psi_decl_arg **)(&(*yyvaluep))));} +#line 5589 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 209: /* decl_arg */ +#line 350 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_decl_arg_free(&(*(struct psi_decl_arg **)(&(*yyvaluep))));} +#line 5595 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 210: /* decl_var */ +#line 352 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_decl_var_free(&(*(struct psi_decl_var **)(&(*yyvaluep))));} +#line 5601 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 211: /* decl_union */ +#line 356 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_decl_union_free(&(*(struct psi_decl_union **)(&(*yyvaluep))));} +#line 5607 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 212: /* decl_struct */ +#line 354 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_decl_struct_free(&(*(struct psi_decl_struct **)(&(*yyvaluep))));} +#line 5613 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 213: /* decl_struct_args */ +#line 362 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5619 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 214: /* struct_args_block */ +#line 362 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5625 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 215: /* struct_args */ +#line 362 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5631 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 216: /* struct_arg_var_list */ +#line 362 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5637 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 217: /* decl_vars_with_layout */ +#line 362 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5643 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 218: /* decl_enum */ +#line 358 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_decl_enum_free(&(*(struct psi_decl_enum **)(&(*yyvaluep))));} +#line 5649 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 219: /* decl_enum_items */ +#line 362 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5655 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 220: /* decl_enum_item */ +#line 360 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_decl_enum_item_free(&(*(struct psi_decl_enum_item **)(&(*yyvaluep))));} +#line 5661 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 221: /* num_exp */ +#line 418 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_num_exp_free(&(*(struct psi_num_exp **)(&(*yyvaluep))));} +#line 5667 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 222: /* number */ +#line 420 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_number_free(&(*(struct psi_number **)(&(*yyvaluep))));} +#line 5673 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 223: /* sizeof */ +#line 370 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_number_free(&(*(struct psi_number **)(&(*yyvaluep))));} +#line 5679 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 224: /* sizeof_body */ +#line 370 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_number_free(&(*(struct psi_number **)(&(*yyvaluep))));} +#line 5685 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 225: /* sizeof_body_notypes */ +#line 370 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_number_free(&(*(struct psi_number **)(&(*yyvaluep))));} +#line 5691 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 226: /* enum_name */ +#line 309 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));} +#line 5697 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 227: /* union_name */ +#line 309 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));} +#line 5703 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 228: /* struct_name */ +#line 309 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));} +#line 5709 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 229: /* optional_name */ +#line 309 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));} +#line 5715 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 231: /* decl_layout */ +#line 367 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_layout_free(&(*(struct psi_layout **)(&(*yyvaluep))));} +#line 5721 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 232: /* align_and_size */ +#line 365 "src/parser_proc_grammar.y" /* glr.c:846 */ + {} +#line 5727 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 233: /* array_size */ +#line 423 "src/parser_proc_grammar.y" /* glr.c:846 */ + {} +#line 5733 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 234: /* indirection */ +#line 423 "src/parser_proc_grammar.y" /* glr.c:846 */ + {} +#line 5739 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 235: /* pointers */ +#line 423 "src/parser_proc_grammar.y" /* glr.c:846 */ + {} +#line 5745 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 236: /* asterisks */ +#line 423 "src/parser_proc_grammar.y" /* glr.c:846 */ + {} +#line 5751 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 238: /* impl */ +#line 373 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_impl_free(&(*(struct psi_impl **)(&(*yyvaluep))));} +#line 5757 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 239: /* impl_func */ +#line 375 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_impl_func_free(&(*(struct psi_impl_func **)(&(*yyvaluep))));} +#line 5763 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 240: /* impl_args */ +#line 415 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5769 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 241: /* impl_arg */ +#line 377 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_impl_arg_free(&(*(struct psi_impl_arg **)(&(*yyvaluep))));} +#line 5775 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 242: /* impl_var */ +#line 381 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_impl_var_free(&(*(struct psi_impl_var **)(&(*yyvaluep))));} +#line 5781 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 243: /* impl_type */ +#line 379 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_impl_type_free(&(*(struct psi_impl_type **)(&(*yyvaluep))));} +#line 5787 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 244: /* impl_type_token */ +#line 413 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));} +#line 5793 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 245: /* impl_stmts */ +#line 415 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5799 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 246: /* impl_stmt */ +#line 411 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_impl_stmt_free(&(*(struct psi_token ***)(&(*yyvaluep))));} +#line 5805 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 247: /* let_stmt */ +#line 384 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_let_stmt_free(&(*(struct psi_let_stmt **)(&(*yyvaluep))));} +#line 5811 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 248: /* let_exp */ +#line 386 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_let_exp_free(&(*(struct psi_let_exp **)(&(*yyvaluep))));} +#line 5817 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 249: /* let_exp_byref */ +#line 386 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_let_exp_free(&(*(struct psi_let_exp **)(&(*yyvaluep))));} +#line 5823 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 250: /* let_exp_assign */ +#line 386 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_let_exp_free(&(*(struct psi_let_exp **)(&(*yyvaluep))));} +#line 5829 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 251: /* let_calloc */ +#line 388 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_let_calloc_free(&(*(struct psi_let_calloc **)(&(*yyvaluep))));} +#line 5835 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 252: /* let_callback */ +#line 390 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_let_callback_free(&(*(struct psi_let_callback **)(&(*yyvaluep))));} +#line 5841 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 253: /* let_func */ +#line 392 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_let_func_free(&(*(struct psi_let_func **)(&(*yyvaluep))));} +#line 5847 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 254: /* let_func_token */ +#line 413 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));} +#line 5853 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 255: /* let_func_exps */ +#line 415 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5859 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 256: /* let_exps */ +#line 415 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5865 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 257: /* callback_rval */ +#line 413 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));} +#line 5871 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 258: /* callback_arg_list */ +#line 415 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5877 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 259: /* callback_args */ +#line 415 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5883 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 260: /* return_stmt */ +#line 402 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_return_stmt_free(&(*(struct psi_return_stmt **)(&(*yyvaluep))));} +#line 5889 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 261: /* return_exp */ +#line 404 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_return_exp_free(&(*(struct psi_return_exp **)(&(*yyvaluep))));} +#line 5895 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 262: /* call_decl_vars */ +#line 362 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5901 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 263: /* set_stmt */ +#line 394 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_set_stmt_free(&(*(struct psi_set_stmt **)(&(*yyvaluep))));} +#line 5907 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 264: /* set_exp */ +#line 396 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_set_exp_free(&(*(struct psi_set_exp **)(&(*yyvaluep))));} +#line 5913 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 265: /* set_func */ +#line 398 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_set_func_free(&(*(struct psi_set_func **)(&(*yyvaluep))));} +#line 5919 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 266: /* set_func_token */ +#line 413 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));} +#line 5925 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 267: /* set_func_exps */ +#line 415 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5931 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 268: /* set_exps */ +#line 415 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5937 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 269: /* assert_stmt */ +#line 400 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_assert_stmt_free(&(*(struct psi_assert_stmt **)(&(*yyvaluep))));} +#line 5943 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 270: /* assert_stmt_token */ +#line 413 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));} +#line 5949 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 271: /* free_stmt */ +#line 406 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_free_stmt_free(&(*(struct psi_free_stmt **)(&(*yyvaluep))));} +#line 5955 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 272: /* free_exps */ +#line 415 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));} +#line 5961 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 273: /* free_exp */ +#line 408 "src/parser_proc_grammar.y" /* glr.c:846 */ + {psi_free_exp_free(&(*(struct psi_free_exp **)(&(*yyvaluep))));} +#line 5967 "src/parser_proc.c" /* glr.c:846 */ + break; + + case 274: /* reference */ +#line 425 "src/parser_proc_grammar.y" /* glr.c:846 */ + {} +#line 5973 "src/parser_proc.c" /* glr.c:846 */ + break; + + + default: break; - case 134: /* set_func ::= TO_OBJECT|TO_ARRAY|TO_STRING|TO_INT|TO_FLOAT|TO_BOOL|ZVAL|VOID LPAREN decl_var COMMA ELLIPSIS RPAREN */ -#line 858 "src/parser_proc.y" + } + YY_IGNORE_MAYBE_UNINITIALIZED_END +} + +/** Number of symbols composing the right hand side of rule #RULE. */ +static inline int +yyrhsLength (yyRuleNum yyrule) { - yylhsminor.yy78 = psi_set_func_init(yymsp[-5].minor.yy0->type, yymsp[-5].minor.yy0->text, yymsp[-3].minor.yy207); - yylhsminor.yy78->token = yymsp[-5].minor.yy0; - yylhsminor.yy78->recursive = 1; + return yyr2[yyrule]; } -#line 3126 "src/parser_proc.c" - yy_destructor(yypParser,73,&yymsp[-4].minor); - yy_destructor(yypParser,74,&yymsp[-2].minor); - yy_destructor(yypParser,84,&yymsp[-1].minor); - yy_destructor(yypParser,75,&yymsp[0].minor); - yymsp[-5].minor.yy78 = yylhsminor.yy78; - break; - case 135: /* set_exp ::= set_func */ -#line 863 "src/parser_proc.y" + +static void +yydestroyGLRState (char const *yymsg, yyGLRState *yys, struct psi_parser *P, struct psi_plist *tokens, size_t *index) +{ + if (yys->yyresolved) + yydestruct (yymsg, yystos[yys->yylrState], + &yys->yysemantics.yysval, P, tokens, index); + else + { +#if YYDEBUG + if (yydebug) + { + if (yys->yysemantics.yyfirstVal) + YYFPRINTF (stderr, "%s unresolved", yymsg); + else + YYFPRINTF (stderr, "%s incomplete", yymsg); + YY_SYMBOL_PRINT ("", yystos[yys->yylrState], YY_NULLPTR, &yys->yyloc); + } +#endif + + if (yys->yysemantics.yyfirstVal) + { + yySemanticOption *yyoption = yys->yysemantics.yyfirstVal; + yyGLRState *yyrh; + int yyn; + for (yyrh = yyoption->yystate, yyn = yyrhsLength (yyoption->yyrule); + yyn > 0; + yyrh = yyrh->yypred, yyn -= 1) + yydestroyGLRState (yymsg, yyrh, P, tokens, index); + } + } +} + +/** Left-hand-side symbol for rule #YYRULE. */ +static inline yySymbol +yylhsNonterm (yyRuleNum yyrule) { - yylhsminor.yy67 = psi_set_exp_init(PSI_SET_FUNC, yymsp[0].minor.yy78); + return yyr1[yyrule]; } -#line 3138 "src/parser_proc.c" - yymsp[0].minor.yy67 = yylhsminor.yy67; - break; - case 136: /* set_exp ::= num_exp */ -#line 866 "src/parser_proc.y" + +#define yypact_value_is_default(Yystate) \ + (!!((Yystate) == (-703))) + +/** True iff LR state YYSTATE has only a default reduction (regardless + * of token). */ +static inline yybool +yyisDefaultedState (yyStateNum yystate) { - yylhsminor.yy67 = psi_set_exp_init(PSI_SET_NUMEXP, yymsp[0].minor.yy39); + return yypact_value_is_default (yypact[yystate]); } -#line 3146 "src/parser_proc.c" - yymsp[0].minor.yy67 = yylhsminor.yy67; - break; - case 137: /* set_exps ::= set_exp */ -#line 869 "src/parser_proc.y" + +/** The default reduction for YYSTATE, assuming it has one. */ +static inline yyRuleNum +yydefaultAction (yyStateNum yystate) { - yylhsminor.yy303 = psi_plist_add(psi_plist_init((psi_plist_dtor) psi_set_exp_free), - &yymsp[0].minor.yy67); + return yydefact[yystate]; } -#line 3155 "src/parser_proc.c" - yymsp[0].minor.yy303 = yylhsminor.yy303; - break; - case 138: /* set_exps ::= set_exps COMMA set_exp */ -#line 873 "src/parser_proc.y" + +#define yytable_value_is_error(Yytable_value) \ + 0 + +/** Set *YYACTION to the action to take in YYSTATE on seeing YYTOKEN. + * Result R means + * R < 0: Reduce on rule -R. + * R = 0: Error. + * R > 0: Shift to state R. + * Set *YYCONFLICTS to a pointer into yyconfl to a 0-terminated list + * of conflicting reductions. + */ +static inline void +yygetLRActions (yyStateNum yystate, int yytoken, + int* yyaction, const short int** yyconflicts) +{ + int yyindex = yypact[yystate] + yytoken; + if (yypact_value_is_default (yypact[yystate]) + || yyindex < 0 || YYLAST < yyindex || yycheck[yyindex] != yytoken) + { + *yyaction = -yydefact[yystate]; + *yyconflicts = yyconfl; + } + else if (! yytable_value_is_error (yytable[yyindex])) + { + *yyaction = yytable[yyindex]; + *yyconflicts = yyconfl + yyconflp[yyindex]; + } + else + { + *yyaction = 0; + *yyconflicts = yyconfl + yyconflp[yyindex]; + } +} + +/** Compute post-reduction state. + * \param yystate the current state + * \param yysym the nonterminal to push on the stack + */ +static inline yyStateNum +yyLRgotoState (yyStateNum yystate, yySymbol yysym) +{ + int yyr = yypgoto[yysym - YYNTOKENS] + yystate; + if (0 <= yyr && yyr <= YYLAST && yycheck[yyr] == yystate) + return yytable[yyr]; + else + return yydefgoto[yysym - YYNTOKENS]; +} + +static inline yybool +yyisShiftAction (int yyaction) { - yylhsminor.yy303 = psi_plist_add(yymsp[-2].minor.yy303, &yymsp[0].minor.yy67); + return 0 < yyaction; } -#line 3163 "src/parser_proc.c" - yy_destructor(yypParser,74,&yymsp[-1].minor); - yymsp[-2].minor.yy303 = yylhsminor.yy303; - break; - case 139: /* set_exp ::= impl_var EQUALS set_exp */ -#line 876 "src/parser_proc.y" + +static inline yybool +yyisErrorAction (int yyaction) { - yylhsminor.yy67 = yymsp[0].minor.yy67; - yylhsminor.yy67->var = yymsp[-2].minor.yy185; + return yyaction == 0; } -#line 3173 "src/parser_proc.c" - yy_destructor(yypParser,81,&yymsp[-1].minor); - yymsp[-2].minor.yy67 = yylhsminor.yy67; - break; - case 140: /* set_stmt ::= SET set_exp EOS */ -#line 880 "src/parser_proc.y" + + /* GLRStates */ + +/** Return a fresh GLRStackItem in YYSTACKP. The item is an LR state + * if YYISSTATE, and otherwise a semantic option. Callers should call + * YY_RESERVE_GLRSTACK afterwards to make sure there is sufficient + * headroom. */ + +static inline yyGLRStackItem* +yynewGLRStackItem (yyGLRStack* yystackp, yybool yyisState) { - yylhsminor.yy226 = psi_set_stmt_init(yymsp[-1].minor.yy67); - yylhsminor.yy226->token = yymsp[-2].minor.yy0; + yyGLRStackItem* yynewItem = yystackp->yynextFree; + yystackp->yyspaceLeft -= 1; + yystackp->yynextFree += 1; + yynewItem->yystate.yyisState = yyisState; + return yynewItem; } -#line 3183 "src/parser_proc.c" - yy_destructor(yypParser,71,&yymsp[0].minor); - yymsp[-2].minor.yy226 = yylhsminor.yy226; - break; - case 141: /* return_stmt ::= RETURN set_func EOS */ -#line 884 "src/parser_proc.y" + +/** Add a new semantic action that will execute the action for rule + * YYRULE on the semantic values in YYRHS to the list of + * alternative actions for YYSTATE. Assumes that YYRHS comes from + * stack #YYK of *YYSTACKP. */ +static void +yyaddDeferredAction (yyGLRStack* yystackp, size_t yyk, yyGLRState* yystate, + yyGLRState* yyrhs, yyRuleNum yyrule) +{ + yySemanticOption* yynewOption = + &yynewGLRStackItem (yystackp, yyfalse)->yyoption; + YYASSERT (!yynewOption->yyisState); + yynewOption->yystate = yyrhs; + yynewOption->yyrule = yyrule; + if (yystackp->yytops.yylookaheadNeeds[yyk]) + { + yynewOption->yyrawchar = yychar; + yynewOption->yyval = yylval; + } + else + yynewOption->yyrawchar = YYEMPTY; + yynewOption->yynext = yystate->yysemantics.yyfirstVal; + yystate->yysemantics.yyfirstVal = yynewOption; + + YY_RESERVE_GLRSTACK (yystackp); +} + + /* GLRStacks */ + +/** Initialize YYSET to a singleton set containing an empty stack. */ +static yybool +yyinitStateSet (yyGLRStateSet* yyset) +{ + yyset->yysize = 1; + yyset->yycapacity = 16; + yyset->yystates = (yyGLRState**) YYMALLOC (16 * sizeof yyset->yystates[0]); + if (! yyset->yystates) + return yyfalse; + yyset->yystates[0] = YY_NULLPTR; + yyset->yylookaheadNeeds = + (yybool*) YYMALLOC (16 * sizeof yyset->yylookaheadNeeds[0]); + if (! yyset->yylookaheadNeeds) + { + YYFREE (yyset->yystates); + return yyfalse; + } + return yytrue; +} + +static void yyfreeStateSet (yyGLRStateSet* yyset) { - yylhsminor.yy130 = psi_return_stmt_init(psi_set_exp_init(PSI_SET_FUNC, yymsp[-1].minor.yy78)); - yylhsminor.yy130->token = yymsp[-2].minor.yy0; + YYFREE (yyset->yystates); + YYFREE (yyset->yylookaheadNeeds); } -#line 3193 "src/parser_proc.c" - yy_destructor(yypParser,71,&yymsp[0].minor); - yymsp[-2].minor.yy130 = yylhsminor.yy130; - break; - case 142: /* free_stmt ::= FREE free_exps EOS */ -#line 888 "src/parser_proc.y" -{ - yylhsminor.yy76 = psi_free_stmt_init(yymsp[-1].minor.yy303); - yylhsminor.yy76->token = yymsp[-2].minor.yy0; + +/** Initialize *YYSTACKP to a single empty stack, with total maximum + * capacity for all stacks of YYSIZE. */ +static yybool +yyinitGLRStack (yyGLRStack* yystackp, size_t yysize) +{ + yystackp->yyerrState = 0; + yynerrs = 0; + yystackp->yyspaceLeft = yysize; + yystackp->yyitems = + (yyGLRStackItem*) YYMALLOC (yysize * sizeof yystackp->yynextFree[0]); + if (!yystackp->yyitems) + return yyfalse; + yystackp->yynextFree = yystackp->yyitems; + yystackp->yysplitPoint = YY_NULLPTR; + yystackp->yylastDeleted = YY_NULLPTR; + return yyinitStateSet (&yystackp->yytops); } -#line 3203 "src/parser_proc.c" - yy_destructor(yypParser,71,&yymsp[0].minor); - yymsp[-2].minor.yy76 = yylhsminor.yy76; - break; - case 143: /* free_exps ::= free_exp */ -#line 892 "src/parser_proc.y" -{ - yylhsminor.yy303 = psi_plist_add(psi_plist_init((psi_plist_dtor) psi_free_exp_free), - &yymsp[0].minor.yy197); + + +#if YYSTACKEXPANDABLE +# define YYRELOC(YYFROMITEMS,YYTOITEMS,YYX,YYTYPE) \ + &((YYTOITEMS) - ((YYFROMITEMS) - (yyGLRStackItem*) (YYX)))->YYTYPE + +/** If *YYSTACKP is expandable, extend it. WARNING: Pointers into the + stack from outside should be considered invalid after this call. + We always expand when there are 1 or fewer items left AFTER an + allocation, so that we can avoid having external pointers exist + across an allocation. */ +static void +yyexpandGLRStack (yyGLRStack* yystackp) +{ + yyGLRStackItem* yynewItems; + yyGLRStackItem* yyp0, *yyp1; + size_t yynewSize; + size_t yyn; + size_t yysize = yystackp->yynextFree - yystackp->yyitems; + if (YYMAXDEPTH - YYHEADROOM < yysize) + yyMemoryExhausted (yystackp); + yynewSize = 2*yysize; + if (YYMAXDEPTH < yynewSize) + yynewSize = YYMAXDEPTH; + yynewItems = (yyGLRStackItem*) YYMALLOC (yynewSize * sizeof yynewItems[0]); + if (! yynewItems) + yyMemoryExhausted (yystackp); + for (yyp0 = yystackp->yyitems, yyp1 = yynewItems, yyn = yysize; + 0 < yyn; + yyn -= 1, yyp0 += 1, yyp1 += 1) + { + *yyp1 = *yyp0; + if (*(yybool *) yyp0) + { + yyGLRState* yys0 = &yyp0->yystate; + yyGLRState* yys1 = &yyp1->yystate; + if (yys0->yypred != YY_NULLPTR) + yys1->yypred = + YYRELOC (yyp0, yyp1, yys0->yypred, yystate); + if (! yys0->yyresolved && yys0->yysemantics.yyfirstVal != YY_NULLPTR) + yys1->yysemantics.yyfirstVal = + YYRELOC (yyp0, yyp1, yys0->yysemantics.yyfirstVal, yyoption); + } + else + { + yySemanticOption* yyv0 = &yyp0->yyoption; + yySemanticOption* yyv1 = &yyp1->yyoption; + if (yyv0->yystate != YY_NULLPTR) + yyv1->yystate = YYRELOC (yyp0, yyp1, yyv0->yystate, yystate); + if (yyv0->yynext != YY_NULLPTR) + yyv1->yynext = YYRELOC (yyp0, yyp1, yyv0->yynext, yyoption); + } + } + if (yystackp->yysplitPoint != YY_NULLPTR) + yystackp->yysplitPoint = YYRELOC (yystackp->yyitems, yynewItems, + yystackp->yysplitPoint, yystate); + + for (yyn = 0; yyn < yystackp->yytops.yysize; yyn += 1) + if (yystackp->yytops.yystates[yyn] != YY_NULLPTR) + yystackp->yytops.yystates[yyn] = + YYRELOC (yystackp->yyitems, yynewItems, + yystackp->yytops.yystates[yyn], yystate); + YYFREE (yystackp->yyitems); + yystackp->yyitems = yynewItems; + yystackp->yynextFree = yynewItems + yysize; + yystackp->yyspaceLeft = yynewSize - yysize; } -#line 3213 "src/parser_proc.c" - yymsp[0].minor.yy303 = yylhsminor.yy303; - break; - case 144: /* free_exps ::= free_exps COMMA free_exp */ -#line 896 "src/parser_proc.y" +#endif + +static void +yyfreeGLRStack (yyGLRStack* yystackp) { - yylhsminor.yy303 = psi_plist_add(yymsp[-2].minor.yy303, &yymsp[0].minor.yy197); + YYFREE (yystackp->yyitems); + yyfreeStateSet (&yystackp->yytops); } -#line 3221 "src/parser_proc.c" - yy_destructor(yypParser,74,&yymsp[-1].minor); - yymsp[-2].minor.yy303 = yylhsminor.yy303; - break; - case 145: /* free_exp ::= NAME LPAREN decl_vars RPAREN */ -#line 899 "src/parser_proc.y" + +/** Assuming that YYS is a GLRState somewhere on *YYSTACKP, update the + * splitpoint of *YYSTACKP, if needed, so that it is at least as deep as + * YYS. */ +static inline void +yyupdateSplit (yyGLRStack* yystackp, yyGLRState* yys) { - yylhsminor.yy197 = psi_free_exp_init(yymsp[-3].minor.yy0->text, yymsp[-1].minor.yy303); - yylhsminor.yy197->token = yymsp[-3].minor.yy0; + if (yystackp->yysplitPoint != YY_NULLPTR && yystackp->yysplitPoint > yys) + yystackp->yysplitPoint = yys; } -#line 3231 "src/parser_proc.c" - yy_destructor(yypParser,73,&yymsp[-2].minor); - yy_destructor(yypParser,75,&yymsp[0].minor); - yymsp[-3].minor.yy197 = yylhsminor.yy197; - break; - case 146: /* reference ::= */ -#line 903 "src/parser_proc.y" + +/** Invalidate stack #YYK in *YYSTACKP. */ +static inline void +yymarkStackDeleted (yyGLRStack* yystackp, size_t yyk) { - yymsp[1].minor.yy273 = false; + if (yystackp->yytops.yystates[yyk] != YY_NULLPTR) + yystackp->yylastDeleted = yystackp->yytops.yystates[yyk]; + yystackp->yytops.yystates[yyk] = YY_NULLPTR; } -#line 3241 "src/parser_proc.c" - break; - case 147: /* reference ::= AMPERSAND */ -{ yy_destructor(yypParser,23,&yymsp[0].minor); -#line 906 "src/parser_proc.y" + +/** Undelete the last stack in *YYSTACKP that was marked as deleted. Can + only be done once after a deletion, and only when all other stacks have + been deleted. */ +static void +yyundeleteLastStack (yyGLRStack* yystackp) { - yymsp[0].minor.yy273 = true; + if (yystackp->yylastDeleted == YY_NULLPTR || yystackp->yytops.yysize != 0) + return; + yystackp->yytops.yystates[0] = yystackp->yylastDeleted; + yystackp->yytops.yysize = 1; + YYDPRINTF ((stderr, "Restoring last deleted stack as stack #0.\n")); + yystackp->yylastDeleted = YY_NULLPTR; } -#line 3249 "src/parser_proc.c" + +static inline void +yyremoveDeletes (yyGLRStack* yystackp) +{ + size_t yyi, yyj; + yyi = yyj = 0; + while (yyj < yystackp->yytops.yysize) + { + if (yystackp->yytops.yystates[yyi] == YY_NULLPTR) + { + if (yyi == yyj) + { + YYDPRINTF ((stderr, "Removing dead stacks.\n")); + } + yystackp->yytops.yysize -= 1; + } + else + { + yystackp->yytops.yystates[yyj] = yystackp->yytops.yystates[yyi]; + /* In the current implementation, it's unnecessary to copy + yystackp->yytops.yylookaheadNeeds[yyi] since, after + yyremoveDeletes returns, the parser immediately either enters + deterministic operation or shifts a token. However, it doesn't + hurt, and the code might evolve to need it. */ + yystackp->yytops.yylookaheadNeeds[yyj] = + yystackp->yytops.yylookaheadNeeds[yyi]; + if (yyj != yyi) + { + YYDPRINTF ((stderr, "Rename stack %lu -> %lu.\n", + (unsigned long int) yyi, (unsigned long int) yyj)); + } + yyj += 1; + } + yyi += 1; + } } - break; - case 148: /* indirection ::= */ -#line 909 "src/parser_proc.y" -{ - yymsp[1].minor.yy190 = 0; + +/** Shift to a new state on stack #YYK of *YYSTACKP, corresponding to LR + * state YYLRSTATE, at input position YYPOSN, with (resolved) semantic + * value *YYVALP and source location *YYLOCP. */ +static inline void +yyglrShift (yyGLRStack* yystackp, size_t yyk, yyStateNum yylrState, + size_t yyposn, + YYSTYPE* yyvalp) +{ + yyGLRState* yynewState = &yynewGLRStackItem (yystackp, yytrue)->yystate; + + yynewState->yylrState = yylrState; + yynewState->yyposn = yyposn; + yynewState->yyresolved = yytrue; + yynewState->yypred = yystackp->yytops.yystates[yyk]; + yynewState->yysemantics.yysval = *yyvalp; + yystackp->yytops.yystates[yyk] = yynewState; + + YY_RESERVE_GLRSTACK (yystackp); } -#line 3257 "src/parser_proc.c" - break; - case 149: /* indirection ::= pointers */ -#line 912 "src/parser_proc.y" -{ - yylhsminor.yy190 = yymsp[0].minor.yy190; + +/** Shift stack #YYK of *YYSTACKP, to a new state corresponding to LR + * state YYLRSTATE, at input position YYPOSN, with the (unresolved) + * semantic value of YYRHS under the action for YYRULE. */ +static inline void +yyglrShiftDefer (yyGLRStack* yystackp, size_t yyk, yyStateNum yylrState, + size_t yyposn, yyGLRState* yyrhs, yyRuleNum yyrule) +{ + yyGLRState* yynewState = &yynewGLRStackItem (yystackp, yytrue)->yystate; + YYASSERT (yynewState->yyisState); + + yynewState->yylrState = yylrState; + yynewState->yyposn = yyposn; + yynewState->yyresolved = yyfalse; + yynewState->yypred = yystackp->yytops.yystates[yyk]; + yynewState->yysemantics.yyfirstVal = YY_NULLPTR; + yystackp->yytops.yystates[yyk] = yynewState; + + /* Invokes YY_RESERVE_GLRSTACK. */ + yyaddDeferredAction (yystackp, yyk, yynewState, yyrhs, yyrule); } -#line 3264 "src/parser_proc.c" - yymsp[0].minor.yy190 = yylhsminor.yy190; - break; - case 150: /* pointers ::= ASTERISK */ -{ yy_destructor(yypParser,28,&yymsp[0].minor); -#line 915 "src/parser_proc.y" -{ - yymsp[0].minor.yy190 = 1; + +#if !YYDEBUG +# define YY_REDUCE_PRINT(Args) +#else +# define YY_REDUCE_PRINT(Args) \ +do { \ + if (yydebug) \ + yy_reduce_print Args; \ +} while (0) + +/*----------------------------------------------------------------------. +| Report that stack #YYK of *YYSTACKP is going to be reduced by YYRULE. | +`----------------------------------------------------------------------*/ + +static inline void +yy_reduce_print (int yynormal, yyGLRStackItem* yyvsp, size_t yyk, + yyRuleNum yyrule, struct psi_parser *P, struct psi_plist *tokens, size_t *index) +{ + int yynrhs = yyrhsLength (yyrule); + int yyi; + YYFPRINTF (stderr, "Reducing stack %lu by rule %d (line %lu):\n", + (unsigned long int) yyk, yyrule - 1, + (unsigned long int) yyrline[yyrule]); + if (! yynormal) + yyfillin (yyvsp, 1, -yynrhs); + /* The symbols being reduced. */ + for (yyi = 0; yyi < yynrhs; yyi++) + { + YYFPRINTF (stderr, " $%d = ", yyi + 1); + yy_symbol_print (stderr, + yystos[yyvsp[yyi - yynrhs + 1].yystate.yylrState], + &yyvsp[yyi - yynrhs + 1].yystate.yysemantics.yysval + , P, tokens, index); + if (!yyvsp[yyi - yynrhs + 1].yystate.yyresolved) + YYFPRINTF (stderr, " (unresolved)"); + YYFPRINTF (stderr, "\n"); + } } -#line 3273 "src/parser_proc.c" +#endif + +/** Pop the symbols consumed by reduction #YYRULE from the top of stack + * #YYK of *YYSTACKP, and perform the appropriate semantic action on their + * semantic values. Assumes that all ambiguities in semantic values + * have been previously resolved. Set *YYVALP to the resulting value, + * and *YYLOCP to the computed location (if any). Return value is as + * for userAction. */ +static inline YYRESULTTAG +yydoAction (yyGLRStack* yystackp, size_t yyk, yyRuleNum yyrule, + YYSTYPE* yyvalp, struct psi_parser *P, struct psi_plist *tokens, size_t *index) +{ + int yynrhs = yyrhsLength (yyrule); + + if (yystackp->yysplitPoint == YY_NULLPTR) + { + /* Standard special case: single stack. */ + yyGLRStackItem* yyrhs = (yyGLRStackItem*) yystackp->yytops.yystates[yyk]; + YYASSERT (yyk == 0); + yystackp->yynextFree -= yynrhs; + yystackp->yyspaceLeft += yynrhs; + yystackp->yytops.yystates[0] = & yystackp->yynextFree[-1].yystate; + YY_REDUCE_PRINT ((1, yyrhs, yyk, yyrule, P, tokens, index)); + return yyuserAction (yyrule, yynrhs, yyrhs, yystackp, + yyvalp, P, tokens, index); + } + else + { + int yyi; + yyGLRState* yys; + yyGLRStackItem yyrhsVals[YYMAXRHS + YYMAXLEFT + 1]; + yys = yyrhsVals[YYMAXRHS + YYMAXLEFT].yystate.yypred + = yystackp->yytops.yystates[yyk]; + for (yyi = 0; yyi < yynrhs; yyi += 1) + { + yys = yys->yypred; + YYASSERT (yys); + } + yyupdateSplit (yystackp, yys); + yystackp->yytops.yystates[yyk] = yys; + YY_REDUCE_PRINT ((0, yyrhsVals + YYMAXRHS + YYMAXLEFT - 1, yyk, yyrule, P, tokens, index)); + return yyuserAction (yyrule, yynrhs, yyrhsVals + YYMAXRHS + YYMAXLEFT - 1, + yystackp, yyvalp, P, tokens, index); + } } - break; - case 151: /* pointers ::= pointers ASTERISK */ -#line 918 "src/parser_proc.y" -{ - yylhsminor.yy190 = yymsp[-1].minor.yy190+1; + +/** Pop items off stack #YYK of *YYSTACKP according to grammar rule YYRULE, + * and push back on the resulting nonterminal symbol. Perform the + * semantic action associated with YYRULE and store its value with the + * newly pushed state, if YYFORCEEVAL or if *YYSTACKP is currently + * unambiguous. Otherwise, store the deferred semantic action with + * the new state. If the new state would have an identical input + * position, LR state, and predecessor to an existing state on the stack, + * it is identified with that existing state, eliminating stack #YYK from + * *YYSTACKP. In this case, the semantic value is + * added to the options for the existing state's semantic value. + */ +static inline YYRESULTTAG +yyglrReduce (yyGLRStack* yystackp, size_t yyk, yyRuleNum yyrule, + yybool yyforceEval, struct psi_parser *P, struct psi_plist *tokens, size_t *index) +{ + size_t yyposn = yystackp->yytops.yystates[yyk]->yyposn; + + if (yyforceEval || yystackp->yysplitPoint == YY_NULLPTR) + { + YYSTYPE yysval; + + YYRESULTTAG yyflag = yydoAction (yystackp, yyk, yyrule, &yysval, P, tokens, index); + if (yyflag == yyerr && yystackp->yysplitPoint != YY_NULLPTR) + { + YYDPRINTF ((stderr, "Parse on stack %lu rejected by rule #%d.\n", + (unsigned long int) yyk, yyrule - 1)); + } + if (yyflag != yyok) + return yyflag; + YY_SYMBOL_PRINT ("-> $$ =", yyr1[yyrule], &yysval, &yyloc); + yyglrShift (yystackp, yyk, + yyLRgotoState (yystackp->yytops.yystates[yyk]->yylrState, + yylhsNonterm (yyrule)), + yyposn, &yysval); + } + else + { + size_t yyi; + int yyn; + yyGLRState* yys, *yys0 = yystackp->yytops.yystates[yyk]; + yyStateNum yynewLRState; + + for (yys = yystackp->yytops.yystates[yyk], yyn = yyrhsLength (yyrule); + 0 < yyn; yyn -= 1) + { + yys = yys->yypred; + YYASSERT (yys); + } + yyupdateSplit (yystackp, yys); + yynewLRState = yyLRgotoState (yys->yylrState, yylhsNonterm (yyrule)); + YYDPRINTF ((stderr, + "Reduced stack %lu by rule #%d; action deferred. " + "Now in state %d.\n", + (unsigned long int) yyk, yyrule - 1, yynewLRState)); + for (yyi = 0; yyi < yystackp->yytops.yysize; yyi += 1) + if (yyi != yyk && yystackp->yytops.yystates[yyi] != YY_NULLPTR) + { + yyGLRState *yysplit = yystackp->yysplitPoint; + yyGLRState *yyp = yystackp->yytops.yystates[yyi]; + while (yyp != yys && yyp != yysplit && yyp->yyposn >= yyposn) + { + if (yyp->yylrState == yynewLRState && yyp->yypred == yys) + { + yyaddDeferredAction (yystackp, yyk, yyp, yys0, yyrule); + yymarkStackDeleted (yystackp, yyk); + YYDPRINTF ((stderr, "Merging stack %lu into stack %lu.\n", + (unsigned long int) yyk, + (unsigned long int) yyi)); + return yyok; + } + yyp = yyp->yypred; + } + } + yystackp->yytops.yystates[yyk] = yys; + yyglrShiftDefer (yystackp, yyk, yynewLRState, yyposn, yys0, yyrule); + } + return yyok; } -#line 3281 "src/parser_proc.c" - yy_destructor(yypParser,28,&yymsp[0].minor); - yymsp[-1].minor.yy190 = yylhsminor.yy190; - break; - case 152: /* file ::= blocks */ -{ yy_destructor(yypParser,154,&yymsp[0].minor); -#line 172 "src/parser_proc.y" + +static size_t +yysplitStack (yyGLRStack* yystackp, size_t yyk) { + if (yystackp->yysplitPoint == YY_NULLPTR) + { + YYASSERT (yyk == 0); + yystackp->yysplitPoint = yystackp->yytops.yystates[yyk]; + } + if (yystackp->yytops.yysize >= yystackp->yytops.yycapacity) + { + yyGLRState** yynewStates; + yybool* yynewLookaheadNeeds; + + yynewStates = YY_NULLPTR; + + if (yystackp->yytops.yycapacity + > (YYSIZEMAX / (2 * sizeof yynewStates[0]))) + yyMemoryExhausted (yystackp); + yystackp->yytops.yycapacity *= 2; + + yynewStates = + (yyGLRState**) YYREALLOC (yystackp->yytops.yystates, + (yystackp->yytops.yycapacity + * sizeof yynewStates[0])); + if (yynewStates == YY_NULLPTR) + yyMemoryExhausted (yystackp); + yystackp->yytops.yystates = yynewStates; + + yynewLookaheadNeeds = + (yybool*) YYREALLOC (yystackp->yytops.yylookaheadNeeds, + (yystackp->yytops.yycapacity + * sizeof yynewLookaheadNeeds[0])); + if (yynewLookaheadNeeds == YY_NULLPTR) + yyMemoryExhausted (yystackp); + yystackp->yytops.yylookaheadNeeds = yynewLookaheadNeeds; + } + yystackp->yytops.yystates[yystackp->yytops.yysize] + = yystackp->yytops.yystates[yyk]; + yystackp->yytops.yylookaheadNeeds[yystackp->yytops.yysize] + = yystackp->yytops.yylookaheadNeeds[yyk]; + yystackp->yytops.yysize += 1; + return yystackp->yytops.yysize-1; } -#line 3290 "src/parser_proc.c" + +/** True iff YYY0 and YYY1 represent identical options at the top level. + * That is, they represent the same rule applied to RHS symbols + * that produce the same terminal symbols. */ +static yybool +yyidenticalOptions (yySemanticOption* yyy0, yySemanticOption* yyy1) +{ + if (yyy0->yyrule == yyy1->yyrule) + { + yyGLRState *yys0, *yys1; + int yyn; + for (yys0 = yyy0->yystate, yys1 = yyy1->yystate, + yyn = yyrhsLength (yyy0->yyrule); + yyn > 0; + yys0 = yys0->yypred, yys1 = yys1->yypred, yyn -= 1) + if (yys0->yyposn != yys1->yyposn) + return yyfalse; + return yytrue; + } + else + return yyfalse; } - break; - case 153: /* blocks ::= block */ -{ yy_destructor(yypParser,155,&yymsp[0].minor); -#line 173 "src/parser_proc.y" -{ + +/** Assuming identicalOptions (YYY0,YYY1), destructively merge the + * alternative semantic values for the RHS-symbols of YYY1 and YYY0. */ +static void +yymergeOptionSets (yySemanticOption* yyy0, yySemanticOption* yyy1) +{ + yyGLRState *yys0, *yys1; + int yyn; + for (yys0 = yyy0->yystate, yys1 = yyy1->yystate, + yyn = yyrhsLength (yyy0->yyrule); + yyn > 0; + yys0 = yys0->yypred, yys1 = yys1->yypred, yyn -= 1) + { + if (yys0 == yys1) + break; + else if (yys0->yyresolved) + { + yys1->yyresolved = yytrue; + yys1->yysemantics.yysval = yys0->yysemantics.yysval; + } + else if (yys1->yyresolved) + { + yys0->yyresolved = yytrue; + yys0->yysemantics.yysval = yys1->yysemantics.yysval; + } + else + { + yySemanticOption** yyz0p = &yys0->yysemantics.yyfirstVal; + yySemanticOption* yyz1 = yys1->yysemantics.yyfirstVal; + while (yytrue) + { + if (yyz1 == *yyz0p || yyz1 == YY_NULLPTR) + break; + else if (*yyz0p == YY_NULLPTR) + { + *yyz0p = yyz1; + break; + } + else if (*yyz0p < yyz1) + { + yySemanticOption* yyz = *yyz0p; + *yyz0p = yyz1; + yyz1 = yyz1->yynext; + (*yyz0p)->yynext = yyz; + } + yyz0p = &(*yyz0p)->yynext; + } + yys1->yysemantics.yyfirstVal = yys0->yysemantics.yyfirstVal; + } + } } -#line 3298 "src/parser_proc.c" + +/** Y0 and Y1 represent two possible actions to take in a given + * parsing state; return 0 if no combination is possible, + * 1 if user-mergeable, 2 if Y0 is preferred, 3 if Y1 is preferred. */ +static int +yypreference (yySemanticOption* y0, yySemanticOption* y1) +{ + yyRuleNum r0 = y0->yyrule, r1 = y1->yyrule; + int p0 = yydprec[r0], p1 = yydprec[r1]; + + if (p0 == p1) + { + if (yymerger[r0] == 0 || yymerger[r0] != yymerger[r1]) + return 0; + else + return 1; + } + if (p0 == 0 || p1 == 0) + return 0; + if (p0 < p1) + return 3; + if (p1 < p0) + return 2; + return 0; } - break; - case 154: /* blocks ::= blocks block */ -{ yy_destructor(yypParser,154,&yymsp[-1].minor); -#line 174 "src/parser_proc.y" -{ + +static YYRESULTTAG yyresolveValue (yyGLRState* yys, + yyGLRStack* yystackp, struct psi_parser *P, struct psi_plist *tokens, size_t *index); + + +/** Resolve the previous YYN states starting at and including state YYS + * on *YYSTACKP. If result != yyok, some states may have been left + * unresolved possibly with empty semantic option chains. Regardless + * of whether result = yyok, each state has been left with consistent + * data so that yydestroyGLRState can be invoked if necessary. */ +static YYRESULTTAG +yyresolveStates (yyGLRState* yys, int yyn, + yyGLRStack* yystackp, struct psi_parser *P, struct psi_plist *tokens, size_t *index) +{ + if (0 < yyn) + { + YYASSERT (yys->yypred); + YYCHK (yyresolveStates (yys->yypred, yyn-1, yystackp, P, tokens, index)); + if (! yys->yyresolved) + YYCHK (yyresolveValue (yys, yystackp, P, tokens, index)); + } + return yyok; } -#line 3306 "src/parser_proc.c" - yy_destructor(yypParser,155,&yymsp[0].minor); + +/** Resolve the states for the RHS of YYOPT on *YYSTACKP, perform its + * user action, and return the semantic value and location in *YYVALP + * and *YYLOCP. Regardless of whether result = yyok, all RHS states + * have been destroyed (assuming the user action destroys all RHS + * semantic values if invoked). */ +static YYRESULTTAG +yyresolveAction (yySemanticOption* yyopt, yyGLRStack* yystackp, + YYSTYPE* yyvalp, struct psi_parser *P, struct psi_plist *tokens, size_t *index) +{ + yyGLRStackItem yyrhsVals[YYMAXRHS + YYMAXLEFT + 1]; + int yynrhs = yyrhsLength (yyopt->yyrule); + YYRESULTTAG yyflag = + yyresolveStates (yyopt->yystate, yynrhs, yystackp, P, tokens, index); + if (yyflag != yyok) + { + yyGLRState *yys; + for (yys = yyopt->yystate; yynrhs > 0; yys = yys->yypred, yynrhs -= 1) + yydestroyGLRState ("Cleanup: popping", yys, P, tokens, index); + return yyflag; + } + + yyrhsVals[YYMAXRHS + YYMAXLEFT].yystate.yypred = yyopt->yystate; + { + int yychar_current = yychar; + YYSTYPE yylval_current = yylval; + yychar = yyopt->yyrawchar; + yylval = yyopt->yyval; + yyflag = yyuserAction (yyopt->yyrule, yynrhs, + yyrhsVals + YYMAXRHS + YYMAXLEFT - 1, + yystackp, yyvalp, P, tokens, index); + yychar = yychar_current; + yylval = yylval_current; + } + return yyflag; } - break; - case 155: /* block ::= EOF */ -{ yy_destructor(yypParser,70,&yymsp[0].minor); -#line 175 "src/parser_proc.y" + +#if YYDEBUG +static void +yyreportTree (yySemanticOption* yyx, int yyindent) +{ + int yynrhs = yyrhsLength (yyx->yyrule); + int yyi; + yyGLRState* yys; + yyGLRState* yystates[1 + YYMAXRHS]; + yyGLRState yyleftmost_state; + + for (yyi = yynrhs, yys = yyx->yystate; 0 < yyi; yyi -= 1, yys = yys->yypred) + yystates[yyi] = yys; + if (yys == YY_NULLPTR) + { + yyleftmost_state.yyposn = 0; + yystates[0] = &yyleftmost_state; + } + else + yystates[0] = yys; + + if (yyx->yystate->yyposn < yys->yyposn + 1) + YYFPRINTF (stderr, "%*s%s -> \n", + yyindent, "", yytokenName (yylhsNonterm (yyx->yyrule)), + yyx->yyrule - 1); + else + YYFPRINTF (stderr, "%*s%s -> \n", + yyindent, "", yytokenName (yylhsNonterm (yyx->yyrule)), + yyx->yyrule - 1, (unsigned long int) (yys->yyposn + 1), + (unsigned long int) yyx->yystate->yyposn); + for (yyi = 1; yyi <= yynrhs; yyi += 1) + { + if (yystates[yyi]->yyresolved) + { + if (yystates[yyi-1]->yyposn+1 > yystates[yyi]->yyposn) + YYFPRINTF (stderr, "%*s%s \n", yyindent+2, "", + yytokenName (yystos[yystates[yyi]->yylrState])); + else + YYFPRINTF (stderr, "%*s%s \n", yyindent+2, "", + yytokenName (yystos[yystates[yyi]->yylrState]), + (unsigned long int) (yystates[yyi-1]->yyposn + 1), + (unsigned long int) yystates[yyi]->yyposn); + } + else + yyreportTree (yystates[yyi]->yysemantics.yyfirstVal, yyindent+2); + } +} +#endif + +static YYRESULTTAG +yyreportAmbiguity (yySemanticOption* yyx0, + yySemanticOption* yyx1, struct psi_parser *P, struct psi_plist *tokens, size_t *index) { + YYUSE (yyx0); + YYUSE (yyx1); + +#if YYDEBUG + YYFPRINTF (stderr, "Ambiguity detected.\n"); + YYFPRINTF (stderr, "Option 1,\n"); + yyreportTree (yyx0, 2); + YYFPRINTF (stderr, "\nOption 2,\n"); + yyreportTree (yyx1, 2); + YYFPRINTF (stderr, "\n"); +#endif + + yyerror (P, tokens, index, YY_("syntax is ambiguous")); + return yyabort; } -#line 3315 "src/parser_proc.c" + +/** Resolve the ambiguity represented in state YYS in *YYSTACKP, + * perform the indicated actions, and set the semantic value of YYS. + * If result != yyok, the chain of semantic options in YYS has been + * cleared instead or it has been left unmodified except that + * redundant options may have been removed. Regardless of whether + * result = yyok, YYS has been left with consistent data so that + * yydestroyGLRState can be invoked if necessary. */ +static YYRESULTTAG +yyresolveValue (yyGLRState* yys, yyGLRStack* yystackp, struct psi_parser *P, struct psi_plist *tokens, size_t *index) +{ + yySemanticOption* yyoptionList = yys->yysemantics.yyfirstVal; + yySemanticOption* yybest = yyoptionList; + yySemanticOption** yypp; + yybool yymerge = yyfalse; + YYSTYPE yysval; + YYRESULTTAG yyflag; + + for (yypp = &yyoptionList->yynext; *yypp != YY_NULLPTR; ) + { + yySemanticOption* yyp = *yypp; + + if (yyidenticalOptions (yybest, yyp)) + { + yymergeOptionSets (yybest, yyp); + *yypp = yyp->yynext; + } + else + { + switch (yypreference (yybest, yyp)) + { + case 0: + return yyreportAmbiguity (yybest, yyp, P, tokens, index); + break; + case 1: + yymerge = yytrue; + break; + case 2: + break; + case 3: + yybest = yyp; + yymerge = yyfalse; + break; + default: + /* This cannot happen so it is not worth a YYASSERT (yyfalse), + but some compilers complain if the default case is + omitted. */ + break; + } + yypp = &yyp->yynext; + } + } + + if (yymerge) + { + yySemanticOption* yyp; + int yyprec = yydprec[yybest->yyrule]; + yyflag = yyresolveAction (yybest, yystackp, &yysval, P, tokens, index); + if (yyflag == yyok) + for (yyp = yybest->yynext; yyp != YY_NULLPTR; yyp = yyp->yynext) + { + if (yyprec == yydprec[yyp->yyrule]) + { + YYSTYPE yysval_other; + yyflag = yyresolveAction (yyp, yystackp, &yysval_other, P, tokens, index); + if (yyflag != yyok) + { + yydestruct ("Cleanup: discarding incompletely merged value for", + yystos[yys->yylrState], + &yysval, P, tokens, index); + break; + } + yyuserMerge (yymerger[yyp->yyrule], &yysval, &yysval_other); + } + } + } + else + yyflag = yyresolveAction (yybest, yystackp, &yysval, P, tokens, index); + + if (yyflag == yyok) + { + yys->yyresolved = yytrue; + yys->yysemantics.yysval = yysval; + } + else + yys->yysemantics.yyfirstVal = YY_NULLPTR; + return yyflag; } - break; - case 156: /* block ::= EOS */ -{ yy_destructor(yypParser,71,&yymsp[0].minor); -#line 176 "src/parser_proc.y" + +static YYRESULTTAG +yyresolveStack (yyGLRStack* yystackp, struct psi_parser *P, struct psi_plist *tokens, size_t *index) { + if (yystackp->yysplitPoint != YY_NULLPTR) + { + yyGLRState* yys; + int yyn; + + for (yyn = 0, yys = yystackp->yytops.yystates[0]; + yys != yystackp->yysplitPoint; + yys = yys->yypred, yyn += 1) + continue; + YYCHK (yyresolveStates (yystackp->yytops.yystates[0], yyn, yystackp + , P, tokens, index)); + } + return yyok; } -#line 3323 "src/parser_proc.c" + +static void +yycompressStack (yyGLRStack* yystackp) +{ + yyGLRState* yyp, *yyq, *yyr; + + if (yystackp->yytops.yysize != 1 || yystackp->yysplitPoint == YY_NULLPTR) + return; + + for (yyp = yystackp->yytops.yystates[0], yyq = yyp->yypred, yyr = YY_NULLPTR; + yyp != yystackp->yysplitPoint; + yyr = yyp, yyp = yyq, yyq = yyp->yypred) + yyp->yypred = yyr; + + yystackp->yyspaceLeft += yystackp->yynextFree - yystackp->yyitems; + yystackp->yynextFree = ((yyGLRStackItem*) yystackp->yysplitPoint) + 1; + yystackp->yyspaceLeft -= yystackp->yynextFree - yystackp->yyitems; + yystackp->yysplitPoint = YY_NULLPTR; + yystackp->yylastDeleted = YY_NULLPTR; + + while (yyr != YY_NULLPTR) + { + yystackp->yynextFree->yystate = *yyr; + yyr = yyr->yypred; + yystackp->yynextFree->yystate.yypred = &yystackp->yynextFree[-1].yystate; + yystackp->yytops.yystates[0] = &yystackp->yynextFree->yystate; + yystackp->yynextFree += 1; + yystackp->yyspaceLeft -= 1; + } } - break; - default: - break; -/********** End reduce actions ************************************************/ - }; - assert( yyrulenoYY_MAX_SHIFT ){ - yyact += YY_MIN_REDUCE - YY_MIN_SHIFTREDUCE; + +static YYRESULTTAG +yyprocessOneStack (yyGLRStack* yystackp, size_t yyk, + size_t yyposn, struct psi_parser *P, struct psi_plist *tokens, size_t *index) +{ + while (yystackp->yytops.yystates[yyk] != YY_NULLPTR) + { + yyStateNum yystate = yystackp->yytops.yystates[yyk]->yylrState; + YYDPRINTF ((stderr, "Stack %lu Entering state %d\n", + (unsigned long int) yyk, yystate)); + + YYASSERT (yystate != YYFINAL); + + if (yyisDefaultedState (yystate)) + { + YYRESULTTAG yyflag; + yyRuleNum yyrule = yydefaultAction (yystate); + if (yyrule == 0) + { + YYDPRINTF ((stderr, "Stack %lu dies.\n", + (unsigned long int) yyk)); + yymarkStackDeleted (yystackp, yyk); + return yyok; + } + yyflag = yyglrReduce (yystackp, yyk, yyrule, yyimmediate[yyrule], P, tokens, index); + if (yyflag == yyerr) + { + YYDPRINTF ((stderr, + "Stack %lu dies " + "(predicate failure or explicit user error).\n", + (unsigned long int) yyk)); + yymarkStackDeleted (yystackp, yyk); + return yyok; + } + if (yyflag != yyok) + return yyflag; + } + else + { + yySymbol yytoken; + int yyaction; + const short int* yyconflicts; + + yystackp->yytops.yylookaheadNeeds[yyk] = yytrue; + if (yychar == YYEMPTY) + { + YYDPRINTF ((stderr, "Reading a token: ")); + yychar = yylex (&yylval, P, tokens, index); + } + + if (yychar <= YYEOF) + { + yychar = yytoken = YYEOF; + YYDPRINTF ((stderr, "Now at end of input.\n")); + } + else + { + yytoken = YYTRANSLATE (yychar); + YY_SYMBOL_PRINT ("Next token is", yytoken, &yylval, &yylloc); + } + + yygetLRActions (yystate, yytoken, &yyaction, &yyconflicts); + + while (*yyconflicts != 0) + { + YYRESULTTAG yyflag; + size_t yynewStack = yysplitStack (yystackp, yyk); + YYDPRINTF ((stderr, "Splitting off stack %lu from %lu.\n", + (unsigned long int) yynewStack, + (unsigned long int) yyk)); + yyflag = yyglrReduce (yystackp, yynewStack, + *yyconflicts, + yyimmediate[*yyconflicts], P, tokens, index); + if (yyflag == yyok) + YYCHK (yyprocessOneStack (yystackp, yynewStack, + yyposn, P, tokens, index)); + else if (yyflag == yyerr) + { + YYDPRINTF ((stderr, "Stack %lu dies.\n", + (unsigned long int) yynewStack)); + yymarkStackDeleted (yystackp, yynewStack); + } + else + return yyflag; + yyconflicts += 1; + } + + if (yyisShiftAction (yyaction)) + break; + else if (yyisErrorAction (yyaction)) + { + YYDPRINTF ((stderr, "Stack %lu dies.\n", + (unsigned long int) yyk)); + yymarkStackDeleted (yystackp, yyk); + break; + } + else + { + YYRESULTTAG yyflag = yyglrReduce (yystackp, yyk, -yyaction, + yyimmediate[-yyaction], P, tokens, index); + if (yyflag == yyerr) + { + YYDPRINTF ((stderr, + "Stack %lu dies " + "(predicate failure or explicit user error).\n", + (unsigned long int) yyk)); + yymarkStackDeleted (yystackp, yyk); + break; + } + else if (yyflag != yyok) + return yyflag; + } + } } - yymsp -= yysize-1; - yypParser->yytos = yymsp; - yymsp->stateno = (YYACTIONTYPE)yyact; - yymsp->major = (YYCODETYPE)yygoto; - yyTraceShift(yypParser, yyact); - }else{ - assert( yyact == YY_ACCEPT_ACTION ); - yypParser->yytos -= yysize; - yy_accept(yypParser); - } + return yyok; } -/* -** The following code executes when the parse fails -*/ -#ifndef YYNOERRORRECOVERY -static void yy_parse_failed( - yyParser *yypParser /* The parser */ -){ - ParseARG_FETCH; -#ifndef NDEBUG - if( yyTraceFILE ){ - fprintf(yyTraceFILE,"%sFail!\n",yyTracePrompt); - } -#endif - while( yypParser->yytos>yypParser->yystack ) yy_pop_parser_stack(yypParser); - /* Here code is inserted which will be executed whenever the - ** parser fails */ -/************ Begin %parse_failure code ***************************************/ -/************ End %parse_failure code *****************************************/ - ParseARG_STORE; /* Suppress warning about unused %extra_argument variable */ -} -#endif /* YYNOERRORRECOVERY */ - -/* -** The following code executes when a syntax error first occurs. -*/ -static void yy_syntax_error( - yyParser *yypParser, /* The parser */ - int yymajor, /* The major type of the error token */ - ParseTOKENTYPE yyminor /* The minor type of the error token */ -){ - ParseARG_FETCH; -#define TOKEN yyminor -/************ Begin %syntax_error code ****************************************/ -#line 40 "src/parser_proc.y" - ++P->errors; if (TOKEN && TOKEN->type != PSI_T_EOF) { psi_error(PSI_WARNING, TOKEN->file, TOKEN->line, "PSI syntax error: Unexpected token '%s' at pos %u", TOKEN->text, TOKEN->col); } else { psi_error(PSI_WARNING, P->file.fn, P->line, "PSI syntax error: Unexpected end of input"); } -#line 3385 "src/parser_proc.c" -/************ End %syntax_error code ******************************************/ - ParseARG_STORE; /* Suppress warning about unused %extra_argument variable */ -} - -/* -** The following is executed when the parser accepts -*/ -static void yy_accept( - yyParser *yypParser /* The parser */ -){ - ParseARG_FETCH; -#ifndef NDEBUG - if( yyTraceFILE ){ - fprintf(yyTraceFILE,"%sAccept!\n",yyTracePrompt); +static void +yyreportSyntaxError (yyGLRStack* yystackp, struct psi_parser *P, struct psi_plist *tokens, size_t *index) +{ + if (yystackp->yyerrState != 0) + return; +#if ! YYERROR_VERBOSE + yyerror (P, tokens, index, YY_("syntax error")); +#else + { + yySymbol yytoken = yychar == YYEMPTY ? YYEMPTY : YYTRANSLATE (yychar); + size_t yysize0 = yytnamerr (YY_NULLPTR, yytokenName (yytoken)); + size_t yysize = yysize0; + yybool yysize_overflow = yyfalse; + char* yymsg = YY_NULLPTR; + enum { YYERROR_VERBOSE_ARGS_MAXIMUM = 5 }; + /* Internationalized format string. */ + const char *yyformat = YY_NULLPTR; + /* Arguments of yyformat. */ + char const *yyarg[YYERROR_VERBOSE_ARGS_MAXIMUM]; + /* Number of reported tokens (one for the "unexpected", one per + "expected"). */ + int yycount = 0; + + /* There are many possibilities here to consider: + - If this state is a consistent state with a default action, then + the only way this function was invoked is if the default action + is an error action. In that case, don't check for expected + tokens because there are none. + - The only way there can be no lookahead present (in yychar) is if + this state is a consistent state with a default action. Thus, + detecting the absence of a lookahead is sufficient to determine + that there is no unexpected or expected token to report. In that + case, just report a simple "syntax error". + - Don't assume there isn't a lookahead just because this state is a + consistent state with a default action. There might have been a + previous inconsistent state, consistent state with a non-default + action, or user semantic action that manipulated yychar. + - Of course, the expected token list depends on states to have + correct lookahead information, and it depends on the parser not + to perform extra reductions after fetching a lookahead from the + scanner and before detecting a syntax error. Thus, state merging + (from LALR or IELR) and default reductions corrupt the expected + token list. However, the list is correct for canonical LR with + one exception: it will still contain any token that will not be + accepted due to an error action in a later state. + */ + if (yytoken != YYEMPTY) + { + int yyn = yypact[yystackp->yytops.yystates[0]->yylrState]; + yyarg[yycount++] = yytokenName (yytoken); + if (!yypact_value_is_default (yyn)) + { + /* Start YYX at -YYN if negative to avoid negative indexes in + YYCHECK. In other words, skip the first -YYN actions for this + state because they are default actions. */ + int yyxbegin = yyn < 0 ? -yyn : 0; + /* Stay within bounds of both yycheck and yytname. */ + int yychecklim = YYLAST - yyn + 1; + int yyxend = yychecklim < YYNTOKENS ? yychecklim : YYNTOKENS; + int yyx; + for (yyx = yyxbegin; yyx < yyxend; ++yyx) + if (yycheck[yyx + yyn] == yyx && yyx != YYTERROR + && !yytable_value_is_error (yytable[yyx + yyn])) + { + if (yycount == YYERROR_VERBOSE_ARGS_MAXIMUM) + { + yycount = 1; + yysize = yysize0; + break; + } + yyarg[yycount++] = yytokenName (yyx); + { + size_t yysz = yysize + yytnamerr (YY_NULLPTR, yytokenName (yyx)); + yysize_overflow |= yysz < yysize; + yysize = yysz; + } + } + } + } + + switch (yycount) + { +#define YYCASE_(N, S) \ + case N: \ + yyformat = S; \ + break + YYCASE_(0, YY_("syntax error")); + YYCASE_(1, YY_("syntax error, unexpected %s")); + YYCASE_(2, YY_("syntax error, unexpected %s, expecting %s")); + YYCASE_(3, YY_("syntax error, unexpected %s, expecting %s or %s")); + YYCASE_(4, YY_("syntax error, unexpected %s, expecting %s or %s or %s")); + YYCASE_(5, YY_("syntax error, unexpected %s, expecting %s or %s or %s or %s")); +#undef YYCASE_ + } + + { + size_t yysz = yysize + strlen (yyformat); + yysize_overflow |= yysz < yysize; + yysize = yysz; } -#endif -#ifndef YYNOERRORRECOVERY - yypParser->yyerrcnt = -1; -#endif - assert( yypParser->yytos==yypParser->yystack ); - /* Here code is inserted which will be executed whenever the - ** parser accepts */ -/*********** Begin %parse_accept code *****************************************/ -/*********** End %parse_accept code *******************************************/ - ParseARG_STORE; /* Suppress warning about unused %extra_argument variable */ -} - -/* The main parser program. -** The first argument is a pointer to a structure obtained from -** "ParseAlloc" which describes the current state of the parser. -** The second argument is the major token number. The third is -** the minor token. The fourth optional argument is whatever the -** user wants (and specified in the grammar) and is available for -** use by the action routines. -** -** Inputs: -**
    -**
  • A pointer to the parser (an opaque structure.) -**
  • The major token number. -**
  • The minor token number. -**
  • An option argument of a grammar-specified type. -**
-** -** Outputs: -** None. -*/ -void Parse( - void *yyp, /* The parser */ - int yymajor, /* The major token code number */ - ParseTOKENTYPE yyminor /* The value for the token */ - ParseARG_PDECL /* Optional %extra_argument parameter */ -){ - YYMINORTYPE yyminorunion; - unsigned int yyact; /* The parser action. */ -#if !defined(YYERRORSYMBOL) && !defined(YYNOERRORRECOVERY) - int yyendofinput; /* True if we are at the end of input */ -#endif -#ifdef YYERRORSYMBOL - int yyerrorhit = 0; /* True if yymajor has invoked an error */ -#endif - yyParser *yypParser; /* The parser */ - yypParser = (yyParser*)yyp; - assert( yypParser->yytos!=0 ); -#if !defined(YYERRORSYMBOL) && !defined(YYNOERRORRECOVERY) - yyendofinput = (yymajor==0); -#endif - ParseARG_STORE; + if (!yysize_overflow) + yymsg = (char *) YYMALLOC (yysize); -#ifndef NDEBUG - if( yyTraceFILE ){ - fprintf(yyTraceFILE,"%sInput '%s'\n",yyTracePrompt,yyTokenName[yymajor]); + if (yymsg) + { + char *yyp = yymsg; + int yyi = 0; + while ((*yyp = *yyformat)) + { + if (*yyp == '%' && yyformat[1] == 's' && yyi < yycount) + { + yyp += yytnamerr (yyp, yyarg[yyi++]); + yyformat += 2; + } + else + { + yyp++; + yyformat++; + } + } + yyerror (P, tokens, index, yymsg); + YYFREE (yymsg); + } + else + { + yyerror (P, tokens, index, YY_("syntax error")); + yyMemoryExhausted (yystackp); + } } -#endif +#endif /* YYERROR_VERBOSE */ + yynerrs += 1; +} - do{ - yyact = yy_find_shift_action(yypParser,(YYCODETYPE)yymajor); - if( yyact <= YY_MAX_SHIFTREDUCE ){ - yy_shift(yypParser,yyact,yymajor,yyminor); -#ifndef YYNOERRORRECOVERY - yypParser->yyerrcnt--; -#endif - yymajor = YYNOCODE; - }else if( yyact <= YY_MAX_REDUCE ){ - yy_reduce(yypParser,yyact-YY_MIN_REDUCE); - }else{ - assert( yyact == YY_ERROR_ACTION ); - yyminorunion.yy0 = yyminor; -#ifdef YYERRORSYMBOL - int yymx; -#endif -#ifndef NDEBUG - if( yyTraceFILE ){ - fprintf(yyTraceFILE,"%sSyntax Error!\n",yyTracePrompt); - } -#endif -#ifdef YYERRORSYMBOL - /* A syntax error has occurred. - ** The response to an error depends upon whether or not the - ** grammar defines an error token "ERROR". - ** - ** This is what we do if the grammar does define ERROR: - ** - ** * Call the %syntax_error function. - ** - ** * Begin popping the stack until we enter a state where - ** it is legal to shift the error symbol, then shift - ** the error symbol. - ** - ** * Set the error count to three. - ** - ** * Begin accepting and shifting new tokens. No new error - ** processing will occur until three tokens have been - ** shifted successfully. - ** - */ - if( yypParser->yyerrcnt<0 ){ - yy_syntax_error(yypParser,yymajor,yyminor); +/* Recover from a syntax error on *YYSTACKP, assuming that *YYSTACKP->YYTOKENP, + yylval, and yylloc are the syntactic category, semantic value, and location + of the lookahead. */ +static void +yyrecoverSyntaxError (yyGLRStack* yystackp, struct psi_parser *P, struct psi_plist *tokens, size_t *index) +{ + size_t yyk; + int yyj; + + if (yystackp->yyerrState == 3) + /* We just shifted the error token and (perhaps) took some + reductions. Skip tokens until we can proceed. */ + while (yytrue) + { + yySymbol yytoken; + if (yychar == YYEOF) + yyFail (yystackp, P, tokens, index, YY_NULLPTR); + if (yychar != YYEMPTY) + { + yytoken = YYTRANSLATE (yychar); + yydestruct ("Error: discarding", + yytoken, &yylval, P, tokens, index); + } + YYDPRINTF ((stderr, "Reading a token: ")); + yychar = yylex (&yylval, P, tokens, index); + if (yychar <= YYEOF) + { + yychar = yytoken = YYEOF; + YYDPRINTF ((stderr, "Now at end of input.\n")); + } + else + { + yytoken = YYTRANSLATE (yychar); + YY_SYMBOL_PRINT ("Next token is", yytoken, &yylval, &yylloc); + } + yyj = yypact[yystackp->yytops.yystates[0]->yylrState]; + if (yypact_value_is_default (yyj)) + return; + yyj += yytoken; + if (yyj < 0 || YYLAST < yyj || yycheck[yyj] != yytoken) + { + if (yydefact[yystackp->yytops.yystates[0]->yylrState] != 0) + return; + } + else if (! yytable_value_is_error (yytable[yyj])) + return; } - yymx = yypParser->yytos->major; - if( yymx==YYERRORSYMBOL || yyerrorhit ){ -#ifndef NDEBUG - if( yyTraceFILE ){ - fprintf(yyTraceFILE,"%sDiscard input token %s\n", - yyTracePrompt,yyTokenName[yymajor]); + + /* Reduce to one stack. */ + for (yyk = 0; yyk < yystackp->yytops.yysize; yyk += 1) + if (yystackp->yytops.yystates[yyk] != YY_NULLPTR) + break; + if (yyk >= yystackp->yytops.yysize) + yyFail (yystackp, P, tokens, index, YY_NULLPTR); + for (yyk += 1; yyk < yystackp->yytops.yysize; yyk += 1) + yymarkStackDeleted (yystackp, yyk); + yyremoveDeletes (yystackp); + yycompressStack (yystackp); + + /* Now pop stack until we find a state that shifts the error token. */ + yystackp->yyerrState = 3; + while (yystackp->yytops.yystates[0] != YY_NULLPTR) + { + yyGLRState *yys = yystackp->yytops.yystates[0]; + yyj = yypact[yys->yylrState]; + if (! yypact_value_is_default (yyj)) + { + yyj += YYTERROR; + if (0 <= yyj && yyj <= YYLAST && yycheck[yyj] == YYTERROR + && yyisShiftAction (yytable[yyj])) + { + /* Shift the error token. */ + YY_SYMBOL_PRINT ("Shifting", yystos[yytable[yyj]], + &yylval, &yyerrloc); + yyglrShift (yystackp, 0, yytable[yyj], + yys->yyposn, &yylval); + yys = yystackp->yytops.yystates[0]; + break; + } } -#endif - yy_destructor(yypParser, (YYCODETYPE)yymajor, &yyminorunion); - yymajor = YYNOCODE; - }else{ - while( yypParser->yytos >= yypParser->yystack - && yymx != YYERRORSYMBOL - && (yyact = yy_find_reduce_action( - yypParser->yytos->stateno, - YYERRORSYMBOL)) >= YY_MIN_REDUCE - ){ - yy_pop_parser_stack(yypParser); + if (yys->yypred != YY_NULLPTR) + yydestroyGLRState ("Error: popping", yys, P, tokens, index); + yystackp->yytops.yystates[0] = yys->yypred; + yystackp->yynextFree -= 1; + yystackp->yyspaceLeft += 1; + } + if (yystackp->yytops.yystates[0] == YY_NULLPTR) + yyFail (yystackp, P, tokens, index, YY_NULLPTR); +} + +#define YYCHK1(YYE) \ + do { \ + switch (YYE) { \ + case yyok: \ + break; \ + case yyabort: \ + goto yyabortlab; \ + case yyaccept: \ + goto yyacceptlab; \ + case yyerr: \ + goto yyuser_error; \ + default: \ + goto yybuglab; \ + } \ + } while (0) + +/*----------. +| yyparse. | +`----------*/ + +int +yyparse (struct psi_parser *P, struct psi_plist *tokens, size_t *index) +{ + int yyresult; + yyGLRStack yystack; + yyGLRStack* const yystackp = &yystack; + size_t yyposn; + + YYDPRINTF ((stderr, "Starting parse\n")); + + yychar = YYEMPTY; + yylval = yyval_default; + + /* User initialization code. */ + #line 144 "src/parser_proc_grammar.y" /* glr.c:2270 */ +{ +} + +#line 7326 "src/parser_proc.c" /* glr.c:2270 */ + + if (! yyinitGLRStack (yystackp, YYINITDEPTH)) + goto yyexhaustedlab; + switch (YYSETJMP (yystack.yyexception_buffer)) + { + case 0: break; + case 1: goto yyabortlab; + case 2: goto yyexhaustedlab; + default: goto yybuglab; + } + yyglrShift (&yystack, 0, 0, 0, &yylval); + yyposn = 0; + + while (yytrue) + { + /* For efficiency, we have two loops, the first of which is + specialized to deterministic operation (single stack, no + potential ambiguity). */ + /* Standard mode */ + while (yytrue) + { + yyRuleNum yyrule; + int yyaction; + const short int* yyconflicts; + + yyStateNum yystate = yystack.yytops.yystates[0]->yylrState; + YYDPRINTF ((stderr, "Entering state %d\n", yystate)); + if (yystate == YYFINAL) + goto yyacceptlab; + if (yyisDefaultedState (yystate)) + { + yyrule = yydefaultAction (yystate); + if (yyrule == 0) + { + + yyreportSyntaxError (&yystack, P, tokens, index); + goto yyuser_error; + } + YYCHK1 (yyglrReduce (&yystack, 0, yyrule, yytrue, P, tokens, index)); + } + else + { + yySymbol yytoken; + if (yychar == YYEMPTY) + { + YYDPRINTF ((stderr, "Reading a token: ")); + yychar = yylex (&yylval, P, tokens, index); + } + + if (yychar <= YYEOF) + { + yychar = yytoken = YYEOF; + YYDPRINTF ((stderr, "Now at end of input.\n")); + } + else + { + yytoken = YYTRANSLATE (yychar); + YY_SYMBOL_PRINT ("Next token is", yytoken, &yylval, &yylloc); + } + + yygetLRActions (yystate, yytoken, &yyaction, &yyconflicts); + if (*yyconflicts != 0) + break; + if (yyisShiftAction (yyaction)) + { + YY_SYMBOL_PRINT ("Shifting", yytoken, &yylval, &yylloc); + yychar = YYEMPTY; + yyposn += 1; + yyglrShift (&yystack, 0, yyaction, yyposn, &yylval); + if (0 < yystack.yyerrState) + yystack.yyerrState -= 1; + } + else if (yyisErrorAction (yyaction)) + { + + yyreportSyntaxError (&yystack, P, tokens, index); + goto yyuser_error; + } + else + YYCHK1 (yyglrReduce (&yystack, 0, -yyaction, yytrue, P, tokens, index)); + } } - if( yypParser->yytos < yypParser->yystack || yymajor==0 ){ - yy_destructor(yypParser,(YYCODETYPE)yymajor,&yyminorunion); - yy_parse_failed(yypParser); -#ifndef YYNOERRORRECOVERY - yypParser->yyerrcnt = -1; -#endif - yymajor = YYNOCODE; - }else if( yymx!=YYERRORSYMBOL ){ - yy_shift(yypParser,yyact,YYERRORSYMBOL,yyminor); + + while (yytrue) + { + yySymbol yytoken_to_shift; + size_t yys; + + for (yys = 0; yys < yystack.yytops.yysize; yys += 1) + yystackp->yytops.yylookaheadNeeds[yys] = yychar != YYEMPTY; + + /* yyprocessOneStack returns one of three things: + + - An error flag. If the caller is yyprocessOneStack, it + immediately returns as well. When the caller is finally + yyparse, it jumps to an error label via YYCHK1. + + - yyok, but yyprocessOneStack has invoked yymarkStackDeleted + (&yystack, yys), which sets the top state of yys to NULL. Thus, + yyparse's following invocation of yyremoveDeletes will remove + the stack. + + - yyok, when ready to shift a token. + + Except in the first case, yyparse will invoke yyremoveDeletes and + then shift the next token onto all remaining stacks. This + synchronization of the shift (that is, after all preceding + reductions on all stacks) helps prevent double destructor calls + on yylval in the event of memory exhaustion. */ + + for (yys = 0; yys < yystack.yytops.yysize; yys += 1) + YYCHK1 (yyprocessOneStack (&yystack, yys, yyposn, P, tokens, index)); + yyremoveDeletes (&yystack); + if (yystack.yytops.yysize == 0) + { + yyundeleteLastStack (&yystack); + if (yystack.yytops.yysize == 0) + yyFail (&yystack, P, tokens, index, YY_("syntax error")); + YYCHK1 (yyresolveStack (&yystack, P, tokens, index)); + YYDPRINTF ((stderr, "Returning to deterministic operation.\n")); + + yyreportSyntaxError (&yystack, P, tokens, index); + goto yyuser_error; + } + + /* If any yyglrShift call fails, it will fail after shifting. Thus, + a copy of yylval will already be on stack 0 in the event of a + failure in the following loop. Thus, yychar is set to YYEMPTY + before the loop to make sure the user destructor for yylval isn't + called twice. */ + yytoken_to_shift = YYTRANSLATE (yychar); + yychar = YYEMPTY; + yyposn += 1; + for (yys = 0; yys < yystack.yytops.yysize; yys += 1) + { + int yyaction; + const short int* yyconflicts; + yyStateNum yystate = yystack.yytops.yystates[yys]->yylrState; + yygetLRActions (yystate, yytoken_to_shift, &yyaction, + &yyconflicts); + /* Note that yyconflicts were handled by yyprocessOneStack. */ + YYDPRINTF ((stderr, "On stack %lu, ", (unsigned long int) yys)); + YY_SYMBOL_PRINT ("shifting", yytoken_to_shift, &yylval, &yylloc); + yyglrShift (&yystack, yys, yyaction, yyposn, + &yylval); + YYDPRINTF ((stderr, "Stack %lu now in state #%d\n", + (unsigned long int) yys, + yystack.yytops.yystates[yys]->yylrState)); + } + + if (yystack.yytops.yysize == 1) + { + YYCHK1 (yyresolveStack (&yystack, P, tokens, index)); + YYDPRINTF ((stderr, "Returning to deterministic operation.\n")); + yycompressStack (&yystack); + break; + } } - } - yypParser->yyerrcnt = 3; - yyerrorhit = 1; -#elif defined(YYNOERRORRECOVERY) - /* If the YYNOERRORRECOVERY macro is defined, then do not attempt to - ** do any kind of error recovery. Instead, simply invoke the syntax - ** error routine and continue going as if nothing had happened. - ** - ** Applications can set this macro (for example inside %include) if - ** they intend to abandon the parse upon the first syntax error seen. - */ - yy_syntax_error(yypParser,yymajor, yyminor); - yy_destructor(yypParser,(YYCODETYPE)yymajor,&yyminorunion); - yymajor = YYNOCODE; - -#else /* YYERRORSYMBOL is not defined */ - /* This is what we do if the grammar does not define ERROR: - ** - ** * Report an error message, and throw away the input token. - ** - ** * If the input token is $, then fail the parse. - ** - ** As before, subsequent error messages are suppressed until - ** three input tokens have been successfully shifted. - */ - if( yypParser->yyerrcnt<=0 ){ - yy_syntax_error(yypParser,yymajor, yyminor); - } - yypParser->yyerrcnt = 3; - yy_destructor(yypParser,(YYCODETYPE)yymajor,&yyminorunion); - if( yyendofinput ){ - yy_parse_failed(yypParser); -#ifndef YYNOERRORRECOVERY - yypParser->yyerrcnt = -1; -#endif - } - yymajor = YYNOCODE; -#endif + continue; + yyuser_error: + yyrecoverSyntaxError (&yystack, P, tokens, index); + yyposn = yystack.yytops.yystates[0]->yyposn; } - }while( yymajor!=YYNOCODE && yypParser->yytos>yypParser->yystack ); -#ifndef NDEBUG - if( yyTraceFILE ){ - yyStackEntry *i; - char cDiv = '['; - fprintf(yyTraceFILE,"%sReturn. Stack=",yyTracePrompt); - for(i=&yypParser->yystack[1]; i<=yypParser->yytos; i++){ - fprintf(yyTraceFILE,"%c%s", cDiv, yyTokenName[i->major]); - cDiv = ' '; + + yyacceptlab: + yyresult = 0; + goto yyreturn; + + yybuglab: + YYASSERT (yyfalse); + goto yyabortlab; + + yyabortlab: + yyresult = 1; + goto yyreturn; + + yyexhaustedlab: + yyerror (P, tokens, index, YY_("memory exhausted")); + yyresult = 2; + goto yyreturn; + + yyreturn: + if (yychar != YYEMPTY) + yydestruct ("Cleanup: discarding lookahead", + YYTRANSLATE (yychar), &yylval, P, tokens, index); + + /* If the stack is well-formed, pop the stack until it is empty, + destroying its entries as we go. But free the stack regardless + of whether it is well-formed. */ + if (yystack.yyitems) + { + yyGLRState** yystates = yystack.yytops.yystates; + if (yystates) + { + size_t yysize = yystack.yytops.yysize; + size_t yyk; + for (yyk = 0; yyk < yysize; yyk += 1) + if (yystates[yyk]) + { + while (yystates[yyk]) + { + yyGLRState *yys = yystates[yyk]; + if (yys->yypred != YY_NULLPTR) + yydestroyGLRState ("Cleanup: popping", yys, P, tokens, index); + yystates[yyk] = yys->yypred; + yystack.yynextFree -= 1; + yystack.yyspaceLeft += 1; + } + break; + } + } + yyfreeGLRStack (&yystack); } - fprintf(yyTraceFILE,"]\n"); - } + + return yyresult; +} + +/* DEBUGGING ONLY */ +#if YYDEBUG +static void +yy_yypstack (yyGLRState* yys) +{ + if (yys->yypred) + { + yy_yypstack (yys->yypred); + YYFPRINTF (stderr, " -> "); + } + YYFPRINTF (stderr, "%d@%lu", yys->yylrState, + (unsigned long int) yys->yyposn); +} + +static void +yypstates (yyGLRState* yyst) +{ + if (yyst == YY_NULLPTR) + YYFPRINTF (stderr, ""); + else + yy_yypstack (yyst); + YYFPRINTF (stderr, "\n"); +} + +static void +yypstack (yyGLRStack* yystackp, size_t yyk) +{ + yypstates (yystackp->yytops.yystates[yyk]); +} + +#define YYINDEX(YYX) \ + ((YYX) == YY_NULLPTR ? -1 : (yyGLRStackItem*) (YYX) - yystackp->yyitems) + + +static void +yypdumpstack (yyGLRStack* yystackp) +{ + yyGLRStackItem* yyp; + size_t yyi; + for (yyp = yystackp->yyitems; yyp < yystackp->yynextFree; yyp += 1) + { + YYFPRINTF (stderr, "%3lu. ", + (unsigned long int) (yyp - yystackp->yyitems)); + if (*(yybool *) yyp) + { + YYASSERT (yyp->yystate.yyisState); + YYASSERT (yyp->yyoption.yyisState); + YYFPRINTF (stderr, "Res: %d, LR State: %d, posn: %lu, pred: %ld", + yyp->yystate.yyresolved, yyp->yystate.yylrState, + (unsigned long int) yyp->yystate.yyposn, + (long int) YYINDEX (yyp->yystate.yypred)); + if (! yyp->yystate.yyresolved) + YYFPRINTF (stderr, ", firstVal: %ld", + (long int) YYINDEX (yyp->yystate + .yysemantics.yyfirstVal)); + } + else + { + YYASSERT (!yyp->yystate.yyisState); + YYASSERT (!yyp->yyoption.yyisState); + YYFPRINTF (stderr, "Option. rule: %d, state: %ld, next: %ld", + yyp->yyoption.yyrule - 1, + (long int) YYINDEX (yyp->yyoption.yystate), + (long int) YYINDEX (yyp->yyoption.yynext)); + } + YYFPRINTF (stderr, "\n"); + } + YYFPRINTF (stderr, "Tops:"); + for (yyi = 0; yyi < yystackp->yytops.yysize; yyi += 1) + YYFPRINTF (stderr, "%lu: %ld; ", (unsigned long int) yyi, + (long int) YYINDEX (yystackp->yytops.yystates[yyi])); + YYFPRINTF (stderr, "\n"); +} #endif - return; + +#undef yylval +#undef yychar +#undef yynerrs + +/* Substitute the variable and function names. */ +#define yyparse psi_parser_proc_parse +#define yylex psi_parser_proc_lex +#define yyerror psi_parser_proc_error +#define yylval psi_parser_proc_lval +#define yychar psi_parser_proc_char +#define yydebug psi_parser_proc_debug +#define yynerrs psi_parser_proc_nerrs + +#line 2118 "src/parser_proc_grammar.y" /* glr.c:2584 */ + + +/* epilogue */ + +static int psi_parser_proc_lex(YYSTYPE *lvalp, struct psi_parser *P, struct psi_plist *tokens, size_t *index) +{ + struct psi_token *token; + + if (psi_plist_get(tokens, (*index)++, &token)) { + if (P->flags & PSI_DEBUG) { + psi_token_dump(2, token); + } + + *((struct psi_token **)lvalp) = token; + return token->type; + } else { + (*index)--; + PSI_DEBUG_PRINT(P, "EOF(%d)\n", PSI_T_EOF); + } + + return PSI_T_EOF; +} + +static void psi_parser_proc_error(struct psi_parser *P, struct psi_plist *tokens, size_t *index, const char *msg) +{ + struct psi_token *T = NULL; + size_t last; + + if (*index == 0) { + last = 0; + } else { + last = --(*index); + } + + psi_plist_get(tokens, last, &T); + if (T) { + P->error(PSI_DATA(P), T, PSI_WARNING, "PSI %s at col %u", msg, T->col); + } else { + P->error(PSI_DATA(P), NULL, PSI_WARNING, "PSI %s", msg); + } + P->errors++; } +