-/*
-** 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 <stdio.h>
-/************ 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 <http://www.gnu.org/licenses/>. */
+
+/* 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 <assert.h>
#include <stdarg.h>
#include "plist.h"
#include "parser.h"
+#define YYDEBUG 1
-/* 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
-
-/* 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)
{
- if (*parser_proc) {
- ParseFree(*parser_proc, free);
- *parser_proc = NULL;
+ 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_add_from_typedef(struct psi_parser *P, struct psi_decl_arg *def)
+{
+ if (def->type->real.def) {
+ switch (def->type->type) {
+ case PSI_T_STRUCT:
+ psi_parser_proc_add_struct(P, def->type->real.strct);
+ break;
+ case PSI_T_UNION:
+ psi_parser_proc_add_union(P, def->type->real.unn);
+ break;
+ case PSI_T_ENUM:
+ psi_parser_proc_add_enum(P, def->type->real.enm);
+ break;
+ default:
+ break;
+ }
+ }
+}
+static inline void psi_parser_proc_add_typedef(struct psi_parser *P, struct psi_decl_arg *def)
+{
+ assert(def);
+ if (!P->types) {
+ P->types = psi_plist_init((psi_plist_dtor) psi_decl_arg_free);
+ }
+ 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 (!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_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);
+}
+
+/* end code */
+
+#line 183 "src/parser_proc.c" /* glr.c:264 */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+#ifndef YY_
+# if defined YYENABLE_NLS && YYENABLE_NLS
+# if ENABLE_NLS
+# include <libintl.h> /* 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 <setjmp.h>
+# 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
-#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
+#ifndef YY_ATTRIBUTE_PURE
+# define YY_ATTRIBUTE_PURE YY_ATTRIBUTE ((__pure__))
#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_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
-#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 YY_INITIAL_VALUE
+# define YY_INITIAL_VALUE(Value) /* Nothing. */
+#endif
+
+
+#ifndef YYASSERT
+# define YYASSERT(Condition) ((void) ((Condition) || (abort (), 0)))
#endif
+/* YYFINAL -- State number of the termination state. */
+#define YYFINAL 167
+/* YYLAST -- Last index in YYTABLE. */
+#define YYLAST 3089
+
+/* YYNTOKENS -- Number of terminals. */
+#define YYNTOKENS 132
+/* YYNNTS -- Number of nonterminals. */
+#define YYNNTS 122
+/* YYNRULES -- Number of rules. */
+#define YYNRULES 479
+/* YYNRULES -- Number of states. */
+#define YYNSTATES 710
+/* 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 386
+
+#define YYTRANSLATE(YYX) \
+ ((unsigned int) (YYX) <= YYMAXUTOK ? yytranslate[YYX] : YYUNDEFTOK)
-/* 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,
+/* 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
};
-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, 391, 391, 391, 391, 391, 391, 391, 391, 391,
+ 391, 391, 391, 391, 391, 391, 391, 391, 391, 391,
+ 392, 392, 392, 392, 393, 393, 393, 393, 393, 393,
+ 393, 393, 393, 393, 393, 393, 393, 393, 393, 393,
+ 393, 393, 394, 394, 394, 394, 394, 394, 394, 394,
+ 394, 394, 394, 394, 394, 394, 394, 394, 394, 394,
+ 394, 394, 394, 394, 394, 394, 394, 394, 394, 394,
+ 394, 394, 394, 394, 394, 394, 394, 394, 394, 394,
+ 394, 394, 394, 394, 394, 394, 394, 394, 394, 394,
+ 394, 394, 394, 394, 394, 394, 394, 394, 394, 394,
+ 394, 394, 394, 394, 394, 394, 394, 394, 394, 394,
+ 394, 394, 394, 394, 394, 394, 394, 394, 394, 394,
+ 394, 394, 394, 394, 394, 394, 394, 394, 394, 394,
+ 394, 394, 394, 394, 394, 394, 394, 394, 394, 394,
+ 394, 394, 394, 394, 394, 394, 394, 394, 394, 394,
+ 394, 394, 394, 394, 394, 394, 394, 394, 394, 394,
+ 394, 394, 394, 394, 398, 399, 402, 403, 406, 407,
+ 408, 409, 415, 423, 426, 429, 430, 433, 436, 439,
+ 442, 448, 454, 457, 463, 486, 490, 494, 499, 503,
+ 507, 511, 518, 519, 523, 524, 528, 529, 530, 534,
+ 535, 539, 540, 544, 545, 546, 550, 551, 555, 556,
+ 557, 558, 559, 560, 564, 569, 577, 580, 584, 589,
+ 597, 600, 604, 608, 615, 619, 623, 627, 632, 642,
+ 652, 657, 662, 668, 677, 680, 684, 688, 694, 701,
+ 707, 708, 709, 710, 714, 717, 748, 755, 756, 757,
+ 758, 762, 765, 771, 772, 780, 791, 800, 809, 817,
+ 820, 824, 828, 832, 837, 842, 850, 851, 852, 855,
+ 861, 864, 867, 873, 874, 875, 876, 877, 878, 879,
+ 880, 884, 885, 889, 892, 895, 901, 904, 907, 915,
+ 927, 930, 933, 940, 943, 953, 956, 959, 962, 963,
+ 967, 970, 973, 984, 987, 993, 994, 998, 999, 1003,
+ 1007, 1013, 1014, 1020, 1023, 1029, 1030, 1037, 1038, 1042,
+ 1049, 1060, 1067, 1078, 1085, 1096, 1107, 1121, 1122, 1134,
+ 1137, 1140, 1143, 1150, 1153, 1159, 1168, 1180, 1188, 1191,
+ 1201, 1214, 1219, 1227, 1237, 1247, 1250, 1254, 1260, 1274,
+ 1291, 1294, 1300, 1307, 1317, 1324, 1327, 1333, 1338, 1346,
+ 1350, 1354, 1358, 1362, 1366, 1373, 1377, 1381, 1385, 1392,
+ 1405, 1418, 1431, 1434, 1441, 1444, 1447, 1450, 1456, 1460,
+ 1467, 1470, 1476, 1479, 1485, 1486, 1492, 1495, 1507, 1510,
+ 1517, 1522, 1527, 1537, 1540, 1546, 1549, 1555, 1562, 1569,
+ 1570, 1571, 1572, 1573, 1574, 1575, 1576, 1577, 1581, 1584,
+ 1590, 1593, 1596, 1599, 1602, 1608, 1612, 1620, 1621, 1625,
+ 1632, 1635, 1638, 1642, 1645, 1648, 1654, 1658, 1666, 1673,
+ 1681, 1689, 1690, 1691, 1692, 1693, 1694, 1695, 1696, 1697,
+ 1698, 1702, 1705, 1711, 1714, 1720, 1721, 1725, 1728, 1734,
+ 1737, 1743, 1750, 1757, 1760, 1763, 1770, 1775, 1783, 1784,
+ 1785, 1786, 1787, 1788, 1789, 1790, 1794, 1797, 1803, 1806,
+ 1812, 1819, 1820, 1824, 1831, 1834, 1840, 1848, 1851, 1857
};
-#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", "INT8", "UINT8",
+ "INT16", "UINT16", "INT32", "UINT32", "INT64", "UINT64", "NULL", "TRUE",
+ "FALSE", "NAME", "NSNAME", "DOLLAR_NAME", "NUMBER", "QUOTED_STRING",
+ "QUOTED_CHAR", "\"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", "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_RESTRICT", "CPP_ASM", "BINARY", "UNARY", "$accept",
+ "binary_op_token", "unary_op_token", "name_token", "any_noeol_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", "const_decl_type", "decl_type",
+ "decl_type_complex", "decl_type_simple", "decl_real_type",
+ "decl_stdint_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_ext_var_stmt", "decl_ext_var", "decl_ext_var_list", "decl_vars",
+ "decl", "decl_body", "decl_func_body", "decl_functor_body",
+ "decl_functor", "decl_func", "decl_args", "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", "enum_name", "union_name",
+ "struct_name", "optional_name", "decl_layout", "align_and_size",
+ "array_size", "indirection", "pointers", "asterisks", "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",
+ "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 -550
+#define YYTABLE_NINF -478
+
+ /* YYPACT[STATE-NUM] -- Index in YYTABLE of the portion describing
+ STATE-NUM. */
+static const short int yypact[] =
+{
+ 946, -550, -550, -550, -550, -550, 64, -550, -550, 505,
+ -550, -550, -550, -550, -550, -550, -550, -550, 2646, -550,
+ -550, 510, 2690, 2496, 2496, 2496, 308, 10, -49, 32,
+ -550, 1040, 94, 946, -550, -550, -550, -550, -550, 2206,
+ -550, -550, -550, -550, -550, 61, 82, -550, -550, -550,
+ 102, -2, -550, -550, 43, 103, 105, -550, -550, -550,
+ -550, 89, -550, 111, -550, -550, -550, -550, -550, 656,
+ -550, 104, -550, -550, -550, -550, -550, -550, -550, -550,
+ -550, -550, -550, -550, -550, -550, -550, -550, -550, -550,
+ -550, -550, -550, -550, -550, -550, -550, -550, -550, -550,
+ -550, -550, 2255, -22, -550, -550, -550, 2496, 2496, 2496,
+ 245, -550, 84, -550, -550, -550, -550, -550, -550, -550,
+ -550, -550, -550, -550, -550, 905, -550, -550, -550, -550,
+ 131, 786, 786, -3, -550, 905, 2132, 2496, 2496, 150,
+ 1896, -550, -550, 169, 2496, 172, 172, 63, 63, 173,
+ -550, -550, 183, 185, -550, 104, 186, -550, -550, 182,
+ 178, -550, 197, -550, 2723, 2690, -2, -550, -550, 187,
+ -550, 191, 2496, -550, 224, -550, 90, -550, -550, 61,
+ -550, -550, 194, 198, 2767, 2767, 2496, 279, 2496, -550,
+ 104, -550, -550, -550, -550, -550, -550, 2206, -550, -550,
+ -550, -550, -550, -550, 113, 786, -550, -550, -550, -550,
+ -550, -550, -550, -550, -550, -550, -550, -550, -550, -550,
+ -550, -550, -550, -550, -550, -550, -550, -550, -550, -550,
+ -550, -550, -550, -550, -550, -550, -550, -550, -550, -550,
+ -550, -550, -550, -550, -550, -550, -550, -550, -550, -550,
+ -550, -550, -550, -550, -550, -550, -550, -550, -550, -550,
+ -550, -550, -550, -550, -550, -550, -550, -550, -550, -550,
+ -550, -550, -550, -550, -550, -550, -550, -550, -550, -550,
+ -550, -550, -550, -550, -550, -550, -550, -550, -550, -550,
+ -550, -550, -550, -550, -550, -550, -550, -550, -550, -550,
+ -550, -550, -550, -550, -550, -550, -550, -550, -550, -550,
+ -550, -550, -550, -550, -550, -550, -550, -550, -550, -550,
+ -550, -550, -550, -550, -550, -550, -550, -550, -550, -550,
+ -550, -550, 786, -550, -550, -550, -550, -550, -550, -550,
+ -550, 2132, -550, -550, -550, -550, 2373, 2132, 196, 2946,
+ 21, -550, 21, -550, -550, -550, -550, 203, 195, 195,
+ 5, 5, 2422, 192, -550, 279, 201, 206, 221, 226,
+ -550, 104, 187, -550, -550, -550, -550, -550, -550, 227,
+ -550, 3, 2800, 2206, 75, -550, -550, 107, 214, 77,
+ -550, 2206, 1778, 2206, 2496, 74, -550, -550, 123, -550,
+ -550, -550, -550, -550, 2014, -550, 233, 2496, 223, -550,
+ 2496, 235, -550, -550, 2817, 2496, -550, -550, 2132, -550,
+ -550, -550, -550, -550, -550, -550, -550, -550, -550, -550,
+ -550, -550, -550, -550, -550, -550, -550, 2132, 2132, 236,
+ 2690, 2206, 2206, -550, -550, -550, -550, 104, -550, 1188,
+ 202, 40, -550, -550, 231, 2496, -550, -550, 6, 2255,
+ 104, 191, 187, 2556, 187, 2613, 2014, 2496, -550, 232,
+ 240, -550, -550, -550, 1070, 2014, -550, 2970, -550, 237,
+ 242, -550, 244, 252, 239, 248, 86, -550, -550, 250,
+ 244, -550, -550, 2790, -550, 251, 2206, 2496, -550, 254,
+ 2946, 256, 257, 2897, -550, 265, 280, 1937, -550, -550,
+ 2496, -550, -550, -550, -550, 287, -550, 2970, -550, -550,
+ -550, -550, -550, -550, -550, -550, -550, -550, 285, 122,
+ -550, 32, -550, -550, 300, -550, -550, 2422, -550, 3,
+ 301, -550, -550, 303, 2970, -550, 1306, -550, 304, 464,
+ 306, 2845, -550, 2014, 2014, 1778, -550, 2206, -550, 32,
+ 2206, -550, 2496, -550, -550, -550, -550, -550, 309, 310,
+ -550, -550, 2132, 2132, 311, 27, 313, -550, 280, 317,
+ -550, 355, 316, 355, 314, -550, 187, 187, -550, 249,
+ 93, 328, 2970, -550, -550, -550, -550, 335, 1424, 2014,
+ -550, 2922, -550, -550, 344, 2206, 137, -550, 786, 2496,
+ 2946, 2994, 342, 346, 347, 2206, 312, 313, -550, -550,
+ 355, -550, 32, 1188, -550, -550, 328, -550, -550, -550,
+ -550, 350, 2014, 32, -550, -550, 2014, 1542, 351, 352,
+ -550, -550, -550, 353, 354, 358, 280, 356, -550, 360,
+ -550, 7, -550, 32, 586, 361, 3018, 365, -550, 366,
+ -550, -550, -550, 367, 368, -550, 2206, -550, 377, 373,
+ 2014, 1306, 374, -550, 1778, 379, 381, 280, 378, 1660,
+ 2872, 232, -550, -550, -550, 376, 1424, -550, -550, 380,
+ 382, -550, 384, 383, 387, -550, -550, 1306, -550, 386,
+ -550, 355, 389, 1778, -550, 391, -550, -550, -550, -550
};
-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[] =
+{
+ 164, 286, 283, 287, 281, 282, 284, 270, 271, 0,
+ 273, 274, 275, 276, 277, 278, 279, 280, 269, 169,
+ 168, 0, 0, 0, 0, 372, 0, 0, 0, 477,
+ 170, 0, 0, 165, 166, 172, 171, 173, 176, 382,
+ 260, 262, 261, 267, 268, 290, 300, 266, 174, 175,
+ 0, 305, 315, 317, 318, 0, 0, 327, 178, 177,
+ 179, 0, 180, 0, 285, 272, 33, 34, 465, 431,
+ 24, 382, 386, 39, 38, 37, 35, 36, 32, 31,
+ 25, 29, 28, 26, 27, 439, 438, 436, 434, 435,
+ 437, 433, 432, 440, 30, 463, 461, 460, 462, 459,
+ 458, 328, 0, 384, 40, 41, 269, 0, 0, 0,
+ 0, 316, 311, 182, 193, 190, 192, 194, 195, 206,
+ 203, 204, 201, 207, 202, 0, 205, 196, 197, 198,
+ 0, 220, 220, 0, 186, 0, 0, 372, 372, 0,
+ 382, 254, 337, 253, 0, 378, 378, 263, 264, 265,
+ 369, 240, 287, 270, 243, 0, 0, 239, 259, 0,
+ 0, 479, 0, 478, 269, 0, 305, 1, 167, 380,
+ 338, 0, 383, 291, 295, 293, 297, 288, 301, 290,
+ 289, 309, 0, 0, 329, 329, 0, 0, 0, 383,
+ 382, 340, 387, 385, 263, 264, 265, 0, 310, 209,
+ 210, 211, 213, 212, 208, 220, 188, 183, 75, 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, 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, 115, 113, 114, 112,
+ 110, 111, 116, 117, 118, 119, 120, 121, 122, 123,
+ 124, 125, 126, 127, 128, 129, 130, 131, 132, 133,
+ 134, 135, 136, 137, 138, 139, 140, 141, 142, 143,
+ 144, 145, 146, 147, 148, 149, 150, 151, 152, 153,
+ 154, 155, 156, 157, 158, 159, 162, 160, 161, 163,
+ 222, 191, 221, 184, 199, 200, 185, 208, 187, 230,
+ 231, 0, 22, 23, 20, 21, 0, 0, 232, 189,
+ 263, 371, 264, 370, 251, 258, 255, 0, 0, 0,
+ 0, 0, 0, 0, 181, 0, 0, 0, 0, 0,
+ 342, 382, 380, 296, 292, 298, 299, 294, 302, 0,
+ 303, 330, 0, 382, 0, 331, 333, 0, 357, 0,
+ 355, 0, 477, 0, 0, 0, 471, 472, 0, 408,
+ 411, 410, 412, 413, 0, 414, 0, 0, 312, 313,
+ 0, 0, 215, 223, 0, 0, 228, 225, 234, 2,
+ 3, 4, 5, 6, 7, 8, 9, 10, 11, 13,
+ 12, 14, 15, 16, 17, 18, 19, 0, 0, 0,
+ 0, 0, 0, 345, 344, 346, 343, 382, 339, 244,
+ 0, 0, 252, 304, 0, 0, 341, 307, 0, 336,
+ 0, 334, 380, 0, 380, 0, 0, 0, 354, 0,
+ 0, 366, 365, 367, 0, 0, 368, 454, 359, 0,
+ 0, 453, 41, 0, 0, 0, 0, 474, 464, 0,
+ 0, 388, 409, 0, 326, 0, 0, 216, 224, 0,
+ 236, 0, 235, 0, 226, 0, 374, 0, 257, 256,
+ 0, 247, 248, 249, 250, 0, 246, 245, 389, 401,
+ 402, 403, 404, 400, 405, 406, 407, 399, 0, 0,
+ 393, 477, 398, 381, 0, 308, 306, 335, 321, 0,
+ 0, 332, 319, 0, 358, 356, 0, 415, 24, 0,
+ 0, 0, 363, 0, 0, 477, 452, 0, 397, 477,
+ 0, 473, 0, 451, 470, 325, 314, 218, 0, 217,
+ 229, 233, 0, 0, 0, 0, 350, 347, 374, 0,
+ 238, 0, 0, 0, 395, 323, 380, 380, 420, 0,
+ 31, 30, 425, 426, 421, 423, 424, 40, 0, 0,
+ 361, 0, 362, 455, 466, 0, 0, 475, 220, 0,
+ 237, 227, 0, 375, 0, 0, 0, 350, 324, 390,
+ 0, 394, 477, 244, 322, 320, 0, 422, 445, 431,
+ 446, 0, 0, 477, 427, 360, 0, 477, 0, 0,
+ 476, 214, 219, 0, 0, 0, 374, 351, 348, 0,
+ 391, 0, 396, 477, 0, 441, 364, 0, 468, 467,
+ 456, 416, 379, 0, 0, 352, 0, 349, 0, 0,
+ 0, 0, 0, 457, 477, 0, 0, 374, 0, 447,
+ 0, 368, 443, 419, 417, 442, 0, 430, 469, 0,
+ 0, 353, 0, 0, 448, 449, 428, 0, 418, 0,
+ 376, 0, 0, 477, 444, 0, 392, 429, 450, 377
};
-/********** 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[] =
+{
+ -550, -319, -129, 0, 91, -550, -550, 398, -550, -550,
+ -550, -550, -550, -550, -550, -550, -550, -550, 258, -550,
+ -550, -550, -127, -550, -325, -550, -550, -550, -550, -550,
+ -191, -550, -550, -152, -11, -23, -550, -550, -550, 293,
+ 388, -550, -550, 260, -550, -550, -550, -550, 269, -550,
+ -550, -550, -550, -124, 410, 1, -16, 18, -550, -550,
+ 261, -331, -14, -39, -550, -550, 81, -179, -550, -172,
+ -550, 38, -550, -20, -390, -550, -550, -550, -550, 73,
+ -549, 49, -346, -61, -7, -550, -550, 420, -550, -133,
+ -503, -546, -550, 95, -364, -550, -241, -526, 67, -128,
+ -550, -550, -529, -550, -550, -550, -550, -550, -550, -550,
+ -534, 69, -380, -550, -550, -550, -550, -550, -550, -100,
+ -28, -519
};
-#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, 554, 475, 169, 330, 32, 33, 34, 35, 36,
+ 130, 131, 132, 133, 336, 134, 135, 136, 205, 206,
+ 568, 569, 331, 332, 349, 501, 502, 37, 156, 157,
+ 515, 516, 38, 139, 39, 40, 41, 42, 43, 44,
+ 45, 46, 47, 177, 374, 377, 180, 48, 183, 458,
+ 49, 50, 198, 408, 51, 52, 53, 142, 55, 56,
+ 384, 385, 57, 476, 58, 59, 444, 445, 507, 616,
+ 647, 144, 389, 390, 477, 478, 61, 145, 146, 150,
+ 576, 358, 370, 171, 410, 103, 62, 63, 529, 530,
+ 479, 531, 532, 398, 399, 400, 682, 683, 684, 594,
+ 595, 596, 104, 672, 685, 631, 693, 694, 401, 402,
+ 480, 481, 105, 638, 659, 403, 404, 405, 486, 487,
+ 483, 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[] =
+{
+ 170, 162, 102, 158, 112, 333, 141, 347, 143, 101,
+ 188, 140, 482, 367, 493, 490, 414, 597, 54, 111,
+ 593, 603, 417, 147, 148, 149, 456, 598, 584, 617,
+ 438, 334, 172, 192, 492, 619, 54, 622, 60, 558,
+ 535, 71, 443, 519, 159, 536, 520, 440, 29, 54,
+ 521, 54, 522, 523, 524, 525, 526, 527, 72, 517,
+ 613, 630, -373, -373, 189, 173, 174, 175, 614, 597,
+ 176, 60, 634, 64, 650, 65, 544, 668, 412, 528,
+ -318, -337, 161, -337, 551, 552, 492, 158, 178, 4,
+ 5, 68, 488, 500, 167, 438, 375, 665, 438, 376,
+ -378, 170, 191, 658, 357, -378, 193, 194, 195, 196,
+ 628, 629, 503, 504, 462, 463, 538, 467, 542, 584,
+ 468, 335, -327, 561, 197, 204, 562, 182, 691, 407,
+ 655, 186, 541, 172, 541, 337, 348, 350, 352, 181,
+ 688, 184, 597, 185, 356, 695, 464, 465, 362, 141,
+ 669, 143, 686, 187, 140, 706, 592, 597, 409, 72,
+ 698, 582, 583, 601, 602, 111, 491, 207, 597, 708,
+ 386, 386, 372, 383, 383, 482, 640, 496, 686, 441,
+ 442, 438, 54, 189, 438, 438, 388, 354, 406, 95,
+ 96, 97, 98, 99, 100, 359, 360, 361, 85, 86,
+ 87, 88, 89, 90, 91, 92, 93, -327, 592, 635,
+ 351, 353, 347, 357, -241, -373, -242, 363, 347, 364,
+ 365, 391, 392, 393, 394, 395, 396, 397, 366, 371,
+ 373, 369, 379, 517, 418, 380, 411, 440, 449, 451,
+ 624, 625, 654, 452, 439, 518, 656, 610, 611, 1,
+ 2, 3, 4, 5, 6, 7, 8, 482, 453, 454,
+ 466, 457, 155, 496, 10, 11, 12, 13, 14, 15,
+ 16, 17, 494, 497, 505, 106, 533, 547, 546, 556,
+ 680, 592, 557, 555, 558, 559, 560, 563, 506, 347,
+ 565, 438, 438, 570, 482, 571, 592, 572, 574, 482,
+ 391, 392, 393, 394, 395, 396, 397, 592, 347, 347,
+ 455, 151, 1, 2, 152, 4, 5, 6, 153, 8,
+ 154, 575, 461, 482, 580, 155, 581, 10, 11, 12,
+ 13, 14, 15, 16, 17, 107, 108, 109, 106, 585,
+ 586, 348, 587, -24, 170, 599, 416, 348, 608, 648,
+ 609, 612, 469, 615, 484, 578, 618, 620, 519, 158,
+ 623, 520, 448, 626, 189, 521, 632, 522, 523, 524,
+ 525, 526, 527, 633, 459, 643, 172, 391, 392, 393,
+ 394, 395, 396, 397, 637, 645, 510, 644, 653, 661,
+ 660, 664, 662, 338, 485, 663, 666, 667, 107, 108,
+ 109, 671, 508, 509, 673, 675, 674, 495, 676, 678,
+ 372, 679, 689, 687, 690, 499, 697, 692, 348, 705,
+ 699, 700, 702, 413, 141, 701, 143, 703, 707, 140,
+ 709, 168, 652, 355, 179, 368, 606, 348, 348, 378,
+ 189, 166, 446, 347, 347, 649, 387, 545, 160, 386,
+ 621, 386, 383, 537, 383, 534, 704, 566, 470, 191,
+ 450, 627, 607, 550, 489, 0, 0, 388, 1, 2,
+ 3, 4, 5, 6, 7, 8, 0, 0, 0, 0,
+ 0, 641, 0, 10, 11, 12, 13, 14, 15, 16,
+ 17, 141, 0, 143, 106, 0, 140, 567, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 66, 0,
+ 579, 0, 0, 0, 0, 0, 0, 67, 604, 0,
+ 0, 409, 68, 69, 0, 0, 158, 0, 0, 0,
+ 0, 605, 459, 0, 0, 70, 0, 448, 0, 0,
+ 0, 0, 0, 71, 0, 0, 113, 0, 0, 0,
+ 0, 0, 0, 0, 107, 108, 109, 0, 0, 0,
+ 72, 0, 485, 0, 0, 0, 639, 0, 0, 0,
+ 0, 0, 348, 348, 0, 0, 646, 73, 74, 75,
+ 76, 77, 114, 115, 116, 117, 118, 119, 120, 121,
+ 122, 123, 124, 125, 651, 126, 127, 128, 129, 78,
+ 0, 79, 80, 81, 82, 83, 84, 0, 0, 642,
+ 85, 86, 87, 88, 89, 90, 91, 92, 93, 94,
+ 95, 96, 97, 98, 99, 100, 670, 677, 0, 0,
+ 0, 0, 681, 0, 419, 420, 421, 422, 423, 424,
+ 425, 426, 427, 428, 429, 430, 431, 432, 433, 434,
+ 435, 436, 0, 0, 0, 0, -431, 553, 681, -431,
+ -431, -431, -431, -431, -431, -431, -431, -431, -431, -431,
+ -431, -431, -431, -431, -431, -431, -431, -431, -431, -431,
+ -431, -431, -431, -431, -431, -431, -431, -431, -431, -431,
+ -431, -431, -431, -431, -431, -431, -431, -431, -431, -431,
+ -431, -431, -431, -431, -431, -431, -431, -431, -431, -431,
+ -431, -431, -431, -431, -431, -431, -431, -431, -431, -431,
+ -431, -431, -431, -431, -431, -431, -431, -431, -431, -431,
+ -431, -431, -431, -431, -431, -431, -431, -431, -431, -431,
+ -431, -431, 0, -431, 0, -431, -431, -431, -431, -431,
+ -431, -431, -431, -431, -431, -431, -431, -431, -431, -431,
+ -431, -431, -431, -431, -431, -431, -431, -431, -431, -431,
+ -431, -431, -431, -431, -431, -431, -431, -431, 0, -431,
+ -431, 0, -431, -431, -431, -431, 208, 0, 0, 209,
+ 210, 211, 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, 239,
+ 240, 241, 0, 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, 288,
+ 289, 290, 0, 291, 0, 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, 323, 324, 66, 0,
+ 325, 0, 326, 327, 328, 329, 0, 67, 0, 0,
+ 0, 0, 68, 69, 0, 0, 0, 0, 0, 0,
+ 0, 0, 199, 200, 201, 70, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 1, 2, 3, 4, 5, 6, 7, 8, 0, 0,
+ 0, 0, 0, 9, 0, 10, 11, 12, 13, 14,
+ 15, 16, 17, 0, 0, 0, 18, 73, 74, 75,
+ 76, 77, 19, 20, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 21, 0, 0, 0, 0, 0, 78,
+ 0, 79, 80, 81, 82, 83, 84, 0, 0, 0,
+ 85, 86, 87, 88, 89, 90, 91, 92, 93, 94,
+ 95, 96, 97, 98, 99, 100, 0, 0, 0, 0,
+ 0, 202, 0, 203, 0, 22, 23, 24, 25, 26,
+ 27, 28, 0, 29, 1, 2, 3, 4, 5, 6,
+ 7, 8, 0, 0, 0, 0, 0, 9, 0, 10,
+ 11, 12, 13, 14, 15, 16, 17, 30, 0, 0,
+ 164, 0, 31, 66, 1, 2, 3, 4, 5, 6,
+ 7, 8, 67, 0, 0, 0, 0, 68, 69, 10,
+ 11, 12, 13, 14, 15, 16, 17, 0, 0, 0,
+ 548, 471, 0, 472, 0, 473, 0, 0, 474, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 342, 343, 72, 0, 0, 0, 165,
+ 107, 108, 109, 110, 0, 0, 344, 345, 0, 0,
+ 0, 0, 73, 74, 75, 76, 77, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 107, 108, 109, 549, 78, 0, 79, 80, 81, 82,
+ 83, 84, 0, 0, 0, 85, 86, 87, 88, 89,
+ 90, 91, 92, 93, 94, 95, 96, 97, 98, 99,
+ 100, 66, 0, 0, 0, 0, 0, 0, 0, 0,
+ 67, 0, 0, 0, 0, 68, 69, 0, 0, 0,
+ 0, 0, 0, 0, 0, 511, 512, 513, 70, 471,
+ 0, 472, 514, 473, 0, 0, 474, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 342, 343, 72, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 344, 345, 0, 0, 0, 0,
+ 73, 74, 75, 76, 77, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 78, 0, 79, 80, 81, 82, 83, 84,
+ 0, 0, 0, 85, 86, 87, 88, 89, 90, 91,
+ 92, 93, 94, 95, 96, 97, 98, 99, 100, 66,
+ 0, 0, 0, 0, 0, 0, 0, 0, 67, 0,
+ 0, 0, 0, 68, 69, 0, 0, 0, 0, 0,
+ 0, 0, 0, 588, 0, 0, 70, 471, 0, 472,
+ 0, 473, 0, 0, 474, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 161, 0, 0, 342,
+ 343, 72, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 344, 345, 0, 0, 0, 0, 73, 74,
+ 75, 76, 77, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 78, 589, 590, 80, 81, 82, 83, 84, 0, 0,
+ 0, 85, 86, 87, 88, 89, 90, 91, 92, 93,
+ 591, 95, 96, 97, 98, 99, 100, 66, 0, 0,
+ 0, 0, 0, 0, 0, 0, 67, 0, 0, 0,
+ 0, 68, 69, 0, 0, 0, 0, 0, 0, 0,
+ 0, 588, 0, 0, 70, 471, 0, 472, 0, 473,
+ 0, 0, 474, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 342, 343, 72,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 344, 345, 0, 0, 0, 0, 73, 74, 75, 76,
+ 77, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 78, 589,
+ 590, 80, 81, 82, 83, 84, 0, 0, 0, 85,
+ 86, 87, 88, 89, 90, 91, 92, 93, 591, 95,
+ 96, 97, 98, 99, 100, 66, 0, 0, 0, 0,
+ 0, 0, 0, 0, 67, 0, 0, 0, 0, 68,
+ 69, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 70, 471, 0, 472, 0, 473, 0, 0,
+ 474, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 161, 0, 0, 342, 343, 72, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 344, 345,
+ 0, 0, 657, 0, 73, 74, 75, 76, 77, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 78, 0, 79, 80,
+ 81, 82, 83, 84, 0, 0, 0, 85, 86, 87,
+ 88, 89, 90, 91, 92, 93, 94, 95, 96, 97,
+ 98, 99, 100, 66, 0, 0, 0, 0, 0, 0,
+ 0, 0, 67, 0, 0, 0, 0, 68, 69, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 70, 471, -477, 472, 0, 473, 0, 0, 474, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 161, 0, 0, 342, 343, 72, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 344, 345, 0, 0,
+ 0, 0, 73, 74, 75, 76, 77, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 78, 0, 79, 80, 81, 82,
+ 83, 84, 0, 0, 0, 85, 86, 87, 88, 89,
+ 90, 91, 92, 93, 94, 95, 96, 97, 98, 99,
+ 100, 66, 0, 0, 0, 0, 0, 0, 0, 0,
+ 67, 0, 0, 0, 0, 68, 69, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 70, 471,
+ 0, 472, 0, 473, 0, 0, 474, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 161, 0,
+ 0, 342, 343, 72, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 344, 345, 0, 0, 0, 0,
+ 73, 74, 75, 76, 77, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 78, 0, 79, 80, 81, 82, 83, 84,
+ 0, 0, 0, 85, 86, 87, 88, 89, 90, 91,
+ 92, 93, 94, 95, 96, 97, 98, 99, 100, 66,
+ 0, 0, 0, 0, 0, 0, 0, 0, 67, 0,
+ 0, 0, 0, 68, 69, 10, 11, 12, 13, 14,
+ 15, 16, 17, 0, 0, 0, 70, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 1, 2, 3, 4, 5, 6, 7, 8, 0,
+ 0, 72, 0, 0, 9, 0, 10, 11, 12, 13,
+ 14, 15, 16, 17, 0, 0, 0, 106, 73, 74,
+ 75, 76, 77, 0, 0, 0, 0, 0, 0, 0,
+ 577, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 78, 0, 79, 80, 81, 82, 83, 84, 0, 0,
+ 0, 85, 86, 87, 88, 89, 90, 91, 92, 93,
+ 94, 95, 96, 97, 98, 99, 100, 66, 0, 0,
+ 0, 0, 0, 0, 0, 0, 67, 137, 138, 25,
+ 110, 68, 69, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 70, 471, 0, 472, 0, 473,
+ 0, 0, 474, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 342, 343, 72,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 344, 345, 0, 0, 0, 0, 73, 74, 75, 76,
+ 77, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 78, 0,
+ 79, 80, 81, 82, 83, 84, 0, 0, 0, 85,
+ 86, 87, 88, 89, 90, 91, 92, 93, 94, 95,
+ 96, 97, 98, 99, 100, 66, 0, 0, 0, 0,
+ 0, 0, 0, 0, 67, 0, 0, 0, 0, 68,
+ 69, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 70, 0, 0, 339, 0, 340, 0, 0,
+ 341, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 342, 343, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 344, 345,
+ 0, 0, 0, 0, 73, 74, 75, 76, 77, 66,
+ 0, 0, 0, 0, 0, 0, 346, 0, 67, 0,
+ 0, 0, 0, 68, 69, 0, 78, 0, 79, 80,
+ 81, 82, 83, 84, 0, 0, 70, 85, 86, 87,
+ 88, 89, 90, 91, 92, 93, 94, 95, 96, 97,
+ 98, 99, 100, 0, 0, 0, 0, 0, 66, 0,
+ 0, 72, 0, 0, 0, 0, 0, 67, 0, 0,
+ 0, 0, 68, 69, 0, 0, 0, 0, 73, 74,
+ 75, 76, 77, 0, 0, 70, 0, 0, 0, 0,
+ 0, 0, 0, 190, 0, 0, 0, 0, 0, 0,
+ 78, 0, 79, 80, 81, 82, 83, 84, 0, 0,
+ 0, 85, 86, 87, 88, 89, 90, 91, 92, 93,
+ 94, 95, 96, 97, 98, 99, 100, 73, 74, 75,
+ 76, 77, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 78,
+ 0, 79, 80, 81, 82, 83, 84, 0, 0, 0,
+ 85, 86, 87, 88, 89, 90, 91, 92, 93, 94,
+ 95, 96, 97, 98, 99, 100, 66, 0, 0, 0,
+ 0, 0, 0, 0, 0, 67, 0, 0, 0, 0,
+ 68, 69, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 70, 0, 0, 0, 0, 0, 0,
+ 0, 415, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 66, 0, 0, 0, 0,
+ 0, 0, 0, 0, 67, 0, 0, 0, 0, 68,
+ 69, 0, 0, 0, 0, 73, 74, 75, 76, 77,
+ 0, 0, 70, 0, 0, 0, 0, 0, 0, 0,
+ 447, 0, 0, 0, 0, 0, 0, 78, 0, 79,
+ 80, 81, 82, 83, 84, 0, 0, 0, 85, 86,
+ 87, 88, 89, 90, 91, 92, 93, 94, 95, 96,
+ 97, 98, 99, 100, 73, 74, 75, 76, 77, 66,
+ 0, 0, 0, 0, 0, 0, 0, 0, 67, 0,
+ 0, 0, 0, 68, 69, 0, 78, 0, 79, 80,
+ 81, 82, 83, 84, 0, 0, 70, 85, 86, 87,
+ 88, 89, 90, 91, 92, 93, 94, 95, 96, 97,
+ 98, 99, 100, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 1, 2, 3, 4, 5, 6, 7, 8, 73, 74,
+ 75, 76, 77, 539, 0, 10, 11, 12, 13, 14,
+ 15, 16, 17, 0, 0, 0, 106, 0, 0, 0,
+ 78, 0, 79, 80, 81, 82, 83, 84, 0, 0,
+ 0, 85, 86, 87, 88, 89, 90, 91, 92, 93,
+ 94, 95, 96, 97, 98, 99, 100, 1, 2, 3,
+ 4, 5, 6, 7, 8, 0, 540, 0, 0, 0,
+ 539, 0, 10, 11, 12, 13, 14, 15, 16, 17,
+ 0, 0, 0, 106, 0, 0, 107, 108, 109, 382,
+ 1, 2, 3, 4, 5, 6, 7, 8, 0, 0,
+ 0, 0, 0, 9, 0, 10, 11, 12, 13, 14,
+ 15, 16, 17, 0, 0, 0, 106, 0, 0, 0,
+ 0, 0, 0, 543, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 1, 2, 3, 4, 5, 6,
+ 7, 8, 0, 107, 108, 109, 382, 9, 0, 10,
+ 11, 12, 13, 14, 15, 16, 17, 0, 0, 0,
+ 106, 0, 0, 0, 0, 0, 0, 1, 2, 3,
+ 4, 5, 6, 7, 8, 0, 107, 108, 109, 110,
+ 9, 0, 10, 11, 12, 13, 14, 15, 16, 17,
+ 0, 0, 0, 106, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 1, 2, 3, 4, 5, 6, 7, 8, 0,
+ 137, 138, 25, 110, 381, 0, 10, 11, 12, 13,
+ 14, 15, 16, 17, 0, 0, 0, 106, 0, 0,
+ 0, 0, 0, 0, 1, 2, 3, 4, 5, 6,
+ 7, 8, 0, 107, 108, 109, 110, 460, 0, 10,
+ 11, 12, 13, 14, 15, 16, 17, 564, 0, 0,
+ 106, 0, 0, 0, 0, 0, 0, 0, 419, 420,
+ 421, 422, 423, 424, 425, 426, 427, 428, 429, 430,
+ 431, 432, 433, 434, 435, 436, 498, 107, 108, 109,
+ 382, 553, 0, 0, 0, 419, 420, 421, 422, 423,
+ 424, 425, 426, 427, 428, 429, 430, 431, 432, 433,
+ 434, 435, 436, 0, 600, 0, 0, 0, 437, 0,
+ 107, 108, 109, 419, 420, 421, 422, 423, 424, 425,
+ 426, 427, 428, 429, 430, 431, 432, 433, 434, 435,
+ 436, 696, 0, 0, 0, 0, 553, 0, 0, 0,
+ 419, 420, 421, 422, 423, 424, 425, 426, 427, 428,
+ 429, 430, 431, 432, 433, 434, 435, 436, 573, 0,
+ 0, 0, 0, 553, 0, 419, 420, 421, 422, 423,
+ 424, 425, 426, 427, 428, 429, 430, 431, 432, 433,
+ 434, 435, 436, 636, 0, 0, 0, 0, 437, 0,
+ 419, 420, 421, 422, 423, 424, 425, 426, 427, 428,
+ 429, 430, 431, 432, 433, 434, 435, 436, 0, 0,
+ 0, 0, 0, 553, 419, 420, 421, 422, 423, 424,
+ 425, 426, 427, 428, 429, 430, 431, 432, 433, 434,
+ 435, 436, 0, 0, 0, 0, 0, 437, 419, 420,
+ 421, 422, 423, 424, 425, 426, 427, 428, 429, 430,
+ 431, 432, 433, 434, 435, 436, 0, 0, 0, 0,
+ 0, 553, 419, 420, 421, 422, 423, 424, 425, 426,
+ 427, 428, 429, 430, 431, 432, 433, 434, 435, 436,
+ 0, 0, 0, 0, 0, 437, 419, 420, 421, 422,
+ 423, 424, 425, 426, 427, 428, 429, 430, 431, 432,
+ 433, 434, 435, 436, 0, 0, 0, 0, 0, 553
};
-typedef struct yyParser yyParser;
-#ifndef NDEBUG
-#include <stdio.h>
-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:
-** <ul>
-** <li> A FILE* to which trace output should be written.
-** If NULL, then tracing is turned off.
-** <li> A prefix string written at the beginning of every
-** line of trace output. If NULL, then tracing is
-** turned off.
-** </ul>
-**
-** 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[] =
+{
+ 39, 29, 9, 26, 18, 132, 22, 136, 22, 9,
+ 71, 22, 392, 165, 404, 395, 341, 546, 0, 18,
+ 546, 555, 347, 23, 24, 25, 372, 546, 531, 578,
+ 349, 34, 39, 55, 398, 581, 18, 583, 0, 32,
+ 34, 38, 37, 3, 34, 39, 6, 42, 97, 31,
+ 10, 33, 12, 13, 14, 15, 16, 17, 55, 449,
+ 33, 590, 41, 42, 71, 4, 5, 6, 41, 598,
+ 9, 33, 598, 9, 620, 11, 466, 70, 205, 39,
+ 37, 38, 50, 40, 474, 475, 450, 110, 6, 7,
+ 8, 17, 18, 418, 0, 414, 6, 646, 417, 9,
+ 37, 140, 102, 637, 41, 42, 128, 107, 108, 109,
+ 17, 18, 437, 438, 39, 40, 462, 40, 464, 622,
+ 43, 124, 38, 37, 40, 125, 40, 129, 677, 190,
+ 633, 42, 463, 140, 465, 135, 136, 137, 138, 37,
+ 674, 38, 671, 38, 144, 679, 39, 40, 155, 165,
+ 653, 165, 671, 42, 165, 701, 546, 686, 197, 55,
+ 686, 39, 40, 553, 554, 164, 43, 36, 697, 703,
+ 184, 185, 172, 184, 185, 555, 39, 40, 697, 358,
+ 359, 500, 164, 190, 503, 504, 186, 37, 188, 115,
+ 116, 117, 118, 119, 120, 146, 147, 148, 105, 106,
+ 107, 108, 109, 110, 111, 112, 113, 38, 598, 599,
+ 137, 138, 341, 41, 31, 42, 31, 31, 347, 37,
+ 42, 98, 99, 100, 101, 102, 103, 104, 31, 38,
+ 6, 44, 38, 623, 38, 37, 123, 42, 46, 38,
+ 586, 587, 632, 37, 41, 43, 636, 572, 573, 4,
+ 5, 6, 7, 8, 9, 10, 11, 637, 37, 33,
+ 46, 34, 17, 40, 19, 20, 21, 22, 23, 24,
+ 25, 26, 39, 38, 38, 30, 45, 37, 46, 37,
+ 670, 671, 38, 46, 32, 46, 38, 37, 440, 418,
+ 39, 610, 611, 39, 674, 39, 686, 40, 33, 679,
+ 98, 99, 100, 101, 102, 103, 104, 697, 437, 438,
+ 371, 3, 4, 5, 6, 7, 8, 9, 10, 11,
+ 12, 41, 383, 703, 37, 17, 41, 19, 20, 21,
+ 22, 23, 24, 25, 26, 90, 91, 92, 30, 39,
+ 39, 341, 39, 39, 383, 39, 346, 347, 39, 37,
+ 40, 40, 391, 40, 393, 507, 39, 41, 3, 382,
+ 46, 6, 362, 114, 371, 10, 38, 12, 13, 14,
+ 15, 16, 17, 38, 381, 33, 383, 98, 99, 100,
+ 101, 102, 103, 104, 40, 38, 447, 41, 38, 37,
+ 39, 33, 39, 135, 394, 41, 40, 37, 90, 91,
+ 92, 40, 441, 442, 39, 38, 40, 407, 40, 32,
+ 410, 38, 33, 39, 33, 415, 40, 39, 418, 33,
+ 40, 39, 39, 332, 440, 41, 440, 40, 39, 440,
+ 39, 33, 623, 140, 46, 166, 560, 437, 438, 179,
+ 447, 31, 361, 572, 573, 617, 185, 467, 28, 463,
+ 583, 465, 463, 460, 465, 455, 697, 496, 391, 459,
+ 365, 589, 562, 474, 395, -1, -1, 467, 4, 5,
+ 6, 7, 8, 9, 10, 11, -1, -1, -1, -1,
+ -1, 608, -1, 19, 20, 21, 22, 23, 24, 25,
+ 26, 507, -1, 507, 30, -1, 507, 497, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, 3, -1,
+ 510, -1, -1, -1, -1, -1, -1, 12, 557, -1,
+ -1, 560, 17, 18, -1, -1, 549, -1, -1, -1,
+ -1, 559, 539, -1, -1, 30, -1, 537, -1, -1,
+ -1, -1, -1, 38, -1, -1, 36, -1, -1, -1,
+ -1, -1, -1, -1, 90, 91, 92, -1, -1, -1,
+ 55, -1, 562, -1, -1, -1, 605, -1, -1, -1,
+ -1, -1, 572, 573, -1, -1, 615, 72, 73, 74,
+ 75, 76, 72, 73, 74, 75, 76, 77, 78, 79,
+ 80, 81, 82, 83, 622, 85, 86, 87, 88, 94,
+ -1, 96, 97, 98, 99, 100, 101, -1, -1, 609,
+ 105, 106, 107, 108, 109, 110, 111, 112, 113, 114,
+ 115, 116, 117, 118, 119, 120, 40, 666, -1, -1,
+ -1, -1, 671, -1, 48, 49, 50, 51, 52, 53,
+ 54, 55, 56, 57, 58, 59, 60, 61, 62, 63,
+ 64, 65, -1, -1, -1, -1, 0, 71, 697, 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, -1, 87, -1, 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, -1, 123,
+ 124, -1, 126, 127, 128, 129, 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, 30, 31, 32, 33,
+ 34, 35, -1, 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, -1, 87, -1, 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, 3, -1,
+ 124, -1, 126, 127, 128, 129, -1, 12, -1, -1,
+ -1, -1, 17, 18, -1, -1, -1, -1, -1, -1,
+ -1, -1, 27, 28, 29, 30, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ 4, 5, 6, 7, 8, 9, 10, 11, -1, -1,
+ -1, -1, -1, 17, -1, 19, 20, 21, 22, 23,
+ 24, 25, 26, -1, -1, -1, 30, 72, 73, 74,
+ 75, 76, 36, 37, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, 47, -1, -1, -1, -1, -1, 94,
+ -1, 96, 97, 98, 99, 100, 101, -1, -1, -1,
+ 105, 106, 107, 108, 109, 110, 111, 112, 113, 114,
+ 115, 116, 117, 118, 119, 120, -1, -1, -1, -1,
+ -1, 126, -1, 128, -1, 89, 90, 91, 92, 93,
+ 94, 95, -1, 97, 4, 5, 6, 7, 8, 9,
+ 10, 11, -1, -1, -1, -1, -1, 17, -1, 19,
+ 20, 21, 22, 23, 24, 25, 26, 121, -1, -1,
+ 30, -1, 126, 3, 4, 5, 6, 7, 8, 9,
+ 10, 11, 12, -1, -1, -1, -1, 17, 18, 19,
+ 20, 21, 22, 23, 24, 25, 26, -1, -1, -1,
+ 30, 31, -1, 33, -1, 35, -1, -1, 38, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, 53, 54, 55, -1, -1, -1, 89,
+ 90, 91, 92, 93, -1, -1, 66, 67, -1, -1,
+ -1, -1, 72, 73, 74, 75, 76, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ 90, 91, 92, 93, 94, -1, 96, 97, 98, 99,
+ 100, 101, -1, -1, -1, 105, 106, 107, 108, 109,
+ 110, 111, 112, 113, 114, 115, 116, 117, 118, 119,
+ 120, 3, -1, -1, -1, -1, -1, -1, -1, -1,
+ 12, -1, -1, -1, -1, 17, 18, -1, -1, -1,
+ -1, -1, -1, -1, -1, 27, 28, 29, 30, 31,
+ -1, 33, 34, 35, -1, -1, 38, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, 53, 54, 55, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, 66, 67, -1, -1, -1, -1,
+ 72, 73, 74, 75, 76, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, 94, -1, 96, 97, 98, 99, 100, 101,
+ -1, -1, -1, 105, 106, 107, 108, 109, 110, 111,
+ 112, 113, 114, 115, 116, 117, 118, 119, 120, 3,
+ -1, -1, -1, -1, -1, -1, -1, -1, 12, -1,
+ -1, -1, -1, 17, 18, -1, -1, -1, -1, -1,
+ -1, -1, -1, 27, -1, -1, 30, 31, -1, 33,
+ -1, 35, -1, -1, 38, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, 50, -1, -1, 53,
+ 54, 55, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, 66, 67, -1, -1, -1, -1, 72, 73,
+ 74, 75, 76, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ 94, 95, 96, 97, 98, 99, 100, 101, -1, -1,
+ -1, 105, 106, 107, 108, 109, 110, 111, 112, 113,
+ 114, 115, 116, 117, 118, 119, 120, 3, -1, -1,
+ -1, -1, -1, -1, -1, -1, 12, -1, -1, -1,
+ -1, 17, 18, -1, -1, -1, -1, -1, -1, -1,
+ -1, 27, -1, -1, 30, 31, -1, 33, -1, 35,
+ -1, -1, 38, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, 53, 54, 55,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ 66, 67, -1, -1, -1, -1, 72, 73, 74, 75,
+ 76, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, 94, 95,
+ 96, 97, 98, 99, 100, 101, -1, -1, -1, 105,
+ 106, 107, 108, 109, 110, 111, 112, 113, 114, 115,
+ 116, 117, 118, 119, 120, 3, -1, -1, -1, -1,
+ -1, -1, -1, -1, 12, -1, -1, -1, -1, 17,
+ 18, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, 30, 31, -1, 33, -1, 35, -1, -1,
+ 38, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, 50, -1, -1, 53, 54, 55, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, 66, 67,
+ -1, -1, 70, -1, 72, 73, 74, 75, 76, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, 94, -1, 96, 97,
+ 98, 99, 100, 101, -1, -1, -1, 105, 106, 107,
+ 108, 109, 110, 111, 112, 113, 114, 115, 116, 117,
+ 118, 119, 120, 3, -1, -1, -1, -1, -1, -1,
+ -1, -1, 12, -1, -1, -1, -1, 17, 18, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ 30, 31, 32, 33, -1, 35, -1, -1, 38, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ 50, -1, -1, 53, 54, 55, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, 66, 67, -1, -1,
+ -1, -1, 72, 73, 74, 75, 76, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, 94, -1, 96, 97, 98, 99,
+ 100, 101, -1, -1, -1, 105, 106, 107, 108, 109,
+ 110, 111, 112, 113, 114, 115, 116, 117, 118, 119,
+ 120, 3, -1, -1, -1, -1, -1, -1, -1, -1,
+ 12, -1, -1, -1, -1, 17, 18, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, 30, 31,
+ -1, 33, -1, 35, -1, -1, 38, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, 50, -1,
+ -1, 53, 54, 55, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, 66, 67, -1, -1, -1, -1,
+ 72, 73, 74, 75, 76, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, 94, -1, 96, 97, 98, 99, 100, 101,
+ -1, -1, -1, 105, 106, 107, 108, 109, 110, 111,
+ 112, 113, 114, 115, 116, 117, 118, 119, 120, 3,
+ -1, -1, -1, -1, -1, -1, -1, -1, 12, -1,
+ -1, -1, -1, 17, 18, 19, 20, 21, 22, 23,
+ 24, 25, 26, -1, -1, -1, 30, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, 4, 5, 6, 7, 8, 9, 10, 11, -1,
+ -1, 55, -1, -1, 17, -1, 19, 20, 21, 22,
+ 23, 24, 25, 26, -1, -1, -1, 30, 72, 73,
+ 74, 75, 76, -1, -1, -1, -1, -1, -1, -1,
+ 43, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ 94, -1, 96, 97, 98, 99, 100, 101, -1, -1,
+ -1, 105, 106, 107, 108, 109, 110, 111, 112, 113,
+ 114, 115, 116, 117, 118, 119, 120, 3, -1, -1,
+ -1, -1, -1, -1, -1, -1, 12, 90, 91, 92,
+ 93, 17, 18, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, 30, 31, -1, 33, -1, 35,
+ -1, -1, 38, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, 53, 54, 55,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ 66, 67, -1, -1, -1, -1, 72, 73, 74, 75,
+ 76, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, 94, -1,
+ 96, 97, 98, 99, 100, 101, -1, -1, -1, 105,
+ 106, 107, 108, 109, 110, 111, 112, 113, 114, 115,
+ 116, 117, 118, 119, 120, 3, -1, -1, -1, -1,
+ -1, -1, -1, -1, 12, -1, -1, -1, -1, 17,
+ 18, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, 30, -1, -1, 33, -1, 35, -1, -1,
+ 38, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, 53, 54, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, 66, 67,
+ -1, -1, -1, -1, 72, 73, 74, 75, 76, 3,
+ -1, -1, -1, -1, -1, -1, 84, -1, 12, -1,
+ -1, -1, -1, 17, 18, -1, 94, -1, 96, 97,
+ 98, 99, 100, 101, -1, -1, 30, 105, 106, 107,
+ 108, 109, 110, 111, 112, 113, 114, 115, 116, 117,
+ 118, 119, 120, -1, -1, -1, -1, -1, 3, -1,
+ -1, 55, -1, -1, -1, -1, -1, 12, -1, -1,
+ -1, -1, 17, 18, -1, -1, -1, -1, 72, 73,
+ 74, 75, 76, -1, -1, 30, -1, -1, -1, -1,
+ -1, -1, -1, 38, -1, -1, -1, -1, -1, -1,
+ 94, -1, 96, 97, 98, 99, 100, 101, -1, -1,
+ -1, 105, 106, 107, 108, 109, 110, 111, 112, 113,
+ 114, 115, 116, 117, 118, 119, 120, 72, 73, 74,
+ 75, 76, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, 94,
+ -1, 96, 97, 98, 99, 100, 101, -1, -1, -1,
+ 105, 106, 107, 108, 109, 110, 111, 112, 113, 114,
+ 115, 116, 117, 118, 119, 120, 3, -1, -1, -1,
+ -1, -1, -1, -1, -1, 12, -1, -1, -1, -1,
+ 17, 18, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, 30, -1, -1, -1, -1, -1, -1,
+ -1, 38, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, 3, -1, -1, -1, -1,
+ -1, -1, -1, -1, 12, -1, -1, -1, -1, 17,
+ 18, -1, -1, -1, -1, 72, 73, 74, 75, 76,
+ -1, -1, 30, -1, -1, -1, -1, -1, -1, -1,
+ 38, -1, -1, -1, -1, -1, -1, 94, -1, 96,
+ 97, 98, 99, 100, 101, -1, -1, -1, 105, 106,
+ 107, 108, 109, 110, 111, 112, 113, 114, 115, 116,
+ 117, 118, 119, 120, 72, 73, 74, 75, 76, 3,
+ -1, -1, -1, -1, -1, -1, -1, -1, 12, -1,
+ -1, -1, -1, 17, 18, -1, 94, -1, 96, 97,
+ 98, 99, 100, 101, -1, -1, 30, 105, 106, 107,
+ 108, 109, 110, 111, 112, 113, 114, 115, 116, 117,
+ 118, 119, 120, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ 4, 5, 6, 7, 8, 9, 10, 11, 72, 73,
+ 74, 75, 76, 17, -1, 19, 20, 21, 22, 23,
+ 24, 25, 26, -1, -1, -1, 30, -1, -1, -1,
+ 94, -1, 96, 97, 98, 99, 100, 101, -1, -1,
+ -1, 105, 106, 107, 108, 109, 110, 111, 112, 113,
+ 114, 115, 116, 117, 118, 119, 120, 4, 5, 6,
+ 7, 8, 9, 10, 11, -1, 70, -1, -1, -1,
+ 17, -1, 19, 20, 21, 22, 23, 24, 25, 26,
+ -1, -1, -1, 30, -1, -1, 90, 91, 92, 93,
+ 4, 5, 6, 7, 8, 9, 10, 11, -1, -1,
+ -1, -1, -1, 17, -1, 19, 20, 21, 22, 23,
+ 24, 25, 26, -1, -1, -1, 30, -1, -1, -1,
+ -1, -1, -1, 70, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, 4, 5, 6, 7, 8, 9,
+ 10, 11, -1, 90, 91, 92, 93, 17, -1, 19,
+ 20, 21, 22, 23, 24, 25, 26, -1, -1, -1,
+ 30, -1, -1, -1, -1, -1, -1, 4, 5, 6,
+ 7, 8, 9, 10, 11, -1, 90, 91, 92, 93,
+ 17, -1, 19, 20, 21, 22, 23, 24, 25, 26,
+ -1, -1, -1, 30, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, 4, 5, 6, 7, 8, 9, 10, 11, -1,
+ 90, 91, 92, 93, 17, -1, 19, 20, 21, 22,
+ 23, 24, 25, 26, -1, -1, -1, 30, -1, -1,
+ -1, -1, -1, -1, 4, 5, 6, 7, 8, 9,
+ 10, 11, -1, 90, 91, 92, 93, 17, -1, 19,
+ 20, 21, 22, 23, 24, 25, 26, 37, -1, -1,
+ 30, -1, -1, -1, -1, -1, -1, -1, 48, 49,
+ 50, 51, 52, 53, 54, 55, 56, 57, 58, 59,
+ 60, 61, 62, 63, 64, 65, 39, 90, 91, 92,
+ 93, 71, -1, -1, -1, 48, 49, 50, 51, 52,
+ 53, 54, 55, 56, 57, 58, 59, 60, 61, 62,
+ 63, 64, 65, -1, 39, -1, -1, -1, 71, -1,
+ 90, 91, 92, 48, 49, 50, 51, 52, 53, 54,
+ 55, 56, 57, 58, 59, 60, 61, 62, 63, 64,
+ 65, 39, -1, -1, -1, -1, 71, -1, -1, -1,
+ 48, 49, 50, 51, 52, 53, 54, 55, 56, 57,
+ 58, 59, 60, 61, 62, 63, 64, 65, 41, -1,
+ -1, -1, -1, 71, -1, 48, 49, 50, 51, 52,
+ 53, 54, 55, 56, 57, 58, 59, 60, 61, 62,
+ 63, 64, 65, 41, -1, -1, -1, -1, 71, -1,
+ 48, 49, 50, 51, 52, 53, 54, 55, 56, 57,
+ 58, 59, 60, 61, 62, 63, 64, 65, -1, -1,
+ -1, -1, -1, 71, 48, 49, 50, 51, 52, 53,
+ 54, 55, 56, 57, 58, 59, 60, 61, 62, 63,
+ 64, 65, -1, -1, -1, -1, -1, 71, 48, 49,
+ 50, 51, 52, 53, 54, 55, 56, 57, 58, 59,
+ 60, 61, 62, 63, 64, 65, -1, -1, -1, -1,
+ -1, 71, 48, 49, 50, 51, 52, 53, 54, 55,
+ 56, 57, 58, 59, 60, 61, 62, 63, 64, 65,
+ -1, -1, -1, -1, -1, 71, 48, 49, 50, 51,
+ 52, 53, 54, 55, 56, 57, 58, 59, 60, 61,
+ 62, 63, 64, 65, -1, -1, -1, -1, -1, 71
+};
+
+ /* YYSTOS[STATE-NUM] -- The (internal number of the) accessing
+ symbol of state STATE-NUM. */
+static const unsigned char yystos[] =
+{
+ 0, 4, 5, 6, 7, 8, 9, 10, 11, 17,
+ 19, 20, 21, 22, 23, 24, 25, 26, 30, 36,
+ 37, 47, 89, 90, 91, 92, 93, 94, 95, 97,
+ 121, 126, 137, 138, 139, 140, 141, 159, 164, 166,
+ 167, 168, 169, 170, 171, 172, 173, 174, 179, 182,
+ 183, 186, 187, 188, 189, 190, 191, 194, 196, 197,
+ 203, 208, 218, 219, 9, 11, 3, 12, 17, 18,
+ 30, 38, 55, 72, 73, 74, 75, 76, 94, 96,
+ 97, 98, 99, 100, 101, 105, 106, 107, 108, 109,
+ 110, 111, 112, 113, 114, 115, 116, 117, 118, 119,
+ 120, 135, 216, 217, 234, 244, 30, 90, 91, 92,
+ 93, 187, 194, 36, 72, 73, 74, 75, 76, 77,
+ 78, 79, 80, 81, 82, 83, 85, 86, 87, 88,
+ 142, 143, 144, 145, 147, 148, 149, 90, 91, 165,
+ 166, 188, 189, 194, 203, 209, 210, 135, 135, 135,
+ 211, 3, 6, 10, 12, 17, 160, 161, 167, 34,
+ 219, 50, 252, 253, 30, 89, 186, 0, 139, 135,
+ 195, 215, 216, 4, 5, 6, 9, 175, 6, 172,
+ 178, 37, 129, 180, 38, 38, 42, 42, 215, 216,
+ 38, 135, 55, 128, 135, 135, 135, 40, 184, 27,
+ 28, 29, 126, 128, 135, 150, 151, 36, 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, 30, 31, 32, 33,
+ 34, 35, 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, 87, 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, 124, 126, 127, 128, 129,
+ 136, 154, 155, 154, 34, 124, 146, 135, 150, 33,
+ 35, 38, 53, 54, 66, 67, 84, 134, 135, 156,
+ 135, 211, 135, 211, 37, 171, 135, 41, 213, 213,
+ 213, 213, 216, 31, 37, 42, 31, 165, 180, 44,
+ 214, 38, 135, 6, 176, 6, 9, 177, 175, 38,
+ 37, 17, 93, 166, 192, 193, 194, 192, 135, 204,
+ 205, 98, 99, 100, 101, 102, 103, 104, 225, 226,
+ 227, 240, 241, 247, 248, 249, 135, 215, 185, 195,
+ 216, 123, 154, 136, 156, 38, 135, 156, 38, 48,
+ 49, 50, 51, 52, 53, 54, 55, 56, 57, 58,
+ 59, 60, 61, 62, 63, 64, 65, 71, 133, 41,
+ 42, 199, 199, 37, 198, 199, 198, 38, 135, 46,
+ 225, 38, 37, 37, 33, 215, 214, 34, 181, 216,
+ 17, 215, 39, 40, 39, 40, 46, 40, 43, 195,
+ 230, 31, 33, 35, 38, 134, 195, 206, 207, 222,
+ 242, 243, 244, 252, 195, 135, 250, 251, 18, 243,
+ 244, 43, 226, 206, 39, 135, 40, 38, 39, 135,
+ 156, 157, 158, 156, 156, 38, 165, 200, 195, 195,
+ 215, 27, 28, 29, 34, 162, 163, 206, 43, 3,
+ 6, 10, 12, 13, 14, 15, 16, 17, 39, 220,
+ 221, 223, 224, 45, 135, 34, 39, 216, 214, 17,
+ 70, 193, 214, 70, 206, 205, 46, 37, 30, 93,
+ 166, 206, 206, 71, 133, 46, 37, 38, 32, 46,
+ 38, 37, 40, 37, 37, 39, 195, 135, 152, 153,
+ 39, 39, 40, 41, 33, 41, 212, 43, 165, 135,
+ 37, 41, 39, 40, 222, 39, 39, 39, 27, 95,
+ 96, 114, 206, 229, 231, 232, 233, 234, 253, 39,
+ 39, 206, 206, 242, 195, 252, 185, 251, 39, 40,
+ 156, 156, 40, 33, 41, 40, 201, 212, 39, 223,
+ 41, 221, 223, 46, 214, 214, 114, 231, 17, 18,
+ 234, 237, 38, 38, 229, 206, 41, 40, 245, 195,
+ 39, 154, 135, 33, 41, 38, 195, 202, 37, 201,
+ 223, 252, 162, 38, 206, 222, 206, 70, 242, 246,
+ 39, 37, 39, 41, 33, 212, 40, 37, 70, 222,
+ 40, 40, 235, 39, 40, 38, 40, 195, 32, 38,
+ 206, 195, 228, 229, 230, 236, 253, 39, 242, 33,
+ 33, 212, 39, 238, 239, 242, 39, 40, 229, 40,
+ 39, 41, 39, 40, 228, 33, 223, 39, 242, 39
};
-#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",
+
+ /* YYR1[YYN] -- Symbol number of symbol that rule YYN derives. */
+static const unsigned char yyr1[] =
+{
+ 0, 132, 133, 133, 133, 133, 133, 133, 133, 133,
+ 133, 133, 133, 133, 133, 133, 133, 133, 133, 133,
+ 134, 134, 134, 134, 135, 135, 135, 135, 135, 135,
+ 135, 135, 135, 135, 135, 135, 135, 135, 135, 135,
+ 135, 135, 136, 136, 136, 136, 136, 136, 136, 136,
+ 136, 136, 136, 136, 136, 136, 136, 136, 136, 136,
+ 136, 136, 136, 136, 136, 136, 136, 136, 136, 136,
+ 136, 136, 136, 136, 136, 136, 136, 136, 136, 136,
+ 136, 136, 136, 136, 136, 136, 136, 136, 136, 136,
+ 136, 136, 136, 136, 136, 136, 136, 136, 136, 136,
+ 136, 136, 136, 136, 136, 136, 136, 136, 136, 136,
+ 136, 136, 136, 136, 136, 136, 136, 136, 136, 136,
+ 136, 136, 136, 136, 136, 136, 136, 136, 136, 136,
+ 136, 136, 136, 136, 136, 136, 136, 136, 136, 136,
+ 136, 136, 136, 136, 136, 136, 136, 136, 136, 136,
+ 136, 136, 136, 136, 136, 136, 136, 136, 136, 136,
+ 136, 136, 136, 136, 137, 137, 138, 138, 139, 139,
+ 139, 139, 139, 139, 139, 139, 139, 139, 139, 139,
+ 139, 140, 141, 141, 142, 142, 142, 142, 142, 142,
+ 142, 142, 143, 143, 144, 144, 145, 145, 145, 146,
+ 146, 147, 147, 148, 148, 148, 149, 149, 150, 150,
+ 150, 150, 150, 150, 151, 151, 152, 152, 153, 153,
+ 154, 154, 155, 155, 156, 156, 156, 156, 156, 156,
+ 156, 156, 156, 156, 157, 157, 158, 158, 159, 160,
+ 161, 161, 161, 161, 162, 162, 162, 163, 163, 163,
+ 163, 164, 164, 165, 165, 165, 165, 165, 165, 166,
+ 166, 167, 167, 168, 168, 168, 169, 169, 169, 169,
+ 170, 170, 170, 171, 171, 171, 171, 171, 171, 171,
+ 171, 172, 172, 173, 173, 173, 174, 174, 174, 174,
+ 175, 175, 175, 175, 175, 176, 176, 177, 177, 177,
+ 178, 178, 178, 179, 179, 180, 180, 181, 181, 182,
+ 183, 184, 184, 185, 185, 186, 186, 187, 187, 188,
+ 188, 189, 189, 190, 190, 190, 190, 191, 191, 192,
+ 192, 192, 192, 193, 193, 193, 193, 194, 194, 194,
+ 194, 195, 195, 196, 197, 198, 198, 199, 200, 200,
+ 201, 201, 202, 202, 203, 204, 204, 205, 205, 206,
+ 206, 206, 206, 206, 206, 207, 207, 207, 207, 208,
+ 209, 210, 211, 211, 212, 212, 212, 212, 213, 213,
+ 214, 214, 215, 215, 216, 216, 217, 217, 218, 218,
+ 219, 219, 219, 220, 220, 221, 221, 222, 223, 224,
+ 224, 224, 224, 224, 224, 224, 224, 224, 225, 225,
+ 226, 226, 226, 226, 226, 227, 227, 228, 228, 228,
+ 229, 229, 229, 229, 229, 229, 230, 230, 231, 232,
+ 233, 234, 234, 234, 234, 234, 234, 234, 234, 234,
+ 234, 235, 235, 236, 236, 237, 237, 238, 238, 239,
+ 239, 240, 241, 242, 242, 242, 243, 243, 244, 244,
+ 244, 244, 244, 244, 244, 244, 245, 245, 246, 246,
+ 247, 248, 248, 249, 250, 250, 251, 252, 252, 253
};
-#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);
- }
+
+ /* 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, 0, 1, 1, 2, 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, 6, 2, 0, 1, 1, 3,
+ 0, 1, 1, 2, 3, 2, 3, 5, 2, 4,
+ 1, 1, 1, 4, 0, 1, 1, 3, 6, 1,
+ 1, 1, 1, 1, 0, 1, 1, 1, 1, 1,
+ 1, 3, 4, 1, 1, 2, 4, 4, 2, 2,
+ 1, 1, 1, 2, 2, 2, 1, 1, 1, 1,
+ 1, 1, 2, 1, 1, 1, 1, 1, 1, 1,
+ 1, 1, 1, 1, 1, 2, 1, 1, 2, 2,
+ 0, 1, 2, 1, 2, 0, 1, 0, 1, 1,
+ 0, 1, 2, 3, 4, 0, 4, 1, 2, 2,
+ 3, 0, 2, 1, 3, 1, 2, 1, 1, 5,
+ 7, 5, 7, 6, 7, 6, 5, 1, 2, 0,
+ 1, 1, 3, 1, 2, 3, 2, 1, 2, 4,
+ 3, 3, 2, 4, 4, 1, 1, 3, 4, 5,
+ 0, 2, 2, 4, 4, 1, 3, 1, 3, 1,
+ 4, 3, 3, 2, 5, 1, 1, 1, 1, 2,
+ 2, 2, 0, 1, 0, 2, 7, 9, 0, 7,
+ 0, 3, 0, 1, 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, 2, 1, 1, 1, 3, 4, 6, 8,
+ 5, 1, 1, 1, 1, 1, 1, 1, 1, 1,
+ 1, 0, 2, 1, 3, 1, 1, 0, 1, 1,
+ 3, 3, 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, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 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
+};
+
+/* 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
+};
+
+/* 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, 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, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 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, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 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, 9,
+ 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, 165, 167, 169,
+ 171, 173, 0, 175, 0, 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, 235, 237, 239, 241, 0, 243,
+ 245, 0, 247, 249, 251, 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, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 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, 0, 0,
+ 0, 0, 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,
+ 255, 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,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 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, 263
+};
+
+/* YYCONFL[I] -- lists of conflicting rule numbers, each terminated by
+ 0, pointed into by YYCONFLP. */
+static const short int yyconfl[] =
+{
+ 0, 269, 0, 269, 0, 337, 0, 464, 0, 464,
+ 0, 464, 0, 464, 0, 464, 0, 464, 0, 464,
+ 0, 464, 0, 464, 0, 464, 0, 464, 0, 464,
+ 0, 464, 0, 464, 0, 464, 0, 464, 0, 464,
+ 0, 464, 0, 464, 0, 464, 0, 464, 0, 464,
+ 0, 464, 0, 464, 0, 464, 0, 464, 0, 464,
+ 0, 464, 0, 464, 0, 464, 0, 464, 0, 464,
+ 0, 464, 0, 464, 0, 464, 0, 464, 0, 464,
+ 0, 464, 0, 464, 0, 464, 0, 464, 0, 464,
+ 0, 464, 0, 464, 0, 464, 0, 464, 0, 464,
+ 0, 464, 0, 464, 0, 464, 0, 464, 0, 464,
+ 0, 464, 0, 464, 0, 464, 0, 464, 0, 464,
+ 0, 464, 0, 464, 0, 464, 0, 464, 0, 464,
+ 0, 464, 0, 464, 0, 464, 0, 464, 0, 464,
+ 0, 464, 0, 464, 0, 464, 0, 464, 0, 464,
+ 0, 464, 0, 464, 0, 464, 0, 464, 0, 464,
+ 0, 464, 0, 464, 0, 464, 0, 464, 0, 464,
+ 0, 464, 0, 464, 0, 464, 0, 464, 0, 464,
+ 0, 464, 0, 464, 0, 464, 0, 464, 0, 464,
+ 0, 464, 0, 464, 0, 464, 0, 464, 0, 464,
+ 0, 464, 0, 464, 0, 464, 0, 464, 0, 464,
+ 0, 464, 0, 464, 0, 464, 0, 464, 0, 464,
+ 0, 464, 0, 464, 0, 464, 0, 464, 0, 464,
+ 0, 464, 0, 464, 0, 464, 0, 464, 0, 464,
+ 0, 464, 0, 464, 0, 464, 0, 464, 0, 464,
+ 0, 464, 0, 464, 0, 269, 0, 269, 0, 269,
+ 0, 227, 0, 364, 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"
-}
- 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"
-}
- break;
- case 96: /* decl_enum */
-{
-#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 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;
- case 98: /* decl_enum_item */
-{
-#line 67 "src/parser_proc.y"
-psi_decl_enum_item_free(&(yypminor->yy69));
-#line 1181 "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 101: /* decl_struct */
+# 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 73 "src/parser_proc.y"
-psi_decl_struct_free(&(yypminor->yy271));
-#line 1188 "src/parser_proc.c"
+ if (yymsg != YY_NULLPTR)
+ yyerror (P, tokens, index, yymsg);
+ YYLONGJMP (yystackp->yyexception_buffer, 1);
}
- break;
- case 103: /* decl_union */
+
+static _Noreturn void
+yyMemoryExhausted (yyGLRStack* yystackp)
{
-#line 76 "src/parser_proc.y"
-psi_decl_union_free(&(yypminor->yy19));
-#line 1195 "src/parser_proc.c"
+ YYLONGJMP (yystackp->yyexception_buffer, 2);
}
- break;
- case 104: /* const_type */
+
+#if YYDEBUG || YYERROR_VERBOSE
+/** A printable representation of TOKEN. */
+static inline const char*
+yytokenName (yySymbol yytoken)
{
-#line 78 "src/parser_proc.y"
-psi_const_type_free(&(yypminor->yy7));
-#line 1202 "src/parser_proc.c"
+ if (yytoken == YYEMPTY)
+ return "";
+
+ return yytname[yytoken];
}
- break;
- case 105: /* constant */
+#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 80 "src/parser_proc.y"
-psi_const_free(&(yypminor->yy106));
-#line 1209 "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 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"
+
+/* 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 110: /* decl */
-{
-#line 90 "src/parser_proc.y"
-psi_decl_free(&(yypminor->yy71));
-#line 1228 "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 171:
+#line 409 "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 112: /* decl_abi */
-{
-#line 94 "src/parser_proc.y"
-psi_decl_abi_free(&(yypminor->yy242));
-#line 1235 "src/parser_proc.c"
+#line 2422 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 172:
+#line 415 "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 113: /* decl_var */
-{
-#line 96 "src/parser_proc.y"
-psi_decl_var_free(&(yypminor->yy207));
-#line 1242 "src/parser_proc.c"
+#line 2435 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 173:
+#line 423 "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 119: /* decl_layout */
-{
-#line 108 "src/parser_proc.y"
-psi_layout_free(&(yypminor->yy81));
-#line 1249 "src/parser_proc.c"
+#line 2443 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 174:
+#line 426 "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 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 2451 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 176:
+#line 430 "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 122: /* impl */
-{
-#line 114 "src/parser_proc.y"
-psi_impl_free(&(yypminor->yy49));
-#line 1264 "src/parser_proc.c"
+#line 2459 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 177:
+#line 433 "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 123: /* impl_func */
-{
-#line 116 "src/parser_proc.y"
-psi_impl_func_free(&(yypminor->yy120));
-#line 1271 "src/parser_proc.c"
+#line 2467 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 178:
+#line 436 "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 124: /* impl_def_val */
-{
-#line 118 "src/parser_proc.y"
-psi_impl_def_val_free(&(yypminor->yy21));
-#line 1278 "src/parser_proc.c"
+#line 2475 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 179:
+#line 439 "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 125: /* impl_var */
-{
-#line 120 "src/parser_proc.y"
-psi_impl_var_free(&(yypminor->yy185));
-#line 1285 "src/parser_proc.c"
+#line 2483 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 180:
+#line 442 "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 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 2491 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 181:
+#line 448 "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 130: /* impl_stmt */
-{
-#line 130 "src/parser_proc.y"
-psi_impl_stmt_free(&(yypminor->yy38));
-#line 1300 "src/parser_proc.c"
+#line 2499 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 182:
+#line 454 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_cpp_exp **)(&(*yyvalp))) = NULL;
}
- break;
- case 131: /* number */
-{
-#line 132 "src/parser_proc.y"
-psi_number_free(&(yypminor->yy160));
-#line 1307 "src/parser_proc.c"
+#line 2507 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 183:
+#line 457 "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 132: /* num_exp */
-{
-#line 134 "src/parser_proc.y"
-psi_num_exp_free(&(yypminor->yy39));
-#line 1314 "src/parser_proc.c"
+#line 2515 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 184:
+#line 463 "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 133: /* let_stmt */
-{
-#line 136 "src/parser_proc.y"
-psi_let_stmt_free(&(yypminor->yy139));
-#line 1321 "src/parser_proc.c"
+#line 2543 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 185:
+#line 486 "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 2552 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 186:
+#line 490 "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 2561 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 187:
+#line 494 "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 2571 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 188:
+#line 499 "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 2580 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 189:
+#line 503 "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 2589 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 190:
+#line 507 "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 2598 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 191:
+#line 511 "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 2607 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 214:
+#line 564 "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 2617 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 215:
+#line 569 "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 2627 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 216:
+#line 577 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_plist **)(&(*yyvalp))) = psi_plist_init(NULL);
}
- break;
- case 134: /* let_calloc */
-{
-#line 138 "src/parser_proc.y"
-psi_let_calloc_free(&(yypminor->yy17));
-#line 1328 "src/parser_proc.c"
+#line 2635 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 218:
+#line 584 "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 2645 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 219:
+#line 589 "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 2655 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 220:
+#line 597 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_plist **)(&(*yyvalp))) = 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 2663 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 222:
+#line 604 "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 2672 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 223:
+#line 608 "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 2681 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 224:
+#line 615 "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 2690 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 225:
+#line 619 "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 2699 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 226:
+#line 623 "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 2708 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 227:
+#line 627 "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 2717 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 228:
+#line 632 "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 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 2732 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 229:
+#line 642 "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 138: /* let_callback */
-{
-#line 146 "src/parser_proc.y"
-psi_let_callback_free(&(yypminor->yy164));
-#line 1350 "src/parser_proc.c"
+#line 2747 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 230:
+#line 652 "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 2757 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 231:
+#line 657 "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 2767 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 232:
+#line 662 "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 2778 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 233:
+#line 668 "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 2789 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 234:
+#line 677 "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 2797 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 236:
+#line 684 "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 2806 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 237:
+#line 688 "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 141: /* set_stmt */
-{
-#line 152 "src/parser_proc.y"
-psi_set_stmt_free(&(yypminor->yy226));
-#line 1364 "src/parser_proc.c"
+#line 2814 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 238:
+#line 694 "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 2823 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 239:
+#line 701 "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 142: /* set_exp */
-{
-#line 154 "src/parser_proc.y"
-psi_set_exp_free(&(yypminor->yy67));
-#line 1371 "src/parser_proc.c"
+#line 2831 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 244:
+#line 714 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_impl_def_val **)(&(*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 2839 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 245:
+#line 717 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ 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 145: /* return_stmt */
-{
-#line 160 "src/parser_proc.y"
-psi_return_stmt_free(&(yypminor->yy130));
-#line 1385 "src/parser_proc.c"
+#line 2875 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 246:
+#line 748 "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 2884 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 251:
+#line 762 "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;
- case 146: /* free_stmt */
-{
-#line 162 "src/parser_proc.y"
-psi_free_stmt_free(&(yypminor->yy76));
-#line 1392 "src/parser_proc.c"
+#line 2892 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 252:
+#line 765 "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;
- case 148: /* free_exp */
-{
-#line 166 "src/parser_proc.y"
-psi_free_exp_free(&(yypminor->yy197));
-#line 1399 "src/parser_proc.c"
+#line 2900 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 254:
+#line 772 "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 2913 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 255:
+#line 780 "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 2929 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 256:
+#line 791 "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 2943 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 257:
+#line 800 "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 2957 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 258:
+#line 809 "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((*(struct psi_decl_type **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)), 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)));
+}
+#line 2967 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 259:
+#line 817 "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));
}
- break;
- case 149: /* impl_type */
-{
-#line 168 "src/parser_proc.y"
-psi_impl_type_free(&(yypminor->yy142));
-#line 1406 "src/parser_proc.c"
+#line 2975 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 261:
+#line 824 "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 2984 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 263:
+#line 832 "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 2994 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 264:
+#line 837 "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 3004 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 265:
+#line 842 "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 3014 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 268:
+#line 852 "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;
-/********* End destructor definitions *****************************************/
- default: break; /* If no destructor action specified: do nothing */
- }
+#line 3022 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 269:
+#line 855 "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 3030 "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 270:
+#line 861 "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 3038 "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 271:
+#line 864 "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 3046 "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 272:
+#line 867 "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)));
}
-#endif /* Parse_ENGINEALWAYSONSTACK */
+#line 3054 "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 283:
+#line 889 "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)));
}
-#endif
+#line 3062 "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<sizeof(yyFallback)/sizeof(yyFallback[0])
- && (iFallback = yyFallback[iLookAhead])!=0 ){
-#ifndef NDEBUG
- if( yyTraceFILE ){
- fprintf(yyTraceFILE, "%sFALLBACK %s => %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
- j<YY_ACTTAB_COUNT &&
-#endif
- yy_lookahead[j]==YYWILDCARD && iLookAhead>0
- ){
-#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 284:
+#line 892 "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 3070 "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 && i<YY_ACTTAB_COUNT );
- assert( yy_lookahead[i]==iLookAhead );
-#endif
- return yy_action[i];
-}
-
-/*
-** The following routine is called if the stack overflows.
-*/
-static void yyStackOverflow(yyParser *yypParser){
- ParseARG_FETCH;
-#ifndef NDEBUG
- if( yyTraceFILE ){
- fprintf(yyTraceFILE,"%sStack Overflow!\n",yyTracePrompt);
- }
-#endif
- while( yypParser->yytos>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( yyNewState<YYNSTATE ){
- fprintf(yyTraceFILE,"%sShift '%s', go to state %d\n",
- yyTracePrompt,yyTokenName[yypParser->yytos->major],
- yyNewState);
- }else{
- fprintf(yyTraceFILE,"%sShift '%s'\n",
- yyTracePrompt,yyTokenName[yypParser->yytos->major]);
- }
- }
+ case 285:
+#line 895 "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)));
}
-#else
-# define yyTraceShift(X,Y)
-#endif
+#line 3078 "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 286:
+#line 901 "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 3086 "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 287:
+#line 904 "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 3094 "src/parser_proc.c" /* glr.c:816 */
+ break;
- switch( yyruleno ){
- /* Beginning here are the reduction cases. A typical example
- ** follows:
- ** case 0:
- ** #line <lineno> <grammarfile>
- ** { ... } // User supplied code
- ** #line <lineno> <thisfile>
- ** 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 288:
+#line 907 "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 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 3107 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 289:
+#line 915 "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 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 3121 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 290:
+#line 927 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_token **)(&(*yyvalp))) = NULL;
}
-#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 3129 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 291:
+#line 930 "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 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 3137 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 292:
+#line 933 "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 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 3149 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 293:
+#line 940 "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 3157 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 294:
+#line 943 "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 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 3169 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 295:
+#line 953 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_token **)(&(*yyvalp))) = NULL;
}
-#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 3177 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 297:
+#line 959 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_token **)(&(*yyvalp))) = NULL;
}
-#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 3185 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 300:
+#line 967 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_token **)(&(*yyvalp))) = NULL;
}
- 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 3193 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 301:
+#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 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 3201 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 302:
+#line 973 "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 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 3214 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 303:
+#line 984 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_decl **)(&(*yyvalp))) = (*(struct psi_decl **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].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 3222 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 304:
+#line 987 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_decl **)(&(*yyvalp))) = (*(struct psi_decl **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-2)].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 3230 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 310:
+#line 1007 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ psi_decl_arg_free(&(*(struct psi_decl_arg **)(&((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 3238 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 312:
+#line 1014 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ psi_plist_free((*(struct psi_plist **)(&((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 3246 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 313:
+#line 1020 "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)));
}
-#line 2109 "src/parser_proc.c"
- yy_destructor(yypParser,80,&yymsp[0].minor);
+#line 3254 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 314:
+#line 1023 "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)));
}
- break;
- case 21: /* decl_struct_args ::= decl_struct_args_block */
-#line 322 "src/parser_proc.y"
-{
- yylhsminor.yy303 = yymsp[0].minor.yy303;
+#line 3262 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 316:
+#line 1030 "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 3271 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 319:
+#line 1042 "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 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 3283 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 320:
+#line 1049 "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 2127 "src/parser_proc.c"
+#line 3296 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 321:
+#line 1060 "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 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 3308 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 322:
+#line 1067 "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 2139 "src/parser_proc.c"
+#line 3321 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 323:
+#line 1078 "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 3333 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 324:
+#line 1085 "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 3349 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 325:
+#line 1096 "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 3365 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 326:
+#line 1107 "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 3381 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 328:
+#line 1122 "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 3395 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 329:
+#line 1134 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_plist **)(&(*yyvalp))) = NULL;
}
- 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 3403 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 330:
+#line 1137 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_plist **)(&(*yyvalp))) = NULL;
}
-#line 2151 "src/parser_proc.c"
+#line 3411 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 331:
+#line 1140 "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)));
}
- 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 3419 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 332:
+#line 1143 "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 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 3427 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 333:
+#line 1150 "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 2170 "src/parser_proc.c"
- yy_destructor(yypParser,81,&yymsp[-2].minor);
- yy_destructor(yypParser,71,&yymsp[0].minor);
+#line 3435 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 334:
+#line 1153 "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 3446 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 335:
+#line 1159 "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 3460 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 336:
+#line 1168 "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 3474 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 337:
+#line 1180 "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 3487 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 338:
+#line 1188 "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)));
}
- 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 3495 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 339:
+#line 1191 "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 3510 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 340:
+#line 1201 "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 3525 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 341:
+#line 1214 "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 3535 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 342:
+#line 1219 "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 3545 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 343:
+#line 1227 "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 3557 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 344:
+#line 1237 "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 3569 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 345:
+#line 1247 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_plist **)(&(*yyvalp))) = NULL;
}
-#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 3577 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 347:
+#line 1254 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_plist **)(&(*yyvalp))) = (*(struct psi_plist **)(&((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 3585 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 348:
+#line 1260 "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 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 3604 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 349:
+#line 1274 "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 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 3623 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 350:
+#line 1291 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_plist **)(&(*yyvalp))) = NULL;
}
-#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 3631 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 351:
+#line 1294 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_plist **)(&(*yyvalp))) = (*(struct psi_plist **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval));
}
-#line 2238 "src/parser_proc.c"
- yy_destructor(yypParser,75,&yymsp[0].minor);
+#line 3639 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 352:
+#line 1300 "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);
+ }
}
- 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 3651 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 353:
+#line 1307 "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);
+ }
}
-#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 3663 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 354:
+#line 1317 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_decl_enum **)(&(*yyvalp))) = psi_decl_enum_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_enum **)(&(*yyvalp)))->token = (*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-3)].yystate.yysemantics.yysval));
+}
+#line 3672 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 355:
+#line 1324 "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 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 3680 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 356:
+#line 1327 "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 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 3688 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 357:
+#line 1333 "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 3698 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 358:
+#line 1338 "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 3708 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 359:
+#line 1346 "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 3717 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 360:
+#line 1350 "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 3726 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 361:
+#line 1354 "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 3735 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 362:
+#line 1358 "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 3744 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 363:
+#line 1362 "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 3753 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 364:
+#line 1366 "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 3762 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 365:
+#line 1373 "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 3771 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 366:
+#line 1377 "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 3780 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 367:
+#line 1381 "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 3789 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 368:
+#line 1385 "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 3798 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 369:
+#line 1392 "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 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 3813 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 370:
+#line 1405 "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 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 3828 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 371:
+#line 1418 "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 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 3843 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 372:
+#line 1431 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_token **)(&(*yyvalp))) = NULL;
}
-#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 3851 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 373:
+#line 1434 "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 3860 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 374:
+#line 1441 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_layout **)(&(*yyvalp))) = NULL;
}
-#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 3868 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 375:
+#line 1444 "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 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 3876 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 376:
+#line 1447 "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 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 3884 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 377:
+#line 1450 "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 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 3892 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 378:
+#line 1456 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_layout*)(&(*yyvalp))).pos = 0;
+ (*(struct psi_layout*)(&(*yyvalp))).len = 0;
+}
+#line 3901 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 379:
+#line 1460 "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 3910 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 380:
+#line 1467 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(size_t*)(&(*yyvalp))) = 0;
}
-#line 2455 "src/parser_proc.c"
+#line 3918 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 381:
+#line 1470 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(size_t*)(&(*yyvalp))) = atol((*(struct psi_token **)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval))->text);
}
- break;
- case 52: /* decl_args ::= */
-#line 506 "src/parser_proc.y"
-{
- yymsp[1].minor.yy303 = NULL;
+#line 3926 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 382:
+#line 1476 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(size_t*)(&(*yyvalp))) = 0;
}
-#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 3934 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 383:
+#line 1479 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(size_t*)(&(*yyvalp))) = (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (0)].yystate.yysemantics.yysval));
}
-#line 2471 "src/parser_proc.c"
+#line 3942 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 385:
+#line 1486 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(size_t*)(&(*yyvalp))) = (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval));
}
- 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 3950 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 386:
+#line 1492 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(size_t*)(&(*yyvalp))) = 1;
}
-#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 3958 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 387:
+#line 1495 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(size_t*)(&(*yyvalp))) = (*(size_t*)(&((yyGLRStackItem const *)yyvsp)[YYFILL (-1)].yystate.yysemantics.yysval)) + 1;
}
-#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 3966 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 388:
+#line 1507 "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 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 3974 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 389:
+#line 1510 "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 3983 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 390:
+#line 1517 "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 3993 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 391:
+#line 1522 "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 4003 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 392:
+#line 1527 "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 4015 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 393:
+#line 1537 "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)));
}
-#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 4023 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 394:
+#line 1540 "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 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 4031 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 395:
+#line 1546 "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 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 4039 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 396:
+#line 1549 "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 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 4047 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 397:
+#line 1555 "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 4056 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 398:
+#line 1562 "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 4065 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 408:
+#line 1581 "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)));
}
- 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 4073 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 409:
+#line 1584 "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 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 4081 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 410:
+#line 1590 "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 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 4089 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 411:
+#line 1593 "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 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 4097 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 412:
+#line 1596 "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 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 4105 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 413:
+#line 1599 "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 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 4113 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 414:
+#line 1602 "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 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 4121 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 415:
+#line 1608 "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 4130 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 416:
+#line 1612 "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 4140 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 418:
+#line 1621 "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 4149 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 419:
+#line 1625 "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 4158 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 420:
+#line 1632 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_let_exp **)(&(*yyvalp))) = psi_let_exp_init(PSI_LET_NULL, NULL);
}
-#line 2643 "src/parser_proc.c"
+#line 4166 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 421:
+#line 1635 "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)));
}
- 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 4174 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 422:
+#line 1638 "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 4183 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 423:
+#line 1642 "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 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 4191 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 424:
+#line 1645 "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 2663 "src/parser_proc.c"
- yy_destructor(yypParser,79,&yymsp[-2].minor);
- yy_destructor(yypParser,80,&yymsp[0].minor);
+#line 4199 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 425:
+#line 1648 "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)));
}
- 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 4207 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 426:
+#line 1654 "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 4216 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 427:
+#line 1658 "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 4226 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 428:
+#line 1666 "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 4235 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 429:
+#line 1673 "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_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 4245 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 430:
+#line 1681 "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 4255 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 441:
+#line 1702 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_plist **)(&(*yyvalp))) = NULL;
}
-#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 4263 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 442:
+#line 1705 "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 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 4271 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 443:
+#line 1711 "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 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 4279 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 444:
+#line 1714 "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)));
}
- 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 4287 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 447:
+#line 1725 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_plist **)(&(*yyvalp))) = NULL;
}
-#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 4295 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 448:
+#line 1728 "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 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 4303 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 449:
+#line 1734 "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 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 4311 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 450:
+#line 1737 "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 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 4319 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 451:
+#line 1743 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_return_stmt **)(&(*yyvalp))) = psi_return_stmt_init(psi_set_exp_init(PSI_SET_FUNC, (*(struct psi_set_func **)(&((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 4328 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 452:
+#line 1750 "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 4337 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 453:
+#line 1757 "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)));
}
-#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 4345 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 454:
+#line 1760 "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 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 4353 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 455:
+#line 1763 "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 4362 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 456:
+#line 1770 "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 4372 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 457:
+#line 1775 "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 4382 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 466:
+#line 1794 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_plist **)(&(*yyvalp))) = NULL;
}
-#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 4390 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 467:
+#line 1797 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(struct psi_plist **)(&(*yyvalp))) = (*(struct psi_plist **)(&((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 4398 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 468:
+#line 1803 "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 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 4406 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 469:
+#line 1806 "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 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 4414 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 470:
+#line 1812 "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 4423 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 473:
+#line 1824 "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 4432 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 474:
+#line 1831 "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)));
}
-#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 4440 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 475:
+#line 1834 "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 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 4448 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 476:
+#line 1840 "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 4458 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 477:
+#line 1848 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(bool*)(&(*yyvalp))) = false;
}
-#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 4466 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+ case 478:
+#line 1851 "src/parser_proc_grammar.y" /* glr.c:816 */
+ {
+ (*(bool*)(&(*yyvalp))) = true;
}
-#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 4474 "src/parser_proc.c" /* glr.c:816 */
+ break;
+
+
+#line 4478 "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 2822 "src/parser_proc.c"
- yymsp[0].minor.yy38 = yylhsminor.yy38;
- break;
- case 102: /* number ::= NUMBER|NSNAME */
-#line 737 "src/parser_proc.y"
+
+
+static void
+yyuserMerge (int yyn, YYSTYPE* yy0, YYSTYPE* yy1)
{
- yylhsminor.yy160 = psi_number_init(yymsp[0].minor.yy0->type, yymsp[0].minor.yy0->text);
- yylhsminor.yy160->token = yymsp[0].minor.yy0;
+ YYUSE (yy0);
+ YYUSE (yy1);
+
+ switch (yyn)
+ {
+
+ default: break;
+ }
}
-#line 2831 "src/parser_proc.c"
- yymsp[0].minor.yy160 = yylhsminor.yy160;
+
+ /* 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 133: /* binary_op_token */
+#line 276 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {}
+#line 4529 "src/parser_proc.c" /* glr.c:846 */
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 2840 "src/parser_proc.c"
- yymsp[0].minor.yy160 = yylhsminor.yy160;
+
+ case 134: /* unary_op_token */
+#line 276 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {}
+#line 4535 "src/parser_proc.c" /* glr.c:846 */
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 2849 "src/parser_proc.c"
- yymsp[0].minor.yy39 = yylhsminor.yy39;
+
+ case 135: /* name_token */
+#line 276 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {}
+#line 4541 "src/parser_proc.c" /* glr.c:846 */
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 2858 "src/parser_proc.c"
- yy_destructor(yypParser,75,&yymsp[0].minor);
- yymsp[-2].minor.yy39 = yylhsminor.yy39;
+
+ case 136: /* any_noeol_token */
+#line 276 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {}
+#line 4547 "src/parser_proc.c" /* glr.c:846 */
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 2868 "src/parser_proc.c"
- yymsp[-2].minor.yy39 = yylhsminor.yy39;
+
+ case 140: /* lib */
+#line 270 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));}
+#line 4553 "src/parser_proc.c" /* glr.c:846 */
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 2877 "src/parser_proc.c"
- yymsp[-1].minor.yy39 = yylhsminor.yy39;
+
+ case 141: /* cpp */
+#line 285 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_cpp_exp_free(&(*(struct psi_cpp_exp **)(&(*yyvaluep))));}
+#line 4559 "src/parser_proc.c" /* glr.c:846 */
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 2886 "src/parser_proc.c"
-}
+
+ case 142: /* cpp_exp */
+#line 285 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_cpp_exp_free(&(*(struct psi_cpp_exp **)(&(*yyvaluep))));}
+#line 4565 "src/parser_proc.c" /* glr.c:846 */
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 2896 "src/parser_proc.c"
- yy_destructor(yypParser,15,&yymsp[0].minor);
-}
+
+ case 144: /* cpp_message_token */
+#line 273 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {}
+#line 4571 "src/parser_proc.c" /* glr.c:846 */
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 2905 "src/parser_proc.c"
- yymsp[0].minor.yy144 = yylhsminor.yy144;
+
+ case 145: /* cpp_include_token */
+#line 273 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {}
+#line 4577 "src/parser_proc.c" /* glr.c:846 */
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 2913 "src/parser_proc.c"
- yymsp[0].minor.yy144 = yylhsminor.yy144;
+
+ case 146: /* cpp_header_token */
+#line 273 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {}
+#line 4583 "src/parser_proc.c" /* glr.c:846 */
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 2923 "src/parser_proc.c"
-}
+
+ case 147: /* cpp_no_arg_token */
+#line 273 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {}
+#line 4589 "src/parser_proc.c" /* glr.c:846 */
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 2931 "src/parser_proc.c"
- yymsp[0].minor.yy144 = yylhsminor.yy144;
+
+ case 148: /* cpp_name_arg_token */
+#line 273 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {}
+#line 4595 "src/parser_proc.c" /* glr.c:846 */
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 2941 "src/parser_proc.c"
-}
+
+ case 149: /* cpp_exp_arg_token */
+#line 273 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {}
+#line 4601 "src/parser_proc.c" /* glr.c:846 */
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 2949 "src/parser_proc.c"
- yymsp[0].minor.yy144 = yylhsminor.yy144;
+
+ case 150: /* cpp_special_name_token */
+#line 273 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {}
+#line 4607 "src/parser_proc.c" /* glr.c:846 */
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 2959 "src/parser_proc.c"
-}
+
+ case 151: /* cpp_macro_decl */
+#line 287 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_cpp_macro_decl_free(&(*(struct psi_cpp_macro_decl **)(&(*yyvaluep))));}
+#line 4613 "src/parser_proc.c" /* glr.c:846 */
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 2968 "src/parser_proc.c"
- yy_destructor(yypParser,81,&yymsp[-1].minor);
- yymsp[-2].minor.yy144 = yylhsminor.yy144;
+
+ case 152: /* cpp_macro_sig */
+#line 289 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));}
+#line 4619 "src/parser_proc.c" /* glr.c:846 */
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 2978 "src/parser_proc.c"
- yy_destructor(yypParser,71,&yymsp[0].minor);
- yymsp[-2].minor.yy139 = yylhsminor.yy139;
+
+ case 153: /* cpp_macro_sig_args */
+#line 289 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));}
+#line 4625 "src/parser_proc.c" /* glr.c:846 */
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 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;
+
+ case 154: /* cpp_macro_decl_tokens */
+#line 289 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));}
+#line 4631 "src/parser_proc.c" /* glr.c:846 */
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 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;
+
+ case 155: /* cpp_macro_decl_token_list */
+#line 289 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));}
+#line 4637 "src/parser_proc.c" /* glr.c:846 */
break;
- case 121: /* let_calloc ::= CALLOC LPAREN num_exp COMMA num_exp RPAREN */
-#line 810 "src/parser_proc.y"
-{
- yylhsminor.yy17 = psi_let_calloc_init(yymsp[-3].minor.yy39, yymsp[-1].minor.yy39);
- yylhsminor.yy17->token = yymsp[-5].minor.yy0;
-}
-#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;
+
+ case 156: /* cpp_macro_exp */
+#line 291 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_num_exp_free(&(*(struct psi_num_exp **)(&(*yyvaluep))));}
+#line 4643 "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 157: /* cpp_macro_call_args */
+#line 289 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));}
+#line 4649 "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 158: /* cpp_macro_call_arg_list */
+#line 289 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));}
+#line 4655 "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 159: /* constant */
+#line 297 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_const_free(&(*(struct psi_const **)(&(*yyvaluep))));}
+#line 4661 "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 160: /* constant_type */
+#line 299 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_const_type_free(&(*(struct psi_const_type **)(&(*yyvaluep))));}
+#line 4667 "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 161: /* constant_type_token */
+#line 294 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {}
+#line 4673 "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 162: /* impl_def_val */
+#line 301 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_impl_def_val_free(&(*(struct psi_impl_def_val **)(&(*yyvaluep))));}
+#line 4679 "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 163: /* impl_def_val_token */
+#line 294 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {}
+#line 4685 "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 164: /* decl_typedef */
+#line 314 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_decl_arg_free(&(*(struct psi_decl_arg **)(&(*yyvaluep))));}
+#line 4691 "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 165: /* typedef */
+#line 314 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_decl_arg_free(&(*(struct psi_decl_arg **)(&(*yyvaluep))));}
+#line 4697 "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 166: /* const_decl_type */
+#line 310 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_decl_type_free(&(*(struct psi_decl_type **)(&(*yyvaluep))));}
+#line 4703 "src/parser_proc.c" /* glr.c:846 */
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"
-{
- 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;
-}
-#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;
+
+ case 167: /* decl_type */
+#line 310 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_decl_type_free(&(*(struct psi_decl_type **)(&(*yyvaluep))));}
+#line 4709 "src/parser_proc.c" /* glr.c:846 */
break;
- case 135: /* set_exp ::= set_func */
-#line 863 "src/parser_proc.y"
-{
- yylhsminor.yy67 = psi_set_exp_init(PSI_SET_FUNC, yymsp[0].minor.yy78);
-}
-#line 3138 "src/parser_proc.c"
- yymsp[0].minor.yy67 = yylhsminor.yy67;
+
+ case 168: /* decl_type_complex */
+#line 310 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_decl_type_free(&(*(struct psi_decl_type **)(&(*yyvaluep))));}
+#line 4715 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 169: /* decl_type_simple */
+#line 304 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));}
+#line 4721 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 170: /* decl_real_type */
+#line 304 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));}
+#line 4727 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 171: /* decl_stdint_type */
+#line 307 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {}
+#line 4733 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 172: /* int_signed */
+#line 282 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {}
+#line 4739 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 173: /* int_width */
+#line 279 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));}
+#line 4745 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 174: /* decl_int_type */
+#line 304 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));}
+#line 4751 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 175: /* int_signed_types */
+#line 279 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));}
+#line 4757 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 176: /* signed_short_types */
+#line 282 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {}
+#line 4763 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 177: /* signed_long_types */
+#line 282 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {}
+#line 4769 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 178: /* int_width_types */
+#line 279 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));}
+#line 4775 "src/parser_proc.c" /* glr.c:846 */
break;
- case 136: /* set_exp ::= num_exp */
-#line 866 "src/parser_proc.y"
+
+ case 179: /* decl_stmt */
+#line 312 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_decl_free(&(*(struct psi_decl **)(&(*yyvaluep))));}
+#line 4781 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 185: /* decl_vars */
+#line 326 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));}
+#line 4787 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 186: /* decl */
+#line 312 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_decl_free(&(*(struct psi_decl **)(&(*yyvaluep))));}
+#line 4793 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 187: /* decl_body */
+#line 312 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_decl_free(&(*(struct psi_decl **)(&(*yyvaluep))));}
+#line 4799 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 188: /* decl_func_body */
+#line 312 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_decl_free(&(*(struct psi_decl **)(&(*yyvaluep))));}
+#line 4805 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 189: /* decl_functor_body */
+#line 312 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_decl_free(&(*(struct psi_decl **)(&(*yyvaluep))));}
+#line 4811 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 190: /* decl_functor */
+#line 314 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_decl_arg_free(&(*(struct psi_decl_arg **)(&(*yyvaluep))));}
+#line 4817 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 191: /* decl_func */
+#line 314 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_decl_arg_free(&(*(struct psi_decl_arg **)(&(*yyvaluep))));}
+#line 4823 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 192: /* decl_args */
+#line 326 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));}
+#line 4829 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 193: /* decl_anon_arg */
+#line 314 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_decl_arg_free(&(*(struct psi_decl_arg **)(&(*yyvaluep))));}
+#line 4835 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 194: /* decl_arg */
+#line 314 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_decl_arg_free(&(*(struct psi_decl_arg **)(&(*yyvaluep))));}
+#line 4841 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 195: /* decl_var */
+#line 316 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_decl_var_free(&(*(struct psi_decl_var **)(&(*yyvaluep))));}
+#line 4847 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 196: /* decl_union */
+#line 320 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_decl_union_free(&(*(struct psi_decl_union **)(&(*yyvaluep))));}
+#line 4853 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 197: /* decl_struct */
+#line 318 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_decl_struct_free(&(*(struct psi_decl_struct **)(&(*yyvaluep))));}
+#line 4859 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 198: /* decl_struct_args */
+#line 326 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));}
+#line 4865 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 199: /* struct_args_block */
+#line 326 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));}
+#line 4871 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 200: /* struct_args */
+#line 326 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));}
+#line 4877 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 201: /* struct_arg_var_list */
+#line 326 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));}
+#line 4883 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 202: /* decl_vars_with_layout */
+#line 326 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));}
+#line 4889 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 203: /* decl_enum */
+#line 322 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_decl_enum_free(&(*(struct psi_decl_enum **)(&(*yyvaluep))));}
+#line 4895 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 204: /* decl_enum_items */
+#line 326 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));}
+#line 4901 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 205: /* decl_enum_item */
+#line 324 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_decl_enum_item_free(&(*(struct psi_decl_enum_item **)(&(*yyvaluep))));}
+#line 4907 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 206: /* num_exp */
+#line 377 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_num_exp_free(&(*(struct psi_num_exp **)(&(*yyvaluep))));}
+#line 4913 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 207: /* number */
+#line 379 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_number_free(&(*(struct psi_number **)(&(*yyvaluep))));}
+#line 4919 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 208: /* enum_name */
+#line 270 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));}
+#line 4925 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 209: /* union_name */
+#line 270 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));}
+#line 4931 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 210: /* struct_name */
+#line 270 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));}
+#line 4937 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 211: /* optional_name */
+#line 270 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));}
+#line 4943 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 212: /* decl_layout */
+#line 331 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_layout_free(&(*(struct psi_layout **)(&(*yyvaluep))));}
+#line 4949 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 213: /* align_and_size */
+#line 329 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {}
+#line 4955 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 214: /* array_size */
+#line 382 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {}
+#line 4961 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 215: /* indirection */
+#line 382 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {}
+#line 4967 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 216: /* pointers */
+#line 382 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {}
+#line 4973 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 217: /* asterisks */
+#line 382 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {}
+#line 4979 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 218: /* impl */
+#line 334 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_impl_free(&(*(struct psi_impl **)(&(*yyvaluep))));}
+#line 4985 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 219: /* impl_func */
+#line 336 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_impl_func_free(&(*(struct psi_impl_func **)(&(*yyvaluep))));}
+#line 4991 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 220: /* impl_args */
+#line 374 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));}
+#line 4997 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 221: /* impl_arg */
+#line 338 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_impl_arg_free(&(*(struct psi_impl_arg **)(&(*yyvaluep))));}
+#line 5003 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 222: /* impl_var */
+#line 342 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_impl_var_free(&(*(struct psi_impl_var **)(&(*yyvaluep))));}
+#line 5009 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 223: /* impl_type */
+#line 340 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_impl_type_free(&(*(struct psi_impl_type **)(&(*yyvaluep))));}
+#line 5015 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 224: /* impl_type_token */
+#line 372 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));}
+#line 5021 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 225: /* impl_stmts */
+#line 374 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));}
+#line 5027 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 226: /* impl_stmt */
+#line 370 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_impl_stmt_free(&(*(struct psi_token ***)(&(*yyvaluep))));}
+#line 5033 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 227: /* let_stmt */
+#line 345 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_let_stmt_free(&(*(struct psi_let_stmt **)(&(*yyvaluep))));}
+#line 5039 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 228: /* let_exp */
+#line 347 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_let_exp_free(&(*(struct psi_let_exp **)(&(*yyvaluep))));}
+#line 5045 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 229: /* let_exp_byref */
+#line 347 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_let_exp_free(&(*(struct psi_let_exp **)(&(*yyvaluep))));}
+#line 5051 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 230: /* let_exp_assign */
+#line 347 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_let_exp_free(&(*(struct psi_let_exp **)(&(*yyvaluep))));}
+#line 5057 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 231: /* let_calloc */
+#line 349 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_let_calloc_free(&(*(struct psi_let_calloc **)(&(*yyvaluep))));}
+#line 5063 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 232: /* let_callback */
+#line 351 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_let_callback_free(&(*(struct psi_let_callback **)(&(*yyvaluep))));}
+#line 5069 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 233: /* let_func */
+#line 353 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_let_func_free(&(*(struct psi_let_func **)(&(*yyvaluep))));}
+#line 5075 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 234: /* let_func_token */
+#line 372 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));}
+#line 5081 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 235: /* let_func_exps */
+#line 374 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));}
+#line 5087 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 236: /* let_exps */
+#line 374 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));}
+#line 5093 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 237: /* callback_rval */
+#line 372 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));}
+#line 5099 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 238: /* callback_arg_list */
+#line 374 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));}
+#line 5105 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 239: /* callback_args */
+#line 374 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));}
+#line 5111 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 240: /* return_stmt */
+#line 363 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_return_stmt_free(&(*(struct psi_return_stmt **)(&(*yyvaluep))));}
+#line 5117 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 241: /* set_stmt */
+#line 355 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_set_stmt_free(&(*(struct psi_set_stmt **)(&(*yyvaluep))));}
+#line 5123 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 242: /* set_exp */
+#line 357 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_set_exp_free(&(*(struct psi_set_exp **)(&(*yyvaluep))));}
+#line 5129 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 243: /* set_func */
+#line 359 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_set_func_free(&(*(struct psi_set_func **)(&(*yyvaluep))));}
+#line 5135 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 244: /* set_func_token */
+#line 372 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));}
+#line 5141 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 245: /* set_func_exps */
+#line 374 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));}
+#line 5147 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 246: /* set_exps */
+#line 374 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));}
+#line 5153 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 247: /* assert_stmt */
+#line 361 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_assert_stmt_free(&(*(struct psi_assert_stmt **)(&(*yyvaluep))));}
+#line 5159 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 248: /* assert_stmt_token */
+#line 372 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_token_free(&(*(struct psi_token **)(&(*yyvaluep))));}
+#line 5165 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 249: /* free_stmt */
+#line 365 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_free_stmt_free(&(*(struct psi_free_stmt **)(&(*yyvaluep))));}
+#line 5171 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 250: /* free_exps */
+#line 374 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_plist_free((*(struct psi_plist **)(&(*yyvaluep))));}
+#line 5177 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 251: /* free_exp */
+#line 367 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {psi_free_exp_free(&(*(struct psi_free_exp **)(&(*yyvaluep))));}
+#line 5183 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+ case 252: /* reference */
+#line 384 "src/parser_proc_grammar.y" /* glr.c:846 */
+ {}
+#line 5189 "src/parser_proc.c" /* glr.c:846 */
+ break;
+
+
+ default:
+ break;
+ }
+ YY_IGNORE_MAYBE_UNINITIALIZED_END
+}
+
+/** Number of symbols composing the right hand side of rule #RULE. */
+static inline int
+yyrhsLength (yyRuleNum yyrule)
{
- yylhsminor.yy67 = psi_set_exp_init(PSI_SET_NUMEXP, yymsp[0].minor.yy39);
+ return yyr2[yyrule];
}
-#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"
+
+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.yy303 = psi_plist_add(psi_plist_init((psi_plist_dtor) psi_set_exp_free),
- &yymsp[0].minor.yy67);
+ return yyr1[yyrule];
}
-#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 yypact_value_is_default(Yystate) \
+ (!!((Yystate) == (-550)))
+
+/** True iff LR state YYSTATE has only a default reduction (regardless
+ * of token). */
+static inline yybool
+yyisDefaultedState (yyStateNum yystate)
{
- yylhsminor.yy303 = psi_plist_add(yymsp[-2].minor.yy303, &yymsp[0].minor.yy67);
+ return yypact_value_is_default (yypact[yystate]);
}
-#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"
+
+/** The default reduction for YYSTATE, assuming it has one. */
+static inline yyRuleNum
+yydefaultAction (yyStateNum yystate)
{
- yylhsminor.yy67 = yymsp[0].minor.yy67;
- yylhsminor.yy67->var = yymsp[-2].minor.yy185;
+ return yydefact[yystate];
}
-#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"
+
+#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.yy226 = psi_set_stmt_init(yymsp[-1].minor.yy67);
- yylhsminor.yy226->token = yymsp[-2].minor.yy0;
+ return 0 < yyaction;
}
-#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"
+
+static inline yybool
+yyisErrorAction (int yyaction)
{
- yylhsminor.yy130 = psi_return_stmt_init(psi_set_exp_init(PSI_SET_FUNC, yymsp[-1].minor.yy78));
- yylhsminor.yy130->token = yymsp[-2].minor.yy0;
+ return yyaction == 0;
}
-#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"
+
+ /* 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.yy76 = psi_free_stmt_init(yymsp[-1].minor.yy303);
- yylhsminor.yy76->token = yymsp[-2].minor.yy0;
+ yyGLRStackItem* yynewItem = yystackp->yynextFree;
+ yystackp->yyspaceLeft -= 1;
+ yystackp->yynextFree += 1;
+ yynewItem->yystate.yyisState = yyisState;
+ return yynewItem;
}
-#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"
+
+/** 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.yy303 = psi_plist_add(psi_plist_init((psi_plist_dtor) psi_free_exp_free),
- &yymsp[0].minor.yy197);
+ YYFREE (yyset->yystates);
+ YYFREE (yyset->yylookaheadNeeds);
}
-#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"
+
+/** 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);
+}
+
+
+#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;
+}
+#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 -> <Rule %d, empty>\n",
+ yyindent, "", yytokenName (yylhsNonterm (yyx->yyrule)),
+ yyx->yyrule - 1);
+ else
+ YYFPRINTF (stderr, "%*s%s -> <Rule %d, tokens %lu .. %lu>\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 <empty>\n", yyindent+2, "",
+ yytokenName (yystos[yystates[yyi]->yylrState]));
+ else
+ YYFPRINTF (stderr, "%*s%s <tokens %lu .. %lu>\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( yyruleno<sizeof(yyRuleInfo)/sizeof(yyRuleInfo[0]) );
- yygoto = yyRuleInfo[yyruleno].lhs;
- yysize = yyRuleInfo[yyruleno].nrhs;
- yyact = yy_find_reduce_action(yymsp[-yysize].stateno,(YYCODETYPE)yygoto);
- if( yyact <= YY_MAX_SHIFTREDUCE ){
- if( yyact>YY_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:
-** <ul>
-** <li> A pointer to the parser (an opaque structure.)
-** <li> The major token number.
-** <li> The minor token number.
-** <li> An option argument of a grammar-specified type.
-** </ul>
-**
-** 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 116 "src/parser_proc_grammar.y" /* glr.c:2270 */
+{
+}
+
+#line 6542 "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, "<null>");
+ 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 1860 "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++;
+}
+