--- parser3/src/main/compile.tab.C 2005/11/22 15:56:02 1.108 +++ parser3/src/main/compile.tab.C 2005/12/06 08:19:12 1.109 @@ -1,129 +1,42 @@ -/* A Bison parser, made by GNU Bison 1.875d. */ - -/* Skeleton parser for Yacc-like parsing with Bison, - Copyright (C) 1984, 1989, 1990, 2000, 2001, 2002, 2003, 2004 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 2, 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, write to the Free Software - Foundation, Inc., 59 Temple Place - Suite 330, - Boston, MA 02111-1307, USA. */ - -/* As a special exception, when this file is copied by Bison into a - Bison output file, you may use that output file without restriction. - This special exception was added by the Free Software Foundation - in version 1.24 of Bison. */ - -/* Written by Richard Stallman by simplifying the original so called - ``semantic'' parser. */ - -/* All symbols defined below should begin with yy or YY, to avoid - infringing on user name space. This should be done even for local - variables, as they might otherwise be expanded by user macros. - There are some unavoidable exceptions within include files to - define necessary library symbols; they are noted "INFRINGES ON - USER NAME SPACE" below. */ - -/* Identify Bison output. */ -#define YYBISON 1 - -/* Skeleton name. */ -#define YYSKELETON_NAME "yacc.c" - -/* Pure parsers. */ -#define YYPURE 1 - -/* Using locations. */ -#define YYLSP_NEEDED 0 +/* A Bison parser, made from compile.y + by GNU Bison version 1.28 */ +#define YYBISON 1 /* Identify Bison output. */ -/* Tokens. */ -#ifndef YYTOKENTYPE -# define YYTOKENTYPE - /* Put the tokens into the symbol table, so that GDB and other debuggers - know about them. */ - enum yytokentype { - EON = 258, - STRING = 259, - BOGUS = 260, - BAD_STRING_COMPARISON_OPERATOR = 261, - BAD_HEX_LITERAL = 262, - BAD_METHOD_DECL_START = 263, - BAD_METHOD_PARAMETER_NAME_CHARACTER = 264, - BAD_NONWHITESPACE_CHARACTER_IN_EXPLICIT_RESULT_MODE = 265, - LAND = 266, - LOR = 267, - LXOR = 268, - NXOR = 269, - NLE = 270, - NGE = 271, - NEQ = 272, - NNE = 273, - NSL = 274, - NSR = 275, - SLT = 276, - SGT = 277, - SLE = 278, - SGE = 279, - SEQ = 280, - SNE = 281, - DEF = 282, - IN = 283, - FEXISTS = 284, - DEXISTS = 285, - IS = 286, - LITERAL_TRUE = 287, - LITERAL_FALSE = 288, - NUNARY = 289 - }; -#endif -#define EON 258 -#define STRING 259 -#define BOGUS 260 -#define BAD_STRING_COMPARISON_OPERATOR 261 -#define BAD_HEX_LITERAL 262 -#define BAD_METHOD_DECL_START 263 -#define BAD_METHOD_PARAMETER_NAME_CHARACTER 264 -#define BAD_NONWHITESPACE_CHARACTER_IN_EXPLICIT_RESULT_MODE 265 -#define LAND 266 -#define LOR 267 -#define LXOR 268 -#define NXOR 269 -#define NLE 270 -#define NGE 271 -#define NEQ 272 -#define NNE 273 -#define NSL 274 -#define NSR 275 -#define SLT 276 -#define SGT 277 -#define SLE 278 -#define SGE 279 -#define SEQ 280 -#define SNE 281 -#define DEF 282 -#define IN 283 -#define FEXISTS 284 -#define DEXISTS 285 -#define IS 286 -#define LITERAL_TRUE 287 -#define LITERAL_FALSE 288 -#define NUNARY 289 +#define EON 257 +#define STRING 258 +#define BOGUS 259 +#define BAD_STRING_COMPARISON_OPERATOR 260 +#define BAD_HEX_LITERAL 261 +#define BAD_METHOD_DECL_START 262 +#define BAD_METHOD_PARAMETER_NAME_CHARACTER 263 +#define BAD_NONWHITESPACE_CHARACTER_IN_EXPLICIT_RESULT_MODE 264 +#define LAND 265 +#define LOR 266 +#define LXOR 267 +#define NXOR 268 +#define NLE 269 +#define NGE 270 +#define NEQ 271 +#define NNE 272 +#define NSL 273 +#define NSR 274 +#define SLT 275 +#define SGT 276 +#define SLE 277 +#define SGE 278 +#define SEQ 279 +#define SNE 280 +#define DEF 281 +#define IN 282 +#define FEXISTS 283 +#define DEXISTS 284 +#define IS 285 +#define LITERAL_TRUE 286 +#define LITERAL_FALSE 287 +#define NUNARY 288 - - - -/* Copy the first part of user declarations. */ #line 1 "compile.y" /** @file @@ -131,6 +44,8 @@ Copyright (c) 2001-2005 ArtLebedev Group (http://www.artlebedev.com) Author: Alexander Petrosyan (http://design.ru/paf) + + $Id: compile.tab.C,v 1.109 2005/12/06 08:19:12 paf Exp $ */ /** @@ -183,1044 +98,717 @@ static const VVoid vvoid; #undef POOL #define POOL (*PC.pool) #ifndef DOXYGEN - - -/* Enabling traces. */ -#ifndef YYDEBUG -# define YYDEBUG 0 +#ifndef YYSTYPE +#define YYSTYPE int #endif +#include -/* Enabling verbose error messages. */ -#ifdef YYERROR_VERBOSE -# undef YYERROR_VERBOSE -# define YYERROR_VERBOSE 1 -#else -# define YYERROR_VERBOSE 0 +#ifndef __cplusplus +#ifndef __STDC__ +#define const #endif - -#if ! defined (YYSTYPE) && ! defined (YYSTYPE_IS_DECLARED) -typedef int YYSTYPE; -# define yystype YYSTYPE /* obsolescent; will be withdrawn */ -# define YYSTYPE_IS_DECLARED 1 -# define YYSTYPE_IS_TRIVIAL 1 -#endif - - - -/* Copy the second part of user declarations. */ - - -/* Line 214 of yacc.c. */ -#line 215 "compile.tab.C" - -#if ! defined (yyoverflow) || YYERROR_VERBOSE - -# ifndef YYFREE -# define YYFREE free -# endif -# ifndef YYMALLOC -# define YYMALLOC malloc -# endif - -/* The parser invokes alloca or malloc; define the necessary symbols. */ - -# ifdef YYSTACK_USE_ALLOCA -# if YYSTACK_USE_ALLOCA -# define YYSTACK_ALLOC alloca -# endif -# else -# if defined (alloca) || defined (_ALLOCA_H) -# define YYSTACK_ALLOC alloca -# else -# ifdef __GNUC__ -# define YYSTACK_ALLOC __builtin_alloca -# endif -# endif -# endif - -# ifdef YYSTACK_ALLOC - /* Pacify GCC's `empty if-body' warning. */ -# define YYSTACK_FREE(Ptr) do { /* empty */; } while (0) -# else -# if defined (__STDC__) || defined (__cplusplus) -# include /* INFRINGES ON USER NAME SPACE */ -# define YYSIZE_T size_t -# endif -# define YYSTACK_ALLOC YYMALLOC -# define YYSTACK_FREE YYFREE -# endif -#endif /* ! defined (yyoverflow) || YYERROR_VERBOSE */ - - -#if (! defined (yyoverflow) \ - && (! defined (__cplusplus) \ - || (defined (YYSTYPE_IS_TRIVIAL) && YYSTYPE_IS_TRIVIAL))) - -/* A type that is properly aligned for any stack member. */ -union yyalloc -{ - short int yyss; - YYSTYPE yyvs; - }; - -/* The size of the maximum gap between one aligned stack and the next. */ -# define YYSTACK_GAP_MAXIMUM (sizeof (union yyalloc) - 1) - -/* The size of an array large to enough to hold all stacks, each with - N elements. */ -# define YYSTACK_BYTES(N) \ - ((N) * (sizeof (short int) + sizeof (YYSTYPE)) \ - + YYSTACK_GAP_MAXIMUM) - -/* Copy COUNT objects from FROM to TO. The source and destination do - not overlap. */ -# ifndef YYCOPY -# if defined (__GNUC__) && 1 < __GNUC__ -# define YYCOPY(To, From, Count) \ - __builtin_memcpy (To, From, (Count) * sizeof (*(From))) -# else -# define YYCOPY(To, From, Count) \ - do \ - { \ - register YYSIZE_T yyi; \ - for (yyi = 0; yyi < (Count); yyi++) \ - (To)[yyi] = (From)[yyi]; \ - } \ - while (0) -# endif -# endif - -/* Relocate STACK from its old location to the new one. The - local variables YYSIZE and YYSTACKSIZE give the old and new number of - elements in the stack, and YYPTR gives the new location of the - stack. Advance YYPTR to a properly aligned location for the next - stack. */ -# define YYSTACK_RELOCATE(Stack) \ - do \ - { \ - YYSIZE_T yynewbytes; \ - YYCOPY (&yyptr->Stack, Stack, yysize); \ - Stack = &yyptr->Stack; \ - yynewbytes = yystacksize * sizeof (*Stack) + YYSTACK_GAP_MAXIMUM; \ - yyptr += yynewbytes / sizeof (*yyptr); \ - } \ - while (0) - #endif -#if defined (__STDC__) || defined (__cplusplus) - typedef signed char yysigned_char; -#else - typedef short int yysigned_char; -#endif -/* YYFINAL -- State number of the termination state. */ -#define YYFINAL 51 -/* YYLAST -- Last index in YYTABLE. */ -#define YYLAST 470 - -/* YYNTOKENS -- Number of terminals. */ -#define YYNTOKENS 62 -/* YYNNTS -- Number of nonterminals. */ -#define YYNNTS 89 -/* YYNRULES -- Number of rules. */ -#define YYNRULES 172 -/* YYNRULES -- Number of states. */ -#define YYNSTATES 263 - -/* YYTRANSLATE(YYLEX) -- Bison symbol number corresponding to YYLEX. */ -#define YYUNDEFTOK 2 -#define YYMAXUTOK 289 - -#define YYTRANSLATE(YYX) \ - ((unsigned int) (YYX) <= YYMAXUTOK ? yytranslate[YYX] : YYUNDEFTOK) - -/* YYTRANSLATE[YYLEX] -- Bison symbol number corresponding to YYLEX. */ -static const unsigned char yytranslate[] = -{ - 0, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 48, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 46, 60, 2, 52, 43, 37, 61, - 56, 57, 40, 38, 2, 39, 55, 41, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 59, 51, - 34, 2, 35, 2, 47, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 49, 42, 50, 58, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 53, 36, 54, 45, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 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, 44 -}; -#if YYDEBUG -/* YYPRHS[YYN] -- Index of the first RHS symbol of rule number YYN in - YYRHS. */ -static const unsigned short int yyprhs[] = -{ - 0, 0, 3, 5, 7, 9, 12, 14, 16, 18, - 23, 25, 27, 29, 32, 35, 37, 39, 40, 49, - 51, 53, 57, 59, 61, 63, 67, 69, 71, 73, - 75, 77, 80, 82, 84, 86, 88, 90, 92, 95, - 98, 100, 104, 106, 108, 110, 113, 115, 118, 122, - 124, 126, 128, 130, 133, 136, 138, 140, 142, 143, - 144, 150, 154, 158, 160, 162, 164, 166, 168, 170, - 173, 175, 176, 177, 184, 186, 188, 191, 193, 195, - 197, 198, 199, 205, 209, 213, 215, 219, 221, 225, - 227, 231, 233, 235, 237, 239, 241, 243, 245, 248, - 250, 253, 256, 258, 260, 263, 265, 267, 269, 271, - 274, 277, 278, 279, 285, 287, 289, 292, 295, 297, - 299, 302, 305, 307, 309, 311, 313, 315, 317, 321, - 325, 329, 332, 335, 338, 341, 344, 347, 350, 353, - 357, 361, 365, 369, 373, 377, 381, 385, 389, 393, - 397, 401, 405, 409, 413, 417, 421, 425, 429, 433, - 437, 441, 445, 449, 453, 457, 461, 463, 465, 467, - 468, 470, 472 +#define YYFINAL 263 +#define YYFLAG -32768 +#define YYNTBASE 62 + +#define YYTRANSLATE(x) ((unsigned)(x) <= 288 ? yytranslate[x] : 150) + +static const char yytranslate[] = { 0, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 48, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 46, 60, 2, 52, 43, 37, 61, 56, + 57, 40, 38, 2, 39, 55, 41, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 59, 51, 34, + 2, 35, 2, 47, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 49, 42, 50, 58, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 53, 36, 54, 45, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 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, 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, 44 }; -/* YYRHS -- A `-1'-separated list of the rules' RHS. */ -static const short int yyrhs[] = -{ - 63, 0, -1, 65, -1, 64, -1, 66, -1, 64, - 66, -1, 79, -1, 67, -1, 72, -1, 47, 4, - 48, 68, -1, 150, -1, 69, -1, 70, -1, 69, - 70, -1, 71, 48, -1, 150, -1, 4, -1, -1, - 47, 4, 75, 74, 78, 48, 73, 79, -1, 150, - -1, 75, -1, 49, 76, 50, -1, 150, -1, 77, - -1, 4, -1, 77, 51, 4, -1, 150, -1, 4, - -1, 150, -1, 80, -1, 81, -1, 80, 81, -1, - 146, -1, 82, -1, 83, -1, 91, -1, 106, -1, - 84, -1, 52, 85, -1, 87, 3, -1, 86, -1, - 53, 87, 54, -1, 88, -1, 89, -1, 90, -1, - 139, 90, -1, 129, -1, 126, 129, -1, 52, 92, - 96, -1, 93, -1, 94, -1, 95, -1, 125, -1, - 55, 125, -1, 139, 125, -1, 97, -1, 100, -1, - 101, -1, -1, -1, 49, 98, 102, 99, 50, -1, - 56, 142, 57, -1, 53, 79, 54, -1, 147, -1, - 4, -1, 103, -1, 104, -1, 105, -1, 82, -1, - 81, 80, -1, 107, -1, -1, -1, 58, 108, 110, - 109, 111, 3, -1, 87, -1, 112, -1, 111, 112, - -1, 113, -1, 116, -1, 117, -1, -1, -1, 49, - 114, 118, 115, 50, -1, 56, 119, 57, -1, 53, - 120, 54, -1, 121, -1, 118, 51, 121, -1, 122, - -1, 119, 51, 122, -1, 123, -1, 120, 51, 123, - -1, 124, -1, 142, -1, 79, -1, 147, -1, 4, - -1, 103, -1, 130, -1, 126, 130, -1, 127, -1, - 126, 127, -1, 128, 55, -1, 130, -1, 130, -1, - 4, 5, -1, 4, -1, 131, -1, 132, -1, 133, - -1, 52, 136, -1, 4, 137, -1, -1, -1, 49, - 134, 80, 135, 50, -1, 4, -1, 138, -1, 137, - 138, -1, 52, 136, -1, 140, -1, 141, -1, 4, - 59, -1, 140, 59, -1, 143, -1, 144, -1, 148, - -1, 149, -1, 84, -1, 107, -1, 60, 145, 60, - -1, 61, 145, 61, -1, 56, 143, 57, -1, 39, - 143, -1, 38, 143, -1, 45, 143, -1, 46, 143, - -1, 27, 143, -1, 28, 143, -1, 29, 143, -1, - 30, 143, -1, 143, 39, 143, -1, 143, 38, 143, - -1, 143, 40, 143, -1, 143, 41, 143, -1, 143, - 43, 143, -1, 143, 42, 143, -1, 143, 19, 143, - -1, 143, 20, 143, -1, 143, 37, 143, -1, 143, - 36, 143, -1, 143, 14, 143, -1, 143, 11, 143, - -1, 143, 12, 143, -1, 143, 13, 143, -1, 143, - 34, 143, -1, 143, 35, 143, -1, 143, 15, 143, - -1, 143, 16, 143, -1, 143, 17, 143, -1, 143, - 18, 143, -1, 143, 21, 143, -1, 143, 22, 143, - -1, 143, 23, 143, -1, 143, 24, 143, -1, 143, - 25, 143, -1, 143, 26, 143, -1, 143, 31, 143, - -1, 4, -1, 79, -1, 4, -1, -1, 32, -1, - 33, -1, -1 +#if YYDEBUG != 0 +static const short yyprhs[] = { 0, + 0, 2, 4, 6, 9, 11, 13, 15, 20, 22, + 24, 26, 29, 32, 34, 36, 37, 46, 48, 50, + 54, 56, 58, 60, 64, 66, 68, 70, 72, 74, + 77, 79, 81, 83, 85, 87, 89, 92, 95, 97, + 101, 103, 105, 107, 110, 112, 115, 119, 121, 123, + 125, 127, 130, 133, 135, 137, 139, 140, 141, 147, + 151, 155, 157, 159, 161, 163, 165, 167, 170, 172, + 173, 174, 181, 183, 185, 188, 190, 192, 194, 195, + 196, 202, 206, 210, 212, 216, 218, 222, 224, 228, + 230, 232, 234, 236, 238, 240, 242, 245, 247, 250, + 253, 255, 257, 260, 262, 264, 266, 268, 271, 274, + 275, 276, 282, 284, 286, 289, 292, 294, 296, 299, + 302, 304, 306, 308, 310, 312, 314, 318, 322, 326, + 329, 332, 335, 338, 341, 344, 347, 350, 354, 358, + 362, 366, 370, 374, 378, 382, 386, 390, 394, 398, + 402, 406, 410, 414, 418, 422, 426, 430, 434, 438, + 442, 446, 450, 454, 458, 460, 462, 464, 465, 467, + 469 }; -/* YYRLINE[YYN] -- source line where rule number YYN was defined. */ -static const unsigned short int yyrline[] = -{ - 0, 126, 126, 133, 135, 135, 136, 138, 138, 140, - 212, 212, 213, 213, 214, 215, 215, 217, 217, 257, - 257, 258, 259, 259, 260, 260, 262, 262, 266, 266, - 268, 268, 269, 269, 270, 270, 270, 274, 281, 282, - 282, 283, 285, 286, 287, 309, 310, 310, 314, 319, - 320, 321, 322, 339, 344, 347, 348, 349, 351, 354, - 351, 362, 370, 377, 378, 379, 381, 387, 388, 388, - 392, 398, 401, 398, 417, 419, 419, 421, 422, 423, - 425, 428, 425, 431, 432, 434, 435, 438, 439, 442, - 443, 445, 449, 464, 469, 470, 471, 476, 476, 478, - 478, 479, 480, 488, 493, 496, 497, 498, 499, 501, - 505, 514, 517, 514, 525, 530, 530, 531, 537, 538, - 540, 552, 564, 566, 567, 568, 569, 570, 571, 572, - 573, 575, 576, 577, 578, 579, 580, 581, 582, 584, - 585, 586, 587, 588, 589, 590, 591, 592, 593, 594, - 595, 596, 597, 598, 599, 600, 601, 602, 603, 604, - 605, 606, 607, 608, 609, 610, 613, 618, 627, 632, - 633, 634, 636 +static const short yyrhs[] = { 64, + 0, 63, 0, 65, 0, 63, 65, 0, 78, 0, + 66, 0, 71, 0, 47, 4, 48, 67, 0, 149, + 0, 68, 0, 69, 0, 68, 69, 0, 70, 48, + 0, 149, 0, 4, 0, 0, 47, 4, 74, 73, + 77, 48, 72, 78, 0, 149, 0, 74, 0, 49, + 75, 50, 0, 149, 0, 76, 0, 4, 0, 76, + 51, 4, 0, 149, 0, 4, 0, 149, 0, 79, + 0, 80, 0, 79, 80, 0, 145, 0, 81, 0, + 82, 0, 90, 0, 105, 0, 83, 0, 52, 84, + 0, 86, 3, 0, 85, 0, 53, 86, 54, 0, + 87, 0, 88, 0, 89, 0, 138, 89, 0, 128, + 0, 125, 128, 0, 52, 91, 95, 0, 92, 0, + 93, 0, 94, 0, 124, 0, 55, 124, 0, 138, + 124, 0, 96, 0, 99, 0, 100, 0, 0, 0, + 49, 97, 101, 98, 50, 0, 56, 141, 57, 0, + 53, 78, 54, 0, 146, 0, 4, 0, 102, 0, + 103, 0, 104, 0, 81, 0, 80, 79, 0, 106, + 0, 0, 0, 58, 107, 109, 108, 110, 3, 0, + 86, 0, 111, 0, 110, 111, 0, 112, 0, 115, + 0, 116, 0, 0, 0, 49, 113, 117, 114, 50, + 0, 56, 118, 57, 0, 53, 119, 54, 0, 120, + 0, 117, 51, 120, 0, 121, 0, 118, 51, 121, + 0, 122, 0, 119, 51, 122, 0, 123, 0, 141, + 0, 78, 0, 146, 0, 4, 0, 102, 0, 129, + 0, 125, 129, 0, 126, 0, 125, 126, 0, 127, + 55, 0, 129, 0, 129, 0, 4, 5, 0, 4, + 0, 130, 0, 131, 0, 132, 0, 52, 135, 0, + 4, 136, 0, 0, 0, 49, 133, 79, 134, 50, + 0, 4, 0, 137, 0, 136, 137, 0, 52, 135, + 0, 139, 0, 140, 0, 4, 59, 0, 139, 59, + 0, 142, 0, 143, 0, 147, 0, 148, 0, 83, + 0, 106, 0, 60, 144, 60, 0, 61, 144, 61, + 0, 56, 142, 57, 0, 39, 142, 0, 38, 142, + 0, 45, 142, 0, 46, 142, 0, 27, 142, 0, + 28, 142, 0, 29, 142, 0, 30, 142, 0, 142, + 39, 142, 0, 142, 38, 142, 0, 142, 40, 142, + 0, 142, 41, 142, 0, 142, 43, 142, 0, 142, + 42, 142, 0, 142, 19, 142, 0, 142, 20, 142, + 0, 142, 37, 142, 0, 142, 36, 142, 0, 142, + 14, 142, 0, 142, 11, 142, 0, 142, 12, 142, + 0, 142, 13, 142, 0, 142, 34, 142, 0, 142, + 35, 142, 0, 142, 15, 142, 0, 142, 16, 142, + 0, 142, 17, 142, 0, 142, 18, 142, 0, 142, + 21, 142, 0, 142, 22, 142, 0, 142, 23, 142, + 0, 142, 24, 142, 0, 142, 25, 142, 0, 142, + 26, 142, 0, 142, 31, 142, 0, 4, 0, 78, + 0, 4, 0, 0, 32, 0, 33, 0, 0 }; + #endif -#if YYDEBUG || YYERROR_VERBOSE -/* YYTNME[SYMBOL-NUM] -- String name of the symbol SYMBOL-NUM. - First, the terminals, then, starting at YYNTOKENS, nonterminals. */ -static const char *const yytname[] = -{ - "$end", "error", "$undefined", "EON", "STRING", "BOGUS", - "BAD_STRING_COMPARISON_OPERATOR", "BAD_HEX_LITERAL", - "BAD_METHOD_DECL_START", "BAD_METHOD_PARAMETER_NAME_CHARACTER", - "BAD_NONWHITESPACE_CHARACTER_IN_EXPLICIT_RESULT_MODE", "\"&&\"", - "\"||\"", "\"!||\"", "\"!|\"", "\"<=\"", "\">=\"", "\"==\"", "\"!=\"", - "\"<<\"", "\">>\"", "\"lt\"", "\"gt\"", "\"le\"", "\"ge\"", "\"eq\"", - "\"ne\"", "\"def\"", "\"in\"", "\"-f\"", "\"-d\"", "\"is\"", "\"true\"", - "\"false\"", "'<'", "'>'", "'|'", "'&'", "'+'", "'-'", "'*'", "'/'", - "'\\\\'", "'%'", "NUNARY", "'~'", "'!'", "'@'", "'\\n'", "'['", "']'", - "';'", "'$'", "'{'", "'}'", "'.'", "'('", "')'", "'^'", "':'", "'\"'", - "'''", "$accept", "all", "methods", "one_big_piece", "method", - "control_method", "maybe_control_strings", "control_strings", - "control_string", "maybe_string", "code_method", "@1", - "maybe_bracketed_strings", "bracketed_maybe_strings", "maybe_strings", - "strings", "maybe_comment", "maybe_codes", "codes", "code", "action", - "get", "get_value", "get_name_value", "name_in_curly_rdive", - "name_without_curly_rdive", "name_without_curly_rdive_read", - "name_without_curly_rdive_class", "name_without_curly_rdive_code", "put", - "name_expr_wdive", "name_expr_wdive_root", "name_expr_wdive_write", - "name_expr_wdive_class", "construct", "construct_square", "@2", "@3", - "construct_round", "construct_curly", "any_constructor_code_value", - "constructor_code_value", "constructor_code", - "codes__excluding_sole_str_literal", "call", "call_value", "@4", "@5", - "call_name", "store_params", "store_param", "store_square_param", "@6", - "@7", "store_round_param", "store_curly_param", "store_code_param_parts", - "store_expr_param_parts", "store_curly_param_parts", - "store_code_param_part", "store_expr_param_part", - "store_curly_param_part", "code_param_value", "name_expr_dive_code", - "name_path", "name_step", "name_advance1", "name_advance2", - "name_expr_value", "name_expr_subvar_value", - "name_expr_with_subvar_value", "name_square_code_value", "@8", "@9", - "subvar_ref_name_rdive", "subvar_get_writes", "subvar__get_write", - "class_prefix", "class_static_prefix", "class_constructor_prefix", - "expr_value", "expr", "double_or_STRING", "string_inside_quotes_value", - "write_string", "void_value", "true_value", "false_value", "empty", 0 +#if YYDEBUG != 0 +static const short yyrline[] = { 0, + 127, 135, 137, 137, 138, 140, 140, 142, 214, 214, + 215, 215, 216, 217, 217, 219, 254, 259, 259, 260, + 261, 261, 262, 262, 264, 264, 268, 268, 270, 270, + 271, 271, 272, 272, 272, 276, 283, 284, 284, 285, + 286, 288, 289, 311, 312, 312, 316, 320, 322, 323, + 324, 341, 346, 348, 350, 351, 353, 356, 358, 364, + 372, 378, 380, 381, 383, 389, 390, 390, 394, 400, + 403, 406, 419, 421, 421, 422, 424, 425, 427, 430, + 432, 433, 434, 435, 437, 439, 441, 443, 445, 447, + 451, 466, 470, 472, 473, 478, 478, 480, 480, 481, + 482, 490, 495, 497, 499, 500, 501, 503, 507, 516, + 519, 521, 527, 532, 532, 533, 538, 540, 542, 554, + 566, 567, 569, 570, 571, 572, 573, 574, 575, 577, + 578, 579, 580, 581, 582, 583, 584, 586, 587, 588, + 589, 590, 591, 592, 593, 594, 595, 596, 597, 598, + 599, 600, 601, 602, 603, 604, 605, 606, 607, 608, + 609, 610, 611, 612, 615, 620, 629, 634, 635, 636, + 638 }; #endif -# ifdef YYPRINT -/* YYTOKNUM[YYLEX-NUM] -- Internal token number corresponding to - token YYLEX-NUM. */ -static const unsigned short int yytoknum[] = -{ - 0, 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, 60, 62, 124, 38, 43, 45, - 42, 47, 92, 37, 289, 126, 33, 64, 10, 91, - 93, 59, 36, 123, 125, 46, 40, 41, 94, 58, - 34, 39 -}; -# endif -/* YYR1[YYN] -- Symbol number of symbol that rule YYN derives. */ -static const unsigned char yyr1[] = -{ - 0, 62, 63, 63, 64, 64, 65, 66, 66, 67, - 68, 68, 69, 69, 70, 71, 71, 73, 72, 74, - 74, 75, 76, 76, 77, 77, 78, 78, 79, 79, - 80, 80, 81, 81, 82, 82, 82, 83, 84, 85, - 85, 86, 87, 87, 88, 89, 90, 90, 91, 92, - 92, 92, 93, 94, 95, 96, 96, 96, 98, 99, - 97, 100, 101, 102, 102, 102, 103, 104, 105, 105, - 106, 108, 109, 107, 110, 111, 111, 112, 112, 112, - 114, 115, 113, 116, 117, 118, 118, 119, 119, 120, - 120, 121, 122, 123, 124, 124, 124, 125, 125, 126, - 126, 127, 128, 129, 129, 130, 130, 130, 130, 131, - 132, 134, 135, 133, 136, 137, 137, 138, 139, 139, - 140, 141, 142, 143, 143, 143, 143, 143, 143, 143, - 143, 143, 143, 143, 143, 143, 143, 143, 143, 143, - 143, 143, 143, 143, 143, 143, 143, 143, 143, 143, - 143, 143, 143, 143, 143, 143, 143, 143, 143, 143, - 143, 143, 143, 143, 143, 143, 144, 145, 146, 147, - 148, 149, 150 +#if YYDEBUG != 0 || defined (YYERROR_VERBOSE) + +static const char * const yytname[] = { "$","error","$undefined.","EON","STRING", +"BOGUS","BAD_STRING_COMPARISON_OPERATOR","BAD_HEX_LITERAL","BAD_METHOD_DECL_START", +"BAD_METHOD_PARAMETER_NAME_CHARACTER","BAD_NONWHITESPACE_CHARACTER_IN_EXPLICIT_RESULT_MODE", +"\"&&\"","\"||\"","\"!||\"","\"!|\"","\"<=\"","\">=\"","\"==\"","\"!=\"","\"<<\"", +"\">>\"","\"lt\"","\"gt\"","\"le\"","\"ge\"","\"eq\"","\"ne\"","\"def\"","\"in\"", +"\"-f\"","\"-d\"","\"is\"","\"true\"","\"false\"","'<'","'>'","'|'","'&'","'+'", +"'-'","'*'","'/'","'\\\\'","'%'","NUNARY","'~'","'!'","'@'","'\\n'","'['","']'", +"';'","'$'","'{'","'}'","'.'","'('","')'","'^'","':'","'\\\"'","'\\''","all", +"methods","one_big_piece","method","control_method","maybe_control_strings", +"control_strings","control_string","maybe_string","code_method","@1","maybe_bracketed_strings", +"bracketed_maybe_strings","maybe_strings","strings","maybe_comment","maybe_codes", +"codes","code","action","get","get_value","get_name_value","name_in_curly_rdive", +"name_without_curly_rdive","name_without_curly_rdive_read","name_without_curly_rdive_class", +"name_without_curly_rdive_code","put","name_expr_wdive","name_expr_wdive_root", +"name_expr_wdive_write","name_expr_wdive_class","construct","construct_square", +"@2","@3","construct_round","construct_curly","any_constructor_code_value","constructor_code_value", +"constructor_code","codes__excluding_sole_str_literal","call","call_value","@4", +"@5","call_name","store_params","store_param","store_square_param","@6","@7", +"store_round_param","store_curly_param","store_code_param_parts","store_expr_param_parts", +"store_curly_param_parts","store_code_param_part","store_expr_param_part","store_curly_param_part", +"code_param_value","name_expr_dive_code","name_path","name_step","name_advance1", +"name_advance2","name_expr_value","name_expr_subvar_value","name_expr_with_subvar_value", +"name_square_code_value","@8","@9","subvar_ref_name_rdive","subvar_get_writes", +"subvar__get_write","class_prefix","class_static_prefix","class_constructor_prefix", +"expr_value","expr","double_or_STRING","string_inside_quotes_value","write_string", +"void_value","true_value","false_value","empty", NULL }; +#endif -/* YYR2[YYN] -- Number of symbols composing right hand side of rule YYN. */ -static const unsigned char yyr2[] = -{ - 0, 2, 1, 1, 1, 2, 1, 1, 1, 4, - 1, 1, 1, 2, 2, 1, 1, 0, 8, 1, - 1, 3, 1, 1, 1, 3, 1, 1, 1, 1, - 1, 2, 1, 1, 1, 1, 1, 1, 2, 2, - 1, 3, 1, 1, 1, 2, 1, 2, 3, 1, - 1, 1, 1, 2, 2, 1, 1, 1, 0, 0, - 5, 3, 3, 1, 1, 1, 1, 1, 1, 2, - 1, 0, 0, 6, 1, 1, 2, 1, 1, 1, - 0, 0, 5, 3, 3, 1, 3, 1, 3, 1, - 3, 1, 1, 1, 1, 1, 1, 1, 2, 1, - 2, 2, 1, 1, 2, 1, 1, 1, 1, 2, - 2, 0, 0, 5, 1, 1, 2, 2, 1, 1, - 2, 2, 1, 1, 1, 1, 1, 1, 3, 3, - 3, 2, 2, 2, 2, 2, 2, 2, 2, 3, - 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, - 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, - 3, 3, 3, 3, 3, 3, 1, 1, 1, 0, - 1, 1, 0 +static const short yyr1[] = { 0, + 62, 62, 63, 63, 64, 65, 65, 66, 67, 67, + 68, 68, 69, 70, 70, 72, 71, 73, 73, 74, + 75, 75, 76, 76, 77, 77, 78, 78, 79, 79, + 80, 80, 81, 81, 81, 82, 83, 84, 84, 85, + 86, 86, 87, 88, 89, 89, 90, 91, 91, 91, + 92, 93, 94, 95, 95, 95, 97, 98, 96, 99, + 100, 101, 101, 101, 102, 103, 104, 104, 105, 107, + 108, 106, 109, 110, 110, 111, 111, 111, 113, 114, + 112, 115, 116, 117, 117, 118, 118, 119, 119, 120, + 121, 122, 123, 123, 123, 124, 124, 125, 125, 126, + 127, 128, 128, 129, 129, 129, 129, 130, 131, 133, + 134, 132, 135, 136, 136, 137, 138, 138, 139, 140, + 141, 142, 142, 142, 142, 142, 142, 142, 142, 142, + 142, 142, 142, 142, 142, 142, 142, 142, 142, 142, + 142, 142, 142, 142, 142, 142, 142, 142, 142, 142, + 142, 142, 142, 142, 142, 142, 142, 142, 142, 142, + 142, 142, 142, 142, 143, 144, 145, 146, 147, 148, + 149 }; -/* YYDEFACT[STATE-NAME] -- Default rule to reduce with in state - STATE-NUM when YYTABLE doesn't specify something else to do. Zero - means the default is an error. */ -static const unsigned char yydefact[] = -{ - 172, 168, 0, 0, 71, 0, 3, 2, 4, 7, - 8, 6, 29, 30, 33, 34, 37, 35, 36, 70, - 32, 28, 0, 105, 111, 0, 0, 0, 38, 40, - 0, 42, 43, 44, 0, 49, 50, 51, 52, 0, - 99, 0, 46, 97, 106, 107, 108, 0, 118, 119, - 0, 1, 5, 31, 172, 172, 172, 104, 0, 120, - 110, 115, 0, 114, 109, 0, 0, 103, 0, 105, - 53, 0, 97, 39, 58, 172, 0, 48, 55, 56, - 57, 105, 100, 47, 98, 101, 45, 54, 121, 74, - 72, 16, 9, 11, 12, 0, 10, 24, 0, 23, - 22, 172, 20, 19, 117, 116, 112, 41, 98, 169, - 0, 166, 0, 0, 0, 0, 170, 171, 0, 0, - 0, 0, 0, 0, 172, 172, 126, 127, 0, 122, - 123, 124, 125, 0, 13, 15, 14, 21, 0, 27, - 0, 26, 0, 168, 0, 33, 59, 65, 66, 67, - 63, 62, 135, 136, 137, 138, 132, 131, 133, 134, - 0, 167, 0, 0, 61, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 80, 172, 0, 0, 75, 77, 78, 79, - 25, 17, 113, 69, 0, 130, 128, 129, 150, 151, - 152, 149, 155, 156, 157, 158, 145, 146, 159, 160, - 161, 162, 163, 164, 165, 153, 154, 148, 147, 140, - 139, 141, 142, 144, 143, 169, 93, 0, 89, 0, - 87, 92, 73, 76, 172, 60, 168, 96, 81, 85, - 91, 94, 172, 84, 0, 83, 18, 169, 0, 90, - 88, 86, 82 +static const short yyr2[] = { 0, + 1, 1, 1, 2, 1, 1, 1, 4, 1, 1, + 1, 2, 2, 1, 1, 0, 8, 1, 1, 3, + 1, 1, 1, 3, 1, 1, 1, 1, 1, 2, + 1, 1, 1, 1, 1, 1, 2, 2, 1, 3, + 1, 1, 1, 2, 1, 2, 3, 1, 1, 1, + 1, 2, 2, 1, 1, 1, 0, 0, 5, 3, + 3, 1, 1, 1, 1, 1, 1, 2, 1, 0, + 0, 6, 1, 1, 2, 1, 1, 1, 0, 0, + 5, 3, 3, 1, 3, 1, 3, 1, 3, 1, + 1, 1, 1, 1, 1, 1, 2, 1, 2, 2, + 1, 1, 2, 1, 1, 1, 1, 2, 2, 0, + 0, 5, 1, 1, 2, 2, 1, 1, 2, 2, + 1, 1, 1, 1, 1, 1, 3, 3, 3, 2, + 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, + 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, + 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, + 3, 3, 3, 3, 1, 1, 1, 0, 1, 1, + 0 }; -/* YYDEFGOTO[NTERM-NUM]. */ -static const short int yydefgoto[] = -{ - -1, 5, 6, 7, 8, 9, 92, 93, 94, 95, - 10, 244, 101, 56, 98, 99, 140, 161, 12, 13, - 14, 15, 126, 28, 29, 30, 31, 32, 33, 17, - 34, 35, 36, 37, 77, 78, 109, 204, 79, 80, - 146, 247, 148, 149, 18, 127, 50, 133, 90, 195, - 196, 197, 235, 258, 198, 199, 248, 239, 237, 249, - 240, 238, 250, 38, 66, 40, 41, 42, 67, 44, - 45, 46, 62, 142, 64, 60, 61, 68, 48, 49, - 241, 129, 130, 162, 20, 251, 131, 132, 21 +static const short yydefact[] = { 171, + 167, 0, 0, 70, 2, 1, 3, 6, 7, 5, + 28, 29, 32, 33, 36, 34, 35, 69, 31, 27, + 0, 104, 110, 0, 0, 0, 37, 39, 0, 41, + 42, 43, 0, 48, 49, 50, 51, 0, 98, 0, + 45, 96, 105, 106, 107, 0, 117, 118, 0, 4, + 30, 171, 171, 171, 103, 0, 119, 109, 114, 0, + 113, 108, 0, 0, 102, 0, 104, 52, 0, 96, + 38, 57, 171, 0, 47, 54, 55, 56, 104, 99, + 46, 97, 100, 44, 53, 120, 73, 71, 15, 8, + 10, 11, 0, 9, 23, 0, 22, 21, 171, 19, + 18, 116, 115, 111, 40, 97, 168, 0, 165, 0, + 0, 0, 0, 169, 170, 0, 0, 0, 0, 0, + 0, 171, 171, 125, 126, 0, 121, 122, 123, 124, + 0, 12, 14, 13, 20, 0, 26, 0, 25, 0, + 167, 0, 32, 58, 64, 65, 66, 62, 61, 134, + 135, 136, 137, 131, 130, 132, 133, 0, 166, 0, + 0, 60, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 79, + 171, 0, 0, 74, 76, 77, 78, 24, 16, 112, + 68, 0, 129, 127, 128, 149, 150, 151, 148, 154, + 155, 156, 157, 144, 145, 158, 159, 160, 161, 162, + 163, 164, 152, 153, 147, 146, 139, 138, 140, 141, + 143, 142, 168, 92, 0, 88, 0, 86, 91, 72, + 75, 171, 59, 167, 95, 80, 84, 90, 93, 171, + 83, 0, 82, 17, 168, 0, 89, 87, 85, 81, + 0, 0, 0 }; -/* YYPACT[STATE-NUM] -- Index in YYTABLE of the portion describing - STATE-NUM. */ -#define YYPACT_NINF -107 -static const short int yypact[] = -{ - 14, -107, 13, 45, -107, 28, -15, -107, -107, -107, - -107, -107, 21, -107, -107, -107, -107, -107, -107, -107, - -107, -107, 73, 19, -107, 50, 6, 44, -107, -107, - 87, -107, -107, -107, -34, -107, -107, -107, -107, 65, - -107, 48, -107, 5, -107, -107, -107, 65, 24, -107, - 6, -107, -107, -107, 88, 109, 74, -107, 50, -107, - 76, -107, 21, -107, -107, 86, 65, 101, 65, 76, - -107, 44, 101, -107, -107, 21, 7, -107, -107, -107, - -107, 18, -107, -107, 5, -107, -107, -107, -107, -107, - -107, -107, -107, 9, -107, 94, 99, -107, 93, 112, - -107, 146, -107, -107, -107, -107, 21, -107, 101, 29, - 110, -107, 7, 7, 7, 7, -107, -107, 7, 7, - 7, 7, 52, 7, 21, 21, -107, -107, 113, 323, - -107, -107, -107, 92, -107, -107, -107, -107, 165, -107, - 144, -107, 147, 149, 21, 80, -107, -107, -107, -107, - -107, -107, 96, 96, 96, 96, -107, -107, -107, -107, - 276, -107, 138, 139, -107, 7, 7, 7, 7, 7, - 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, - 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, - 7, 7, -107, 21, 7, 35, -107, -107, -107, -107, - -107, -107, -107, 21, 154, -107, -107, -107, 419, 389, - 356, 284, 135, 135, 148, 148, 191, 191, 135, 135, - 135, 135, 148, 148, 96, 135, 135, 182, 427, 140, - 140, -107, -107, -107, -107, 37, -107, 31, -107, -30, - -107, -107, -107, -107, 21, -107, 108, -107, 155, -107, - -107, -107, 21, -107, 7, -107, -107, 37, 161, -107, - -107, -107, -107 +static const short yydefgoto[] = { 261, + 5, 6, 7, 8, 90, 91, 92, 93, 9, 242, + 99, 54, 96, 97, 138, 159, 11, 12, 13, 14, + 124, 27, 28, 29, 30, 31, 32, 16, 33, 34, + 35, 36, 75, 76, 107, 202, 77, 78, 144, 245, + 146, 147, 17, 125, 49, 131, 88, 193, 194, 195, + 233, 256, 196, 197, 246, 237, 235, 247, 238, 236, + 248, 37, 64, 39, 40, 41, 65, 43, 44, 45, + 60, 140, 62, 58, 59, 66, 47, 48, 239, 127, + 128, 160, 19, 249, 129, 130, 20 }; -/* YYPGOTO[NTERM-NUM]. */ -static const short int yypgoto[] = -{ - -107, -107, -107, -107, 206, -107, -107, -107, 124, -107, - -107, -107, -107, 170, -107, -107, -107, 1, -58, -7, - -106, -107, 0, -107, -107, -6, -107, -107, -21, -107, - -107, -107, -107, -107, -107, -107, -107, -107, -107, -107, - -107, 118, -107, -107, -107, 2, -107, -107, -107, -107, - 43, -107, -107, -107, -107, -107, -107, -107, -107, -17, - -13, -16, -107, -18, 4, 41, -107, -23, 3, -107, - -107, -107, -107, -107, 181, -107, 183, 239, -107, -107, - 171, 95, -107, 123, -107, 142, -107, -107, 64 +static const short yypact[] = { 6, +-32768, 23, 50,-32768, -17,-32768,-32768,-32768,-32768,-32768, + 18,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768, + -31, 19,-32768, 43, 42, 44,-32768,-32768, 52,-32768, +-32768,-32768, -33,-32768,-32768,-32768,-32768, 65,-32768, 22, +-32768, 4,-32768,-32768,-32768, 65, 24,-32768, 42,-32768, +-32768, 97, 104, 64,-32768, 43,-32768, 78,-32768, 18, +-32768,-32768, 77, 65, 88, 65, 78,-32768, 44, 88, +-32768,-32768, 18, 5,-32768,-32768,-32768,-32768, 16,-32768, +-32768, 4,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768, + 8,-32768, 85, 86,-32768, 100, 117,-32768, 166,-32768, +-32768,-32768,-32768, 18,-32768, 88, 27, 119,-32768, 5, + 5, 5, 5,-32768,-32768, 5, 5, 5, 5, 63, + 5, 18, 18,-32768,-32768, 114, 274,-32768,-32768,-32768, + 79,-32768,-32768,-32768,-32768, 170,-32768, 137,-32768, 136, + 138, 18, 60,-32768,-32768,-32768,-32768,-32768,-32768, 443, + 443, 443, 443,-32768,-32768,-32768,-32768, 141,-32768, 127, + 128,-32768, 5, 5, 5, 5, 5, 5, 5, 5, + 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, + 5, 5, 5, 5, 5, 5, 5, 5, 5,-32768, + 18, 5, 39,-32768,-32768,-32768,-32768,-32768,-32768,-32768, + 18, 140,-32768,-32768,-32768, 370, 340, 307, 428, 400, + 400, 413, 413, 98, 98, 400, 400, 400, 400, 413, + 413, 443, 400, 400, 180, 453, 105, 105,-32768,-32768, +-32768,-32768, 32,-32768, 35,-32768, -32,-32768,-32768,-32768, +-32768, 18,-32768, 70,-32768, 144,-32768,-32768,-32768, 18, +-32768, 5,-32768,-32768, 32, 146,-32768,-32768,-32768,-32768, + 197, 202,-32768 }; -/* YYTABLE[YYPACT[STATE-NUM]]. What to do in state STATE-NUM. If - positive, shift that token. If negative, reduce the rule which - number is the opposite. If zero, do what YYDEFACT says. - If YYTABLE_NINF, syntax error. */ -#define YYTABLE_NINF -173 -static const short int yytable[] = -{ - 16, 11, 19, 145, 106, 53, 43, 39, -103, 70, - 23, 111, 16, 91, 19, 74, 83, 22, 1, 75, - 65, 254, 76, 57, 57, 1, 86, 255, 51, 87, - 72, 71, 2, 143, 112, 113, 114, 115, 242, 116, - 117, 246, 84, 83, 89, 118, 119, 86, 69, 23, - 43, 39, 120, 121, 63, 24, 23, -172, 25, 122, - -102, 2, 16, 123, 19, 4, 3, 124, 125, 81, - 58, 58, 4, 3, 108, 16, 110, 19, 59, 4, - 82, 3, 252, 88, 192, 253, 203, 4, 193, 3, - 73, 194, 91, 24, 24, 4, 25, 25, 26, 53, - 27, 24, 144, 85, 25, 26, 16, 82, 19, 16, - 168, 19, 82, 97, 24, 173, 174, 25, 96, 100, - 103, 54, 55, 55, 16, 16, 19, 19, 58, 145, - -68, -68, 184, 185, 186, 187, 188, 189, 190, 191, - 107, 192, 136, 137, 16, 193, 19, -15, 194, 168, - 139, 145, 171, 172, 173, 174, -102, 135, -95, -95, - 179, 180, 168, 138, 151, 141, 181, 173, 174, 200, - 164, 184, 185, 186, 187, 188, 189, 190, 191, 181, - 188, 189, 190, 191, 184, 185, 186, 187, 188, 189, - 190, 191, 201, 16, 236, 19, 53, 202, 206, -64, - 207, 173, 174, 16, 245, 19, 257, 152, 153, 154, - 155, 262, 52, 156, 157, 158, 159, 134, 160, 185, - 186, 187, 188, 189, 190, 191, 102, 147, 144, 186, - 187, 188, 189, 190, 191, 16, 259, 19, 243, 104, - 261, 260, 47, 105, 16, 256, 19, 128, 163, 0, - 144, 150, 16, 236, 19, 0, 0, 16, 0, 19, - 208, 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, 165, 166, 167, - 168, 169, 170, 171, 172, 173, 174, 175, 176, 177, - 178, 179, 180, 173, 174, 0, 0, 181, 0, 0, - 182, 183, 184, 185, 186, 187, 188, 189, 190, 191, - 184, 185, 186, 187, 188, 189, 190, 191, 0, 0, - 0, 0, 0, 205, 165, 166, 167, 168, 169, 170, - 171, 172, 173, 174, 175, 176, 177, 178, 179, 180, - 0, 0, 0, 0, 181, 0, 0, 182, 183, 184, - 185, 186, 187, 188, 189, 190, 191, 165, 166, 0, - 168, 169, 170, 171, 172, 173, 174, 175, 176, 177, - 178, 179, 180, 0, 0, 0, 0, 181, 0, 0, - 182, 183, 184, 185, 186, 187, 188, 189, 190, 191, - 165, 0, 0, 168, 169, 170, 171, 172, 173, 174, - 175, 176, 177, 178, 179, 180, 0, 0, 0, 0, - 181, 0, 0, 182, 183, 184, 185, 186, 187, 188, - 189, 190, 191, 168, 169, 170, 171, 172, 173, 174, - 175, 176, 177, 178, 179, 180, 173, 174, 0, 0, - 181, 0, 0, 182, 183, 184, 185, 186, 187, 188, - 189, 190, 191, 0, 0, 186, 187, 188, 189, 190, - 191 +static const short yypgoto[] = {-32768, +-32768,-32768, 199,-32768,-32768,-32768, 118,-32768,-32768,-32768, +-32768, 156,-32768,-32768,-32768, 1, -55, -7, -104,-32768, + 0,-32768,-32768, -10,-32768,-32768, -38,-32768,-32768,-32768, +-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768, 108, +-32768,-32768,-32768, 2,-32768,-32768,-32768,-32768, 31,-32768, +-32768,-32768,-32768,-32768,-32768,-32768,-32768, -30, -25, -22, +-32768, 72, 123, -24,-32768, -12, 3,-32768,-32768,-32768, +-32768,-32768, 173,-32768, 172, 228,-32768,-32768, 158, 95, +-32768, 111,-32768, 129,-32768,-32768, 28 }; -static const short int yycheck[] = -{ - 0, 0, 0, 109, 62, 12, 3, 3, 3, 27, - 4, 4, 12, 4, 12, 49, 39, 4, 4, 53, - 26, 51, 56, 5, 5, 4, 47, 57, 0, 47, - 27, 27, 47, 4, 27, 28, 29, 30, 3, 32, - 33, 4, 39, 66, 50, 38, 39, 68, 4, 4, - 47, 47, 45, 46, 4, 49, 4, 48, 52, 52, - 55, 47, 62, 56, 62, 58, 52, 60, 61, 4, - 52, 52, 58, 52, 71, 75, 75, 75, 59, 58, - 39, 52, 51, 59, 49, 54, 144, 58, 53, 52, - 3, 56, 4, 49, 49, 58, 52, 52, 53, 106, - 55, 49, 109, 55, 52, 53, 106, 66, 106, 109, - 14, 109, 71, 4, 49, 19, 20, 52, 54, 55, - 56, 48, 49, 49, 124, 125, 124, 125, 52, 235, - 50, 51, 36, 37, 38, 39, 40, 41, 42, 43, - 54, 49, 48, 50, 144, 53, 144, 48, 56, 14, - 4, 257, 17, 18, 19, 20, 55, 93, 50, 51, - 25, 26, 14, 51, 54, 101, 31, 19, 20, 4, - 57, 36, 37, 38, 39, 40, 41, 42, 43, 31, - 40, 41, 42, 43, 36, 37, 38, 39, 40, 41, - 42, 43, 48, 193, 193, 193, 203, 50, 60, 50, - 61, 19, 20, 203, 50, 203, 51, 112, 113, 114, - 115, 50, 6, 118, 119, 120, 121, 93, 123, 37, - 38, 39, 40, 41, 42, 43, 56, 109, 235, 38, - 39, 40, 41, 42, 43, 235, 252, 235, 195, 58, - 257, 254, 3, 60, 244, 244, 244, 76, 125, -1, - 257, 109, 252, 252, 252, -1, -1, 257, -1, 257, - 165, 166, 167, 168, 169, 170, 171, 172, 173, 174, - 175, 176, 177, 178, 179, 180, 181, 182, 183, 184, - 185, 186, 187, 188, 189, 190, 191, 11, 12, 13, - 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, - 24, 25, 26, 19, 20, -1, -1, 31, -1, -1, - 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, - 36, 37, 38, 39, 40, 41, 42, 43, -1, -1, - -1, -1, -1, 57, 11, 12, 13, 14, 15, 16, - 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, - -1, -1, -1, -1, 31, -1, -1, 34, 35, 36, - 37, 38, 39, 40, 41, 42, 43, 11, 12, -1, - 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, - 24, 25, 26, -1, -1, -1, -1, 31, -1, -1, - 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, - 11, -1, -1, 14, 15, 16, 17, 18, 19, 20, - 21, 22, 23, 24, 25, 26, -1, -1, -1, -1, - 31, -1, -1, 34, 35, 36, 37, 38, 39, 40, - 41, 42, 43, 14, 15, 16, 17, 18, 19, 20, - 21, 22, 23, 24, 25, 26, 19, 20, -1, -1, - 31, -1, -1, 34, 35, 36, 37, 38, 39, 40, - 41, 42, 43, -1, -1, 38, 39, 40, 41, 42, - 43 + +#define YYLAST 496 + + +static const short yytable[] = { 15, + 10, 18, 143, 51, 104, 42, -102, 84, 109, 1, + 15, 89, 18, 80, 63, 72, 52, 53, 252, 73, + 55, 1, 74, 55, 253, 81, 21, 84, 70, 2, + 141, 110, 111, 112, 113, 244, 114, 115, 87, 80, + 82, 240, 116, 117, 80, 22, 61, 67, 42, 118, + 119, 81, 2, 22, 71, -171, 120, 3, -101, 15, + 121, 18, 4, 4, 122, 123, 22, 56, 79, 3, + 56, 106, 15, 108, 18, 4, 83, 57, 3, 94, + 98, 101, 86, 3, 4, 250, 201, 190, 251, 4, + 23, 191, 23, 24, 192, 24, 51, 68, 23, 142, + 89, 24, 25, 15, 26, 18, 15, 95, 18, -67, + -67, 23, 53, 23, 24, 25, 24, 85, 133, -94, + -94, 15, 15, 18, 18, 38, 139, 190, 143, 56, + 105, 191, 134, -14, 192, 184, 185, 186, 187, 188, + 189, 15, -101, 18, 186, 187, 188, 189, 69, 135, + 143, 163, 164, 165, 166, 167, 168, 169, 170, 171, + 172, 173, 174, 175, 176, 177, 178, 136, 38, 137, + 162, 179, 149, 198, 180, 181, 182, 183, 184, 185, + 186, 187, 188, 189, 199, 200, 204, -63, 205, 243, + 15, 234, 18, 51, 255, 260, 262, 203, 171, 172, + 15, 263, 18, 50, 150, 151, 152, 153, 132, 100, + 154, 155, 156, 157, 145, 158, 183, 184, 185, 186, + 187, 188, 189, 241, 259, 142, 258, 257, 102, 103, + 46, 126, 15, 161, 18, 148, 0, 0, 0, 0, + 0, 15, 254, 18, 0, 0, 0, 142, 0, 15, + 234, 18, 0, 0, 15, 0, 18, 206, 207, 208, + 209, 210, 211, 212, 213, 214, 215, 216, 217, 218, + 219, 220, 221, 222, 223, 224, 225, 226, 227, 228, + 229, 230, 231, 232, 163, 164, 165, 166, 167, 168, + 169, 170, 171, 172, 173, 174, 175, 176, 177, 178, + 0, 0, 0, 0, 179, 0, 0, 180, 181, 182, + 183, 184, 185, 186, 187, 188, 189, 163, 164, 0, + 166, 167, 168, 169, 170, 171, 172, 173, 174, 175, + 176, 177, 178, 0, 0, 0, 0, 179, 0, 0, + 180, 181, 182, 183, 184, 185, 186, 187, 188, 189, + 163, 0, 0, 166, 167, 168, 169, 170, 171, 172, + 173, 174, 175, 176, 177, 178, 0, 0, 0, 0, + 179, 0, 0, 180, 181, 182, 183, 184, 185, 186, + 187, 188, 189, 166, 167, 168, 169, 170, 171, 172, + 173, 174, 175, 176, 177, 178, 0, 0, 0, 0, + 179, 0, 0, 180, 181, 182, 183, 184, 185, 186, + 187, 188, 189, 166, 0, 0, 169, 170, 171, 172, + 0, 0, 0, 0, 177, 178, 166, 0, 0, 0, + 179, 171, 172, 0, 0, 182, 183, 184, 185, 186, + 187, 188, 189, 179, 0, 0, 171, 172, 182, 183, + 184, 185, 186, 187, 188, 189, 166, 0, 0, 0, + 0, 171, 172, 182, 183, 184, 185, 186, 187, 188, + 189, 171, 172, 0, 0, 0, 0, 0, 182, 183, + 184, 185, 186, 187, 188, 189, 0, 0, 0, 0, + 184, 185, 186, 187, 188, 189 }; -/* YYSTOS[STATE-NUM] -- The (internal number of the) accessing - symbol of state STATE-NUM. */ -static const unsigned char yystos[] = -{ - 0, 4, 47, 52, 58, 63, 64, 65, 66, 67, - 72, 79, 80, 81, 82, 83, 84, 91, 106, 107, - 146, 150, 4, 4, 49, 52, 53, 55, 85, 86, - 87, 88, 89, 90, 92, 93, 94, 95, 125, 126, - 127, 128, 129, 130, 131, 132, 133, 139, 140, 141, - 108, 0, 66, 81, 48, 49, 75, 5, 52, 59, - 137, 138, 134, 4, 136, 87, 126, 130, 139, 4, - 125, 126, 130, 3, 49, 53, 56, 96, 97, 100, - 101, 4, 127, 129, 130, 55, 90, 125, 59, 87, - 110, 4, 68, 69, 70, 71, 150, 4, 76, 77, - 150, 74, 75, 150, 136, 138, 80, 54, 130, 98, - 79, 4, 27, 28, 29, 30, 32, 33, 38, 39, - 45, 46, 52, 56, 60, 61, 84, 107, 142, 143, - 144, 148, 149, 109, 70, 150, 48, 50, 51, 4, - 78, 150, 135, 4, 81, 82, 102, 103, 104, 105, - 147, 54, 143, 143, 143, 143, 143, 143, 143, 143, - 143, 79, 145, 145, 57, 11, 12, 13, 14, 15, - 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, - 26, 31, 34, 35, 36, 37, 38, 39, 40, 41, - 42, 43, 49, 53, 56, 111, 112, 113, 116, 117, - 4, 48, 50, 80, 99, 57, 60, 61, 143, 143, - 143, 143, 143, 143, 143, 143, 143, 143, 143, 143, - 143, 143, 143, 143, 143, 143, 143, 143, 143, 143, - 143, 143, 143, 143, 143, 114, 79, 120, 123, 119, - 122, 142, 3, 112, 73, 50, 4, 103, 118, 121, - 124, 147, 51, 54, 51, 57, 79, 51, 115, 123, - 122, 121, 50 +static const short yycheck[] = { 0, + 0, 0, 107, 11, 60, 3, 3, 46, 4, 4, + 11, 4, 11, 38, 25, 49, 48, 49, 51, 53, + 5, 4, 56, 5, 57, 38, 4, 66, 26, 47, + 4, 27, 28, 29, 30, 4, 32, 33, 49, 64, + 38, 3, 38, 39, 69, 4, 4, 4, 46, 45, + 46, 64, 47, 4, 3, 48, 52, 52, 55, 60, + 56, 60, 58, 58, 60, 61, 4, 52, 4, 52, + 52, 69, 73, 73, 73, 58, 55, 59, 52, 52, + 53, 54, 59, 52, 58, 51, 142, 49, 54, 58, + 49, 53, 49, 52, 56, 52, 104, 26, 49, 107, + 4, 52, 53, 104, 55, 104, 107, 4, 107, 50, + 51, 49, 49, 49, 52, 53, 52, 46, 91, 50, + 51, 122, 123, 122, 123, 3, 99, 49, 233, 52, + 54, 53, 48, 48, 56, 38, 39, 40, 41, 42, + 43, 142, 55, 142, 40, 41, 42, 43, 26, 50, + 255, 11, 12, 13, 14, 15, 16, 17, 18, 19, + 20, 21, 22, 23, 24, 25, 26, 51, 46, 4, + 57, 31, 54, 4, 34, 35, 36, 37, 38, 39, + 40, 41, 42, 43, 48, 50, 60, 50, 61, 50, + 191, 191, 191, 201, 51, 50, 0, 57, 19, 20, + 201, 0, 201, 5, 110, 111, 112, 113, 91, 54, + 116, 117, 118, 119, 107, 121, 37, 38, 39, 40, + 41, 42, 43, 193, 255, 233, 252, 250, 56, 58, + 3, 74, 233, 123, 233, 107, -1, -1, -1, -1, + -1, 242, 242, 242, -1, -1, -1, 255, -1, 250, + 250, 250, -1, -1, 255, -1, 255, 163, 164, 165, + 166, 167, 168, 169, 170, 171, 172, 173, 174, 175, + 176, 177, 178, 179, 180, 181, 182, 183, 184, 185, + 186, 187, 188, 189, 11, 12, 13, 14, 15, 16, + 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, + -1, -1, -1, -1, 31, -1, -1, 34, 35, 36, + 37, 38, 39, 40, 41, 42, 43, 11, 12, -1, + 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, + 24, 25, 26, -1, -1, -1, -1, 31, -1, -1, + 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, + 11, -1, -1, 14, 15, 16, 17, 18, 19, 20, + 21, 22, 23, 24, 25, 26, -1, -1, -1, -1, + 31, -1, -1, 34, 35, 36, 37, 38, 39, 40, + 41, 42, 43, 14, 15, 16, 17, 18, 19, 20, + 21, 22, 23, 24, 25, 26, -1, -1, -1, -1, + 31, -1, -1, 34, 35, 36, 37, 38, 39, 40, + 41, 42, 43, 14, -1, -1, 17, 18, 19, 20, + -1, -1, -1, -1, 25, 26, 14, -1, -1, -1, + 31, 19, 20, -1, -1, 36, 37, 38, 39, 40, + 41, 42, 43, 31, -1, -1, 19, 20, 36, 37, + 38, 39, 40, 41, 42, 43, 14, -1, -1, -1, + -1, 19, 20, 36, 37, 38, 39, 40, 41, 42, + 43, 19, 20, -1, -1, -1, -1, -1, 36, 37, + 38, 39, 40, 41, 42, 43, -1, -1, -1, -1, + 38, 39, 40, 41, 42, 43 }; +#define YYPURE 1 -#if ! defined (YYSIZE_T) && defined (__SIZE_TYPE__) -# define YYSIZE_T __SIZE_TYPE__ -#endif -#if ! defined (YYSIZE_T) && defined (size_t) -# define YYSIZE_T size_t -#endif -#if ! defined (YYSIZE_T) -# if defined (__STDC__) || defined (__cplusplus) -# include /* INFRINGES ON USER NAME SPACE */ -# define YYSIZE_T size_t -# endif -#endif -#if ! defined (YYSIZE_T) -# define YYSIZE_T unsigned int +/* -*-C-*- Note some compilers choke on comments on `#line' lines. */ +#line 3 "/usr/share/bison.simple" +/* This file comes from bison-1.28. */ + +/* Skeleton output parser for bison, + Copyright (C) 1984, 1989, 1990 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 2, 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, write to the Free Software + Foundation, Inc., 59 Temple Place - Suite 330, + Boston, MA 02111-1307, USA. */ + +/* As a special exception, when this file is copied by Bison into a + Bison output file, you may use that output file without restriction. + This special exception was added by the Free Software Foundation + in version 1.24 of Bison. */ + +/* This is the parser code that is written into each bison parser + when the %semantic_parser declaration is not specified in the grammar. + It was written by Richard Stallman by simplifying the hairy parser + used when %semantic_parser is specified. */ + +#ifndef YYSTACK_USE_ALLOCA +#ifdef alloca +#define YYSTACK_USE_ALLOCA +#else /* alloca not defined */ +#ifdef __GNUC__ +#define YYSTACK_USE_ALLOCA +#define alloca __builtin_alloca +#else /* not GNU C. */ +#if (!defined (__STDC__) && defined (sparc)) || defined (__sparc__) || defined (__sparc) || defined (__sgi) || (defined (__sun) && defined (__i386)) +#define YYSTACK_USE_ALLOCA +#include +#else /* not sparc */ +/* We think this test detects Watcom and Microsoft C. */ +/* This used to test MSDOS, but that is a bad idea + since that symbol is in the user namespace. */ +#if (defined (_MSDOS) || defined (_MSDOS_)) && !defined (__TURBOC__) +#if 0 /* No need for malloc.h, which pollutes the namespace; + instead, just don't use alloca. */ +#include +#endif +#else /* not MSDOS, or __TURBOC__ */ +#if defined(_AIX) +/* I don't know what this was needed for, but it pollutes the namespace. + So I turned it off. rms, 2 May 1997. */ +/* #include */ + #pragma alloca +#define YYSTACK_USE_ALLOCA +#else /* not MSDOS, or __TURBOC__, or _AIX */ +#if 0 +#ifdef __hpux /* haible@ilog.fr says this works for HPUX 9.05 and up, + and on HPUX 10. Eventually we can turn this on. */ +#define YYSTACK_USE_ALLOCA +#define alloca __builtin_alloca +#endif /* __hpux */ +#endif +#endif /* not _AIX */ +#endif /* not MSDOS, or __TURBOC__ */ +#endif /* not sparc */ +#endif /* not GNU C */ +#endif /* alloca not defined */ +#endif /* YYSTACK_USE_ALLOCA not defined */ + +#ifdef YYSTACK_USE_ALLOCA +#define YYSTACK_ALLOC alloca +#else +#define YYSTACK_ALLOC malloc #endif +/* Note: there must be only one dollar sign in this file. + It is replaced by the list of actions, each action + as one case of the switch. */ + #define yyerrok (yyerrstatus = 0) #define yyclearin (yychar = YYEMPTY) -#define YYEMPTY (-2) +#define YYEMPTY -2 #define YYEOF 0 - #define YYACCEPT goto yyacceptlab -#define YYABORT goto yyabortlab -#define YYERROR goto yyerrorlab - - -/* Like YYERROR except do call yyerror. This remains here temporarily - to ease the transition to the new meaning of YYERROR, for GCC. +#define YYABORT goto yyabortlab +#define YYERROR goto yyerrlab1 +/* Like YYERROR except do call yyerror. + This remains here temporarily to ease the + transition to the new meaning of YYERROR, for GCC. Once GCC version 2 has supplanted version 1, this can go. */ - #define YYFAIL goto yyerrlab - #define YYRECOVERING() (!!yyerrstatus) - -#define YYBACKUP(Token, Value) \ +#define YYBACKUP(token, value) \ do \ if (yychar == YYEMPTY && yylen == 1) \ - { \ - yychar = (Token); \ - yylval = (Value); \ - yytoken = YYTRANSLATE (yychar); \ + { yychar = (token), yylval = (value); \ + yychar1 = YYTRANSLATE (yychar); \ YYPOPSTACK; \ goto yybackup; \ } \ else \ - { \ - yyerror ("syntax error: cannot back up");\ - YYERROR; \ - } \ + { yyerror ("syntax error: cannot back up"); YYERROR; } \ while (0) #define YYTERROR 1 #define YYERRCODE 256 -/* YYLLOC_DEFAULT -- Compute the default location (before the actions - are run). */ - -#ifndef YYLLOC_DEFAULT -# define YYLLOC_DEFAULT(Current, Rhs, N) \ - ((Current).first_line = (Rhs)[1].first_line, \ - (Current).first_column = (Rhs)[1].first_column, \ - (Current).last_line = (Rhs)[N].last_line, \ - (Current).last_column = (Rhs)[N].last_column) +#ifndef YYPURE +#define YYLEX yylex() #endif -/* YYLEX -- calling `yylex' with the right arguments. */ - +#ifdef YYPURE +#ifdef YYLSP_NEEDED #ifdef YYLEX_PARAM -# define YYLEX yylex (&yylval, YYLEX_PARAM) +#define YYLEX yylex(&yylval, &yylloc, YYLEX_PARAM) #else -# define YYLEX yylex (&yylval) +#define YYLEX yylex(&yylval, &yylloc) #endif - -/* Enable debugging if requested. */ -#if YYDEBUG - -# ifndef YYFPRINTF -# include /* INFRINGES ON USER NAME SPACE */ -# define YYFPRINTF fprintf -# endif - -# define YYDPRINTF(Args) \ -do { \ - if (yydebug) \ - YYFPRINTF Args; \ -} while (0) - -# define YYDSYMPRINT(Args) \ -do { \ - if (yydebug) \ - yysymprint Args; \ -} while (0) - -# define YYDSYMPRINTF(Title, Token, Value, Location) \ -do { \ - if (yydebug) \ - { \ - YYFPRINTF (stderr, "%s ", Title); \ - yysymprint (stderr, \ - Token, Value); \ - YYFPRINTF (stderr, "\n"); \ - } \ -} while (0) - -/*------------------------------------------------------------------. -| yy_stack_print -- Print the state stack from its BOTTOM up to its | -| TOP (included). | -`------------------------------------------------------------------*/ - -#if defined (__STDC__) || defined (__cplusplus) -static void -yy_stack_print (short int *bottom, short int *top) +#else /* not YYLSP_NEEDED */ +#ifdef YYLEX_PARAM +#define YYLEX yylex(&yylval, YYLEX_PARAM) #else -static void -yy_stack_print (bottom, top) - short int *bottom; - short int *top; +#define YYLEX yylex(&yylval) +#endif +#endif /* not YYLSP_NEEDED */ #endif -{ - YYFPRINTF (stderr, "Stack now"); - for (/* Nothing. */; bottom <= top; ++bottom) - YYFPRINTF (stderr, " %d", *bottom); - YYFPRINTF (stderr, "\n"); -} -# define YY_STACK_PRINT(Bottom, Top) \ -do { \ - if (yydebug) \ - yy_stack_print ((Bottom), (Top)); \ -} while (0) +/* If nonreentrant, generate the variables here */ +#ifndef YYPURE -/*------------------------------------------------. -| Report that the YYRULE is going to be reduced. | -`------------------------------------------------*/ +int yychar; /* the lookahead symbol */ +YYSTYPE yylval; /* the semantic value of the */ + /* lookahead symbol */ -#if defined (__STDC__) || defined (__cplusplus) -static void -yy_reduce_print (int yyrule) -#else -static void -yy_reduce_print (yyrule) - int yyrule; +#ifdef YYLSP_NEEDED +YYLTYPE yylloc; /* location data for the lookahead */ + /* symbol */ #endif -{ - int yyi; - unsigned int yylno = yyrline[yyrule]; - YYFPRINTF (stderr, "Reducing stack by rule %d (line %u), ", - yyrule - 1, yylno); - /* Print the symbols being reduced, and their result. */ - for (yyi = yyprhs[yyrule]; 0 <= yyrhs[yyi]; yyi++) - YYFPRINTF (stderr, "%s ", yytname [yyrhs[yyi]]); - YYFPRINTF (stderr, "-> %s\n", yytname [yyr1[yyrule]]); -} -# define YY_REDUCE_PRINT(Rule) \ -do { \ - if (yydebug) \ - yy_reduce_print (Rule); \ -} while (0) - -/* Nonzero means print parse trace. It is left uninitialized so that - multiple parsers can coexist. */ -int yydebug; -#else /* !YYDEBUG */ -# define YYDPRINTF(Args) -# define YYDSYMPRINT(Args) -# define YYDSYMPRINTF(Title, Token, Value, Location) -# define YY_STACK_PRINT(Bottom, Top) -# define YY_REDUCE_PRINT(Rule) -#endif /* !YYDEBUG */ +int yynerrs; /* number of parse errors so far */ +#endif /* not YYPURE */ + +#if YYDEBUG != 0 +int yydebug; /* nonzero means print parse trace */ +/* Since this is uninitialized, it does not stop multiple parsers + from coexisting. */ +#endif +/* YYINITDEPTH indicates the initial size of the parser's stacks */ -/* YYINITDEPTH -- initial size of the parser's stacks. */ #ifndef YYINITDEPTH -# define YYINITDEPTH 200 +#define YYINITDEPTH 200 #endif -/* YYMAXDEPTH -- maximum size the stacks can grow to (effective only - if the built-in stack extension method is used). +/* YYMAXDEPTH is the 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 < YYSTACK_BYTES (YYMAXDEPTH) - evaluated with infinite-precision integer arithmetic. */ - -#if defined (YYMAXDEPTH) && YYMAXDEPTH == 0 -# undef YYMAXDEPTH +#if YYMAXDEPTH == 0 +#undef YYMAXDEPTH #endif #ifndef YYMAXDEPTH -# define YYMAXDEPTH 10000 +#define YYMAXDEPTH 10000 #endif - +/* Define __yy_memcpy. Note that the size argument + should be passed with type unsigned int, because that is what the non-GCC + definitions require. With GCC, __builtin_memcpy takes an arg + of type size_t, but it can handle unsigned int. */ + +#if __GNUC__ > 1 /* GNU C and GNU C++ define this. */ +#define __yy_memcpy(TO,FROM,COUNT) __builtin_memcpy(TO,FROM,COUNT) +#else /* not GNU C or C++ */ +#ifndef __cplusplus -#if YYERROR_VERBOSE - -# ifndef yystrlen -# if defined (__GLIBC__) && defined (_STRING_H) -# define yystrlen strlen -# else -/* Return the length of YYSTR. */ -static YYSIZE_T -# if defined (__STDC__) || defined (__cplusplus) -yystrlen (const char *yystr) -# else -yystrlen (yystr) - const char *yystr; -# endif -{ - register const char *yys = yystr; - - while (*yys++ != '\0') - continue; - - return yys - yystr - 1; -} -# endif -# endif - -# 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 * -# if defined (__STDC__) || defined (__cplusplus) -yystpcpy (char *yydest, const char *yysrc) -# else -yystpcpy (yydest, yysrc) - char *yydest; - const char *yysrc; -# endif -{ - register char *yyd = yydest; - register const char *yys = yysrc; - - while ((*yyd++ = *yys++) != '\0') - continue; +/* This is the most reliable way to avoid incompatibilities + in available built-in functions on various systems. */ +static void +__yy_memcpy (to, from, count) + char *to; + char *from; + unsigned int count; +{ + register char *f = from; + register char *t = to; + register int i = count; - return yyd - 1; + while (i-- > 0) + *t++ = *f++; } -# endif -# endif - -#endif /* !YYERROR_VERBOSE */ - - -#if YYDEBUG -/*--------------------------------. -| Print this symbol on YYOUTPUT. | -`--------------------------------*/ +#else /* __cplusplus */ -#if defined (__STDC__) || defined (__cplusplus) +/* This is the most reliable way to avoid incompatibilities + in available built-in functions on various systems. */ static void -yysymprint (FILE *yyoutput, int yytype, YYSTYPE *yyvaluep) -#else -static void -yysymprint (yyoutput, yytype, yyvaluep) - FILE *yyoutput; - int yytype; - YYSTYPE *yyvaluep; -#endif +__yy_memcpy (char *to, char *from, unsigned int count) { - /* Pacify ``unused variable'' warnings. */ - (void) yyvaluep; - - if (yytype < YYNTOKENS) - { - YYFPRINTF (yyoutput, "token %s (", yytname[yytype]); -# ifdef YYPRINT - YYPRINT (yyoutput, yytoknum[yytype], *yyvaluep); -# endif - } - else - YYFPRINTF (yyoutput, "nterm %s (", yytname[yytype]); + register char *t = to; + register char *f = from; + register int i = count; - switch (yytype) - { - default: - break; - } - YYFPRINTF (yyoutput, ")"); + while (i-- > 0) + *t++ = *f++; } -#endif /* ! YYDEBUG */ -/*-----------------------------------------------. -| Release the memory associated to this symbol. | -`-----------------------------------------------*/ - -#if defined (__STDC__) || defined (__cplusplus) -static void -yydestruct (int yytype, YYSTYPE *yyvaluep) -#else -static void -yydestruct (yytype, yyvaluep) - int yytype; - YYSTYPE *yyvaluep; #endif -{ - /* Pacify ``unused variable'' warnings. */ - (void) yyvaluep; - - switch (yytype) - { - - default: - break; - } -} +#endif +#line 217 "/usr/share/bison.simple" -/* Prevent warnings from -Wmissing-prototypes. */ +/* The user can define YYPARSE_PARAM as the name of an argument to be passed + into yyparse. The argument should have type void *. + It should actually point to an object. + Grammar actions can access the variable by casting it + to the proper pointer type. */ #ifdef YYPARSE_PARAM -# if defined (__STDC__) || defined (__cplusplus) -int yyparse (void *YYPARSE_PARAM); -# else -int yyparse (); -# endif -#else /* ! YYPARSE_PARAM */ -#if defined (__STDC__) || defined (__cplusplus) -int yyparse (void); -#else -int yyparse (); -#endif -#endif /* ! YYPARSE_PARAM */ - - - - - - -/*----------. -| yyparse. | -`----------*/ +#ifdef __cplusplus +#define YYPARSE_PARAM_ARG void *YYPARSE_PARAM +#define YYPARSE_PARAM_DECL +#else /* not __cplusplus */ +#define YYPARSE_PARAM_ARG YYPARSE_PARAM +#define YYPARSE_PARAM_DECL void *YYPARSE_PARAM; +#endif /* not __cplusplus */ +#else /* not YYPARSE_PARAM */ +#define YYPARSE_PARAM_ARG +#define YYPARSE_PARAM_DECL +#endif /* not YYPARSE_PARAM */ +/* Prevent warning if -Wstrict-prototypes. */ +#ifdef __GNUC__ #ifdef YYPARSE_PARAM -# if defined (__STDC__) || defined (__cplusplus) -int yyparse (void *YYPARSE_PARAM) -# else -int yyparse (YYPARSE_PARAM) - void *YYPARSE_PARAM; -# endif -#else /* ! YYPARSE_PARAM */ -#if defined (__STDC__) || defined (__cplusplus) -int -yyparse (void) +int yyparse (void *); #else -int -yyparse () - +int yyparse (void); #endif #endif -{ - /* The lookahead symbol. */ -int yychar; - -/* The semantic value of the lookahead symbol. */ -YYSTYPE yylval; - -/* Number of syntax errors so far. */ -int yynerrs; +int +yyparse(YYPARSE_PARAM_ARG) + YYPARSE_PARAM_DECL +{ register int yystate; register int yyn; - int yyresult; - /* Number of tokens to shift before error messages enabled. */ - int yyerrstatus; - /* Lookahead token as an internal (translated) token number. */ - int yytoken = 0; - - /* Three stacks and their tools: - `yyss': related to states, - `yyvs': related to semantic values, - `yyls': related to locations. - - Refer to the stacks thru separate pointers, to allow yyoverflow - to reallocate them elsewhere. */ - - /* The state stack. */ - short int yyssa[YYINITDEPTH]; - short int *yyss = yyssa; - register short int *yyssp; - - /* The semantic value stack. */ - YYSTYPE yyvsa[YYINITDEPTH]; - YYSTYPE *yyvs = yyvsa; + register short *yyssp; register YYSTYPE *yyvsp; + int yyerrstatus; /* number of tokens to shift before error messages enabled */ + int yychar1 = 0; /* lookahead token as an internal (translated) token number */ + short yyssa[YYINITDEPTH]; /* the state stack */ + YYSTYPE yyvsa[YYINITDEPTH]; /* the semantic value stack */ + short *yyss = yyssa; /* refer to the stacks thru separate pointers */ + YYSTYPE *yyvs = yyvsa; /* to allow yyoverflow to reallocate them elsewhere */ +#ifdef YYLSP_NEEDED + YYLTYPE yylsa[YYINITDEPTH]; /* the location stack */ + YYLTYPE *yyls = yylsa; + YYLTYPE *yylsp; + +#define YYPOPSTACK (yyvsp--, yyssp--, yylsp--) +#else #define YYPOPSTACK (yyvsp--, yyssp--) +#endif - YYSIZE_T yystacksize = YYINITDEPTH; + int yystacksize = YYINITDEPTH; + int yyfree_stacks = 0; - /* The variables used to return semantic value and location from the - action routines. */ - YYSTYPE yyval; +#ifdef YYPURE + int yychar; + YYSTYPE yylval=0; /*paf:calm down, vc7 warning level 4*/ + int yynerrs; +#ifdef YYLSP_NEEDED + YYLTYPE yylloc; +#endif +#endif + YYSTYPE yyval=0; /*paf:calm down, vc7 warning level 4*/ /* the variable used to return */ + /* semantic values from the action */ + /* routines */ - /* When reducing, the number of symbols on the RHS of the reduced - rule. */ int yylen; - YYDPRINTF ((stderr, "Starting parse\n")); +#if YYDEBUG != 0 + if (yydebug) + fprintf(stderr, "Starting parse\n"); +#endif yystate = 0; yyerrstatus = 0; @@ -1232,97 +820,110 @@ int yynerrs; so that they stay on the same level as the state stack. The wasted elements are never initialized. */ - yyssp = yyss; + yyssp = yyss - 1; yyvsp = yyvs; +#ifdef YYLSP_NEEDED + yylsp = yyls; +#endif +/* Push a new state, which is found in yystate . */ +/* In all cases, when you get here, the value and location stacks + have just been pushed. so pushing a state here evens the stacks. */ +yynewstate: - goto yysetstate; - -/*------------------------------------------------------------. -| yynewstate -- Push a new state, which is found in yystate. | -`------------------------------------------------------------*/ - yynewstate: - /* In all cases, when you get here, the value and location stacks - have just been pushed. so pushing a state here evens the stacks. - */ - yyssp++; - - yysetstate: - *yyssp = yystate; + *++yyssp = yystate; - if (yyss + yystacksize - 1 <= yyssp) + if (yyssp >= yyss + yystacksize - 1) { + /* Give user a chance to reallocate the stack */ + /* Use copies of these so that the &'s don't force the real ones into memory. */ + YYSTYPE *yyvs1 = yyvs; + short *yyss1 = yyss; +#ifdef YYLSP_NEEDED + YYLTYPE *yyls1 = yyls; +#endif + /* Get the current used size of the three stacks, in elements. */ - YYSIZE_T yysize = yyssp - yyss + 1; + int size = yyssp - yyss + 1; #ifdef yyoverflow - { - /* Give user a chance to reallocate the stack. Use copies of - these so that the &'s don't force the real ones into - memory. */ - YYSTYPE *yyvs1 = yyvs; - short int *yyss1 = yyss; - - - /* Each stack pointer address is followed by the size of the - data in use in that stack, in bytes. This used to be a - conditional around just the two extra args, but that might - be undefined if yyoverflow is a macro. */ - yyoverflow ("parser stack overflow", - &yyss1, yysize * sizeof (*yyssp), - &yyvs1, yysize * sizeof (*yyvsp), - - &yystacksize); - - yyss = yyss1; - yyvs = yyvs1; - } + /* Each stack pointer address is followed by the size of + the data in use in that stack, in bytes. */ +#ifdef YYLSP_NEEDED + /* This used to be a conditional around just the two extra args, + but that might be undefined if yyoverflow is a macro. */ + yyoverflow("parser stack overflow", + &yyss1, size * sizeof (*yyssp), + &yyvs1, size * sizeof (*yyvsp), + &yyls1, size * sizeof (*yylsp), + &yystacksize); +#else + yyoverflow("parser stack overflow", + &yyss1, size * sizeof (*yyssp), + &yyvs1, size * sizeof (*yyvsp), + &yystacksize); +#endif + + yyss = yyss1; yyvs = yyvs1; +#ifdef YYLSP_NEEDED + yyls = yyls1; +#endif #else /* no yyoverflow */ -# ifndef YYSTACK_RELOCATE - goto yyoverflowlab; -# else /* Extend the stack our own way. */ - if (YYMAXDEPTH <= yystacksize) - goto yyoverflowlab; + if (yystacksize >= YYMAXDEPTH) + { + yyerror("parser stack overflow"); + if (yyfree_stacks) + { + free (yyss); + free (yyvs); +#ifdef YYLSP_NEEDED + free (yyls); +#endif + } + return 2; + } yystacksize *= 2; - if (YYMAXDEPTH < yystacksize) + if (yystacksize > YYMAXDEPTH) yystacksize = YYMAXDEPTH; - - { - short int *yyss1 = yyss; - union yyalloc *yyptr = - (union yyalloc *) YYSTACK_ALLOC (YYSTACK_BYTES (yystacksize)); - if (! yyptr) - goto yyoverflowlab; - YYSTACK_RELOCATE (yyss); - YYSTACK_RELOCATE (yyvs); - -# undef YYSTACK_RELOCATE - if (yyss1 != yyssa) - YYSTACK_FREE (yyss1); - } -# endif +#ifndef YYSTACK_USE_ALLOCA + yyfree_stacks = 1; +#endif + yyss = (short *) YYSTACK_ALLOC (yystacksize * sizeof (*yyssp)); + __yy_memcpy ((char *)yyss, (char *)yyss1, + size * (unsigned int) sizeof (*yyssp)); + yyvs = (YYSTYPE *) YYSTACK_ALLOC (yystacksize * sizeof (*yyvsp)); + __yy_memcpy ((char *)yyvs, (char *)yyvs1, + size * (unsigned int) sizeof (*yyvsp)); +#ifdef YYLSP_NEEDED + yyls = (YYLTYPE *) YYSTACK_ALLOC (yystacksize * sizeof (*yylsp)); + __yy_memcpy ((char *)yyls, (char *)yyls1, + size * (unsigned int) sizeof (*yylsp)); +#endif #endif /* no yyoverflow */ - yyssp = yyss + yysize - 1; - yyvsp = yyvs + yysize - 1; - + yyssp = yyss + size - 1; + yyvsp = yyvs + size - 1; +#ifdef YYLSP_NEEDED + yylsp = yyls + size - 1; +#endif - YYDPRINTF ((stderr, "Stack size increased to %lu\n", - (unsigned long int) yystacksize)); +#if YYDEBUG != 0 + if (yydebug) + fprintf(stderr, "Stack size increased to %d\n", yystacksize); +#endif - if (yyss + yystacksize - 1 <= yyssp) + if (yyssp >= yyss + yystacksize - 1) YYABORT; } - YYDPRINTF ((stderr, "Entering state %d\n", yystate)); +#if YYDEBUG != 0 + if (yydebug) + fprintf(stderr, "Entering state %d\n", yystate); +#endif goto yybackup; - -/*-----------. -| yybackup. | -`-----------*/ -yybackup: + yybackup: /* Do appropriate processing given the current state. */ /* Read a lookahead token if we need one and don't already have one. */ @@ -1331,110 +932,145 @@ yybackup: /* First try to decide what to do without reference to lookahead token. */ yyn = yypact[yystate]; - if (yyn == YYPACT_NINF) + if (yyn == YYFLAG) goto yydefault; /* Not known => get a lookahead token if don't already have one. */ - /* YYCHAR is either YYEMPTY or YYEOF or a valid lookahead symbol. */ + /* yychar is either YYEMPTY or YYEOF + or a valid token in external form. */ + if (yychar == YYEMPTY) { - YYDPRINTF ((stderr, "Reading a token: ")); +#if YYDEBUG != 0 + if (yydebug) + fprintf(stderr, "Reading a token: "); +#endif yychar = YYLEX; } - if (yychar <= YYEOF) + /* Convert token to internal form (in yychar1) for indexing tables with */ + + if (yychar <= 0) /* This means end of input. */ { - yychar = yytoken = YYEOF; - YYDPRINTF ((stderr, "Now at end of input.\n")); + yychar1 = 0; + yychar = YYEOF; /* Don't call YYLEX any more */ + +#if YYDEBUG != 0 + if (yydebug) + fprintf(stderr, "Now at end of input.\n"); +#endif } else { - yytoken = YYTRANSLATE (yychar); - YYDSYMPRINTF ("Next token is", yytoken, &yylval, &yylloc); + yychar1 = YYTRANSLATE(yychar); + +#if YYDEBUG != 0 + if (yydebug) + { + fprintf (stderr, "Next token is %d (%s", yychar, yytname[yychar1]); + /* Give the individual parser a way to print the precise meaning + of a token, for further debugging info. */ +#ifdef YYPRINT + YYPRINT (stderr, yychar, yylval); +#endif + fprintf (stderr, ")\n"); + } +#endif } - /* If the proper action on seeing token YYTOKEN is to reduce or to - detect an error, take that action. */ - yyn += yytoken; - if (yyn < 0 || YYLAST < yyn || yycheck[yyn] != yytoken) + yyn += yychar1; + if (yyn < 0 || yyn > YYLAST || yycheck[yyn] != yychar1) goto yydefault; + yyn = yytable[yyn]; - if (yyn <= 0) + + /* yyn is what to do for this token type in this state. + Negative => reduce, -yyn is rule number. + Positive => shift, yyn is new state. + New state is final state => don't bother to shift, + just return success. + 0, or most negative number => error. */ + + if (yyn < 0) { - if (yyn == 0 || yyn == YYTABLE_NINF) + if (yyn == YYFLAG) goto yyerrlab; yyn = -yyn; goto yyreduce; } + else if (yyn == 0) + goto yyerrlab; if (yyn == YYFINAL) YYACCEPT; /* Shift the lookahead token. */ - YYDPRINTF ((stderr, "Shifting token %s, ", yytname[yytoken])); + +#if YYDEBUG != 0 + if (yydebug) + fprintf(stderr, "Shifting token %d (%s), ", yychar, yytname[yychar1]); +#endif /* Discard the token being shifted unless it is eof. */ if (yychar != YYEOF) yychar = YYEMPTY; *++yyvsp = yylval; +#ifdef YYLSP_NEEDED + *++yylsp = yylloc; +#endif - - /* Count tokens shifted since error; after three, turn off error - status. */ - if (yyerrstatus) - yyerrstatus--; + /* count tokens shifted since error; after three, turn off error status. */ + if (yyerrstatus) yyerrstatus--; yystate = yyn; goto yynewstate; - -/*-----------------------------------------------------------. -| yydefault -- do the default action for the current state. | -`-----------------------------------------------------------*/ +/* Do the default action for the current state. */ yydefault: + yyn = yydefact[yystate]; if (yyn == 0) goto yyerrlab; - goto yyreduce; - -/*-----------------------------. -| yyreduce -- Do a reduction. | -`-----------------------------*/ +/* Do a reduction. yyn is the number of a rule to reduce with. */ yyreduce: - /* yyn is the number of a rule to reduce with. */ yylen = yyr2[yyn]; + if (yylen > 0) + yyval = yyvsp[1-yylen]; /* implement default value of the action */ + +#if YYDEBUG != 0 + if (yydebug) + { + int i; + + fprintf (stderr, "Reducing via rule %d (line %d), ", + yyn, yyrline[yyn]); - /* If YYLEN is nonzero, implement the default value of the action: - `$$ = $1'. + /* Print the symbols being reduced, and their result. */ + for (i = yyprhs[yyn]; yyrhs[i] > 0; i++) + fprintf (stderr, "%s ", yytname[yyrhs[i]]); + fprintf (stderr, " -> %s\n", yytname[yyr1[yyn]]); + } +#endif - Otherwise, the following line sets YYVAL to garbage. - This behavior is undocumented and Bison - users should not rely upon it. Assigning to YYVAL - unconditionally makes the parser a bit smaller, and it avoids a - GCC warning that YYVAL may be used uninitialized. */ - yyval = yyvsp[1-yylen]; + switch (yyn) { - YY_REDUCE_PRINT (yyn); - switch (yyn) - { - case 2: -#line 126 "compile.y" - { +case 1: +#line 128 "compile.y" +{ Method& method=*new Method(Method::CT_ANY, 0, 0, /*min, max numbered_params_count*/ 0/*param_names*/, 0/*local_names*/, yyvsp[0]/*parser_code*/, 0/*native_code*/); PC.cclass->add_method(PC.alias_method(main_method_name), method); -;} - break; - - case 9: -#line 141 "compile.y" - { +; + break;} +case 8: +#line 143 "compile.y" +{ const String& command=*LA2S(*yyvsp[-2]); YYSTYPE strings_code=yyvsp[0]; if(strings_code->count()<1*OPERATIONS_PER_OPVALUE) { @@ -1504,17 +1140,15 @@ yyreduce: "'"CLASS_NAME"', '"USE_CONTROL_METHOD_NAME"' and '"BASE_NAME"'"); YYERROR; } -;} - break; - - case 13: -#line 213 "compile.y" - { yyval=yyvsp[-1]; P(*yyval, *yyvsp[0]) ;} - break; - - case 17: -#line 217 "compile.y" - { +; + break;} +case 12: +#line 215 "compile.y" +{ yyval=yyvsp[-1]; P(*yyval, *yyvsp[0]) ; + break;} +case 16: +#line 219 "compile.y" +{ PC.explicit_result=false; const String& name=*LA2S(*yyvsp[-4]); @@ -1549,56 +1183,48 @@ yyreduce: *reinterpret_cast(&yyval)=method; // todo: check [][;result;] -;} - break; - - case 18: -#line 252 "compile.y" - { +; + break;} +case 17: +#line 254 "compile.y" +{ // fill in the code reinterpret_cast(yyvsp[-1])->parser_code=yyvsp[0]; -;} - break; - - case 21: -#line 258 "compile.y" - {yyval=yyvsp[-1];} - break; - - case 25: +; + break;} +case 20: #line 260 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]) ;} - break; - - case 31: -#line 268 "compile.y" - { yyval=yyvsp[-1]; P(*yyval, *yyvsp[0]) ;} - break; - - case 37: -#line 274 "compile.y" - { +{yyval=yyvsp[-1]; + break;} +case 24: +#line 262 "compile.y" +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]) ; + break;} +case 30: +#line 270 "compile.y" +{ yyval=yyvsp[-1]; P(*yyval, *yyvsp[0]) ; + break;} +case 36: +#line 276 "compile.y" +{ yyval=yyvsp[0]; /* stack: resulting value */ changetail_or_append(*yyval, OP_GET_ELEMENT, false, /*->*/OP_GET_ELEMENT__WRITE, /*or */OP_WRITE_VALUE ); /* value=pop; wcontext.write(value) */ -;} - break; - - case 38: -#line 281 "compile.y" - { yyval=yyvsp[0] ;} - break; - - case 41: +; + break;} +case 37: #line 283 "compile.y" - { yyval=yyvsp[-1] ;} - break; - - case 44: -#line 287 "compile.y" - { +{ yyval=yyvsp[0] ; + break;} +case 40: +#line 285 "compile.y" +{ yyval=yyvsp[-1] ; + break;} +case 43: +#line 289 "compile.y" +{ yyval=N(); ArrayOperation* diving_code=yyvsp[0]; const String* first_name=LA2S(*diving_code); @@ -1619,30 +1245,26 @@ yyreduce: P(*yyval, *diving_code); } /* diving code; stack: current context */ -;} - break; - - case 45: -#line 309 "compile.y" - { yyval=yyvsp[-1]; P(*yyval, *yyvsp[0]) ;} - break; - - case 47: -#line 310 "compile.y" - { yyval=yyvsp[-1]; P(*yyval, *yyvsp[0]) ;} - break; - - case 48: -#line 314 "compile.y" - { +; + break;} +case 44: +#line 311 "compile.y" +{ yyval=yyvsp[-1]; P(*yyval, *yyvsp[0]) ; + break;} +case 46: +#line 312 "compile.y" +{ yyval=yyvsp[-1]; P(*yyval, *yyvsp[0]) ; + break;} +case 47: +#line 316 "compile.y" +{ yyval=yyvsp[-1]; /* stack: context,name */ P(*yyval, *yyvsp[0]); /* stack: context,name,constructor_value */ -;} - break; - - case 52: -#line 322 "compile.y" - { +; + break;} +case 51: +#line 324 "compile.y" +{ yyval=N(); ArrayOperation* diving_code=yyvsp[0]; const String* first_name=LA2S(*diving_code); @@ -1658,109 +1280,96 @@ yyreduce: P(*yyval, *diving_code); } /* diving code; stack: current context */ -;} - break; - - case 53: -#line 339 "compile.y" - { +; + break;} +case 52: +#line 341 "compile.y" +{ yyval=N(); O(*yyval, OP_WITH_WRITE); /* stack: starting context */ P(*yyval, *yyvsp[0]); /* diving code; stack: context,name */ -;} - break; - - case 54: -#line 344 "compile.y" - { yyval=yyvsp[-1]; P(*yyval, *yyvsp[0]) ;} - break; - - case 58: -#line 351 "compile.y" - { +; + break;} +case 53: +#line 346 "compile.y" +{ yyval=yyvsp[-1]; P(*yyval, *yyvsp[0]) ; + break;} +case 57: +#line 353 "compile.y" +{ // allow $result_or_other_variable[ letters here any time ] *reinterpret_cast(&yyval)=PC.explicit_result; PC.explicit_result=false; -;} - break; - - case 59: -#line 354 "compile.y" - { - PC.explicit_result=*reinterpret_cast(&yyvsp[-1]); -;} - break; - - case 60: +; + break;} +case 58: #line 356 "compile.y" - { +{ + PC.explicit_result=*reinterpret_cast(&yyvsp[-1]); +; + break;} +case 59: +#line 358 "compile.y" +{ // stack: context, name yyval=yyvsp[-2]; // stack: context, name, value O(*yyval, OP_CONSTRUCT_VALUE); /* value=pop; name=pop; context=pop; construct(context,name,value) */ -;} - break; - - case 61: -#line 362 "compile.y" - { +; + break;} +case 60: +#line 364 "compile.y" +{ yyval=N(); O(*yyval, OP_PREPARE_TO_EXPRESSION); // stack: context, name P(*yyval, *yyvsp[-1]); // stack: context, name, value O(*yyval, OP_CONSTRUCT_EXPR); /* value=pop->as_expr_result; name=pop; context=pop; construct(context,name,value) */ -;} - break; - - case 62: -#line 370 "compile.y" - { +; + break;} +case 61: +#line 372 "compile.y" +{ // stack: context, name yyval=N(); OA(*yyval, OP_CURLY_CODE__CONSTRUCT, yyvsp[-1]); /* code=pop; name=pop; context=pop; construct(context,name,junction(code)) */ -;} - break; - - case 66: -#line 381 "compile.y" - { +; + break;} +case 65: +#line 383 "compile.y" +{ yyval=N(); OA(*yyval, OP_OBJECT_POOL, yyvsp[0]); /* stack: empty write context */ /* some code that writes to that context */ /* context=pop; stack: context.value() */ -;} - break; - - case 69: -#line 388 "compile.y" - { yyval=yyvsp[-1]; P(*yyval, *yyvsp[0]) ;} - break; - - case 70: -#line 392 "compile.y" - { +; + break;} +case 68: +#line 390 "compile.y" +{ yyval=yyvsp[-1]; P(*yyval, *yyvsp[0]) ; + break;} +case 69: +#line 394 "compile.y" +{ yyval=yyvsp[0]; /* stack: value */ changetail_or_append(*yyval, OP_CALL, true, /*->*/ OP_CALL__WRITE, /*or */OP_WRITE_VALUE); /* value=pop; wcontext.write(value) */ -;} - break; - - case 71: -#line 398 "compile.y" - { +; + break;} +case 70: +#line 400 "compile.y" +{ PC.in_call_value=true; - ;} - break; - - case 72: -#line 401 "compile.y" - { + ; + break;} +case 71: +#line 403 "compile.y" +{ PC.in_call_value=false; - ;} - break; - - case 73: -#line 404 "compile.y" - { /* ^field.$method{vasya} */ + ; + break;} +case 72: +#line 406 "compile.y" +{ /* ^field.$method{vasya} */ yyval=yyvsp[-3]; /* with_xxx,diving code; stack: context,method_junction */ YYSTYPE params_code=yyvsp[-1]; @@ -1771,70 +1380,59 @@ yyreduce: } /* stack: context, method_junction */ OA(*yyval, OP_CALL, params_code); // method_frame=make frame(pop junction); ncontext=pop; call(ncontext,method_frame) stack: value -;} - break; - - case 76: -#line 419 "compile.y" - { yyval=yyvsp[-1]; P(*yyval, *yyvsp[0]) ;} - break; - - case 80: -#line 425 "compile.y" - { +; + break;} +case 75: +#line 421 "compile.y" +{ yyval=yyvsp[-1]; P(*yyval, *yyvsp[0]) ; + break;} +case 79: +#line 427 "compile.y" +{ // allow ^call[ letters here any time ] *reinterpret_cast(&yyval)=PC.explicit_result; PC.explicit_result=false; -;} - break; - - case 81: -#line 428 "compile.y" - { - PC.explicit_result=*reinterpret_cast(&yyvsp[-1]); -;} - break; - - case 82: +; + break;} +case 80: #line 430 "compile.y" - {yyval=yyvsp[-2];} - break; - - case 83: -#line 431 "compile.y" - {yyval=yyvsp[-1];} - break; - - case 84: +{ + PC.explicit_result=*reinterpret_cast(&yyvsp[-1]); +; + break;} +case 81: #line 432 "compile.y" - {yyval=yyvsp[-1];} - break; - - case 86: -#line 435 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]) ;} - break; - - case 88: -#line 439 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]) ;} - break; - - case 90: -#line 443 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]) ;} - break; - - case 91: +{yyval=yyvsp[-2]; + break;} +case 82: +#line 433 "compile.y" +{yyval=yyvsp[-1]; + break;} +case 83: +#line 434 "compile.y" +{yyval=yyvsp[-1]; + break;} +case 85: +#line 437 "compile.y" +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]) ; + break;} +case 87: +#line 441 "compile.y" +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]) ; + break;} +case 89: #line 445 "compile.y" - { +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]) ; + break;} +case 90: +#line 447 "compile.y" +{ yyval=yyvsp[0]; O(*yyval, OP_STORE_PARAM); -;} - break; - - case 92: -#line 449 "compile.y" - { +; + break;} +case 91: +#line 451 "compile.y" +{ YYSTYPE expr_code=yyvsp[0]; if(expr_code->count()==3 && (*expr_code)[0].code==OP_VALUE) { // optimizing (double/bool/incidently 'string' too) case. [OP_VALUE+origin+Double] @@ -1848,59 +1446,52 @@ yyreduce: yyval=N(); OA(*yyval, OP_EXPR_CODE__STORE_PARAM, code); } -;} - break; - - case 93: -#line 464 "compile.y" - { +; + break;} +case 92: +#line 466 "compile.y" +{ yyval=N(); OA(*yyval, OP_CURLY_CODE__STORE_PARAM, yyvsp[0]); -;} - break; - - case 98: -#line 476 "compile.y" - { yyval=yyvsp[-1]; P(*yyval, *yyvsp[0]) ;} - break; - - case 100: +; + break;} +case 97: #line 478 "compile.y" - { yyval=yyvsp[-1]; P(*yyval, *yyvsp[0]) ;} - break; - - case 102: +{ yyval=yyvsp[-1]; P(*yyval, *yyvsp[0]) ; + break;} +case 99: #line 480 "compile.y" - { +{ yyval=yyvsp[-1]; P(*yyval, *yyvsp[0]) ; + break;} +case 101: +#line 482 "compile.y" +{ // we know that name_advance1 not called from ^xxx context // so we'll not check for operator call possibility as we do in name_advance2 /* stack: context */ yyval=yyvsp[0]; /* stack: context,name */ O(*yyval, OP_GET_ELEMENT); /* name=pop; context=pop; stack: context.get_element(name) */ -;} - break; - - case 103: -#line 488 "compile.y" - { +; + break;} +case 102: +#line 490 "compile.y" +{ /* stack: context */ yyval=yyvsp[0]; /* stack: context,name */ O(*yyval, OP_GET_ELEMENT); /* name=pop; context=pop; stack: context.get_element(name) */ -;} - break; - - case 109: -#line 501 "compile.y" - { +; + break;} +case 108: +#line 503 "compile.y" +{ yyval=yyvsp[0]; O(*yyval, OP_GET_ELEMENT); -;} - break; - - case 110: -#line 505 "compile.y" - { +; + break;} +case 109: +#line 507 "compile.y" +{ ArrayOperation* code; { change_string_literal_to_write_string_literal(*(code=yyvsp[-1])); @@ -1908,59 +1499,52 @@ yyreduce: } yyval=N(); OA(*yyval, OP_STRING_POOL, code); -;} - break; - - case 111: -#line 514 "compile.y" - { +; + break;} +case 110: +#line 516 "compile.y" +{ // allow $result_or_other_variable[ letters here any time ] *reinterpret_cast(&yyval)=PC.explicit_result; PC.explicit_result=false; -;} - break; - - case 112: -#line 517 "compile.y" - { - PC.explicit_result=*reinterpret_cast(&yyvsp[-1]); -;} - break; - - case 113: +; + break;} +case 111: #line 519 "compile.y" - { +{ + PC.explicit_result=*reinterpret_cast(&yyvsp[-1]); +; + break;} +case 112: +#line 521 "compile.y" +{ yyval=N(); OA(*yyval, OP_OBJECT_POOL, yyvsp[-2]); /* stack: empty write context */ /* some code that writes to that context */ /* context=pop; stack: context.value() */ -;} - break; - - case 114: -#line 525 "compile.y" - { +; + break;} +case 113: +#line 527 "compile.y" +{ yyval=N(); O(*yyval, OP_WITH_READ); P(*yyval, *yyvsp[0]); -;} - break; - - case 116: -#line 530 "compile.y" - { yyval=yyvsp[-1]; P(*yyval, *yyvsp[0]) ;} - break; - - case 117: -#line 531 "compile.y" - { +; + break;} +case 115: +#line 532 "compile.y" +{ yyval=yyvsp[-1]; P(*yyval, *yyvsp[0]) ; + break;} +case 116: +#line 533 "compile.y" +{ yyval=yyvsp[0]; O(*yyval, OP_GET_ELEMENT__WRITE); -;} - break; - - case 120: -#line 540 "compile.y" - { +; + break;} +case 119: +#line 542 "compile.y" +{ yyval=yyvsp[-1]; // stack: class name string if(*LA2S(*yyval) == BASE_NAME) { // pseudo BASE class if(VStateless_class* base=PC.cclass->base_class()) { @@ -1971,487 +1555,433 @@ yyreduce: } } O(*yyval, OP_GET_CLASS); -;} - break; - - case 121: -#line 552 "compile.y" - { +; + break;} +case 120: +#line 554 "compile.y" +{ yyval=yyvsp[-1]; if(!PC.in_call_value) { strcpy(PC.error, ":: not allowed here"); YYERROR; } O(*yyval, OP_PREPARE_TO_CONSTRUCT_OBJECT); -;} - break; - - case 128: -#line 571 "compile.y" - { yyval = yyvsp[-1] ;} - break; - - case 129: -#line 572 "compile.y" - { yyval = yyvsp[-1] ;} - break; - - case 130: +; + break;} +case 127: #line 573 "compile.y" - { yyval = yyvsp[-1]; ;} - break; - - case 131: +{ yyval = yyvsp[-1] ; + break;} +case 128: +#line 574 "compile.y" +{ yyval = yyvsp[-1] ; + break;} +case 129: #line 575 "compile.y" - { yyval=yyvsp[0]; O(*yyval, OP_NEG) ;} - break; - - case 132: -#line 576 "compile.y" - { yyval=yyvsp[0] ;} - break; - - case 133: +{ yyval = yyvsp[-1]; ; + break;} +case 130: #line 577 "compile.y" - { yyval=yyvsp[0]; O(*yyval, OP_INV) ;} - break; - - case 134: +{ yyval=yyvsp[0]; O(*yyval, OP_NEG) ; + break;} +case 131: #line 578 "compile.y" - { yyval=yyvsp[0]; O(*yyval, OP_NOT) ;} - break; - - case 135: +{ yyval=yyvsp[0] ; + break;} +case 132: #line 579 "compile.y" - { yyval=yyvsp[0]; O(*yyval, OP_DEF) ;} - break; - - case 136: +{ yyval=yyvsp[0]; O(*yyval, OP_INV) ; + break;} +case 133: #line 580 "compile.y" - { yyval=yyvsp[0]; O(*yyval, OP_IN) ;} - break; - - case 137: +{ yyval=yyvsp[0]; O(*yyval, OP_NOT) ; + break;} +case 134: #line 581 "compile.y" - { yyval=yyvsp[0]; O(*yyval, OP_FEXISTS) ;} - break; - - case 138: +{ yyval=yyvsp[0]; O(*yyval, OP_DEF) ; + break;} +case 135: #line 582 "compile.y" - { yyval=yyvsp[0]; O(*yyval, OP_DEXISTS) ;} - break; - - case 139: +{ yyval=yyvsp[0]; O(*yyval, OP_IN) ; + break;} +case 136: +#line 583 "compile.y" +{ yyval=yyvsp[0]; O(*yyval, OP_FEXISTS) ; + break;} +case 137: #line 584 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_SUB) ;} - break; - - case 140: -#line 585 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_ADD) ;} - break; - - case 141: +{ yyval=yyvsp[0]; O(*yyval, OP_DEXISTS) ; + break;} +case 138: #line 586 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_MUL) ;} - break; - - case 142: +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_SUB) ; + break;} +case 139: #line 587 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_DIV) ;} - break; - - case 143: +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_ADD) ; + break;} +case 140: #line 588 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_MOD) ;} - break; - - case 144: +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_MUL) ; + break;} +case 141: #line 589 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_INTDIV) ;} - break; - - case 145: +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_DIV) ; + break;} +case 142: #line 590 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_BIN_SL) ;} - break; - - case 146: +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_MOD) ; + break;} +case 143: #line 591 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_BIN_SR) ;} - break; - - case 147: +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_INTDIV) ; + break;} +case 144: #line 592 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_BIN_AND) ;} - break; - - case 148: +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_BIN_SL) ; + break;} +case 145: #line 593 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_BIN_OR) ;} - break; - - case 149: +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_BIN_SR) ; + break;} +case 146: #line 594 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_BIN_XOR) ;} - break; - - case 150: +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_BIN_AND) ; + break;} +case 147: #line 595 "compile.y" - { yyval=yyvsp[-2]; OA(*yyval, OP_NESTED_CODE, yyvsp[0]); O(*yyval, OP_LOG_AND) ;} - break; - - case 151: +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_BIN_OR) ; + break;} +case 148: #line 596 "compile.y" - { yyval=yyvsp[-2]; OA(*yyval, OP_NESTED_CODE, yyvsp[0]); O(*yyval, OP_LOG_OR) ;} - break; - - case 152: +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_BIN_XOR) ; + break;} +case 149: #line 597 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_LOG_XOR) ;} - break; - - case 153: +{ yyval=yyvsp[-2]; OA(*yyval, OP_NESTED_CODE, yyvsp[0]); O(*yyval, OP_LOG_AND) ; + break;} +case 150: #line 598 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_NUM_LT) ;} - break; - - case 154: +{ yyval=yyvsp[-2]; OA(*yyval, OP_NESTED_CODE, yyvsp[0]); O(*yyval, OP_LOG_OR) ; + break;} +case 151: #line 599 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_NUM_GT) ;} - break; - - case 155: +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_LOG_XOR) ; + break;} +case 152: #line 600 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_NUM_LE) ;} - break; - - case 156: +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_NUM_LT) ; + break;} +case 153: #line 601 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_NUM_GE) ;} - break; - - case 157: +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_NUM_GT) ; + break;} +case 154: #line 602 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_NUM_EQ) ;} - break; - - case 158: +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_NUM_LE) ; + break;} +case 155: #line 603 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_NUM_NE) ;} - break; - - case 159: +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_NUM_GE) ; + break;} +case 156: #line 604 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_STR_LT) ;} - break; - - case 160: +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_NUM_EQ) ; + break;} +case 157: #line 605 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_STR_GT) ;} - break; - - case 161: +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_NUM_NE) ; + break;} +case 158: #line 606 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_STR_LE) ;} - break; - - case 162: +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_STR_LT) ; + break;} +case 159: #line 607 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_STR_GE) ;} - break; - - case 163: +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_STR_GT) ; + break;} +case 160: #line 608 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_STR_EQ) ;} - break; - - case 164: +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_STR_LE) ; + break;} +case 161: #line 609 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_STR_NE) ;} - break; - - case 165: +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_STR_GE) ; + break;} +case 162: #line 610 "compile.y" - { yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_IS) ;} - break; - - case 166: -#line 613 "compile.y" - { +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_STR_EQ) ; + break;} +case 163: +#line 611 "compile.y" +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_STR_NE) ; + break;} +case 164: +#line 612 "compile.y" +{ yyval=yyvsp[-2]; P(*yyval, *yyvsp[0]); O(*yyval, OP_IS) ; + break;} +case 165: +#line 615 "compile.y" +{ // optimized from OP_STRING->OP_VALUE for doubles maybe_change_string_literal_to_double_literal(*(yyval=yyvsp[0])); -;} - break; - - case 167: -#line 618 "compile.y" - { +; + break;} +case 166: +#line 620 "compile.y" +{ yyval=N(); OA(*yyval, OP_STRING_POOL, yyvsp[0]); /* stack: empty write context */ /* some code that writes to that context */ /* context=pop; stack: context.get_string() */ -;} - break; - - case 168: -#line 627 "compile.y" - { +; + break;} +case 167: +#line 629 "compile.y" +{ // optimized from OP_STRING+OP_WRITE_VALUE to OP_STRING__WRITE change_string_literal_to_write_string_literal(*(yyval=yyvsp[0])) -;} - break; - - case 169: -#line 632 "compile.y" - { yyval=VL(/*we know that we will not change it*/const_cast(&vvoid), 0, 0, 0) ;} - break; - - case 170: -#line 633 "compile.y" - { yyval = VL(/*we know that we will not change it*/const_cast(&vtrue), 0, 0, 0) ;} - break; - - case 171: +; + break;} +case 168: #line 634 "compile.y" - { yyval = VL(/*we know that we will not change it*/const_cast(&vfalse), 0, 0, 0) ;} - break; - - case 172: +{ yyval=VL(/*we know that we will not change it*/const_cast(&vvoid), 0, 0, 0) ; + break;} +case 169: +#line 635 "compile.y" +{ yyval = VL(/*we know that we will not change it*/const_cast(&vtrue), 0, 0, 0) ; + break;} +case 170: #line 636 "compile.y" - { yyval=N() ;} - break; - - - } - -/* Line 1010 of yacc.c. */ -#line 2230 "compile.tab.C" +{ yyval = VL(/*we know that we will not change it*/const_cast(&vfalse), 0, 0, 0) ; + break;} +case 171: +#line 638 "compile.y" +{ yyval=N() ; + break;} +} + /* the action file gets copied in in place of this dollarsign */ +#line 543 "/usr/share/bison.simple" yyvsp -= yylen; yyssp -= yylen; +#ifdef YYLSP_NEEDED + yylsp -= yylen; +#endif - - YY_STACK_PRINT (yyss, yyssp); +#if YYDEBUG != 0 + if (yydebug) + { + short *ssp1 = yyss - 1; + fprintf (stderr, "state stack now"); + while (ssp1 != yyssp) + fprintf (stderr, " %d", *++ssp1); + fprintf (stderr, "\n"); + } +#endif *++yyvsp = yyval; +#ifdef YYLSP_NEEDED + yylsp++; + if (yylen == 0) + { + yylsp->first_line = yylloc.first_line; + yylsp->first_column = yylloc.first_column; + yylsp->last_line = (yylsp-1)->last_line; + yylsp->last_column = (yylsp-1)->last_column; + yylsp->text = 0; + } + else + { + yylsp->last_line = (yylsp+yylen-1)->last_line; + yylsp->last_column = (yylsp+yylen-1)->last_column; + } +#endif - /* Now `shift' the result of the reduction. Determine what state - that goes to, based on the state we popped back to and the rule - number reduced by. */ + /* Now "shift" the result of the reduction. + Determine what state that goes to, + based on the state we popped back to + and the rule number reduced by. */ yyn = yyr1[yyn]; - yystate = yypgoto[yyn - YYNTOKENS] + *yyssp; - if (0 <= yystate && yystate <= YYLAST && yycheck[yystate] == *yyssp) + yystate = yypgoto[yyn - YYNTBASE] + *yyssp; + if (yystate >= 0 && yystate <= YYLAST && yycheck[yystate] == *yyssp) yystate = yytable[yystate]; else - yystate = yydefgoto[yyn - YYNTOKENS]; + yystate = yydefgoto[yyn - YYNTBASE]; goto yynewstate; +yyerrlab: /* here on detecting error */ -/*------------------------------------. -| yyerrlab -- here on detecting error | -`------------------------------------*/ -yyerrlab: - /* If not already recovering from an error, report this error. */ - if (!yyerrstatus) + if (! yyerrstatus) + /* If not already recovering from an error, report this error. */ { ++yynerrs; -#if YYERROR_VERBOSE + +#ifdef YYERROR_VERBOSE yyn = yypact[yystate]; - if (YYPACT_NINF < yyn && yyn < YYLAST) + if (yyn > YYFLAG && yyn < YYLAST) { - YYSIZE_T yysize = 0; - int yytype = YYTRANSLATE (yychar); - const char* yyprefix; - char *yymsg; - int yyx; - - /* Start YYX at -YYN if negative to avoid negative indexes in - YYCHECK. */ - int yyxbegin = yyn < 0 ? -yyn : 0; - - /* Stay within bounds of both yycheck and yytname. */ - int yychecklim = YYLAST - yyn; - int yyxend = yychecklim < YYNTOKENS ? yychecklim : YYNTOKENS; - int yycount = 0; - - yyprefix = ", expecting "; - for (yyx = yyxbegin; yyx < yyxend; ++yyx) - if (yycheck[yyx + yyn] == yyx && yyx != YYTERROR) - { - yysize += yystrlen (yyprefix) + yystrlen (yytname [yyx]); - yycount += 1; - if (yycount == 5) - { - yysize = 0; - break; - } - } - yysize += (sizeof ("syntax error, unexpected ") - + yystrlen (yytname[yytype])); - yymsg = (char *) YYSTACK_ALLOC (yysize); - if (yymsg != 0) + int size = 0; + char *msg; + int x, count; + + count = 0; + /* Start X at -yyn if nec to avoid negative indexes in yycheck. */ + for (x = (yyn < 0 ? -yyn : 0); + x < (sizeof(yytname) / sizeof(char *)); x++) + if (yycheck[x + yyn] == x) + size += strlen(yytname[x]) + 15, count++; + msg = (char *) malloc(size + 15); + if (msg != 0) { - char *yyp = yystpcpy (yymsg, "syntax error, unexpected "); - yyp = yystpcpy (yyp, yytname[yytype]); + strcpy(msg, "parse error"); - if (yycount < 5) + if (count < 5) { - yyprefix = ", expecting "; - for (yyx = yyxbegin; yyx < yyxend; ++yyx) - if (yycheck[yyx + yyn] == yyx && yyx != YYTERROR) + count = 0; + for (x = (yyn < 0 ? -yyn : 0); + x < (sizeof(yytname) / sizeof(char *)); x++) + if (yycheck[x + yyn] == x) { - yyp = yystpcpy (yyp, yyprefix); - yyp = yystpcpy (yyp, yytname[yyx]); - yyprefix = " or "; + strcat(msg, count == 0 ? ", expecting `" : " or `"); + strcat(msg, yytname[x]); + strcat(msg, "'"); + count++; } } - yyerror (yymsg); - YYSTACK_FREE (yymsg); + yyerror(msg); + free(msg); } else - yyerror ("syntax error; also virtual memory exhausted"); + yyerror ("parse error; also virtual memory exceeded"); } else #endif /* YYERROR_VERBOSE */ - yyerror ("syntax error"); + yyerror("parse error"); } - + goto yyerrlab1; +yyerrlab1: /* here on error raised explicitly by an action */ if (yyerrstatus == 3) { - /* If just tried and failed to reuse lookahead token after an - error, discard it. */ + /* if just tried and failed to reuse lookahead token after an error, discard it. */ - if (yychar <= YYEOF) - { - /* If at end of input, pop the error token, - then the rest of the stack, then return failure. */ - if (yychar == YYEOF) - for (;;) - { - YYPOPSTACK; - if (yyssp == yyss) - YYABORT; - YYDSYMPRINTF ("Error: popping", yystos[*yyssp], yyvsp, yylsp); - yydestruct (yystos[*yyssp], yyvsp); - } - } - else - { - YYDSYMPRINTF ("Error: discarding", yytoken, &yylval, &yylloc); - yydestruct (yytoken, &yylval); - yychar = YYEMPTY; + /* return failure if at end of input */ + if (yychar == YYEOF) + YYABORT; - } +#if YYDEBUG != 0 + if (yydebug) + fprintf(stderr, "Discarding token %d (%s).\n", yychar, yytname[yychar1]); +#endif + + yychar = YYEMPTY; } - /* Else will try to reuse lookahead token after shifting the error - token. */ - goto yyerrlab1; + /* Else will try to reuse lookahead token + after shifting the error token. */ + yyerrstatus = 3; /* Each real token shifted decrements this */ -/*---------------------------------------------------. -| yyerrorlab -- error raised explicitly by YYERROR. | -`---------------------------------------------------*/ -yyerrorlab: + goto yyerrhandle; -#ifdef __GNUC__ - /* Pacify GCC when the user code never invokes YYERROR and the label - yyerrorlab therefore never appears in user code. */ - if (0) - goto yyerrorlab; -#endif +yyerrdefault: /* current state does not do anything special for the error token. */ - yyvsp -= yylen; - yyssp -= yylen; - yystate = *yyssp; - goto yyerrlab1; +#if 0 + /* This is wrong; only states that explicitly want error tokens + should shift them. */ + yyn = yydefact[yystate]; /* If its default is to accept any token, ok. Otherwise pop it.*/ + if (yyn) goto yydefault; +#endif +yyerrpop: /* pop the current state because it cannot handle the error token */ -/*-------------------------------------------------------------. -| yyerrlab1 -- common code for both syntax error and YYERROR. | -`-------------------------------------------------------------*/ -yyerrlab1: - yyerrstatus = 3; /* Each real token shifted decrements this. */ + if (yyssp == yyss) YYABORT; + yyvsp--; + yystate = *--yyssp; +#ifdef YYLSP_NEEDED + yylsp--; +#endif - for (;;) +#if YYDEBUG != 0 + if (yydebug) { - yyn = yypact[yystate]; - if (yyn != YYPACT_NINF) - { - yyn += YYTERROR; - if (0 <= yyn && yyn <= YYLAST && yycheck[yyn] == YYTERROR) - { - yyn = yytable[yyn]; - if (0 < yyn) - break; - } - } + short *ssp1 = yyss - 1; + fprintf (stderr, "Error: state stack now"); + while (ssp1 != yyssp) + fprintf (stderr, " %d", *++ssp1); + fprintf (stderr, "\n"); + } +#endif - /* Pop the current state because it cannot handle the error token. */ - if (yyssp == yyss) - YYABORT; +yyerrhandle: + + yyn = yypact[yystate]; + if (yyn == YYFLAG) + goto yyerrdefault; - YYDSYMPRINTF ("Error: popping", yystos[*yyssp], yyvsp, yylsp); - yydestruct (yystos[yystate], yyvsp); - YYPOPSTACK; - yystate = *yyssp; - YY_STACK_PRINT (yyss, yyssp); + yyn += YYTERROR; + if (yyn < 0 || yyn > YYLAST || yycheck[yyn] != YYTERROR) + goto yyerrdefault; + + yyn = yytable[yyn]; + if (yyn < 0) + { + if (yyn == YYFLAG) + goto yyerrpop; + yyn = -yyn; + goto yyreduce; } + else if (yyn == 0) + goto yyerrpop; if (yyn == YYFINAL) YYACCEPT; - YYDPRINTF ((stderr, "Shifting error token, ")); +#if YYDEBUG != 0 + if (yydebug) + fprintf(stderr, "Shifting error token, "); +#endif *++yyvsp = yylval; - +#ifdef YYLSP_NEEDED + *++yylsp = yylloc; +#endif yystate = yyn; goto yynewstate; + yyacceptlab: + /* YYACCEPT comes here. */ + if (yyfree_stacks) + { + free (yyss); + free (yyvs); +#ifdef YYLSP_NEEDED + free (yyls); +#endif + } + return 0; -/*-------------------------------------. -| yyacceptlab -- YYACCEPT comes here. | -`-------------------------------------*/ -yyacceptlab: - yyresult = 0; - goto yyreturn; - -/*-----------------------------------. -| yyabortlab -- YYABORT comes here. | -`-----------------------------------*/ -yyabortlab: - yyresult = 1; - goto yyreturn; - -#ifndef yyoverflow -/*----------------------------------------------. -| yyoverflowlab -- parser overflow comes here. | -`----------------------------------------------*/ -yyoverflowlab: - yyerror ("parser stack overflow"); - yyresult = 2; - /* Fall through. */ -#endif - -yyreturn: -#ifndef yyoverflow - if (yyss != yyssa) - YYSTACK_FREE (yyss); + yyabortlab: + /* YYABORT comes here. */ + if (yyfree_stacks) + { + free (yyss); + free (yyvs); +#ifdef YYLSP_NEEDED + free (yyls); #endif - return yyresult; + } + return 1; } - - -#line 638 "compile.y" +#line 640 "compile.y" #endif @@ -3247,5 +2777,3 @@ static void yyprint(FILE *file, int type if(type==STRING) fprintf(file, " \"%s\"", LA2S(*value)->cstr()); } - -