diff options
Diffstat (limited to 'crawl-ref/source/prebuilt/levcomp.tab.cc')
| -rw-r--r-- | crawl-ref/source/prebuilt/levcomp.tab.cc | 2807 |
1 files changed, 1032 insertions, 1775 deletions
diff --git a/crawl-ref/source/prebuilt/levcomp.tab.cc b/crawl-ref/source/prebuilt/levcomp.tab.cc index e18a8211d4..a3020be2b4 100644 --- a/crawl-ref/source/prebuilt/levcomp.tab.cc +++ b/crawl-ref/source/prebuilt/levcomp.tab.cc @@ -1,191 +1,66 @@ -/* A Bison parser, made by GNU Bison 2.3. */ -/* Skeleton implementation for Bison's Yacc-like parsers in C +/* A Bison parser, made from levcomp.ypp + by GNU Bison version 1.28 */ + +#define YYBISON 1 /* Identify Bison output. */ + +#define BRANCHDEF 257 +#define BRANCH 258 +#define DESC 259 +#define DEFAULT 260 +#define DEFAULT_DEPTH 261 +#define SHUFFLE 262 +#define SUBST 263 +#define TAGS 264 +#define KFEAT 265 +#define KITEM 266 +#define KMONS 267 +#define NAME 268 +#define DEPTH 269 +#define ORIENT 270 +#define PLACE 271 +#define CHANCE 272 +#define FLAGS 273 +#define MONS 274 +#define ITEM 275 +#define ROOT_DEPTH 276 +#define ENTRY_MSG 277 +#define EXIT_MSG 278 +#define ROCK_COLOUR 279 +#define FLOOR_COLOUR 280 +#define ENCOMPASS 281 +#define FLOAT 282 +#define NORTH 283 +#define EAST 284 +#define SOUTH 285 +#define WEST 286 +#define NORTHEAST 287 +#define SOUTHEAST 288 +#define SOUTHWEST 289 +#define NORTHWEST 290 +#define LEVEL 291 +#define END 292 +#define PVAULT 293 +#define PMINIVAULT 294 +#define MONSTERS 295 +#define ENDMONSTERS 296 +#define CHARACTER 297 +#define NO_HMIRROR 298 +#define NO_VMIRROR 299 +#define NO_ROTATE 300 +#define PANDEMONIC 301 +#define DASH 302 +#define COMMA 303 +#define QUOTE 304 +#define OPAREN 305 +#define CPAREN 306 +#define INTEGER 307 +#define STRING 308 +#define MAP_LINE 309 +#define MONSTER_NAME 310 +#define ITEM_INFO 311 +#define IDENTIFIER 312 - Copyright (C) 1984, 1989, 1990, 2000, 2001, 2002, 2003, 2004, 2005, 2006 - 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., 51 Franklin Street, Fifth Floor, - Boston, MA 02110-1301, USA. */ - -/* As a special exception, you may create a larger work that contains - part or all of the Bison parser skeleton and distribute that work - under terms of your choice, so long as that work isn't itself a - parser generator using the skeleton or a modified version thereof - as a parser skeleton. Alternatively, if you modify or redistribute - the parser skeleton itself, you may (at your option) remove this - special exception, which will cause the skeleton and the resulting - Bison output files to be licensed under the GNU General Public - License without this special exception. - - This special exception was added by the Free Software Foundation in - version 2.2 of Bison. */ - -/* C LALR(1) parser skeleton 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 - -/* Bison version. */ -#define YYBISON_VERSION "2.3" - -/* Skeleton name. */ -#define YYSKELETON_NAME "yacc.c" - -/* Pure parsers. */ -#define YYPURE 0 - -/* Using locations. */ -#define YYLSP_NEEDED 0 - - - -/* Tokens. */ -#ifndef YYTOKENTYPE -# define YYTOKENTYPE - /* Put the tokens into the symbol table, so that GDB and other debuggers - know about them. */ - enum yytokentype { - BRANCHDEF = 258, - BRANCH = 259, - DESC = 260, - DEFAULT = 261, - DEFAULT_DEPTH = 262, - SHUFFLE = 263, - SUBST = 264, - TAGS = 265, - KFEAT = 266, - KITEM = 267, - KMONS = 268, - NAME = 269, - DEPTH = 270, - ORIENT = 271, - PLACE = 272, - CHANCE = 273, - FLAGS = 274, - MONS = 275, - ITEM = 276, - ROOT_DEPTH = 277, - ENTRY_MSG = 278, - EXIT_MSG = 279, - ROCK_COLOUR = 280, - FLOOR_COLOUR = 281, - ENCOMPASS = 282, - FLOAT = 283, - NORTH = 284, - EAST = 285, - SOUTH = 286, - WEST = 287, - NORTHEAST = 288, - SOUTHEAST = 289, - SOUTHWEST = 290, - NORTHWEST = 291, - LEVEL = 292, - END = 293, - PVAULT = 294, - PMINIVAULT = 295, - MONSTERS = 296, - ENDMONSTERS = 297, - CHARACTER = 298, - NO_HMIRROR = 299, - NO_VMIRROR = 300, - NO_ROTATE = 301, - PANDEMONIC = 302, - DASH = 303, - COMMA = 304, - QUOTE = 305, - OPAREN = 306, - CPAREN = 307, - INTEGER = 308, - STRING = 309, - MAP_LINE = 310, - MONSTER_NAME = 311, - ITEM_INFO = 312, - IDENTIFIER = 313 - }; -#endif -/* Tokens. */ -#define BRANCHDEF 258 -#define BRANCH 259 -#define DESC 260 -#define DEFAULT 261 -#define DEFAULT_DEPTH 262 -#define SHUFFLE 263 -#define SUBST 264 -#define TAGS 265 -#define KFEAT 266 -#define KITEM 267 -#define KMONS 268 -#define NAME 269 -#define DEPTH 270 -#define ORIENT 271 -#define PLACE 272 -#define CHANCE 273 -#define FLAGS 274 -#define MONS 275 -#define ITEM 276 -#define ROOT_DEPTH 277 -#define ENTRY_MSG 278 -#define EXIT_MSG 279 -#define ROCK_COLOUR 280 -#define FLOOR_COLOUR 281 -#define ENCOMPASS 282 -#define FLOAT 283 -#define NORTH 284 -#define EAST 285 -#define SOUTH 286 -#define WEST 287 -#define NORTHEAST 288 -#define SOUTHEAST 289 -#define SOUTHWEST 290 -#define NORTHWEST 291 -#define LEVEL 292 -#define END 293 -#define PVAULT 294 -#define PMINIVAULT 295 -#define MONSTERS 296 -#define ENDMONSTERS 297 -#define CHARACTER 298 -#define NO_HMIRROR 299 -#define NO_VMIRROR 300 -#define NO_ROTATE 301 -#define PANDEMONIC 302 -#define DASH 303 -#define COMMA 304 -#define QUOTE 305 -#define OPAREN 306 -#define CPAREN 307 -#define INTEGER 308 -#define STRING 309 -#define MAP_LINE 310 -#define MONSTER_NAME 311 -#define ITEM_INFO 312 -#define IDENTIFIER 313 - - - - -/* Copy the first part of user declarations. */ #line 1 "levcomp.ypp" @@ -195,6 +70,8 @@ #include "stuff.h" #include <map> +#define YYERROR_VERBOSE 1 + int yylex(); extern int yylineno; @@ -222,1140 +99,511 @@ void yyerror(const char *e) } - -/* Enabling traces. */ -#ifndef YYDEBUG -# define YYDEBUG 0 -#endif - -/* Enabling verbose error messages. */ -#ifdef YYERROR_VERBOSE -# undef YYERROR_VERBOSE -# define YYERROR_VERBOSE 1 -#else -# define YYERROR_VERBOSE 0 -#endif - -/* Enabling the token table. */ -#ifndef YYTOKEN_TABLE -# define YYTOKEN_TABLE 0 -#endif - -#if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED -typedef union YYSTYPE -#line 38 "levcomp.ypp" +#line 39 "levcomp.ypp" +typedef union { int i; const char *text; -} -/* Line 193 of yacc.c. */ -#line 253 "levcomp.tab.c" - YYSTYPE; -# define yystype YYSTYPE /* obsolescent; will be withdrawn */ -# define YYSTYPE_IS_DECLARED 1 -# define YYSTYPE_IS_TRIVIAL 1 -#endif +} YYSTYPE; +#include <stdio.h> - - -/* Copy the second part of user declarations. */ - - -/* Line 216 of yacc.c. */ -#line 266 "levcomp.tab.c" - -#ifdef short -# undef short +#ifndef __cplusplus +#ifndef __STDC__ +#define const #endif - -#ifdef YYTYPE_UINT8 -typedef YYTYPE_UINT8 yytype_uint8; -#else -typedef unsigned char yytype_uint8; #endif -#ifdef YYTYPE_INT8 -typedef YYTYPE_INT8 yytype_int8; -#elif (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -typedef signed char yytype_int8; -#else -typedef short int yytype_int8; -#endif -#ifdef YYTYPE_UINT16 -typedef YYTYPE_UINT16 yytype_uint16; -#else -typedef unsigned short int yytype_uint16; -#endif -#ifdef YYTYPE_INT16 -typedef YYTYPE_INT16 yytype_int16; -#else -typedef short int yytype_int16; -#endif +#define YYFINAL 98 +#define YYFLAG -32768 +#define YYNTBASE 59 + +#define YYTRANSLATE(x) ((unsigned)(x) <= 312 ? yytranslate[x] : 97) + +static const char yytranslate[] = { 0, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 1, 3, 4, 5, 6, + 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, + 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, + 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, + 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, + 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, + 57, 58 +}; -#ifndef YYSIZE_T -# ifdef __SIZE_TYPE__ -# define YYSIZE_T __SIZE_TYPE__ -# elif defined size_t -# define YYSIZE_T size_t -# elif ! defined YYSIZE_T && (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -# include <stddef.h> /* INFRINGES ON USER NAME SPACE */ -# define YYSIZE_T size_t -# else -# define YYSIZE_T unsigned int -# endif -#endif +#if YYDEBUG != 0 +static const short yyprhs[] = { 0, + 0, 2, 3, 6, 8, 10, 12, 15, 20, 23, + 24, 27, 29, 31, 33, 35, 37, 39, 41, 43, + 45, 47, 49, 51, 53, 55, 58, 60, 63, 65, + 68, 71, 73, 77, 79, 82, 83, 86, 89, 91, + 95, 97, 99, 102, 106, 108, 110, 112, 115, 119, + 121, 123, 126, 128, 131, 135, 137, 140, 142, 145, + 147, 149, 151, 153, 155, 157, 159, 161, 163, 165, + 168, 169, 172, 174, 176, 178, 180, 182, 185 +}; -#define YYSIZE_MAXIMUM ((YYSIZE_T) -1) - -#ifndef YY_ -# if YYENABLE_NLS -# if ENABLE_NLS -# include <libintl.h> /* INFRINGES ON USER NAME SPACE */ -# define YY_(msgid) dgettext ("bison-runtime", msgid) -# endif -# endif -# ifndef YY_ -# define YY_(msgid) msgid -# endif -#endif +static const short yyrhs[] = { 60, + 0, 0, 61, 60, 0, 62, 0, 64, 0, 63, + 0, 7, 87, 0, 65, 66, 94, 66, 0, 14, + 54, 0, 0, 67, 66, 0, 85, 0, 86, 0, + 88, 0, 89, 0, 91, 0, 82, 0, 79, 0, + 76, 0, 74, 0, 71, 0, 68, 0, 70, 0, + 69, 0, 11, 0, 11, 54, 0, 13, 0, 13, + 54, 0, 12, 0, 12, 54, 0, 8, 72, 0, + 73, 0, 73, 49, 72, 0, 57, 0, 10, 75, + 0, 0, 54, 75, 0, 9, 77, 0, 78, 0, + 78, 49, 77, 0, 57, 0, 21, 0, 21, 80, + 0, 81, 49, 80, 0, 81, 0, 57, 0, 20, + 0, 20, 83, 0, 84, 49, 83, 0, 84, 0, + 56, 0, 17, 54, 0, 15, 0, 15, 87, 0, + 53, 48, 53, 0, 53, 0, 18, 53, 0, 16, + 0, 16, 90, 0, 27, 0, 29, 0, 30, 0, + 31, 0, 32, 0, 33, 0, 34, 0, 35, 0, + 36, 0, 28, 0, 19, 92, 0, 0, 93, 92, + 0, 44, 0, 45, 0, 46, 0, 95, 0, 96, + 0, 96, 95, 0, 55, 0 +}; -/* Suppress unused-variable warnings by "using" E. */ -#if ! defined lint || defined __GNUC__ -# define YYUSE(e) ((void) (e)) -#else -# define YYUSE(e) /* empty */ #endif -/* Identity function, used to suppress warnings about constant conditions. */ -#ifndef lint -# define YYID(n) (n) -#else -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -static int -YYID (int i) -#else -static int -YYID (i) - int i; -#endif -{ - return i; -} +#if YYDEBUG != 0 +static const short yyrline[] = { 0, + 71, 74, 75, 78, 79, 82, 85, 91, 130, 153, + 154, 157, 158, 159, 160, 161, 162, 163, 164, 165, + 166, 167, 168, 169, 172, 173, 182, 183, 192, 193, + 202, 205, 206, 209, 219, 222, 223, 231, 234, 235, + 238, 249, 250, 253, 254, 257, 272, 273, 276, 277, + 280, 296, 302, 303, 309, 314, 320, 326, 327, 333, + 334, 335, 336, 337, 338, 339, 340, 341, 342, 345, + 348, 349, 365, 366, 367, 370, 373, 374, 377 +}; #endif -#if ! defined yyoverflow || YYERROR_VERBOSE - -/* The parser invokes alloca or malloc; define the necessary symbols. */ - -# ifdef YYSTACK_USE_ALLOCA -# if YYSTACK_USE_ALLOCA -# ifdef __GNUC__ -# define YYSTACK_ALLOC __builtin_alloca -# elif defined __BUILTIN_VA_ARG_INCR -# include <alloca.h> /* INFRINGES ON USER NAME SPACE */ -# elif defined _AIX -# define YYSTACK_ALLOC __alloca -# elif defined _MSC_VER -# include <malloc.h> /* INFRINGES ON USER NAME SPACE */ -# define alloca _alloca -# else -# define YYSTACK_ALLOC alloca -# if ! defined _ALLOCA_H && ! defined _STDLIB_H && (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -# include <stdlib.h> /* INFRINGES ON USER NAME SPACE */ -# ifndef _STDLIB_H -# define _STDLIB_H 1 -# endif -# endif -# endif -# endif -# endif - -# ifdef YYSTACK_ALLOC - /* Pacify GCC's `empty if-body' warning. */ -# define YYSTACK_FREE(Ptr) do { /* empty */; } while (YYID (0)) -# ifndef YYSTACK_ALLOC_MAXIMUM - /* The OS might guarantee only one guard page at the bottom of the stack, - and a page size can be as small as 4096 bytes. So we cannot safely - invoke alloca (N) if N exceeds 4096. Use a slightly smaller number - to allow for a few compiler-allocated temporary stack slots. */ -# define YYSTACK_ALLOC_MAXIMUM 4032 /* reasonable circa 2006 */ -# endif -# else -# define YYSTACK_ALLOC YYMALLOC -# define YYSTACK_FREE YYFREE -# ifndef YYSTACK_ALLOC_MAXIMUM -# define YYSTACK_ALLOC_MAXIMUM YYSIZE_MAXIMUM -# endif -# if (defined __cplusplus && ! defined _STDLIB_H \ - && ! ((defined YYMALLOC || defined malloc) \ - && (defined YYFREE || defined free))) -# include <stdlib.h> /* INFRINGES ON USER NAME SPACE */ -# ifndef _STDLIB_H -# define _STDLIB_H 1 -# endif -# endif -# ifndef YYMALLOC -# define YYMALLOC malloc -# if ! defined malloc && ! defined _STDLIB_H && (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -void *malloc (YYSIZE_T); /* INFRINGES ON USER NAME SPACE */ -# endif -# endif -# ifndef YYFREE -# define YYFREE free -# if ! defined free && ! defined _STDLIB_H && (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -void free (void *); /* INFRINGES ON USER NAME SPACE */ -# endif -# endif -# 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 -{ - yytype_int16 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 (yytype_int16) + 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 \ - { \ - YYSIZE_T yyi; \ - for (yyi = 0; yyi < (Count); yyi++) \ - (To)[yyi] = (From)[yyi]; \ - } \ - while (YYID (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 (YYID (0)) +#if YYDEBUG != 0 || defined (YYERROR_VERBOSE) + +static const char * const yytname[] = { "$","error","$undefined.","BRANCHDEF", +"BRANCH","DESC","DEFAULT","DEFAULT_DEPTH","SHUFFLE","SUBST","TAGS","KFEAT","KITEM", +"KMONS","NAME","DEPTH","ORIENT","PLACE","CHANCE","FLAGS","MONS","ITEM","ROOT_DEPTH", +"ENTRY_MSG","EXIT_MSG","ROCK_COLOUR","FLOOR_COLOUR","ENCOMPASS","FLOAT","NORTH", +"EAST","SOUTH","WEST","NORTHEAST","SOUTHEAST","SOUTHWEST","NORTHWEST","LEVEL", +"END","PVAULT","PMINIVAULT","MONSTERS","ENDMONSTERS","CHARACTER","NO_HMIRROR", +"NO_VMIRROR","NO_ROTATE","PANDEMONIC","DASH","COMMA","QUOTE","OPAREN","CPAREN", +"INTEGER","STRING","MAP_LINE","MONSTER_NAME","ITEM_INFO","IDENTIFIER","file", +"definitions","definition","def","defdepth","level","name","metalines","metaline", +"kfeat","kmons","kitem","shuffle","shuffle_specifiers","shuffle_spec","tags", +"tagstrings","subst","subst_specifiers","subst_spec","items","item_specifiers", +"item_specifier","mons","mnames","mname","place","depth","depth_range","chance", +"orientation","orient_name","flags","flagnames","flagname","map_def","map_lines", +"map_line", NULL +}; #endif -/* YYFINAL -- State number of the termination state. */ -#define YYFINAL 13 -/* YYLAST -- Last index in YYTABLE. */ -#define YYLAST 66 - -/* YYNTOKENS -- Number of terminals. */ -#define YYNTOKENS 59 -/* YYNNTS -- Number of nonterminals. */ -#define YYNNTS 35 -/* YYNRULES -- Number of rules. */ -#define YYNRULES 76 -/* YYNRULES -- Number of states. */ -#define YYNSTATES 90 - -/* YYTRANSLATE(YYLEX) -- Bison symbol number corresponding to YYLEX. */ -#define YYUNDEFTOK 2 -#define YYMAXUTOK 313 - -#define YYTRANSLATE(YYX) \ - ((unsigned int) (YYX) <= YYMAXUTOK ? yytranslate[YYX] : YYUNDEFTOK) - -/* YYTRANSLATE[YYLEX] -- Bison symbol number corresponding to YYLEX. */ -static const yytype_uint8 yytranslate[] = -{ - 0, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 1, 2, 3, 4, - 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, - 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, - 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, - 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, - 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, - 55, 56, 57, 58 +static const short yyr1[] = { 0, + 59, 60, 60, 61, 61, 62, 63, 64, 65, 66, + 66, 67, 67, 67, 67, 67, 67, 67, 67, 67, + 67, 67, 67, 67, 68, 68, 69, 69, 70, 70, + 71, 72, 72, 73, 74, 75, 75, 76, 77, 77, + 78, 79, 79, 80, 80, 81, 82, 82, 83, 83, + 84, 85, 86, 86, 87, 87, 88, 89, 89, 90, + 90, 90, 90, 90, 90, 90, 90, 90, 90, 91, + 92, 92, 93, 93, 93, 94, 95, 95, 96 }; -#if YYDEBUG -/* YYPRHS[YYN] -- Index of the first RHS symbol of rule number YYN in - YYRHS. */ -static const yytype_uint8 yyprhs[] = -{ - 0, 0, 3, 5, 6, 9, 11, 13, 15, 18, - 23, 26, 27, 30, 32, 34, 36, 38, 40, 42, - 44, 46, 48, 50, 52, 54, 56, 58, 61, 63, - 66, 68, 71, 73, 76, 79, 80, 83, 85, 88, - 90, 93, 97, 99, 101, 103, 106, 110, 112, 114, - 117, 119, 122, 126, 128, 131, 133, 136, 138, 140, - 142, 144, 146, 148, 150, 152, 154, 156, 159, 160, - 163, 165, 167, 169, 171, 173, 176 +static const short yyr2[] = { 0, + 1, 0, 2, 1, 1, 1, 2, 4, 2, 0, + 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 2, 1, 2, 1, 2, + 2, 1, 3, 1, 2, 0, 2, 2, 1, 3, + 1, 1, 2, 3, 1, 1, 1, 2, 3, 1, + 1, 2, 1, 2, 3, 1, 2, 1, 2, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, + 0, 2, 1, 1, 1, 1, 1, 2, 1 }; -/* YYRHS -- A `-1'-separated list of the rules' RHS. */ -static const yytype_int8 yyrhs[] = -{ - 60, 0, -1, 61, -1, -1, 62, 61, -1, 63, - -1, 65, -1, 64, -1, 7, 84, -1, 66, 67, - 91, 67, -1, 14, 54, -1, -1, 68, 67, -1, - 82, -1, 83, -1, 85, -1, 86, -1, 88, -1, - 79, -1, 76, -1, 75, -1, 73, -1, 72, -1, - 69, -1, 71, -1, 70, -1, 11, -1, 11, 54, - -1, 13, -1, 13, 54, -1, 12, -1, 12, 54, - -1, 8, -1, 8, 54, -1, 10, 74, -1, -1, - 54, 74, -1, 9, -1, 9, 54, -1, 21, -1, - 21, 77, -1, 78, 49, 77, -1, 78, -1, 57, - -1, 20, -1, 20, 80, -1, 81, 49, 80, -1, - 81, -1, 56, -1, 17, 54, -1, 15, -1, 15, - 84, -1, 53, 48, 53, -1, 53, -1, 18, 53, - -1, 16, -1, 16, 87, -1, 27, -1, 29, -1, - 30, -1, 31, -1, 32, -1, 33, -1, 34, -1, - 35, -1, 36, -1, 28, -1, 19, 89, -1, -1, - 90, 89, -1, 44, -1, 45, -1, 46, -1, 92, - -1, 93, -1, 93, 92, -1, 55, -1 +static const short yydefact[] = { 2, + 0, 0, 1, 2, 4, 6, 5, 10, 56, 7, + 9, 3, 0, 0, 36, 25, 29, 27, 53, 58, + 0, 0, 71, 47, 42, 0, 10, 22, 24, 23, + 21, 20, 19, 18, 17, 12, 13, 14, 15, 16, + 0, 34, 31, 32, 41, 38, 39, 36, 35, 26, + 30, 28, 54, 60, 69, 61, 62, 63, 64, 65, + 66, 67, 68, 59, 52, 57, 73, 74, 75, 70, + 71, 51, 48, 50, 46, 43, 45, 79, 10, 76, + 77, 11, 55, 0, 0, 37, 72, 0, 0, 8, + 78, 33, 40, 49, 44, 0, 0, 0 }; -/* YYRLINE[YYN] -- source line where rule number YYN was defined. */ -static const yytype_uint16 yyrline[] = -{ - 0, 69, 69, 72, 73, 76, 77, 80, 83, 89, - 128, 151, 152, 155, 156, 157, 158, 159, 160, 161, - 162, 163, 164, 165, 166, 167, 170, 171, 180, 181, - 190, 191, 200, 201, 211, 214, 215, 223, 224, 235, - 236, 239, 240, 243, 258, 259, 262, 263, 266, 282, - 288, 289, 295, 300, 306, 312, 313, 319, 320, 321, - 322, 323, 324, 325, 326, 327, 328, 331, 334, 335, - 351, 352, 353, 356, 359, 360, 363 +static const short yydefgoto[] = { 96, + 3, 4, 5, 6, 7, 8, 26, 27, 28, 29, + 30, 31, 43, 44, 32, 49, 33, 46, 47, 34, + 76, 77, 35, 73, 74, 36, 37, 10, 38, 39, + 64, 40, 70, 71, 79, 80, 81 }; -#endif -#if YYDEBUG || YYERROR_VERBOSE || YYTOKEN_TABLE -/* YYTNAME[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", "BRANCHDEF", "BRANCH", "DESC", "DEFAULT", - "DEFAULT_DEPTH", "SHUFFLE", "SUBST", "TAGS", "KFEAT", "KITEM", "KMONS", - "NAME", "DEPTH", "ORIENT", "PLACE", "CHANCE", "FLAGS", "MONS", "ITEM", - "ROOT_DEPTH", "ENTRY_MSG", "EXIT_MSG", "ROCK_COLOUR", "FLOOR_COLOUR", - "ENCOMPASS", "FLOAT", "NORTH", "EAST", "SOUTH", "WEST", "NORTHEAST", - "SOUTHEAST", "SOUTHWEST", "NORTHWEST", "LEVEL", "END", "PVAULT", - "PMINIVAULT", "MONSTERS", "ENDMONSTERS", "CHARACTER", "NO_HMIRROR", - "NO_VMIRROR", "NO_ROTATE", "PANDEMONIC", "DASH", "COMMA", "QUOTE", - "OPAREN", "CPAREN", "INTEGER", "STRING", "MAP_LINE", "MONSTER_NAME", - "ITEM_INFO", "IDENTIFIER", "$accept", "file", "definitions", - "definition", "def", "defdepth", "level", "name", "metalines", - "metaline", "kfeat", "kmons", "kitem", "shuffle", "tags", "tagstrings", - "symbol", "items", "item_specifiers", "item_specifier", "mons", "mnames", - "mname", "place", "depth", "depth_range", "chance", "orientation", - "orient_name", "flags", "flagnames", "flagname", "map_def", "map_lines", - "map_line", 0 +static const short yypact[] = { 18, + -46, -25,-32768, 18,-32768,-32768,-32768, -7, -17,-32768, +-32768,-32768, -24, -23, -19, -16, -15, -14, -46, -12, + -13, -11, -18, -26, -21, -10, -7,-32768,-32768,-32768, +-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768, + -9,-32768,-32768, -6,-32768,-32768, -3, -19,-32768,-32768, +-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768, +-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768, + -18,-32768,-32768, -2,-32768,-32768, -1,-32768, -7,-32768, + -10,-32768,-32768, -24, -23,-32768,-32768, -26, -21,-32768, +-32768,-32768,-32768,-32768,-32768, 37, 49,-32768 }; -#endif -# ifdef YYPRINT -/* YYTOKNUM[YYLEX-NUM] -- Internal token number corresponding to - token YYLEX-NUM. */ -static const yytype_uint16 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, 289, 290, 291, 292, 293, 294, - 295, 296, 297, 298, 299, 300, 301, 302, 303, 304, - 305, 306, 307, 308, 309, 310, 311, 312, 313 +static const short yypgoto[] = {-32768, + 46,-32768,-32768,-32768,-32768,-32768, -27,-32768,-32768,-32768, +-32768,-32768, -33,-32768,-32768, 5,-32768, -31,-32768,-32768, + -34,-32768,-32768, -32,-32768,-32768,-32768, 38,-32768,-32768, +-32768,-32768, -8,-32768,-32768, -22,-32768 }; -# endif -/* YYR1[YYN] -- Symbol number of symbol that rule YYN derives. */ -static const yytype_uint8 yyr1[] = -{ - 0, 59, 60, 61, 61, 62, 62, 63, 64, 65, - 66, 67, 67, 68, 68, 68, 68, 68, 68, 68, - 68, 68, 68, 68, 68, 68, 69, 69, 70, 70, - 71, 71, 72, 72, 73, 74, 74, 75, 75, 76, - 76, 77, 77, 78, 79, 79, 80, 80, 81, 82, - 83, 83, 84, 84, 85, 86, 86, 87, 87, 87, - 87, 87, 87, 87, 87, 87, 87, 88, 89, 89, - 90, 90, 90, 91, 92, 92, 93 -}; -/* YYR2[YYN] -- Number of symbols composing right hand side of rule YYN. */ -static const yytype_uint8 yyr2[] = -{ - 0, 2, 1, 0, 2, 1, 1, 1, 2, 4, - 2, 0, 2, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 2, 1, 2, - 1, 2, 1, 2, 2, 0, 2, 1, 2, 1, - 2, 3, 1, 1, 1, 2, 3, 1, 1, 2, - 1, 2, 3, 1, 2, 1, 2, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 2, 0, 2, - 1, 1, 1, 1, 1, 2, 1 -}; +#define YYLAST 63 -/* 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 yytype_uint8 yydefact[] = -{ - 3, 0, 0, 0, 2, 3, 5, 7, 6, 11, - 53, 8, 10, 1, 4, 32, 37, 35, 26, 30, - 28, 50, 55, 0, 0, 68, 44, 39, 0, 11, - 23, 25, 24, 22, 21, 20, 19, 18, 13, 14, - 15, 16, 17, 0, 33, 38, 35, 34, 27, 31, - 29, 51, 57, 66, 58, 59, 60, 61, 62, 63, - 64, 65, 56, 49, 54, 70, 71, 72, 67, 68, - 48, 45, 47, 43, 40, 42, 76, 11, 73, 74, - 12, 52, 36, 69, 0, 0, 9, 75, 46, 41 -}; -/* YYDEFGOTO[NTERM-NUM]. */ -static const yytype_int8 yydefgoto[] = -{ - -1, 3, 4, 5, 6, 7, 8, 9, 28, 29, - 30, 31, 32, 33, 34, 47, 35, 36, 74, 75, - 37, 71, 72, 38, 39, 11, 40, 41, 62, 42, - 68, 69, 77, 78, 79 +static const short yytable[] = { 82, + 13, 14, 15, 16, 17, 18, 9, 19, 20, 21, + 22, 23, 24, 25, 54, 55, 56, 57, 58, 59, + 60, 61, 62, 63, 1, 67, 68, 69, 11, 72, + 41, 2, 42, 45, 48, 75, 97, 50, 51, 52, + 65, 66, 84, 83, 78, 85, 88, 89, 98, 12, + 92, 90, 86, 93, 95, 94, 53, 0, 91, 0, + 0, 0, 87 }; -/* YYPACT[STATE-NUM] -- Index in YYTABLE of the portion describing - STATE-NUM. */ -#define YYPACT_NINF -49 -static const yytype_int8 yypact[] = -{ - 18, -46, -25, 30, -49, 18, -49, -49, -49, -7, - -17, -49, -49, -49, -49, -21, -20, -19, -16, -15, - -14, -46, -12, -13, -11, -18, -10, -8, -5, -7, - -49, -49, -49, -49, -49, -49, -49, -49, -49, -49, - -49, -49, -49, -9, -49, -49, -19, -49, -49, -49, - -49, -49, -49, -49, -49, -49, -49, -49, -49, -49, - -49, -49, -49, -49, -49, -49, -49, -49, -49, -18, - -49, -49, -6, -49, -49, -4, -49, -7, -49, -5, - -49, -49, -49, -49, -10, -8, -49, -49, -49, -49 +static const short yycheck[] = { 27, + 8, 9, 10, 11, 12, 13, 53, 15, 16, 17, + 18, 19, 20, 21, 27, 28, 29, 30, 31, 32, + 33, 34, 35, 36, 7, 44, 45, 46, 54, 56, + 48, 14, 57, 57, 54, 57, 0, 54, 54, 54, + 54, 53, 49, 53, 55, 49, 49, 49, 0, 4, + 84, 79, 48, 85, 89, 88, 19, -1, 81, -1, + -1, -1, 71 }; +/* -*-C-*- Note some compilers choke on comments on `#line' lines. */ +#line 3 "/usr/share/bison.simple" +/* This file comes from bison-1.28. */ -/* YYPGOTO[NTERM-NUM]. */ -static const yytype_int8 yypgoto[] = -{ - -49, -49, 31, -49, -49, -49, -49, -49, -29, -49, - -49, -49, -49, -49, -49, 1, -49, -49, -48, -49, - -49, -33, -49, -49, -49, 32, -49, -49, -49, -49, - -3, -49, -49, -27, -49 -}; +/* Skeleton output parser for bison, + Copyright (C) 1984, 1989, 1990 Free Software Foundation, Inc. -/* 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 -1 -static const yytype_uint8 yytable[] = -{ - 80, 15, 16, 17, 18, 19, 20, 10, 21, 22, - 23, 24, 25, 26, 27, 52, 53, 54, 55, 56, - 57, 58, 59, 60, 61, 1, 65, 66, 67, 12, - 13, 43, 2, 44, 45, 46, 14, 89, 48, 49, - 50, 63, 64, 84, 81, 85, 70, 82, 86, 73, - 76, 88, 87, 51, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 83 -}; + 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. -static const yytype_int8 yycheck[] = -{ - 29, 8, 9, 10, 11, 12, 13, 53, 15, 16, - 17, 18, 19, 20, 21, 27, 28, 29, 30, 31, - 32, 33, 34, 35, 36, 7, 44, 45, 46, 54, - 0, 48, 14, 54, 54, 54, 5, 85, 54, 54, - 54, 54, 53, 49, 53, 49, 56, 46, 77, 57, - 55, 84, 79, 21, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, 69 -}; + 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. -/* YYSTOS[STATE-NUM] -- The (internal number of the) accessing - symbol of state STATE-NUM. */ -static const yytype_uint8 yystos[] = -{ - 0, 7, 14, 60, 61, 62, 63, 64, 65, 66, - 53, 84, 54, 0, 61, 8, 9, 10, 11, 12, - 13, 15, 16, 17, 18, 19, 20, 21, 67, 68, - 69, 70, 71, 72, 73, 75, 76, 79, 82, 83, - 85, 86, 88, 48, 54, 54, 54, 74, 54, 54, - 54, 84, 27, 28, 29, 30, 31, 32, 33, 34, - 35, 36, 87, 54, 53, 44, 45, 46, 89, 90, - 56, 80, 81, 57, 77, 78, 55, 91, 92, 93, - 67, 53, 74, 89, 49, 49, 67, 92, 80, 77 -}; + 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 <alloca.h> +#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 <malloc.h> +#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 <malloc.h> */ + #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); \ - YYPOPSTACK (1); \ + { yychar = (token), yylval = (value); \ + yychar1 = YYTRANSLATE (yychar); \ + YYPOPSTACK; \ goto yybackup; \ } \ else \ - { \ - yyerror (YY_("syntax error: cannot back up")); \ - YYERROR; \ - } \ -while (YYID (0)) - + { yyerror ("syntax error: cannot back up"); YYERROR; } \ +while (0) #define YYTERROR 1 #define YYERRCODE 256 - -/* YYLLOC_DEFAULT -- Set CURRENT to span from RHS[1] to RHS[N]. - If N is 0, then set CURRENT to the empty location which ends - the previous symbol: RHS[0] (always defined). */ - -#define YYRHSLOC(Rhs, K) ((Rhs)[K]) -#ifndef YYLLOC_DEFAULT -# define YYLLOC_DEFAULT(Current, Rhs, N) \ - do \ - if (YYID (N)) \ - { \ - (Current).first_line = YYRHSLOC (Rhs, 1).first_line; \ - (Current).first_column = YYRHSLOC (Rhs, 1).first_column; \ - (Current).last_line = YYRHSLOC (Rhs, N).last_line; \ - (Current).last_column = YYRHSLOC (Rhs, N).last_column; \ - } \ - else \ - { \ - (Current).first_line = (Current).last_line = \ - YYRHSLOC (Rhs, 0).last_line; \ - (Current).first_column = (Current).last_column = \ - YYRHSLOC (Rhs, 0).last_column; \ - } \ - while (YYID (0)) +#ifndef YYPURE +#define YYLEX yylex() #endif - -/* YY_LOCATION_PRINT -- Print the location on the stream. - This macro was not mandated originally: define only if we know - we won't break user code: when these are the locations we know. */ - -#ifndef YY_LOCATION_PRINT -# if YYLTYPE_IS_TRIVIAL -# define YY_LOCATION_PRINT(File, Loc) \ - fprintf (File, "%d.%d-%d.%d", \ - (Loc).first_line, (Loc).first_column, \ - (Loc).last_line, (Loc).last_column) -# else -# define YY_LOCATION_PRINT(File, Loc) ((void) 0) -# endif -#endif - - -/* YYLEX -- calling `yylex' with the right arguments. */ - +#ifdef YYPURE +#ifdef YYLSP_NEEDED #ifdef YYLEX_PARAM -# define YYLEX yylex (YYLEX_PARAM) +#define YYLEX yylex(&yylval, &yylloc, YYLEX_PARAM) #else -# define YYLEX yylex () +#define YYLEX yylex(&yylval, &yylloc) #endif - -/* Enable debugging if requested. */ -#if YYDEBUG - -# ifndef YYFPRINTF -# include <stdio.h> /* INFRINGES ON USER NAME SPACE */ -# define YYFPRINTF fprintf -# endif - -# define YYDPRINTF(Args) \ -do { \ - if (yydebug) \ - YYFPRINTF Args; \ -} while (YYID (0)) - -# define YY_SYMBOL_PRINT(Title, Type, Value, Location) \ -do { \ - if (yydebug) \ - { \ - YYFPRINTF (stderr, "%s ", Title); \ - yy_symbol_print (stderr, \ - Type, Value); \ - YYFPRINTF (stderr, "\n"); \ - } \ -} while (YYID (0)) - - -/*--------------------------------. -| Print this symbol on YYOUTPUT. | -`--------------------------------*/ - -/*ARGSUSED*/ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -static void -yy_symbol_value_print (FILE *yyoutput, int yytype, YYSTYPE const * const yyvaluep) +#else /* not YYLSP_NEEDED */ +#ifdef YYLEX_PARAM +#define YYLEX yylex(&yylval, YYLEX_PARAM) #else -static void -yy_symbol_value_print (yyoutput, yytype, yyvaluep) - FILE *yyoutput; - int yytype; - YYSTYPE const * const yyvaluep; +#define YYLEX yylex(&yylval) #endif -{ - if (!yyvaluep) - return; -# ifdef YYPRINT - if (yytype < YYNTOKENS) - YYPRINT (yyoutput, yytoknum[yytype], *yyvaluep); -# else - YYUSE (yyoutput); -# endif - switch (yytype) - { - default: - break; - } -} - - -/*--------------------------------. -| Print this symbol on YYOUTPUT. | -`--------------------------------*/ - -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -static void -yy_symbol_print (FILE *yyoutput, int yytype, YYSTYPE const * const yyvaluep) -#else -static void -yy_symbol_print (yyoutput, yytype, yyvaluep) - FILE *yyoutput; - int yytype; - YYSTYPE const * const yyvaluep; +#endif /* not YYLSP_NEEDED */ #endif -{ - if (yytype < YYNTOKENS) - YYFPRINTF (yyoutput, "token %s (", yytname[yytype]); - else - YYFPRINTF (yyoutput, "nterm %s (", yytname[yytype]); - yy_symbol_value_print (yyoutput, yytype, yyvaluep); - YYFPRINTF (yyoutput, ")"); -} +/* If nonreentrant, generate the variables here */ -/*------------------------------------------------------------------. -| yy_stack_print -- Print the state stack from its BOTTOM up to its | -| TOP (included). | -`------------------------------------------------------------------*/ +#ifndef YYPURE -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -static void -yy_stack_print (yytype_int16 *bottom, yytype_int16 *top) -#else -static void -yy_stack_print (bottom, top) - yytype_int16 *bottom; - yytype_int16 *top; -#endif -{ - YYFPRINTF (stderr, "Stack now"); - for (; 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 (YYID (0)) +int yychar; /* the lookahead symbol */ +YYSTYPE yylval; /* the semantic value of the */ + /* lookahead symbol */ - -/*------------------------------------------------. -| Report that the YYRULE is going to be reduced. | -`------------------------------------------------*/ - -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -static void -yy_reduce_print (YYSTYPE *yyvsp, int yyrule) -#else -static void -yy_reduce_print (yyvsp, yyrule) - YYSTYPE *yyvsp; - int yyrule; +#ifdef YYLSP_NEEDED +YYLTYPE yylloc; /* location data for the lookahead */ + /* symbol */ #endif -{ - int yynrhs = yyr2[yyrule]; - int yyi; - unsigned long int yylno = yyrline[yyrule]; - YYFPRINTF (stderr, "Reducing stack by rule %d (line %lu):\n", - yyrule - 1, yylno); - /* The symbols being reduced. */ - for (yyi = 0; yyi < yynrhs; yyi++) - { - fprintf (stderr, " $%d = ", yyi + 1); - yy_symbol_print (stderr, yyrhs[yyprhs[yyrule] + yyi], - &(yyvsp[(yyi + 1) - (yynrhs)]) - ); - fprintf (stderr, "\n"); - } -} -# define YY_REDUCE_PRINT(Rule) \ -do { \ - if (yydebug) \ - yy_reduce_print (yyvsp, Rule); \ -} while (YYID (0)) +int yynerrs; /* number of parse errors so far */ +#endif /* not YYPURE */ -/* Nonzero means print parse trace. It is left uninitialized so that - multiple parsers can coexist. */ -int yydebug; -#else /* !YYDEBUG */ -# define YYDPRINTF(Args) -# define YY_SYMBOL_PRINT(Title, Type, Value, Location) -# define YY_STACK_PRINT(Bottom, Top) -# define YY_REDUCE_PRINT(Rule) -#endif /* !YYDEBUG */ +#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 - YYSTACK_ALLOC_MAXIMUM < YYSTACK_BYTES (YYMAXDEPTH) - evaluated with infinite-precision integer arithmetic. */ +#if YYMAXDEPTH == 0 +#undef YYMAXDEPTH +#endif #ifndef YYMAXDEPTH -# define YYMAXDEPTH 10000 +#define YYMAXDEPTH 10000 #endif - - -#if YYERROR_VERBOSE - -# ifndef yystrlen -# if defined __GLIBC__ && defined _STRING_H -# define yystrlen strlen -# else -/* Return the length of YYSTR. */ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -static YYSIZE_T -yystrlen (const char *yystr) -#else -static YYSIZE_T -yystrlen (yystr) - const char *yystr; -#endif -{ - YYSIZE_T yylen; - for (yylen = 0; yystr[yylen]; yylen++) - continue; - return yylen; -} -# 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. */ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -static char * -yystpcpy (char *yydest, const char *yysrc) -#else -static char * -yystpcpy (yydest, yysrc) - char *yydest; - const char *yysrc; -#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 + +/* 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; { - char *yyd = yydest; - const char *yys = yysrc; + register char *f = from; + register char *t = to; + register int i = count; - while ((*yyd++ = *yys++) != '\0') - continue; - - return yyd - 1; + while (i-- > 0) + *t++ = *f++; } -# endif -# endif - -# ifndef yytnamerr -/* Copy to YYRES the contents of YYSTR after stripping away unnecessary - quotes and backslashes, so that it's suitable for yyerror. The - heuristic is that double-quoting is unnecessary unless the string - contains an apostrophe, a comma, or backslash (other than - backslash-backslash). YYSTR is taken from yytname. If YYRES is - null, do not copy; instead, return the length of what the result - would have been. */ -static YYSIZE_T -yytnamerr (char *yyres, const char *yystr) -{ - if (*yystr == '"') - { - YYSIZE_T yyn = 0; - char const *yyp = yystr; - - for (;;) - switch (*++yyp) - { - case '\'': - case ',': - goto do_not_strip_quotes; - - case '\\': - if (*++yyp != '\\') - goto do_not_strip_quotes; - /* Fall through. */ - default: - if (yyres) - yyres[yyn] = *yyp; - yyn++; - break; - - case '"': - if (yyres) - yyres[yyn] = '\0'; - return yyn; - } - do_not_strip_quotes: ; - } - if (! yyres) - return yystrlen (yystr); +#else /* __cplusplus */ - return yystpcpy (yyres, yystr) - yyres; -} -# endif - -/* Copy into YYRESULT an error message about the unexpected token - YYCHAR while in state YYSTATE. Return the number of bytes copied, - including the terminating null byte. If YYRESULT is null, do not - copy anything; just return the number of bytes that would be - copied. As a special case, return 0 if an ordinary "syntax error" - message will do. Return YYSIZE_MAXIMUM if overflow occurs during - size calculation. */ -static YYSIZE_T -yysyntax_error (char *yyresult, int yystate, int yychar) +/* This is the most reliable way to avoid incompatibilities + in available built-in functions on various systems. */ +static void +__yy_memcpy (char *to, char *from, unsigned int count) { - int yyn = yypact[yystate]; + register char *t = to; + register char *f = from; + register int i = count; - if (! (YYPACT_NINF < yyn && yyn <= YYLAST)) - return 0; - else - { - int yytype = YYTRANSLATE (yychar); - YYSIZE_T yysize0 = yytnamerr (0, yytname[yytype]); - YYSIZE_T yysize = yysize0; - YYSIZE_T yysize1; - int yysize_overflow = 0; - enum { YYERROR_VERBOSE_ARGS_MAXIMUM = 5 }; - char const *yyarg[YYERROR_VERBOSE_ARGS_MAXIMUM]; - int yyx; - -# if 0 - /* This is so xgettext sees the translatable formats that are - constructed on the fly. */ - YY_("syntax error, unexpected %s"); - YY_("syntax error, unexpected %s, expecting %s"); - YY_("syntax error, unexpected %s, expecting %s or %s"); - YY_("syntax error, unexpected %s, expecting %s or %s or %s"); - YY_("syntax error, unexpected %s, expecting %s or %s or %s or %s"); -# endif - char *yyfmt; - char const *yyf; - static char const yyunexpected[] = "syntax error, unexpected %s"; - static char const yyexpecting[] = ", expecting %s"; - static char const yyor[] = " or %s"; - char yyformat[sizeof yyunexpected - + sizeof yyexpecting - 1 - + ((YYERROR_VERBOSE_ARGS_MAXIMUM - 2) - * (sizeof yyor - 1))]; - char const *yyprefix = yyexpecting; - - /* 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 + 1; - int yyxend = yychecklim < YYNTOKENS ? yychecklim : YYNTOKENS; - int yycount = 1; - - yyarg[0] = yytname[yytype]; - yyfmt = yystpcpy (yyformat, yyunexpected); - - for (yyx = yyxbegin; yyx < yyxend; ++yyx) - if (yycheck[yyx + yyn] == yyx && yyx != YYTERROR) - { - if (yycount == YYERROR_VERBOSE_ARGS_MAXIMUM) - { - yycount = 1; - yysize = yysize0; - yyformat[sizeof yyunexpected - 1] = '\0'; - break; - } - yyarg[yycount++] = yytname[yyx]; - yysize1 = yysize + yytnamerr (0, yytname[yyx]); - yysize_overflow |= (yysize1 < yysize); - yysize = yysize1; - yyfmt = yystpcpy (yyfmt, yyprefix); - yyprefix = yyor; - } - - yyf = YY_(yyformat); - yysize1 = yysize + yystrlen (yyf); - yysize_overflow |= (yysize1 < yysize); - yysize = yysize1; - - if (yysize_overflow) - return YYSIZE_MAXIMUM; - - if (yyresult) - { - /* Avoid sprintf, as that infringes on the user's name space. - Don't have undefined behavior even if the translation - produced a string with the wrong number of "%s"s. */ - char *yyp = yyresult; - int yyi = 0; - while ((*yyp = *yyf) != '\0') - { - if (*yyp == '%' && yyf[1] == 's' && yyi < yycount) - { - yyp += yytnamerr (yyp, yyarg[yyi++]); - yyf += 2; - } - else - { - yyp++; - yyf++; - } - } - } - return yysize; - } + while (i-- > 0) + *t++ = *f++; } -#endif /* YYERROR_VERBOSE */ - -/*-----------------------------------------------. -| Release the memory associated to this symbol. | -`-----------------------------------------------*/ - -/*ARGSUSED*/ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -static void -yydestruct (const char *yymsg, int yytype, YYSTYPE *yyvaluep) -#else -static void -yydestruct (yymsg, yytype, yyvaluep) - const char *yymsg; - int yytype; - YYSTYPE *yyvaluep; #endif -{ - YYUSE (yyvaluep); - - if (!yymsg) - yymsg = "Deleting"; - YY_SYMBOL_PRINT (yymsg, yytype, yyvaluep, yylocationp); - - 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); +#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 +int yyparse (void *); #else -int yyparse (); -#endif -#else /* ! YYPARSE_PARAM */ -#if defined __STDC__ || defined __cplusplus int yyparse (void); -#else -int yyparse (); #endif -#endif /* ! YYPARSE_PARAM */ - - - -/* The look-ahead symbol. */ -int yychar; - -/* The semantic value of the look-ahead symbol. */ -YYSTYPE yylval; +#endif -/* Number of syntax errors so far. */ -int yynerrs; +int +yyparse(YYPARSE_PARAM_ARG) + YYPARSE_PARAM_DECL +{ + register int yystate; + register int yyn; + 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 */ -/*----------. -| yyparse. | -`----------*/ +#ifdef YYLSP_NEEDED + YYLTYPE yylsa[YYINITDEPTH]; /* the location stack */ + YYLTYPE *yyls = yylsa; + YYLTYPE *yylsp; -#ifdef YYPARSE_PARAM -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -int -yyparse (void *YYPARSE_PARAM) +#define YYPOPSTACK (yyvsp--, yyssp--, yylsp--) #else -int -yyparse (YYPARSE_PARAM) - void *YYPARSE_PARAM; +#define YYPOPSTACK (yyvsp--, yyssp--) #endif -#else /* ! YYPARSE_PARAM */ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -int -yyparse (void) -#else -int -yyparse () + int yystacksize = YYINITDEPTH; + int yyfree_stacks = 0; + +#ifdef YYPURE + int yychar; + YYSTYPE yylval; + int yynerrs; +#ifdef YYLSP_NEEDED + YYLTYPE yylloc; #endif #endif -{ - - int yystate; - int yyn; - int yyresult; - /* Number of tokens to shift before error messages enabled. */ - int yyerrstatus; - /* Look-ahead token as an internal (translated) token number. */ - int yytoken = 0; -#if YYERROR_VERBOSE - /* Buffer for error messages, and its allocated size. */ - char yymsgbuf[128]; - char *yymsg = yymsgbuf; - YYSIZE_T yymsg_alloc = sizeof yymsgbuf; -#endif - /* Three stacks and their tools: - `yyss': related to states, - `yyvs': related to semantic values, - `yyls': related to locations. + YYSTYPE yyval; /* the variable used to return */ + /* semantic values from the action */ + /* routines */ - Refer to the stacks thru separate pointers, to allow yyoverflow - to reallocate them elsewhere. */ + int yylen; - /* The state stack. */ - yytype_int16 yyssa[YYINITDEPTH]; - yytype_int16 *yyss = yyssa; - yytype_int16 *yyssp; - - /* The semantic value stack. */ - YYSTYPE yyvsa[YYINITDEPTH]; - YYSTYPE *yyvs = yyvsa; - YYSTYPE *yyvsp; - - - -#define YYPOPSTACK(N) (yyvsp -= (N), yyssp -= (N)) - - YYSIZE_T yystacksize = YYINITDEPTH; - - /* The variables used to return semantic value and location from the - action routines. */ - YYSTYPE yyval; - - - /* The number of symbols on the RHS of the reduced rule. - Keep to zero when no symbol should be popped. */ - int yylen = 0; - - YYDPRINTF ((stderr, "Starting parse\n")); +#if YYDEBUG != 0 + if (yydebug) + fprintf(stderr, "Starting parse\n"); +#endif yystate = 0; yyerrstatus = 0; @@ -1367,225 +615,273 @@ yyparse () 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 - 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++; +/* 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: - 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; - yytype_int16 *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 (YY_("memory exhausted"), - &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 yyexhaustedlab; -# else /* Extend the stack our own way. */ - if (YYMAXDEPTH <= yystacksize) - goto yyexhaustedlab; + 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; - - { - yytype_int16 *yyss1 = yyss; - union yyalloc *yyptr = - (union yyalloc *) YYSTACK_ALLOC (YYSTACK_BYTES (yystacksize)); - if (! yyptr) - goto yyexhaustedlab; - 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. */ +/* yyresume: */ - /* Do appropriate processing given the current state. Read a - look-ahead token if we need one and don't already have one. */ + /* First try to decide what to do without reference to lookahead token. */ - /* First try to decide what to do without reference to look-ahead token. */ yyn = yypact[yystate]; - if (yyn == YYPACT_NINF) + if (yyn == YYFLAG) goto yydefault; - /* Not known => get a look-ahead token if don't already have one. */ + /* Not known => get a lookahead token if don't already have one. */ + + /* yychar is either YYEMPTY or YYEOF + or a valid token in external form. */ - /* YYCHAR is either YYEMPTY or YYEOF or a valid look-ahead symbol. */ 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); - YY_SYMBOL_PRINT ("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; - /* Count tokens shifted since error; after three, turn off error - status. */ - if (yyerrstatus) - yyerrstatus--; + /* Shift the lookahead token. */ - /* Shift the look-ahead token. */ - YY_SYMBOL_PRINT ("Shifting", yytoken, &yylval, &yylloc); +#if YYDEBUG != 0 + if (yydebug) + fprintf(stderr, "Shifting token %d (%s), ", yychar, yytname[yychar1]); +#endif - /* Discard the shifted token unless it is eof. */ + /* Discard the token being shifted unless it is eof. */ if (yychar != YYEOF) yychar = YYEMPTY; - yystate = yyn; *++yyvsp = yylval; +#ifdef YYLSP_NEEDED + *++yylsp = yylloc; +#endif - goto yynewstate; + /* 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 YYLEN is nonzero, implement the default value of the action: - `$$ = $1'. +#if YYDEBUG != 0 + if (yydebug) + { + int i; - 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]; + fprintf (stderr, "Reducing via rule %d (line %d), ", + yyn, yyrline[yyn]); + /* 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 - YY_REDUCE_PRINT (yyn); - switch (yyn) - { - case 2: -#line 69 "levcomp.ypp" - { } - break; - - case 3: -#line 72 "levcomp.ypp" - {} - break; - - case 4: -#line 73 "levcomp.ypp" - {} - break; - - case 5: -#line 76 "levcomp.ypp" - {} - break; - - case 6: -#line 77 "levcomp.ypp" - {} - break; - - case 8: -#line 84 "levcomp.ypp" - { - lc_default_depth = lc_range; - } - break; - case 9: -#line 90 "levcomp.ypp" - { + switch (yyn) { + +case 1: +#line 71 "levcomp.ypp" +{ ; + break;} +case 2: +#line 74 "levcomp.ypp" +{; + break;} +case 3: +#line 75 "levcomp.ypp" +{; + break;} +case 4: +#line 78 "levcomp.ypp" +{; + break;} +case 5: +#line 79 "levcomp.ypp" +{; + break;} +case 7: +#line 86 "levcomp.ypp" +{ + lc_default_depth = lc_range; + ; + break;} +case 8: +#line 92 "levcomp.ypp" +{ if (lc_map.orient == MAP_FLOAT || lc_map.is_minivault()) { @@ -1620,294 +916,255 @@ yyreduce: yyerror("Must define map."); add_parsed_map( lc_map ); - } - break; - - case 10: -#line 129 "levcomp.ypp" - { + ; + break;} +case 9: +#line 131 "levcomp.ypp" +{ lc_map.init(); lc_map.depth = lc_default_depth; - lc_map.name = (yyvsp[(2) - (2)].text); + lc_map.name = yyvsp[0].text; map_load_info_t::const_iterator i = - loaded_maps.find((yyvsp[(2) - (2)].text)); + loaded_maps.find(yyvsp[0].text); if (i != loaded_maps.end()) { yyerror( make_stringf( "Map named '%s' already loaded at %s:%d", - (yyvsp[(2) - (2)].text), + yyvsp[0].text, i->second.filename.c_str(), i->second.lineno).c_str() ); } - loaded_maps[(yyvsp[(2) - (2)].text)] = map_file_place(lc_desfile, yylineno); - } - break; - - case 26: -#line 170 "levcomp.ypp" - { } - break; - - case 27: + loaded_maps[yyvsp[0].text] = map_file_place(lc_desfile, yylineno); + ; + break;} +case 25: #line 172 "levcomp.ypp" - { - std::string err = lc_map.add_key_feat((yyvsp[(2) - (2)].text)); +{ ; + break;} +case 26: +#line 174 "levcomp.ypp" +{ + std::string err = lc_map.add_key_feat(yyvsp[0].text); if (!err.empty()) yyerror( make_stringf("Bad arg to KFEAT: '%s' (%s)", - (yyvsp[(2) - (2)].text), err.c_str()).c_str()); - } - break; - - case 28: -#line 180 "levcomp.ypp" - { } - break; - - case 29: + yyvsp[0].text, err.c_str()).c_str()); + ; + break;} +case 27: #line 182 "levcomp.ypp" - { - std::string err = lc_map.add_key_mons((yyvsp[(2) - (2)].text)); +{ ; + break;} +case 28: +#line 184 "levcomp.ypp" +{ + std::string err = lc_map.add_key_mons(yyvsp[0].text); if (!err.empty()) yyerror( make_stringf("Bad arg to KMONS: '%s' (%s)", - (yyvsp[(2) - (2)].text), err.c_str()).c_str()); - } - break; - - case 30: -#line 190 "levcomp.ypp" - { } - break; - - case 31: + yyvsp[0].text, err.c_str()).c_str()); + ; + break;} +case 29: #line 192 "levcomp.ypp" - { - std::string err = lc_map.add_key_item((yyvsp[(2) - (2)].text)); +{ ; + break;} +case 30: +#line 194 "levcomp.ypp" +{ + std::string err = lc_map.add_key_item(yyvsp[0].text); if (!err.empty()) yyerror( make_stringf("Bad arg to KITEM: '%s' (%s)", - (yyvsp[(2) - (2)].text), err.c_str()).c_str()); - } - break; - - case 32: -#line 200 "levcomp.ypp" - { } - break; - - case 33: + yyvsp[0].text, err.c_str()).c_str()); + ; + break;} +case 31: #line 202 "levcomp.ypp" - { - std::string err = lc_map.map.add_shuffle((yyvsp[(2) - (2)].text)); +{; + break;} +case 34: +#line 210 "levcomp.ypp" +{ + std::string err = lc_map.map.add_shuffle(yyvsp[0].text); if (!err.empty()) yyerror( make_stringf( "Bad shuffle argument: '%s' (%s)", - (yyvsp[(2) - (2)].text), err.c_str() ).c_str() ); - } - break; - - case 34: -#line 211 "levcomp.ypp" - {} - break; - - case 36: -#line 216 "levcomp.ypp" - { + yyvsp[0].text, err.c_str() ).c_str() ); + ; + break;} +case 35: +#line 219 "levcomp.ypp" +{; + break;} +case 37: +#line 224 "levcomp.ypp" +{ lc_map.tags += " "; - lc_map.tags += (yyvsp[(1) - (2)].text); + lc_map.tags += yyvsp[-1].text; lc_map.tags += " "; - } - break; - - case 37: -#line 223 "levcomp.ypp" - {} - break; - - case 38: -#line 225 "levcomp.ypp" - { - std::string err = lc_map.map.add_subst((yyvsp[(2) - (2)].text)); + ; + break;} +case 38: +#line 231 "levcomp.ypp" +{ ; + break;} +case 41: +#line 239 "levcomp.ypp" +{ + std::string err = lc_map.map.add_subst(yyvsp[0].text); if (!err.empty()) yyerror( make_stringf( "Bad SUBST argument: '%s' (%s)", - (yyvsp[(2) - (2)].text), err.c_str() ).c_str() ); - } - break; - - case 39: -#line 235 "levcomp.ypp" - {} - break; - - case 40: -#line 236 "levcomp.ypp" - {} - break; - - case 43: -#line 244 "levcomp.ypp" - { - std::string error = lc_map.items.add_item((yyvsp[(1) - (1)].text)); + yyvsp[0].text, err.c_str() ).c_str() ); + ; + break;} +case 42: +#line 249 "levcomp.ypp" +{; + break;} +case 43: +#line 250 "levcomp.ypp" +{; + break;} +case 46: +#line 258 "levcomp.ypp" +{ + std::string error = lc_map.items.add_item(yyvsp[0].text); if (error.size()) { char errbuf[300]; snprintf(errbuf, sizeof errbuf, "Invalid item descriptor: '%s' (%s)", - (yyvsp[(1) - (1)].text), error.c_str()); + yyvsp[0].text, error.c_str()); yyerror(errbuf); } if (lc_map.items.size() > 8) yyerror("Too many items specified (max 8)"); - } - break; - - case 44: -#line 258 "levcomp.ypp" - {} - break; - - case 45: -#line 259 "levcomp.ypp" - {} - break; - - case 48: -#line 267 "levcomp.ypp" - { - std::string err = lc_map.mons.add_mons((yyvsp[(1) - (1)].text)); + ; + break;} +case 47: +#line 272 "levcomp.ypp" +{; + break;} +case 48: +#line 273 "levcomp.ypp" +{; + break;} +case 51: +#line 281 "levcomp.ypp" +{ + std::string err = lc_map.mons.add_mons(yyvsp[0].text); if (!err.empty()) { char buf[300]; snprintf(buf, sizeof buf, "bad monster spec '%s' (%s)", - (yyvsp[(1) - (1)].text), err.c_str()); + yyvsp[0].text, err.c_str()); yyerror(buf); } if (lc_map.mons.size() > 7) yyerror("Too many monsters specified (max 7)"); - } - break; - - case 49: -#line 283 "levcomp.ypp" - { - lc_map.place = (yyvsp[(2) - (2)].text); - } - break; - - case 50: -#line 288 "levcomp.ypp" - {} - break; - - case 51: -#line 290 "levcomp.ypp" - { + ; + break;} +case 52: +#line 297 "levcomp.ypp" +{ + lc_map.place = yyvsp[0].text; + ; + break;} +case 53: +#line 302 "levcomp.ypp" +{; + break;} +case 54: +#line 304 "levcomp.ypp" +{ lc_map.depth = lc_range; - } - break; - - case 52: -#line 296 "levcomp.ypp" - { - lc_range.set((yyvsp[(1) - (3)].i), (yyvsp[(3) - (3)].i)); - } - break; - - case 53: -#line 301 "levcomp.ypp" - { - lc_range.set((yyvsp[(1) - (1)].i)); - } - break; - - case 54: -#line 307 "levcomp.ypp" - { - lc_map.chance = (yyvsp[(2) - (2)].i); - } - break; - - case 55: -#line 312 "levcomp.ypp" - {} - break; - - case 56: -#line 314 "levcomp.ypp" - { - lc_map.orient = (map_section_type) (yyvsp[(2) - (2)].i); - } - break; - - case 57: -#line 319 "levcomp.ypp" - { (yyval.i) = MAP_ENCOMPASS; } - break; - - case 58: -#line 320 "levcomp.ypp" - { (yyval.i) = MAP_NORTH; } - break; - - case 59: + ; + break;} +case 55: +#line 310 "levcomp.ypp" +{ + lc_range.set(yyvsp[-2].i, yyvsp[0].i); + ; + break;} +case 56: +#line 315 "levcomp.ypp" +{ + lc_range.set(yyvsp[0].i); + ; + break;} +case 57: #line 321 "levcomp.ypp" - { (yyval.i) = MAP_EAST; } - break; - - case 60: -#line 322 "levcomp.ypp" - { (yyval.i) = MAP_SOUTH; } - break; - - case 61: -#line 323 "levcomp.ypp" - { (yyval.i) = MAP_WEST; } - break; - - case 62: -#line 324 "levcomp.ypp" - { (yyval.i) = MAP_NORTHEAST; } - break; - - case 63: -#line 325 "levcomp.ypp" - { (yyval.i) = MAP_SOUTHEAST; } - break; - - case 64: +{ + lc_map.chance = yyvsp[0].i; + ; + break;} +case 58: #line 326 "levcomp.ypp" - { (yyval.i) = MAP_SOUTHWEST; } - break; - - case 65: -#line 327 "levcomp.ypp" - { (yyval.i) = MAP_NORTHWEST; } - break; - - case 66: +{; + break;} +case 59: #line 328 "levcomp.ypp" - { (yyval.i) = MAP_FLOAT; } - break; - - case 67: -#line 331 "levcomp.ypp" - {} - break; - - case 69: +{ + lc_map.orient = (map_section_type) yyvsp[0].i; + ; + break;} +case 60: +#line 333 "levcomp.ypp" +{ yyval.i = MAP_ENCOMPASS; ; + break;} +case 61: +#line 334 "levcomp.ypp" +{ yyval.i = MAP_NORTH; ; + break;} +case 62: +#line 335 "levcomp.ypp" +{ yyval.i = MAP_EAST; ; + break;} +case 63: #line 336 "levcomp.ypp" - { - switch ((yyvsp[(1) - (2)].i)) { +{ yyval.i = MAP_SOUTH; ; + break;} +case 64: +#line 337 "levcomp.ypp" +{ yyval.i = MAP_WEST; ; + break;} +case 65: +#line 338 "levcomp.ypp" +{ yyval.i = MAP_NORTHEAST; ; + break;} +case 66: +#line 339 "levcomp.ypp" +{ yyval.i = MAP_SOUTHEAST; ; + break;} +case 67: +#line 340 "levcomp.ypp" +{ yyval.i = MAP_SOUTHWEST; ; + break;} +case 68: +#line 341 "levcomp.ypp" +{ yyval.i = MAP_NORTHWEST; ; + break;} +case 69: +#line 342 "levcomp.ypp" +{ yyval.i = MAP_FLOAT; ; + break;} +case 70: +#line 345 "levcomp.ypp" +{; + break;} +case 72: +#line 350 "levcomp.ypp" +{ + switch (yyvsp[-1].i) { case NO_HMIRROR: lc_map.flags &= ~MAPF_MIRROR_HORIZONTAL; break; @@ -1918,247 +1175,247 @@ yyreduce: lc_map.flags &= ~MAPF_ROTATE; break; } - } - break; - - case 70: -#line 351 "levcomp.ypp" - { (yyval.i) = NO_HMIRROR; } - break; - - case 71: -#line 352 "levcomp.ypp" - { (yyval.i) = NO_VMIRROR; } - break; - - case 72: -#line 353 "levcomp.ypp" - { (yyval.i) = NO_ROTATE; } - break; - - case 76: -#line 364 "levcomp.ypp" - { - lc_map.map.add_line((yyvsp[(1) - (1)].text)); - } - break; - + ; + break;} +case 73: +#line 365 "levcomp.ypp" +{ yyval.i = NO_HMIRROR; ; + break;} +case 74: +#line 366 "levcomp.ypp" +{ yyval.i = NO_VMIRROR; ; + break;} +case 75: +#line 367 "levcomp.ypp" +{ yyval.i = NO_ROTATE; ; + break;} +case 79: +#line 378 "levcomp.ypp" +{ + lc_map.map.add_line(yyvsp[0].text); + ; + 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 -/* Line 1267 of yacc.c. */ -#line 1949 "levcomp.tab.c" - default: break; +#if YYDEBUG != 0 + if (yydebug) + { + short *ssp1 = yyss - 1; + fprintf (stderr, "state stack now"); + while (ssp1 != yyssp) + fprintf (stderr, " %d", *++ssp1); + fprintf (stderr, "\n"); } - YY_SYMBOL_PRINT ("-> $$ =", yyr1[yyn], &yyval, &yyloc); - - YYPOPSTACK (yylen); - yylen = 0; - YY_STACK_PRINT (yyss, yyssp); +#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 - yyerror (YY_("syntax error")); -#else - { - YYSIZE_T yysize = yysyntax_error (0, yystate, yychar); - if (yymsg_alloc < yysize && yymsg_alloc < YYSTACK_ALLOC_MAXIMUM) - { - YYSIZE_T yyalloc = 2 * yysize; - if (! (yysize <= yyalloc && yyalloc <= YYSTACK_ALLOC_MAXIMUM)) - yyalloc = YYSTACK_ALLOC_MAXIMUM; - if (yymsg != yymsgbuf) - YYSTACK_FREE (yymsg); - yymsg = (char *) YYSTACK_ALLOC (yyalloc); - if (yymsg) - yymsg_alloc = yyalloc; - else - { - yymsg = yymsgbuf; - yymsg_alloc = sizeof yymsgbuf; - } - } - - if (0 < yysize && yysize <= yymsg_alloc) - { - (void) yysyntax_error (yymsg, yystate, yychar); - yyerror (yymsg); - } - else - { - yyerror (YY_("syntax error")); - if (yysize != 0) - goto yyexhaustedlab; - } - } -#endif - } +#ifdef YYERROR_VERBOSE + yyn = yypact[yystate]; - - if (yyerrstatus == 3) - { - /* If just tried and failed to reuse look-ahead token after an - error, discard it. */ - - if (yychar <= YYEOF) + if (yyn > YYFLAG && yyn < YYLAST) { - /* Return failure if at end of input. */ - if (yychar == YYEOF) - YYABORT; + 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) + { + strcpy(msg, "parse error"); + + if (count < 5) + { + count = 0; + for (x = (yyn < 0 ? -yyn : 0); + x < (sizeof(yytname) / sizeof(char *)); x++) + if (yycheck[x + yyn] == x) + { + strcat(msg, count == 0 ? ", expecting `" : " or `"); + strcat(msg, yytname[x]); + strcat(msg, "'"); + count++; + } + } + yyerror(msg); + free(msg); + } + else + yyerror ("parse error; also virtual memory exceeded"); } else - { - yydestruct ("Error: discarding", - yytoken, &yylval); - yychar = YYEMPTY; - } +#endif /* YYERROR_VERBOSE */ + yyerror("parse error"); } - /* Else will try to reuse look-ahead token after shifting the error - token. */ 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. */ -/*---------------------------------------------------. -| yyerrorlab -- error raised explicitly by YYERROR. | -`---------------------------------------------------*/ -yyerrorlab: + /* return failure if at end of input */ + if (yychar == YYEOF) + YYABORT; - /* Pacify compilers like GCC when the user code never invokes - YYERROR and the label yyerrorlab therefore never appears in user - code. */ - if (/*CONSTCOND*/ 0) - goto yyerrorlab; +#if YYDEBUG != 0 + if (yydebug) + fprintf(stderr, "Discarding token %d (%s).\n", yychar, yytname[yychar1]); +#endif - /* Do not reclaim the symbols of the rule which action triggered - this YYERROR. */ - YYPOPSTACK (yylen); - yylen = 0; - YY_STACK_PRINT (yyss, yyssp); - yystate = *yyssp; - goto yyerrlab1; + yychar = YYEMPTY; + } + + /* Else will try to reuse lookahead token + after shifting the error token. */ + + yyerrstatus = 3; /* Each real token shifted decrements this */ + + goto yyerrhandle; + +yyerrdefault: /* current state does not do anything special for the error token. */ + +#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; + yyn += YYTERROR; + if (yyn < 0 || yyn > YYLAST || yycheck[yyn] != YYTERROR) + goto yyerrdefault; - yydestruct ("Error: popping", - yystos[yystate], yyvsp); - YYPOPSTACK (1); - yystate = *yyssp; - YY_STACK_PRINT (yyss, yyssp); + 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; - *++yyvsp = yylval; - +#if YYDEBUG != 0 + if (yydebug) + fprintf(stderr, "Shifting error token, "); +#endif - /* Shift the error token. */ - YY_SYMBOL_PRINT ("Shifting", yystos[yyn], yyvsp, yylsp); + *++yyvsp = yylval; +#ifdef YYLSP_NEEDED + *++yylsp = yylloc; +#endif yystate = yyn; goto yynewstate; - -/*-------------------------------------. -| yyacceptlab -- YYACCEPT comes here. | -`-------------------------------------*/ -yyacceptlab: - yyresult = 0; - goto yyreturn; - -/*-----------------------------------. -| yyabortlab -- YYABORT comes here. | -`-----------------------------------*/ -yyabortlab: - yyresult = 1; - goto yyreturn; - -#ifndef yyoverflow -/*-------------------------------------------------. -| yyexhaustedlab -- memory exhaustion comes here. | -`-------------------------------------------------*/ -yyexhaustedlab: - yyerror (YY_("memory exhausted")); - yyresult = 2; - /* Fall through. */ + yyacceptlab: + /* YYACCEPT comes here. */ + if (yyfree_stacks) + { + free (yyss); + free (yyvs); +#ifdef YYLSP_NEEDED + free (yyls); #endif + } + return 0; -yyreturn: - if (yychar != YYEOF && yychar != YYEMPTY) - yydestruct ("Cleanup: discarding lookahead", - yytoken, &yylval); - /* Do not reclaim the symbols of the rule which action triggered - this YYABORT or YYACCEPT. */ - YYPOPSTACK (yylen); - YY_STACK_PRINT (yyss, yyssp); - while (yyssp != yyss) + yyabortlab: + /* YYABORT comes here. */ + if (yyfree_stacks) { - yydestruct ("Cleanup: popping", - yystos[*yyssp], yyvsp); - YYPOPSTACK (1); - } -#ifndef yyoverflow - if (yyss != yyssa) - YYSTACK_FREE (yyss); -#endif -#if YYERROR_VERBOSE - if (yymsg != yymsgbuf) - YYSTACK_FREE (yymsg); + free (yyss); + free (yyvs); +#ifdef YYLSP_NEEDED + free (yyls); #endif - /* Make sure YYID is used. */ - return YYID (yyresult); + } + return 1; } - - -#line 369 "levcomp.ypp" - +#line 383 "levcomp.ypp" |