nilopaim
/
tinycobol
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
tinycobol/compiler/htcobol.tab.c

12584 lines
401 KiB
C
Raw Blame History

This file contains invisible Unicode characters!

This file contains invisible Unicode characters that may be processed differently from what appears below. If your use case is intentional and legitimate, you can safely ignore this warning. Use the Escape button to reveal hidden characters.

/* A Bison parser, made by GNU Bison 2.4.2. */
/* Skeleton implementation for Bison's Yacc-like parsers in C
Copyright (C) 1984, 1989-1990, 2000-2006, 2009-2010 Free Software
Foundation, Inc.
This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation, either version 3 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program. If not, see <http://www.gnu.org/licenses/>. */
/* As a special exception, you may create a larger work that contains
part or all of the Bison parser skeleton and distribute that work
under terms of your choice, so long as that work isn't itself a
parser generator using the skeleton or a modified version thereof
as a parser skeleton. Alternatively, if you modify or redistribute
the parser skeleton itself, you may (at your option) remove this
special exception, which will cause the skeleton and the resulting
Bison output files to be licensed under the GNU General Public
License without this special exception.
This special exception was added by the Free Software Foundation in
version 2.2 of Bison. */
/* C 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.4.2"
/* Skeleton name. */
#define YYSKELETON_NAME "yacc.c"
/* Pure parsers. */
#define YYPURE 0
/* Push parsers. */
#define YYPUSH 0
/* Pull parsers. */
#define YYPULL 1
/* Using locations. */
#define YYLSP_NEEDED 0
/* Copy the first part of user declarations. */
/* Line 189 of yacc.c */
#line 27 "htcobol.y"
//#define YYDEBUG 1
#define YYMAXDEPTH 1000
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <stdarg.h>
#if defined(SunOS)
va_list __builtin_va_alist;
#endif
#include <ctype.h>
#include "htcoboly.h"
#include "htcoblib.h"
#include "htglobals.h"
/* #if 1 */
#if USE_PARSER_TEST_MODE
#define UNIMPLEMENTED(xyz)
#else
#define UNIMPLEMENTED(xyz) yyerror("`%s' is not currently implemented", xyz);
#endif
// walter
int fg=0, bg=0, co=0;
//struct lit *init_alphab=NULL, *init_alpha=NULL, *init_num=NULL, *init_numedt=NULL, *init_alphaedt=NULL;
// fim walter
extern int screen_io_enable,scr_line,scr_column;
extern int decimal_comma;
extern char currency_symbol;
extern int has_linkage;
extern int module_flag;
extern int nested_flag;
extern FILE *lexin;
extern FILE *o_src;
extern struct sym *screen_status_field; /* pointer to the screen status */
extern struct sym *cursor_field; /* pointer to the cursor field */
extern struct sym *curr_paragr,*curr_section;
extern struct sym *curr_field;
extern short curr_call_mode;
extern short curr_call_convention;
extern struct sym *pgm_id;
extern unsigned stack_offset; /* offset das variaveis na pilha */
extern unsigned global_offset; /* offset das variaveis globais (DATA) */
extern int paragr_num;
extern int loc_label;
extern char picture[];
extern int picix,piccnt,decimals,sign,v_flag,n_flag,pscale;
extern int at_linkage,stack_plus;
extern char *toktext;
extern int yylex(void);
extern struct index_to_table_list *index2table;
extern int pgm_segment;
extern int initial_flag;
extern struct lit *spe_lit_ZE;
extern struct lit *spe_lit_SP;
extern struct lit *spe_lit_LV;
extern struct lit *spe_lit_HV;
extern struct lit *spe_lit_QU;
struct sym *curr_file;
struct sym *alloc_filler( void );
int curr_division=0;
int need_subscripts=0;
static int is_var=0;
extern char *yytext;
extern int envdiv_bypass_save_sw;
extern int stabs_on_sw;
extern int HTG_prg_uses_fileio;
extern int HTG_prg_uses_term;
/* extern int HTG_prg_uses_dcall; */
unsigned long lbend, lbstart;
unsigned int perform_after_sw;
int write_advancing_sw;
int decl_lbl;
/* struct math_var *vl1, *vl2; */
struct math_ose *tmose=NULL;
struct ginfo *gic=NULL;
static void assert_numeric_sy (struct sym *sy);
static void assert_numeric_dest_sy (struct sym *sy);
static char err_msg_bad_form[] = "ill-formed %s statement";
/* Line 189 of yacc.c */
#line 165 "htcobol.tab.c"
/* 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
/* Tokens. */
#ifndef YYTOKENTYPE
# define YYTOKENTYPE
/* Put the tokens into the symbol table, so that GDB and other debuggers
know about them. */
enum yytokentype {
LOW_PREC = 258,
IDSTRING = 259,
STRING = 260,
VARIABLE = 261,
VARCOND = 262,
SUBSCVAR = 263,
LABELSTR = 264,
CMD_LINE = 265,
ENVIRONMENT_VARIABLE = 266,
INKEY = 267,
ESCKEY = 268,
CHAR = 269,
MULTIPLIER = 270,
USAGENUM = 271,
ZERONUM = 272,
CONDITIONAL = 273,
TO = 274,
IS = 275,
ARE = 276,
THRU = 277,
THAN = 278,
NO = 279,
COMMENTING = 280,
DIRECTION = 281,
READ = 282,
WRITE = 283,
INPUT_OUTPUT = 284,
RELEASE = 285,
NLITERAL = 286,
CLITERAL = 287,
PORTNUM = 288,
DATE_TIME = 289,
POW_OP = 290,
OR = 291,
AND = 292,
NOT = 293,
ACCEPT = 294,
ACCESS = 295,
ADD = 296,
ADDRESS = 297,
ADVANCING = 298,
AFTER = 299,
ALL = 300,
ALPHABET = 301,
ALPHABETIC = 302,
ALPHABETIC_LOWER = 303,
ALPHABETIC_UPPER = 304,
ALPHANUMERIC = 305,
ALPHANUMERIC_EDITED = 306,
ALSO = 307,
ALTERNATE = 308,
ANY = 309,
AREA = 310,
AREAS = 311,
ASSIGN = 312,
AT = 313,
AUTHOR = 314,
AUTO = 315,
BACKGROUNDCOLOR = 316,
BEFORE = 317,
BELL = 318,
BLANK = 319,
BLINK = 320,
BLOCK = 321,
BOTTOM = 322,
BY = 323,
CALL = 324,
CALL_CONV_C = 325,
CALL_CONV_STDCALL = 326,
CALL_LOADLIB = 327,
CANCEL = 328,
CENTER = 329,
CF = 330,
CH = 331,
CHAIN = 332,
CHAINING = 333,
CHARACTER = 334,
CHARACTERS = 335,
CLASS = 336,
CLOSE = 337,
CODE = 338,
CODE_SET = 339,
COLLATING = 340,
COLOR = 341,
COLUMN = 342,
COLUMNS = 343,
COMMA = 344,
COMMON = 345,
COMPUTE = 346,
CONFIGURATION = 347,
CONSOLE = 348,
CONTAINS = 349,
CONTENT = 350,
CONTINUE = 351,
CONTROL = 352,
CONTROLS = 353,
CONVERTING = 354,
CORRESPONDING = 355,
COUNT = 356,
CURRENCY = 357,
CURSOR = 358,
DATA = 359,
DATE_COMPILED = 360,
DATE_WRITTEN = 361,
DE = 362,
DEBUGGING = 363,
DECIMAL_POINT = 364,
DECLARATIVES = 365,
DELETE = 366,
DELIMITED = 367,
DELIMITER = 368,
DEPENDING = 369,
DETAIL = 370,
DISPLAY = 371,
DISPLAY_SCREEN = 372,
DIVIDE = 373,
DIVISION = 374,
DOWN = 375,
DUPLICATES = 376,
DYNAMIC = 377,
ELSE = 378,
END = 379,
END_ACCEPT = 380,
END_ADD = 381,
END_CALL = 382,
END_CALL_LOADLIB = 383,
END_CHAIN = 384,
END_COMPUTE = 385,
END_DELETE = 386,
END_DISPLAY = 387,
END_DIVIDE = 388,
END_EVALUATE = 389,
END_IF = 390,
END_MULTIPLY = 391,
END_OF_PAGE = 392,
END_PERFORM = 393,
END_READ = 394,
END_RETURN = 395,
END_REWRITE = 396,
END_SEARCH = 397,
END_START = 398,
END_STRINGCMD = 399,
END_SUBTRACT = 400,
END_UNSTRING = 401,
END_WRITE = 402,
ENVIRONMENT = 403,
EOL = 404,
EOS = 405,
ERASE = 406,
ERROR_TOK = 407,
EVALUATE = 408,
EXCEPTION = 409,
EXIT = 410,
EXTEND = 411,
EXTERNAL = 412,
FALSE_TOK = 413,
FD = 414,
FILE_CONTROL = 415,
FILE_ID = 416,
FILE_TOK = 417,
FILLER = 418,
FINAL = 419,
FIRST = 420,
FOOTING = 421,
FOR = 422,
FOREGROUNDCOLOR = 423,
FROM = 424,
FULL = 425,
FUNCTION = 426,
GENERATE = 427,
GIVING = 428,
GLOBAL = 429,
GO = 430,
GOBACK = 431,
GROUP = 432,
HEADING = 433,
HIGHLIGHT = 434,
HIGHVALUES = 435,
IDENTIFICATION = 436,
IF = 437,
IGNORE = 438,
IN = 439,
INDEXED = 440,
INDICATE = 441,
INITIALIZE = 442,
INITIAL_TOK = 443,
INITIATE = 444,
INPUT = 445,
INSPECT = 446,
INSTALLATION = 447,
INTO = 448,
INVALID = 449,
I_O = 450,
I_O_CONTROL = 451,
JUSTIFIED = 452,
KEY = 453,
LABEL = 454,
LAST = 455,
LEADING = 456,
LEFT = 457,
LENGTH = 458,
LIMIT = 459,
LIMITS = 460,
LINAGE = 461,
LINE = 462,
LINES = 463,
LINKAGE = 464,
LISTSEP = 465,
LOCK = 466,
LOWER = 467,
LOWLIGHT = 468,
LOWVALUES = 469,
LPAR = 470,
MERGE = 471,
MINUS = 472,
MODE = 473,
MOVE = 474,
MULTIPLE = 475,
MULTIPLY = 476,
NATIVE = 477,
NEGATIVE = 478,
NEXT = 479,
NOECHO = 480,
NOTEXCEP = 481,
NULL_TOK = 482,
NUMBER = 483,
NUMBERS = 484,
NUMERIC = 485,
NUMERIC_EDITED = 486,
OBJECT_COMPUTER = 487,
OCCURS = 488,
OF = 489,
OFF = 490,
OMITTED = 491,
ON = 492,
ONLY = 493,
OPEN = 494,
OPTIONAL = 495,
ORDER = 496,
ORGANIZATION = 497,
OTHER = 498,
OUTPUT = 499,
OVERFLOW_TOK = 500,
PADDING = 501,
PAGE = 502,
PAGE_COUNTER = 503,
PARAGRAPH = 504,
PERFORM = 505,
PF = 506,
PH = 507,
PICTURE = 508,
PLUS = 509,
POINTER = 510,
POSITION = 511,
POSITIVE = 512,
PREVIOUS = 513,
PROCEDURE = 514,
PROCEED = 515,
PROGRAM = 516,
PROGRAM_ID = 517,
QUOTES = 518,
RANDOM = 519,
RD = 520,
READY = 521,
RECORD = 522,
RECORDS = 523,
REDEFINES = 524,
REEL = 525,
REFERENCE = 526,
RELATIVE = 527,
REMAINDER = 528,
REMOVAL = 529,
RENAMES = 530,
REPLACING = 531,
REPORT = 532,
REPORTS = 533,
REQUIRED = 534,
RESERVE = 535,
RESET = 536,
RETURN = 537,
RETURNING = 538,
REVERSEVIDEO = 539,
REWIND = 540,
REWRITE = 541,
RF = 542,
RH = 543,
RIGHT = 544,
ROUNDED = 545,
RUN = 546,
SAME = 547,
SCREEN = 548,
SD = 549,
SEARCH = 550,
SECTION = 551,
SECURE = 552,
SECURITY = 553,
SELECT = 554,
SENTENCE = 555,
SEPARATE = 556,
SEQUENCE = 557,
SEQUENTIAL = 558,
SET = 559,
SIGN = 560,
SIZE = 561,
SORT = 562,
SORT_MERGE = 563,
SOURCE = 564,
SOURCE_COMPUTER = 565,
SPACES = 566,
SPECIAL_NAMES = 567,
STANDARD = 568,
STANDARD_1 = 569,
STANDARD_2 = 570,
START = 571,
STATUS = 572,
STD_ERROR = 573,
STD_OUTPUT = 574,
STOP = 575,
STRINGCMD = 576,
SUBTRACT = 577,
SUM = 578,
SYNCHRONIZED = 579,
TALLYING = 580,
TAPE = 581,
TCOBPROTO1 = 582,
TCOBPROTO2 = 583,
TERMINATE = 584,
TEST = 585,
THEN = 586,
TIMES = 587,
TOKDUMMY = 588,
TOP = 589,
TRACE = 590,
TRAILING = 591,
TRUE_TOK = 592,
TYPE = 593,
UNDERLINE = 594,
UNIT = 595,
UNLOCK = 596,
UNSTRING = 597,
UNTIL = 598,
UP = 599,
UPDATE = 600,
UPON = 601,
UPPER = 602,
USAGE = 603,
USE = 604,
USING = 605,
VALUE = 606,
VALUES = 607,
VARYING = 608,
WHEN = 609,
WITH = 610,
WORKING_STORAGE = 611,
ZERO = 612,
PERIOD_TOK = 613
};
#endif
#if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED
typedef union YYSTYPE
{
/* Line 214 of yacc.c */
#line 119 "htcobol.y"
struct sym *sval; /* symbol */
int ival; /* int */
struct coord_pair pval; /* lin,col */
struct lit *lval; /* literal */
unsigned long dval; /* label definition, compacted */
struct ddval { /* dual label definition */
int lb1,lb2;
} ddval;
char *str;
struct vref *rval; /* variable reference (with subscripts) */
struct refmod *rmval; /* variable with RefMod specifier */
struct string_from *sfval; /* variable list in string statement */
struct unstring_delimited *udval;
struct unstring_destinations *udstval;
struct tallying_list *tlval;
struct tallying_for_list *tfval;
struct replacing_list *repval;
struct replacing_by_list *rbval;
struct converting_struct *cvval;
struct inspect_before_after *baval;
struct scr_info *sival;
struct perf_info *pfval;
struct perform_info *pfvals;
struct sortfile_node *snval;
struct selsubject *ssbjval;
struct math_var *mval; /* math variables container list */
struct math_ose *mose; /* math ON SIZE ERROR variables container */
struct ginfo *gic; /* generic container */
struct invalid_keys *iks; /* [NOT] INVALID KEY */
struct invalid_key_element *ike; /* [NOT] INVALID KEY */
struct condition condval;
struct list *lstval; /* generic container list */
struct gvar_list *glistval; /* generic variable list */
/* Line 214 of yacc.c */
#line 597 "htcobol.tab.c"
} YYSTYPE;
# define YYSTYPE_IS_TRIVIAL 1
# define yystype YYSTYPE /* obsolescent; will be withdrawn */
# define YYSTYPE_IS_DECLARED 1
#endif
/* Copy the second part of user declarations. */
/* Line 264 of yacc.c */
#line 609 "htcobol.tab.c"
#ifdef short
# undef short
#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
#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
#define YYSIZE_MAXIMUM ((YYSIZE_T) -1)
#ifndef YY_
# if defined YYENABLE_NLS && YYENABLE_NLS
# if ENABLE_NLS
# include <libintl.h> /* INFRINGES ON USER NAME SPACE */
# define YY_(msgid) dgettext ("bison-runtime", msgid)
# endif
# endif
# ifndef YY_
# define YY_(msgid) msgid
# endif
#endif
/* 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 yyi)
#else
static int
YYID (yyi)
int yyi;
#endif
{
return yyi;
}
#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_alloc;
YYSTYPE yyvs_alloc;
};
/* 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_alloc, Stack) \
do \
{ \
YYSIZE_T yynewbytes; \
YYCOPY (&yyptr->Stack_alloc, Stack, yysize); \
Stack = &yyptr->Stack_alloc; \
yynewbytes = yystacksize * sizeof (*Stack) + YYSTACK_GAP_MAXIMUM; \
yyptr += yynewbytes / sizeof (*yyptr); \
} \
while (YYID (0))
#endif
/* YYFINAL -- State number of the termination state. */
#define YYFINAL 8
/* YYLAST -- Last index in YYTABLE. */
#define YYLAST 4780
/* YYNTOKENS -- Number of terminals. */
#define YYNTOKENS 368
/* YYNNTS -- Number of nonterminals. */
#define YYNNTS 620
/* YYNRULES -- Number of rules. */
#define YYNRULES 1309
/* YYNRULES -- Number of states. */
#define YYNSTATES 1999
/* YYTRANSLATE(YYLEX) -- Bison symbol number corresponding to YYLEX. */
#define YYUNDEFTOK 2
#define YYMAXUTOK 613
#define YYTRANSLATE(YYX) \
((unsigned int) (YYX) <= YYMAXUTOK ? yytranslate[YYX] : YYUNDEFTOK)
/* YYTRANSLATE[YYLEX] -- Bison symbol number corresponding to YYLEX. */
static const yytype_uint16 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,
364, 365, 37, 35, 366, 36, 363, 38, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 367, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 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,
39, 40, 41, 42, 43, 44, 45, 46, 47, 48,
49, 50, 51, 52, 53, 54, 55, 56, 57, 58,
59, 60, 61, 62, 63, 64, 65, 66, 67, 68,
69, 70, 71, 72, 73, 74, 75, 76, 77, 78,
79, 80, 81, 82, 83, 84, 85, 86, 87, 88,
89, 90, 91, 92, 93, 94, 95, 96, 97, 98,
99, 100, 101, 102, 103, 104, 105, 106, 107, 108,
109, 110, 111, 112, 113, 114, 115, 116, 117, 118,
119, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, 134, 135, 136, 137, 138,
139, 140, 141, 142, 143, 144, 145, 146, 147, 148,
149, 150, 151, 152, 153, 154, 155, 156, 157, 158,
159, 160, 161, 162, 163, 164, 165, 166, 167, 168,
169, 170, 171, 172, 173, 174, 175, 176, 177, 178,
179, 180, 181, 182, 183, 184, 185, 186, 187, 188,
189, 190, 191, 192, 193, 194, 195, 196, 197, 198,
199, 200, 201, 202, 203, 204, 205, 206, 207, 208,
209, 210, 211, 212, 213, 214, 215, 216, 217, 218,
219, 220, 221, 222, 223, 224, 225, 226, 227, 228,
229, 230, 231, 232, 233, 234, 235, 236, 237, 238,
239, 240, 241, 242, 243, 244, 245, 246, 247, 248,
249, 250, 251, 252, 253, 254, 255, 256, 257, 258,
259, 260, 261, 262, 263, 264, 265, 266, 267, 268,
269, 270, 271, 272, 273, 274, 275, 276, 277, 278,
279, 280, 281, 282, 283, 284, 285, 286, 287, 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, 314, 315, 316, 317, 318,
319, 320, 321, 322, 323, 324, 325, 326, 327, 328,
329, 330, 331, 332, 333, 334, 335, 336, 337, 338,
339, 340, 341, 342, 343, 344, 345, 346, 347, 348,
349, 350, 351, 352, 353, 354, 355, 356, 357, 358,
359, 360, 361, 362
};
#if YYDEBUG
/* YYPRHS[YYN] -- Index of the first RHS symbol of rule number YYN in
YYRHS. */
static const yytype_uint16 yyprhs[] =
{
0, 0, 3, 5, 7, 9, 12, 15, 16, 21,
25, 26, 31, 36, 37, 38, 39, 52, 53, 57,
61, 62, 64, 65, 68, 71, 74, 77, 80, 83,
84, 91, 92, 97, 98, 101, 102, 103, 110, 111,
118, 122, 124, 127, 128, 133, 135, 136, 140, 141,
142, 145, 147, 149, 152, 154, 156, 158, 160, 162,
164, 166, 171, 173, 174, 179, 181, 184, 186, 190,
194, 199, 203, 204, 207, 208, 215, 220, 221, 226,
227, 229, 230, 235, 237, 239, 241, 243, 245, 248,
250, 254, 257, 260, 264, 269, 270, 273, 275, 279,
280, 284, 286, 289, 290, 297, 300, 301, 305, 309,
314, 319, 324, 329, 336, 340, 342, 344, 345, 347,
348, 350, 352, 355, 358, 360, 363, 364, 366, 367,
369, 371, 372, 374, 375, 377, 378, 380, 381, 383,
385, 387, 390, 392, 394, 396, 398, 400, 401, 404,
406, 409, 411, 413, 419, 420, 422, 424, 426, 432,
434, 437, 440, 441, 444, 446, 447, 449, 450, 452,
453, 455, 458, 460, 462, 465, 467, 468, 478, 479,
480, 486, 487, 488, 494, 495, 496, 502, 503, 508,
509, 512, 513, 514, 515, 516, 525, 526, 529, 532,
535, 537, 539, 543, 552, 553, 557, 559, 561, 562,
564, 567, 570, 571, 574, 577, 578, 582, 583, 588,
589, 594, 595, 597, 598, 601, 603, 606, 607, 613,
615, 618, 620, 622, 624, 626, 628, 630, 632, 634,
636, 638, 640, 644, 647, 650, 651, 656, 658, 659,
664, 667, 670, 672, 674, 675, 679, 681, 682, 686,
688, 690, 696, 700, 701, 706, 710, 712, 715, 720,
726, 731, 734, 738, 741, 745, 749, 752, 755, 759,
764, 769, 773, 774, 776, 778, 780, 781, 783, 785,
786, 791, 795, 796, 797, 804, 806, 808, 809, 812,
816, 817, 819, 820, 823, 824, 827, 830, 831, 833,
835, 837, 838, 840, 842, 844, 846, 849, 852, 854,
855, 856, 862, 863, 866, 867, 868, 874, 875, 882,
883, 890, 894, 895, 901, 902, 908, 909, 915, 918,
922, 925, 926, 931, 932, 933, 937, 938, 943, 944,
948, 949, 952, 955, 958, 961, 964, 966, 969, 971,
973, 975, 977, 979, 982, 985, 987, 989, 991, 993,
995, 999, 1002, 1005, 1009, 1011, 1013, 1016, 1019, 1022,
1025, 1027, 1030, 1032, 1034, 1036, 1038, 1040, 1043, 1046,
1048, 1050, 1052, 1054, 1056, 1060, 1063, 1066, 1070, 1072,
1074, 1077, 1080, 1084, 1088, 1091, 1092, 1094, 1095, 1098,
1100, 1102, 1104, 1106, 1108, 1109, 1112, 1113, 1114, 1115,
1116, 1126, 1127, 1128, 1129, 1139, 1141, 1142, 1144, 1147,
1148, 1154, 1155, 1158, 1161, 1162, 1166, 1168, 1170, 1172,
1174, 1176, 1178, 1180, 1183, 1186, 1189, 1192, 1196, 1197,
1202, 1203, 1205, 1207, 1208, 1211, 1212, 1218, 1219, 1220,
1232, 1237, 1238, 1243, 1244, 1246, 1249, 1253, 1255, 1257,
1259, 1262, 1265, 1268, 1270, 1274, 1276, 1280, 1281, 1286,
1287, 1290, 1293, 1294, 1296, 1297, 1300, 1301, 1304, 1307,
1310, 1312, 1314, 1316, 1318, 1320, 1322, 1324, 1326, 1328,
1330, 1336, 1342, 1352, 1356, 1362, 1366, 1369, 1373, 1381,
1382, 1387, 1388, 1392, 1393, 1397, 1398, 1400, 1403, 1405,
1408, 1411, 1413, 1416, 1417, 1419, 1421, 1422, 1425, 1426,
1430, 1431, 1434, 1436, 1437, 1438, 1441, 1444, 1447, 1449,
1451, 1452, 1454, 1455, 1457, 1458, 1460, 1461, 1463, 1464,
1466, 1467, 1469, 1470, 1472, 1475, 1476, 1477, 1480, 1481,
1482, 1491, 1492, 1493, 1496, 1498, 1500, 1501, 1505, 1506,
1510, 1512, 1513, 1522, 1523, 1524, 1527, 1529, 1531, 1532,
1536, 1537, 1541, 1542, 1546, 1548, 1556, 1558, 1560, 1562,
1565, 1568, 1570, 1572, 1576, 1579, 1581, 1583, 1585, 1587,
1590, 1592, 1594, 1596, 1598, 1600, 1602, 1604, 1606, 1608,
1610, 1612, 1614, 1616, 1618, 1620, 1622, 1624, 1626, 1628,
1630, 1632, 1634, 1636, 1638, 1640, 1642, 1644, 1646, 1648,
1650, 1652, 1654, 1656, 1658, 1660, 1662, 1664, 1666, 1668,
1670, 1672, 1674, 1676, 1679, 1680, 1684, 1685, 1686, 1693,
1697, 1702, 1703, 1704, 1711, 1713, 1715, 1716, 1719, 1720,
1725, 1727, 1729, 1731, 1733, 1734, 1735, 1741, 1742, 1743,
1744, 1752, 1753, 1756, 1757, 1762, 1764, 1766, 1768, 1770,
1773, 1778, 1781, 1782, 1784, 1785, 1791, 1792, 1795, 1796,
1800, 1801, 1803, 1804, 1806, 1807, 1809, 1810, 1811, 1812,
1820, 1821, 1822, 1828, 1831, 1832, 1833, 1838, 1839, 1841,
1844, 1845, 1850, 1852, 1855, 1859, 1861, 1864, 1865, 1866,
1872, 1874, 1877, 1883, 1889, 1890, 1895, 1896, 1898, 1901,
1904, 1908, 1911, 1914, 1917, 1920, 1923, 1926, 1929, 1930,
1931, 1932, 1942, 1945, 1947, 1949, 1950, 1951, 1952, 1963,
1964, 1971, 1973, 1976, 1978, 1981, 1986, 1991, 1993, 1996,
1998, 2001, 2002, 2007, 2008, 2010, 2015, 2018, 2023, 2026,
2028, 2031, 2036, 2042, 2049, 2053, 2057, 2059, 2060, 2063,
2065, 2068, 2073, 2075, 2077, 2079, 2081, 2083, 2087, 2089,
2094, 2095, 2097, 2101, 2103, 2108, 2114, 2121, 2122, 2125,
2126, 2128, 2132, 2134, 2139, 2146, 2153, 2154, 2156, 2160,
2162, 2169, 2174, 2175, 2177, 2181, 2183, 2190, 2200, 2210,
2217, 2222, 2223, 2225, 2227, 2229, 2231, 2233, 2239, 2246,
2252, 2258, 2265, 2271, 2276, 2277, 2278, 2279, 2291, 2292,
2294, 2296, 2298, 2300, 2306, 2311, 2313, 2317, 2320, 2323,
2326, 2327, 2332, 2336, 2341, 2346, 2351, 2352, 2354, 2358,
2362, 2365, 2368, 2371, 2372, 2375, 2378, 2380, 2382, 2384,
2387, 2389, 2392, 2396, 2398, 2400, 2402, 2404, 2406, 2408,
2412, 2415, 2417, 2419, 2423, 2426, 2428, 2430, 2434, 2436,
2438, 2442, 2446, 2449, 2453, 2454, 2458, 2460, 2464, 2469,
2473, 2475, 2482, 2490, 2498, 2499, 2501, 2503, 2504, 2507,
2508, 2512, 2516, 2519, 2521, 2522, 2529, 2530, 2536, 2537,
2541, 2543, 2545, 2548, 2549, 2554, 2555, 2561, 2562, 2564,
2565, 2567, 2571, 2572, 2575, 2576, 2584, 2585, 2588, 2589,
2594, 2598, 2599, 2601, 2602, 2609, 2610, 2612, 2613, 2620,
2621, 2623, 2624, 2630, 2632, 2638, 2639, 2641, 2645, 2652,
2654, 2656, 2659, 2663, 2664, 2665, 2666, 2667, 2668, 2682,
2684, 2685, 2687, 2689, 2690, 2695, 2697, 2699, 2700, 2701,
2702, 2703, 2704, 2714, 2716, 2718, 2721, 2724, 2727, 2730,
2732, 2734, 2736, 2740, 2745, 2748, 2752, 2753, 2755, 2756,
2761, 2765, 2766, 2775, 2776, 2780, 2781, 2783, 2784, 2786,
2787, 2789, 2792, 2797, 2802, 2807, 2813, 2815, 2817, 2819,
2821, 2823, 2825, 2827, 2829, 2831, 2832, 2835, 2836, 2845,
2846, 2857, 2861, 2862, 2865, 2870, 2872, 2876, 2880, 2881,
2885, 2886, 2890, 2891, 2895, 2896, 2898, 2899, 2903, 2904,
2909, 2910, 2912, 2914, 2915, 2921, 2922, 2923, 2928, 2929,
2930, 2936, 2937, 2939, 2941, 2944, 2945, 2946, 2951, 2952,
2958, 2960, 2962, 2966, 2967, 2969, 2973, 2975, 2977, 2982,
2984, 2986, 2988, 2989, 2991, 2992, 2994, 2995, 3001, 3005,
3011, 3014, 3015, 3020, 3021, 3025, 3030, 3035, 3036, 3039,
3040, 3046, 3050, 3051, 3057, 3058, 3060, 3062, 3064, 3066,
3071, 3076, 3077, 3079, 3080, 3082, 3086, 3090, 3094, 3098,
3102, 3106, 3107, 3109, 3110, 3111, 3112, 3118, 3119, 3122,
3125, 3126, 3127, 3130, 3133, 3137, 3139, 3141, 3145, 3147,
3149, 3151, 3155, 3157, 3159, 3162, 3165, 3166, 3167, 3174,
3175, 3176, 3177, 3186, 3187, 3188, 3189, 3205, 3208, 3209,
3216, 3221, 3222, 3223, 3238, 3239, 3242, 3243, 3247, 3248,
3251, 3256, 3263, 3272, 3283, 3296, 3297, 3306, 3307, 3310,
3312, 3314, 3315, 3320, 3323, 3324, 3329, 3330, 3335, 3339,
3341, 3343, 3346, 3348, 3350, 3352, 3354, 3356, 3358, 3360,
3362, 3365, 3369, 3374, 3376, 3380, 3384, 3386, 3388, 3390,
3392, 3395, 3399, 3402, 3403, 3405, 3406, 3408, 3409, 3411,
3412, 3414, 3415, 3417, 3419, 3420, 3422, 3423, 3425, 3426,
3428, 3430, 3432, 3433, 3435, 3436, 3438, 3439, 3441, 3443,
3444, 3445, 3447, 3449, 3453, 3455, 3459, 3461, 3463, 3464,
3471, 3474, 3476, 3478, 3480, 3482, 3484, 3486, 3488, 3490,
3493, 3496, 3498, 3500, 3502, 3504, 3506, 3508, 3510, 3512,
3514, 3516, 3518, 3521, 3524, 3526, 3527, 3529, 3531, 3533,
3535, 3537, 3539, 3541, 3542, 3548, 3550, 3557, 3559, 3561,
3563, 3565, 3566, 3572, 3574, 3578, 3580, 3582, 3584, 3588,
3590, 3594, 3598, 3600, 3604, 3606, 3608, 3612, 3616, 3618
};
/* YYRHS -- A `-1'-separated list of the rules' RHS. */
static const yytype_int16 yyrhs[] =
{
369, 0, -1, 370, -1, 375, -1, 371, -1, 371,
375, -1, 375, 373, -1, -1, 375, 372, 371, 373,
-1, 371, 375, 373, -1, -1, 128, 265, 374, 4,
-1, 376, 384, 451, 614, -1, -1, -1, -1, 185,
123, 362, 266, 362, 377, 4, 378, 380, 362, 379,
382, -1, -1, 432, 192, 381, -1, 432, 94, 381,
-1, -1, 265, -1, -1, 382, 383, -1, 63, 362,
-1, 110, 362, -1, 109, 362, -1, 196, 362, -1,
302, 362, -1, -1, 152, 123, 362, 385, 386, 417,
-1, -1, 96, 300, 362, 387, -1, -1, 387, 388,
-1, -1, -1, 314, 362, 389, 5, 394, 362, -1,
-1, 236, 362, 390, 5, 391, 362, -1, 316, 362,
395, -1, 1, -1, 265, 392, -1, -1, 393, 306,
432, 5, -1, 89, -1, -1, 952, 112, 222, -1,
-1, -1, 396, 362, -1, 1, -1, 397, -1, 396,
397, -1, 406, -1, 412, -1, 398, -1, 403, -1,
404, -1, 405, -1, 400, -1, 106, 399, 432, 32,
-1, 309, -1, -1, 85, 5, 432, 401, -1, 402,
-1, 401, 402, -1, 32, -1, 32, 22, 32, -1,
113, 432, 93, -1, 121, 321, 432, 5, -1, 107,
432, 5, -1, -1, 406, 407, -1, -1, 5, 432,
5, 408, 409, 410, -1, 241, 411, 432, 5, -1,
-1, 239, 411, 432, 5, -1, -1, 321, -1, -1,
50, 5, 432, 413, -1, 226, -1, 318, -1, 319,
-1, 414, -1, 415, -1, 414, 415, -1, 963, -1,
963, 22, 963, -1, 963, 416, -1, 56, 963, -1,
416, 56, 963, -1, 29, 300, 362, 418, -1, -1,
419, 420, -1, 1, -1, 164, 362, 421, -1, -1,
200, 362, 437, -1, 422, -1, 421, 422, -1, -1,
303, 430, 971, 423, 424, 362, -1, 424, 425, -1,
-1, 427, 432, 435, -1, 61, 955, 428, -1, 44,
434, 432, 436, -1, 426, 321, 432, 5, -1, 271,
944, 432, 5, -1, 276, 944, 432, 5, -1, 57,
271, 944, 432, 5, 429, -1, 284, 31, 431, -1,
1, -1, 166, -1, -1, 246, -1, -1, 33, -1,
973, -1, 33, 973, -1, 161, 973, -1, 1, -1,
952, 125, -1, -1, 244, -1, -1, 59, -1, 60,
-1, -1, 20, -1, -1, 21, -1, -1, 222, -1,
-1, 189, -1, 307, -1, 276, -1, 211, 307, -1,
987, -1, 307, -1, 126, -1, 268, -1, 987, -1,
-1, 438, 362, -1, 439, -1, 438, 439, -1, 440,
-1, 442, -1, 296, 441, 447, 448, 449, -1, -1,
271, -1, 311, -1, 312, -1, 224, 166, 446, 608,
443, -1, 444, -1, 443, 444, -1, 5, 445, -1,
-1, 260, 985, -1, 330, -1, -1, 59, -1, -1,
171, -1, -1, 5, -1, 449, 5, -1, 1, -1,
979, -1, 450, 979, -1, 1, -1, -1, 108, 123,
362, 452, 453, 455, 457, 459, 518, -1, -1, -1,
166, 300, 362, 454, 543, -1, -1, -1, 360, 300,
362, 456, 612, -1, -1, -1, 213, 300, 362, 458,
613, -1, -1, 281, 300, 362, 460, -1, -1, 460,
461, -1, -1, -1, -1, -1, 269, 462, 5, 463,
465, 362, 464, 479, -1, -1, 465, 466, -1, 432,
178, -1, 87, 962, -1, 467, -1, 468, -1, 472,
477, 478, -1, 251, 473, 985, 470, 469, 476, 475,
474, -1, -1, 182, 432, 985, -1, 471, -1, 211,
-1, -1, 212, -1, 101, 432, -1, 102, 433, -1,
-1, 208, 20, -1, 209, 21, -1, -1, 170, 432,
985, -1, -1, 204, 119, 432, 985, -1, -1, 169,
119, 432, 985, -1, -1, 168, -1, -1, 478, 977,
-1, 480, -1, 479, 480, -1, -1, 985, 970, 481,
482, 362, -1, 483, -1, 482, 483, -1, 496, -1,
495, -1, 484, -1, 493, -1, 491, -1, 490, -1,
494, -1, 508, -1, 498, -1, 502, -1, 507, -1,
342, 432, 485, -1, 281, 182, -1, 251, 182, -1,
-1, 101, 182, 486, 515, -1, 119, -1, -1, 101,
170, 487, 515, -1, 251, 170, -1, 281, 170, -1,
292, -1, 256, -1, -1, 80, 488, 515, -1, 111,
-1, -1, 79, 489, 515, -1, 255, -1, 291, -1,
309, 432, 513, 305, 539, -1, 513, 305, 539, -1,
-1, 257, 492, 432, 576, -1, 352, 432, 120, -1,
120, -1, 201, 514, -1, 228, 181, 432, 516, -1,
497, 985, 241, 228, 251, -1, 497, 985, 228, 251,
-1, 497, 985, -1, 497, 258, 985, -1, 211, 501,
-1, 211, 232, 432, -1, 211, 233, 433, -1, 212,
433, -1, 499, 985, -1, 91, 500, 501, -1, 91,
232, 500, 432, -1, 91, 233, 500, 433, -1, 92,
500, 433, -1, -1, 206, -1, 78, -1, 293, -1,
-1, 20, -1, 21, -1, -1, 313, 503, 432, 506,
-1, 355, 432, 968, -1, -1, -1, 327, 504, 957,
505, 510, 511, -1, 958, -1, 252, -1, -1, 181,
509, -1, 68, 607, 361, -1, -1, 190, -1, -1,
350, 957, -1, -1, 285, 958, -1, 285, 168, -1,
-1, 232, -1, 205, -1, 340, -1, -1, 293, -1,
958, -1, 168, -1, 985, -1, 258, 985, -1, 228,
251, -1, 238, -1, -1, -1, 297, 300, 362, 519,
520, -1, -1, 520, 521, -1, -1, -1, 985, 970,
522, 523, 362, -1, -1, 523, 211, 524, 542, 541,
960, -1, -1, 523, 91, 525, 542, 541, 960, -1,
523, 952, 535, -1, -1, 523, 952, 172, 526, 960,
-1, -1, 523, 952, 65, 527, 960, -1, -1, 523,
952, 90, 528, 960, -1, 523, 530, -1, 523, 571,
962, -1, 523, 574, -1, -1, 523, 310, 529, 960,
-1, -1, -1, 354, 531, 960, -1, -1, 173, 532,
960, 534, -1, -1, 19, 533, 977, -1, -1, 19,
977, -1, 68, 297, -1, 68, 211, -1, 155, 153,
-1, 155, 154, -1, 155, -1, 952, 67, -1, 537,
-1, 174, -1, 283, -1, 301, -1, 64, -1, 201,
293, -1, 201, 206, -1, 69, -1, 288, -1, 343,
-1, 217, -1, 183, -1, 68, 607, 361, -1, 952,
229, -1, 952, 349, -1, 952, 24, 47, -1, 351,
-1, 216, -1, 68, 297, -1, 68, 211, -1, 155,
153, -1, 155, 154, -1, 155, -1, 952, 67, -1,
537, -1, 174, -1, 283, -1, 301, -1, 64, -1,
201, 293, -1, 201, 206, -1, 69, -1, 288, -1,
343, -1, 217, -1, 183, -1, 68, 607, 361, -1,
952, 229, -1, 952, 349, -1, 952, 24, 47, -1,
351, -1, 216, -1, 172, 985, -1, 65, 985, -1,
540, 205, 538, -1, 540, 340, 538, -1, 305, 539,
-1, -1, 83, -1, -1, 309, 432, -1, 432, -1,
258, -1, 35, -1, 221, -1, 36, -1, -1, 232,
432, -1, -1, -1, -1, -1, 543, 163, 544, 5,
545, 579, 362, 546, 550, -1, -1, -1, -1, 543,
298, 547, 5, 548, 580, 362, 549, 550, -1, 1,
-1, -1, 551, -1, 550, 551, -1, -1, 985, 970,
552, 553, 362, -1, -1, 553, 557, -1, 553, 554,
-1, -1, 273, 555, 556, -1, 6, -1, 8, -1,
561, -1, 574, -1, 568, -1, 537, -1, 570, -1,
328, 559, -1, 201, 559, -1, 432, 161, -1, 432,
178, -1, 68, 607, 361, -1, -1, 279, 558, 979,
560, -1, -1, 206, -1, 293, -1, -1, 22, 979,
-1, -1, 237, 985, 606, 562, 566, -1, -1, -1,
237, 985, 19, 985, 606, 118, 563, 953, 958, 564,
566, -1, 26, 944, 432, 5, -1, -1, 565, 189,
951, 567, -1, -1, 971, -1, 567, 971, -1, 605,
432, 569, -1, 16, -1, 120, -1, 259, -1, 571,
572, -1, 355, 432, -1, 356, 433, -1, 573, -1,
572, 942, 573, -1, 962, -1, 962, 22, 962, -1,
-1, 257, 575, 432, 576, -1, -1, 576, 577, -1,
14, 578, -1, -1, 15, -1, -1, 579, 581, -1,
-1, 580, 582, -1, 432, 161, -1, 432, 178, -1,
583, -1, 584, -1, 585, -1, 586, -1, 587, -1,
588, -1, 590, -1, 589, -1, 584, -1, 587, -1,
70, 608, 985, 598, 597, -1, 271, 608, 985, 602,
609, -1, 271, 432, 357, 949, 841, 600, 602, 609,
599, -1, 203, 603, 604, -1, 355, 238, 165, 432,
973, -1, 108, 603, 596, -1, 595, 5, -1, 88,
432, 5, -1, 210, 432, 974, 471, 591, 592, 593,
-1, -1, 952, 170, 948, 974, -1, -1, 594, 338,
974, -1, -1, 594, 71, 974, -1, -1, 212, -1,
212, 62, -1, 62, -1, 281, 432, -1, 282, 433,
-1, 5, -1, 596, 5, -1, -1, 84, -1, 272,
-1, -1, 19, 985, -1, -1, 118, 953, 5, -1,
-1, 601, 967, -1, 173, -1, -1, -1, 19, 967,
-1, 271, 432, -1, 272, 433, -1, 317, -1, 240,
-1, -1, 352, -1, -1, 336, -1, -1, 358, -1,
-1, 98, -1, -1, 84, -1, -1, 245, -1, -1,
108, -1, 612, 551, -1, -1, -1, 613, 551, -1,
-1, -1, 263, 123, 615, 904, 362, 616, 621, 617,
-1, -1, -1, 617, 618, -1, 632, -1, 633, -1,
-1, 619, 636, 362, -1, -1, 1, 620, 362, -1,
362, -1, -1, 114, 362, 622, 627, 623, 128, 114,
362, -1, -1, -1, 623, 624, -1, 627, -1, 633,
-1, -1, 625, 636, 362, -1, -1, 1, 626, 362,
-1, -1, 632, 628, 629, -1, 1, -1, 353, 48,
630, 263, 953, 631, 362, -1, 1, -1, 158, -1,
156, -1, 317, 158, -1, 317, 156, -1, 957, -1,
768, -1, 9, 300, 362, -1, 9, 634, -1, 363,
-1, 362, -1, 636, -1, 637, -1, 636, 637, -1,
724, -1, 725, -1, 730, -1, 733, -1, 737, -1,
740, -1, 743, -1, 746, -1, 754, -1, 766, -1,
770, -1, 778, -1, 776, -1, 795, -1, 797, -1,
802, -1, 805, -1, 808, -1, 638, -1, 812, -1,
830, -1, 831, -1, 815, -1, 822, -1, 825, -1,
844, -1, 706, -1, 701, -1, 885, -1, 850, -1,
852, -1, 697, -1, 698, -1, 699, -1, 695, -1,
696, -1, 833, -1, 700, -1, 694, -1, 639, -1,
644, -1, 643, -1, 100, -1, 254, 911, -1, -1,
663, 640, 669, -1, -1, -1, 663, 127, 641, 665,
642, 669, -1, 299, 671, 693, -1, 299, 49, 675,
693, -1, -1, -1, 157, 645, 648, 646, 652, 647,
-1, 138, -1, 362, -1, -1, 649, 651, -1, -1,
648, 56, 650, 651, -1, 897, -1, 931, -1, 341,
-1, 162, -1, -1, -1, 358, 653, 654, 658, 662,
-1, -1, -1, -1, 652, 358, 655, 656, 658, 657,
662, -1, -1, 659, 661, -1, -1, 658, 56, 660,
661, -1, 247, -1, 58, -1, 341, -1, 162, -1,
668, 897, -1, 668, 897, 22, 897, -1, 668, 975,
-1, -1, 665, -1, -1, 186, 931, 664, 670, 665,
-1, -1, 666, 635, -1, -1, 667, 228, 304, -1,
-1, 42, -1, -1, 139, -1, -1, 335, -1, -1,
-1, -1, 972, 672, 678, 673, 679, 674, 681, -1,
-1, -1, 972, 676, 679, 677, 686, -1, 357, 979,
-1, -1, -1, 948, 128, 680, 635, -1, -1, 682,
-1, 681, 682, -1, -1, 358, 685, 683, 684, -1,
635, -1, 228, 304, -1, 960, 938, 960, -1, 687,
-1, 686, 687, -1, -1, -1, 358, 688, 691, 689,
690, -1, 635, -1, 228, 304, -1, 979, 432, 18,
955, 979, -1, 979, 432, 18, 955, 968, -1, -1,
691, 41, 692, 691, -1, -1, 146, -1, 345, 977,
-1, 331, 958, -1, 332, 958, 958, -1, 270, 339,
-1, 285, 339, -1, 193, 977, -1, 176, 977, -1,
333, 977, -1, 77, 958, -1, 77, 49, -1, -1,
-1, -1, 220, 977, 713, 702, 720, 703, 705, 704,
722, -1, 354, 723, -1, 707, -1, 711, -1, -1,
-1, -1, 311, 977, 713, 708, 719, 720, 709, 721,
710, 722, -1, -1, 311, 972, 714, 712, 719, 720,
-1, 715, -1, 713, 715, -1, 716, -1, 714, 716,
-1, 953, 26, 944, 717, -1, 953, 26, 944, 718,
-1, 977, -1, 717, 977, -1, 972, -1, 718, 972,
-1, -1, 952, 125, 949, 610, -1, -1, 392, -1,
194, 263, 432, 910, -1, 354, 723, -1, 248, 263,
432, 910, -1, 177, 723, -1, 977, -1, 723, 977,
-1, 223, 958, 19, 956, -1, 223, 104, 978, 19,
978, -1, 223, 207, 238, 958, 19, 978, -1, 223,
958, 19, -1, 191, 957, 726, -1, 191, -1, -1,
280, 727, -1, 728, -1, 727, 728, -1, 729, 611,
72, 958, -1, 51, -1, 54, -1, 234, -1, 55,
-1, 235, -1, 95, 731, 732, -1, 95, -1, 834,
18, 897, 837, -1, -1, 134, -1, 45, 734, 736,
-1, 45, -1, 835, 19, 834, 837, -1, 835, 735,
177, 834, 837, -1, 104, 835, 19, 834, 836, 837,
-1, -1, 19, 958, -1, -1, 130, -1, 326, 738,
739, -1, 326, -1, 835, 173, 834, 837, -1, 835,
173, 958, 177, 834, 837, -1, 104, 835, 173, 834,
836, 837, -1, -1, 149, -1, 225, 741, 742, -1,
225, -1, 958, 72, 958, 177, 834, 837, -1, 958,
72, 834, 837, -1, -1, 140, -1, 122, 744, 745,
-1, 122, -1, 958, 72, 958, 177, 834, 837, -1,
958, 72, 958, 177, 977, 836, 277, 977, 837, -1,
958, 197, 958, 177, 977, 836, 277, 977, 837, -1,
958, 197, 958, 177, 834, 837, -1, 958, 197, 834,
837, -1, -1, 137, -1, 747, -1, 748, -1, 749,
-1, 43, -1, 43, 977, 173, 12, 753, -1, 43,
977, 173, 194, 321, 753, -1, 43, 977, 173, 10,
753, -1, 43, 977, 173, 13, 753, -1, 43, 977,
173, 11, 32, 753, -1, 43, 977, 173, 34, 753,
-1, 43, 977, 764, 753, -1, -1, -1, -1, 43,
977, 764, 953, 158, 750, 979, 751, 635, 752, 753,
-1, -1, 129, -1, 755, -1, 756, -1, 120, -1,
120, 757, 758, 759, 760, -1, 120, 757, 764, 760,
-1, 958, -1, 757, 943, 958, -1, 350, 97, -1,
350, 323, -1, 350, 322, -1, -1, 759, 952, 24,
47, -1, 759, 952, 155, -1, 759, 952, 155, 154,
-1, 759, 952, 155, 153, -1, 759, 952, 155, 297,
-1, -1, 136, -1, 211, 512, 897, -1, 91, 512,
897, -1, 260, 897, -1, 62, 31, -1, 62, 979,
-1, -1, 764, 765, -1, 952, 536, -1, 761, -1,
762, -1, 763, -1, 243, 767, -1, 243, -1, 768,
769, -1, 767, 768, 769, -1, 194, -1, 199, -1,
248, -1, 160, -1, 1, -1, 977, -1, 769, 943,
977, -1, 86, 771, -1, 86, -1, 772, -1, 771,
943, 772, -1, 977, 773, -1, 774, -1, 775, -1,
952, 24, 289, -1, 274, -1, 344, -1, 274, 448,
278, -1, 344, 448, 278, -1, 952, 215, -1, 952,
187, 215, -1, -1, 286, 777, 794, -1, 286, -1,
977, 947, 781, -1, 977, 947, 781, 783, -1, 27,
779, 793, -1, 27, -1, 977, 780, 947, 781, 775,
782, -1, 977, 780, 947, 781, 775, 782, 783, -1,
977, 780, 947, 781, 775, 782, 788, -1, -1, 228,
-1, 262, -1, -1, 197, 977, -1, -1, 202, 432,
977, -1, 42, 948, 786, -1, 62, 786, -1, 786,
-1, -1, 62, 786, 42, 948, 784, 786, -1, -1,
786, 42, 948, 785, 786, -1, -1, 128, 787, 635,
-1, 789, -1, 791, -1, 789, 791, -1, -1, 198,
944, 790, 635, -1, -1, 42, 198, 944, 792, 635,
-1, -1, 143, -1, -1, 144, -1, 30, 977, 796,
-1, -1, 173, 958, -1, -1, 28, 977, 799, 800,
798, 873, 801, -1, -1, 173, 958, -1, -1, 930,
945, 958, 470, -1, 930, 945, 251, -1, -1, 151,
-1, -1, 290, 977, 799, 803, 873, 804, -1, -1,
145, -1, -1, 115, 977, 947, 806, 873, 807, -1,
-1, 135, -1, -1, 320, 810, 873, 809, 811, -1,
977, -1, 977, 202, 432, 940, 977, -1, -1, 147,
-1, 179, 955, 813, -1, 179, 955, 814, 118, 953,
979, -1, 986, -1, 986, -1, 814, 986, -1, 814,
214, 986, -1, -1, -1, -1, -1, -1, 73, 816,
821, 958, 899, 902, 817, 818, 819, 864, 867, 820,
842, -1, 73, -1, -1, 74, -1, 75, -1, -1,
76, 958, 823, 824, -1, 76, -1, 132, -1, -1,
-1, -1, -1, -1, 81, 826, 958, 899, 827, 828,
864, 829, 843, -1, 81, -1, 159, -1, 159, 253,
-1, 159, 265, -1, 324, 295, -1, 324, 832, -1,
32, -1, 31, -1, 180, -1, 977, 836, 943, -1,
834, 977, 836, 943, -1, 958, 943, -1, 835, 958,
943, -1, -1, 294, -1, -1, 42, 953, 310, 839,
-1, 953, 310, 839, -1, -1, 953, 310, 839, 42,
953, 310, 838, 839, -1, -1, 156, 840, 635, -1,
-1, 310, -1, -1, 131, -1, -1, 133, -1, 308,
845, -1, 846, 19, 849, 848, -1, 846, 348, 72,
966, -1, 846, 124, 72, 966, -1, 849, 979, 19,
849, 847, -1, 450, -1, 975, -1, 979, -1, 231,
-1, 960, -1, 241, -1, 239, -1, 231, -1, 341,
-1, -1, 46, 517, -1, -1, 325, 880, 197, 977,
879, 851, 862, 883, -1, -1, 346, 977, 854, 197,
856, 879, 860, 853, 862, 884, -1, 116, 951, 855,
-1, -1, 861, 958, -1, 855, 40, 861, 958, -1,
857, -1, 856, 943, 857, -1, 977, 858, 859, -1,
-1, 117, 949, 977, -1, -1, 105, 949, 977, -1,
-1, 329, 949, 977, -1, -1, 49, -1, -1, 863,
869, 871, -1, -1, 953, 866, 865, 635, -1, -1,
158, -1, 249, -1, -1, 42, 953, 158, 868, 635,
-1, -1, -1, 953, 249, 870, 635, -1, -1, -1,
878, 953, 249, 872, 635, -1, -1, 874, -1, 876,
-1, 874, 876, -1, -1, -1, 198, 944, 875, 635,
-1, -1, 878, 198, 944, 877, 635, -1, 230, -1,
42, -1, 952, 259, 977, -1, -1, 881, -1, 880,
943, 881, -1, 1, -1, 958, -1, 958, 116, 951,
882, -1, 958, -1, 310, -1, 1, -1, -1, 148,
-1, -1, 150, -1, -1, 195, 977, 888, 886, 891,
-1, 195, 977, 887, -1, 103, 961, 19, 961, 895,
-1, 329, 889, -1, -1, 889, 977, 171, 890, -1,
-1, 890, 84, 895, -1, 890, 49, 961, 895, -1,
890, 205, 961, 895, -1, -1, 280, 892, -1, -1,
892, 84, 72, 961, 895, -1, 892, 894, 893, -1,
-1, 893, 961, 72, 961, 895, -1, -1, 49, -1,
205, -1, 340, -1, 169, -1, 895, 66, 896, 961,
-1, 895, 48, 896, 961, -1, -1, 192, -1, -1,
958, -1, 897, 37, 897, -1, 897, 38, 897, -1,
897, 35, 897, -1, 897, 36, 897, -1, 897, 39,
897, -1, 364, 897, 365, -1, -1, 897, -1, -1,
-1, -1, 354, 900, 903, 901, 905, -1, -1, 287,
979, -1, 177, 979, -1, -1, -1, 354, 957, -1,
82, 957, -1, 905, 943, 906, -1, 906, -1, 958,
-1, 951, 907, 958, -1, 275, -1, 355, -1, 99,
-1, 908, 943, 909, -1, 909, -1, 958, -1, 986,
923, -1, 928, 142, -1, -1, -1, 958, 336, 912,
928, 913, 142, -1, -1, -1, -1, 924, 347, 914,
931, 915, 928, 916, 142, -1, -1, -1, -1, 924,
357, 977, 173, 958, 951, 958, 347, 917, 931, 918,
925, 928, 919, 142, -1, 986, 923, -1, -1, 986,
923, 924, 347, 920, 931, -1, 986, 923, 958, 336,
-1, -1, -1, 986, 923, 924, 357, 977, 173, 958,
951, 958, 347, 921, 931, 922, 925, -1, -1, 22,
986, -1, -1, 952, 334, 930, -1, -1, 48, 926,
-1, 48, 926, 48, 926, -1, 48, 926, 48, 926,
48, 926, -1, 48, 926, 48, 926, 48, 926, 48,
926, -1, 48, 926, 48, 926, 48, 926, 48, 926,
48, 926, -1, 48, 926, 48, 926, 48, 926, 48,
926, 48, 926, 48, 926, -1, -1, 977, 173, 958,
951, 958, 347, 927, 931, -1, -1, 929, 635, -1,
66, -1, 48, -1, -1, 897, 938, 932, 898, -1,
42, 931, -1, -1, 931, 41, 933, 935, -1, -1,
931, 40, 934, 935, -1, 364, 931, 365, -1, 975,
-1, 931, -1, 940, 897, -1, 897, -1, 261, -1,
227, -1, 361, -1, 234, -1, 51, -1, 52, -1,
53, -1, 20, 939, -1, 20, 42, 939, -1, 20,
939, 40, 939, -1, 939, -1, 42, 432, 939, -1,
939, 40, 939, -1, 941, -1, 937, -1, 936, -1,
941, -1, 42, 941, -1, 941, 40, 941, -1, 18,
946, -1, -1, 366, -1, -1, 214, -1, -1, 202,
-1, -1, 47, -1, -1, 19, -1, 23, -1, -1,
271, -1, -1, 62, -1, -1, 188, -1, 188, -1,
238, -1, -1, 72, -1, -1, 359, -1, -1, 241,
-1, 958, -1, -1, -1, 19, -1, 978, -1, 956,
943, 978, -1, 958, -1, 957, 943, 958, -1, 977,
-1, 962, -1, -1, 175, 9, 364, 959, 908, 365,
-1, 175, 9, -1, 977, -1, 968, -1, 977, -1,
963, -1, 963, -1, 964, -1, 968, -1, 965, -1,
49, 968, -1, 49, 965, -1, 315, -1, 361, -1,
267, -1, 184, -1, 218, -1, 979, -1, 967, -1,
969, -1, 969, -1, 32, -1, 31, -1, 35, 31,
-1, 36, 31, -1, 971, -1, -1, 5, -1, 167,
-1, 8, -1, 968, -1, 5, -1, 968, -1, 5,
-1, -1, 7, 364, 976, 983, 365, -1, 7, -1,
979, 364, 958, 367, 954, 365, -1, 979, -1, 9,
-1, 958, -1, 981, -1, -1, 981, 219, 980, 983,
365, -1, 982, -1, 982, 950, 981, -1, 6, -1,
8, -1, 984, -1, 983, 942, 984, -1, 958, -1,
984, 35, 958, -1, 984, 36, 958, -1, 969, -1,
9, 950, 9, -1, 9, -1, 31, -1, 31, 950,
31, -1, 31, 950, 9, -1, 5, -1, 9, -1
};
/* YYRLINE[YYN] -- source line where rule number YYN was defined. */
static const yytype_uint16 yyrline[] =
{
0, 309, 309, 312, 313, 314, 323, 324, 324, 325,
337, 336, 346, 356, 360, 368, 354, 373, 375, 376,
378, 379, 381, 383, 386, 387, 388, 389, 390, 397,
396, 405, 411, 412, 415, 416, 420, 419, 424, 423,
427, 428, 431, 432, 435, 437, 438, 441, 442, 444,
446, 447, 450, 451, 456, 457, 458, 459, 460, 461,
462, 467, 472, 473, 476, 479, 480, 483, 484, 488,
492, 496, 499, 500, 504, 503, 511, 512, 515, 516,
519, 520, 523, 530, 531, 532, 533, 536, 537, 540,
541, 542, 545, 546, 552, 553, 556, 557, 560, 562,
563, 570, 571, 576, 575, 600, 601, 604, 606, 607,
617, 618, 619, 620, 622, 623, 626, 627, 630, 631,
633, 634, 635, 636, 641, 644, 645, 648, 649, 651,
652, 653, 656, 657, 660, 661, 664, 665, 668, 669,
670, 671, 672, 675, 676, 677, 678, 683, 684, 688,
689, 692, 693, 696, 698, 699, 700, 701, 704, 707,
708, 711, 713, 714, 717, 718, 721, 722, 725, 726,
729, 730, 731, 734, 735, 736, 745, 744, 752, 758,
758, 760, 766, 766, 768, 774, 774, 776, 790, 792,
795, 796, 800, 802, 812, 799, 821, 822, 824, 825,
826, 827, 830, 833, 838, 839, 842, 843, 845, 847,
850, 851, 853, 855, 856, 858, 860, 862, 864, 866,
868, 870, 872, 874, 876, 879, 880, 884, 883, 900,
901, 904, 905, 906, 907, 908, 909, 910, 911, 912,
913, 914, 917, 920, 921, 922, 922, 924, 925, 925,
927, 928, 929, 930, 931, 931, 933, 934, 934, 936,
937, 940, 941, 945, 944, 951, 952, 955, 958, 961,
962, 963, 964, 967, 968, 969, 970, 973, 976, 977,
978, 979, 982, 983, 984, 985, 987, 989, 990, 993,
992, 996, 997, 998, 997, 1001, 1002, 1004, 1005, 1008,
1010, 1011, 1013, 1014, 1016, 1017, 1018, 1020, 1021, 1024,
1025, 1027, 1028, 1031, 1032, 1035, 1036, 1037, 1040, 1041,
1051, 1050, 1057, 1064, 1065, 1069, 1068, 1080, 1080, 1085,
1085, 1090, 1092, 1092, 1096, 1096, 1100, 1100, 1105, 1107,
1109, 1110, 1110, 1113, 1116, 1116, 1121, 1121, 1127, 1127,
1134, 1135, 1138, 1139, 1140, 1141, 1142, 1143, 1144, 1145,
1146, 1147, 1148, 1149, 1150, 1151, 1152, 1153, 1154, 1155,
1156, 1157, 1158, 1159, 1160, 1161, 1165, 1166, 1167, 1168,
1169, 1170, 1171, 1172, 1173, 1174, 1175, 1176, 1177, 1178,
1179, 1180, 1181, 1182, 1183, 1184, 1185, 1186, 1187, 1188,
1189, 1190, 1194, 1196, 1200, 1201, 1204, 1205, 1208, 1209,
1212, 1213, 1214, 1215, 1216, 1219, 1220, 1229, 1231, 1233,
1228, 1245, 1246, 1248, 1245, 1259, 1260, 1263, 1264, 1280,
1279, 1299, 1301, 1302, 1306, 1305, 1319, 1320, 1323, 1324,
1325, 1326, 1329, 1330, 1331, 1332, 1333, 1334, 1335, 1335,
1341, 1342, 1343, 1345, 1346, 1352, 1351, 1355, 1357, 1354,
1364, 1375, 1378, 1390, 1393, 1405, 1414, 1417, 1418, 1419,
1425, 1428, 1429, 1432, 1433, 1436, 1437, 1447, 1446, 1467,
1468, 1471, 1480, 1481, 1485, 1486, 1488, 1489, 1492, 1493,
1494, 1495, 1496, 1497, 1498, 1499, 1500, 1501, 1504, 1505,
1509, 1516, 1524, 1537, 1540, 1551, 1554, 1557, 1561, 1567,
1568, 1570, 1571, 1573, 1574, 1576, 1577, 1578, 1579, 1581,
1582, 1584, 1585, 1587, 1589, 1590, 1592, 1593, 1595, 1596,
1599, 1600, 1603, 1604, 1607, 1608, 1611, 1612, 1615, 1616,
1618, 1620, 1622, 1624, 1626, 1628, 1630, 1632, 1634, 1636,
1638, 1640, 1642, 1644, 1650, 1652, 1657, 1659, 1672, 1676,
1671, 1687, 1689, 1690, 1693, 1694, 1695, 1695, 1697, 1697,
1698, 1703, 1702, 1713, 1715, 1716, 1721, 1722, 1723, 1723,
1724, 1724, 1730, 1729, 1735, 1738, 1740, 1742, 1743, 1744,
1745, 1748, 1749, 1760, 1771, 1785, 1786, 1794, 1797, 1798,
1801, 1802, 1803, 1804, 1805, 1806, 1807, 1808, 1809, 1810,
1811, 1812, 1813, 1814, 1815, 1816, 1817, 1818, 1819, 1820,
1821, 1822, 1823, 1824, 1825, 1826, 1827, 1828, 1829, 1830,
1831, 1832, 1833, 1834, 1835, 1836, 1837, 1838, 1839, 1840,
1841, 1842, 1843, 1850, 1853, 1853, 1855, 1857, 1854, 1861,
1862, 1866, 1868, 1865, 1874, 1875, 1878, 1878, 1881, 1880,
1886, 1895, 1896, 1897, 1900, 1901, 1900, 1905, 1906, 1908,
1905, 1913, 1913, 1920, 1919, 1926, 1929, 1930, 1931, 1932,
1949, 1961, 1972, 1973, 1978, 1977, 1988, 1988, 1989, 1989,
1996, 1997, 1999, 2000, 2002, 2003, 2007, 2013, 2024, 2006,
2040, 2058, 2039, 2070, 2071, 2076, 2075, 2085, 2092, 2093,
2098, 2096, 2108, 2109, 2122, 2126, 2127, 2130, 2132, 2130,
2141, 2143, 2150, 2158, 2166, 2166, 2170, 2171, 2175, 2178,
2179, 2182, 2183, 2186, 2189, 2192, 2195, 2196, 2202, 2204,
2206, 2201, 2215, 2220, 2221, 2225, 2227, 2229, 2224, 2244,
2243, 2250, 2251, 2255, 2256, 2260, 2265, 2270, 2271, 2275,
2276, 2279, 2280, 2287, 2288, 2294, 2295, 2298, 2299, 2302,
2303, 2311, 2312, 2313, 2314, 2319, 2320, 2322, 2323, 2327,
2328, 2331, 2334, 2335, 2336, 2337, 2338, 2343, 2344, 2347,
2360, 2362, 2367, 2368, 2371, 2379, 2387, 2397, 2398, 2400,
2402, 2408, 2409, 2412, 2420, 2429, 2438, 2439, 2445, 2446,
2449, 2458, 2467, 2469, 2475, 2476, 2479, 2488, 2497, 2506,
2515, 2524, 2526, 2531, 2532, 2533, 2534, 2537, 2538, 2539,
2540, 2541, 2549, 2555, 2563, 2570, 2574, 2562, 2577, 2579,
2584, 2585, 2586, 2589, 2594, 2602, 2603, 2606, 2607, 2608,
2611, 2612, 2613, 2614, 2615, 2616, 2618, 2620, 2628, 2637,
2644, 2653, 2659, 2668, 2669, 2672, 2673, 2674, 2675, 2682,
2683, 2686, 2687, 2691, 2692, 2693, 2694, 2695, 2698, 2699,
2705, 2706, 2709, 2710, 2713, 2716, 2721, 2724, 2725, 2726,
2727, 2728, 2731, 2732, 2733, 2739, 2740, 2743, 2751, 2769,
2770, 2773, 2787, 2804, 2822, 2823, 2824, 2827, 2828, 2831,
2832, 2835, 2840, 2845, 2851, 2850, 2860, 2859, 2871, 2870,
2884, 2885, 2886, 2889, 2889, 2893, 2893, 2896, 2898, 2900,
2902, 2908, 2914, 2915, 2922, 2921, 2931, 2932, 2935, 2936,
2942, 2948, 2950, 2957, 2956, 2965, 2967, 2973, 2973, 2977,
2979, 2986, 2985, 2990, 2991, 2993, 2995, 3005, 3006, 3013,
3016, 3017, 3018, 3023, 3028, 3029, 3030, 3041, 3023, 3043,
3046, 3047, 3048, 3056, 3054, 3060, 3064, 3065, 3070, 3072,
3073, 3075, 3070, 3077, 3082, 3083, 3084, 3089, 3090, 3102,
3108, 3118, 3121, 3125, 3131, 3135, 3142, 3143, 3148, 3151,
3156, 3164, 3161, 3175, 3174, 3192, 3194, 3196, 3198, 3200,
3202, 3207, 3209, 3211, 3213, 3215, 3221, 3222, 3226, 3227,
3231, 3232, 3233, 3234, 3235, 3243, 3244, 3251, 3250, 3262,
3258, 3269, 3270, 3273, 3274, 3282, 3283, 3290, 3295, 3296,
3299, 3300, 3303, 3304, 3307, 3308, 3311, 3311, 3317, 3317,
3319, 3322, 3323, 3326, 3326, 3328, 3331, 3331, 3333, 3336,
3336, 3338, 3342, 3343, 3344, 3346, 3349, 3349, 3353, 3353,
3357, 3358, 3361, 3362, 3365, 3366, 3370, 3373, 3377, 3382,
3383, 3384, 3386, 3388, 3390, 3392, 3399, 3397, 3401, 3406,
3412, 3413, 3416, 3419, 3422, 3425, 3428, 3431, 3434, 3436,
3439, 3442, 3445, 3448, 3451, 3454, 3455, 3456, 3457, 3460,
3463, 3466, 3469, 3470, 3474, 3475, 3477, 3479, 3481, 3483,
3485, 3490, 3491, 3494, 3495, 3496, 3495, 3500, 3501, 3502,
3504, 3507, 3508, 3509, 3513, 3520, 3529, 3538, 3559, 3560,
3561, 3565, 3567, 3570, 3572, 3578, 3580, 3586, 3579, 3591,
3598, 3606, 3590, 3620, 3641, 3651, 3619, 3694, 3700, 3699,
3718, 3729, 3749, 3727, 3805, 3806, 3808, 3809, 3815, 3816,
3822, 3829, 3838, 3848, 3859, 3874, 3872, 3909, 3909, 3915,
3916, 3920, 3919, 3949, 3952, 3950, 3957, 3955, 3960, 3961,
3971, 3972, 3983, 3997, 3998, 3999, 4002, 4003, 4004, 4005,
4008, 4009, 4010, 4011, 4012, 4013, 4016, 4017, 4018, 4021,
4022, 4023, 4026, 4028, 4029, 4031, 4033, 4044, 4046, 4048,
4050, 4052, 4054, 4055, 4057, 4059, 4061, 4062, 4064, 4065,
4068, 4069, 4071, 4072, 4074, 4076, 4078, 4080, 4083, 4084,
4086, 4087, 4090, 4091, 4095, 4096, 4099, 4104, 4105, 4105,
4112, 4119, 4120, 4123, 4124, 4127, 4128, 4131, 4132, 4135,
4136, 4139, 4140, 4141, 4142, 4143, 4146, 4147, 4150, 4153,
4154, 4157, 4158, 4159, 4167, 4168, 4171, 4178, 4181, 4207,
4208, 4211, 4212, 4215, 4215, 4221, 4224, 4228, 4229, 4232,
4259, 4271, 4270, 4280, 4286, 4296, 4304, 4307, 4308, 4311,
4312, 4313, 4316, 4328, 4355, 4371, 4372, 4373, 4376, 4377
};
#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", "LOW_PREC", "IDSTRING", "STRING",
"VARIABLE", "VARCOND", "SUBSCVAR", "LABELSTR", "CMD_LINE",
"ENVIRONMENT_VARIABLE", "INKEY", "ESCKEY", "CHAR", "MULTIPLIER",
"USAGENUM", "ZERONUM", "CONDITIONAL", "TO", "IS", "ARE", "THRU", "THAN",
"NO", "COMMENTING", "DIRECTION", "READ", "WRITE", "INPUT_OUTPUT",
"RELEASE", "NLITERAL", "CLITERAL", "PORTNUM", "DATE_TIME", "'+'", "'-'",
"'*'", "'/'", "POW_OP", "OR", "AND", "NOT", "ACCEPT", "ACCESS", "ADD",
"ADDRESS", "ADVANCING", "AFTER", "ALL", "ALPHABET", "ALPHABETIC",
"ALPHABETIC_LOWER", "ALPHABETIC_UPPER", "ALPHANUMERIC",
"ALPHANUMERIC_EDITED", "ALSO", "ALTERNATE", "ANY", "AREA", "AREAS",
"ASSIGN", "AT", "AUTHOR", "AUTO", "BACKGROUNDCOLOR", "BEFORE", "BELL",
"BLANK", "BLINK", "BLOCK", "BOTTOM", "BY", "CALL", "CALL_CONV_C",
"CALL_CONV_STDCALL", "CALL_LOADLIB", "CANCEL", "CENTER", "CF", "CH",
"CHAIN", "CHAINING", "CHARACTER", "CHARACTERS", "CLASS", "CLOSE", "CODE",
"CODE_SET", "COLLATING", "COLOR", "COLUMN", "COLUMNS", "COMMA", "COMMON",
"COMPUTE", "CONFIGURATION", "CONSOLE", "CONTAINS", "CONTENT", "CONTINUE",
"CONTROL", "CONTROLS", "CONVERTING", "CORRESPONDING", "COUNT",
"CURRENCY", "CURSOR", "DATA", "DATE_COMPILED", "DATE_WRITTEN", "DE",
"DEBUGGING", "DECIMAL_POINT", "DECLARATIVES", "DELETE", "DELIMITED",
"DELIMITER", "DEPENDING", "DETAIL", "DISPLAY", "DISPLAY_SCREEN",
"DIVIDE", "DIVISION", "DOWN", "DUPLICATES", "DYNAMIC", "ELSE", "END",
"END_ACCEPT", "END_ADD", "END_CALL", "END_CALL_LOADLIB", "END_CHAIN",
"END_COMPUTE", "END_DELETE", "END_DISPLAY", "END_DIVIDE", "END_EVALUATE",
"END_IF", "END_MULTIPLY", "END_OF_PAGE", "END_PERFORM", "END_READ",
"END_RETURN", "END_REWRITE", "END_SEARCH", "END_START", "END_STRINGCMD",
"END_SUBTRACT", "END_UNSTRING", "END_WRITE", "ENVIRONMENT", "EOL", "EOS",
"ERASE", "ERROR_TOK", "EVALUATE", "EXCEPTION", "EXIT", "EXTEND",
"EXTERNAL", "FALSE_TOK", "FD", "FILE_CONTROL", "FILE_ID", "FILE_TOK",
"FILLER", "FINAL", "FIRST", "FOOTING", "FOR", "FOREGROUNDCOLOR", "FROM",
"FULL", "FUNCTION", "GENERATE", "GIVING", "GLOBAL", "GO", "GOBACK",
"GROUP", "HEADING", "HIGHLIGHT", "HIGHVALUES", "IDENTIFICATION", "IF",
"IGNORE", "IN", "INDEXED", "INDICATE", "INITIALIZE", "INITIAL_TOK",
"INITIATE", "INPUT", "INSPECT", "INSTALLATION", "INTO", "INVALID", "I_O",
"I_O_CONTROL", "JUSTIFIED", "KEY", "LABEL", "LAST", "LEADING", "LEFT",
"LENGTH", "LIMIT", "LIMITS", "LINAGE", "LINE", "LINES", "LINKAGE",
"LISTSEP", "LOCK", "LOWER", "LOWLIGHT", "LOWVALUES", "LPAR", "MERGE",
"MINUS", "MODE", "MOVE", "MULTIPLE", "MULTIPLY", "NATIVE", "NEGATIVE",
"NEXT", "NOECHO", "NOTEXCEP", "NULL_TOK", "NUMBER", "NUMBERS", "NUMERIC",
"NUMERIC_EDITED", "OBJECT_COMPUTER", "OCCURS", "OF", "OFF", "OMITTED",
"ON", "ONLY", "OPEN", "OPTIONAL", "ORDER", "ORGANIZATION", "OTHER",
"OUTPUT", "OVERFLOW_TOK", "PADDING", "PAGE", "PAGE_COUNTER", "PARAGRAPH",
"PERFORM", "PF", "PH", "PICTURE", "PLUS", "POINTER", "POSITION",
"POSITIVE", "PREVIOUS", "PROCEDURE", "PROCEED", "PROGRAM", "PROGRAM_ID",
"QUOTES", "RANDOM", "RD", "READY", "RECORD", "RECORDS", "REDEFINES",
"REEL", "REFERENCE", "RELATIVE", "REMAINDER", "REMOVAL", "RENAMES",
"REPLACING", "REPORT", "REPORTS", "REQUIRED", "RESERVE", "RESET",
"RETURN", "RETURNING", "REVERSEVIDEO", "REWIND", "REWRITE", "RF", "RH",
"RIGHT", "ROUNDED", "RUN", "SAME", "SCREEN", "SD", "SEARCH", "SECTION",
"SECURE", "SECURITY", "SELECT", "SENTENCE", "SEPARATE", "SEQUENCE",
"SEQUENTIAL", "SET", "SIGN", "SIZE", "SORT", "SORT_MERGE", "SOURCE",
"SOURCE_COMPUTER", "SPACES", "SPECIAL_NAMES", "STANDARD", "STANDARD_1",
"STANDARD_2", "START", "STATUS", "STD_ERROR", "STD_OUTPUT", "STOP",
"STRINGCMD", "SUBTRACT", "SUM", "SYNCHRONIZED", "TALLYING", "TAPE",
"TCOBPROTO1", "TCOBPROTO2", "TERMINATE", "TEST", "THEN", "TIMES",
"TOKDUMMY", "TOP", "TRACE", "TRAILING", "TRUE_TOK", "TYPE", "UNDERLINE",
"UNIT", "UNLOCK", "UNSTRING", "UNTIL", "UP", "UPDATE", "UPON", "UPPER",
"USAGE", "USE", "USING", "VALUE", "VALUES", "VARYING", "WHEN", "WITH",
"WORKING_STORAGE", "ZERO", "PERIOD_TOK", "'.'", "'('", "')'", "','",
"':'", "$accept", "root_", "program_sequences", "program_sequence",
"$@1", "end_program", "$@2", "program", "identification_division", "$@3",
"$@4", "$@5", "programid_opts_opt", "programid_program_opt",
"identification_division_options_opt", "identification_division_option",
"environment_division_opt", "$@6", "configuration_opt",
"configuration_section", "configuration_option", "$@7", "$@8",
"program_collating_opt", "collating_sequence", "collating_opt",
"debug_mode_opt", "special_names_opt", "special_names", "special_name",
"currency_details", "sign_opt", "special_name_class",
"special_name_class_item_list", "special_name_class_item",
"decimal_point_details", "screen_status_details", "cursor_details",
"switches_details_list", "switches_details", "$@9", "switch_on_opt",
"switch_off_opt", "status_opt", "alphabet_details", "alphabet_type",
"alphabet_literal_list", "alphabet_literal_item", "alphabet_also_list",
"input_output_opt", "input_output_section", "file_control_paragraph",
"i_o_control_paragraph", "file_control", "file_select", "$@10",
"select_clauses", "select_clause", "file_opt", "organization_opt",
"assign_clause", "with_duplicates", "optional_opt", "areas_opt",
"is_opt", "are_opt", "mode_opt", "organization_options",
"access_options", "i_o_control_opt", "i_o_control_list",
"i_o_control_clause", "i_o_control_same_clause", "same_clause_options",
"i_o_control_multiple_file_tape_clause",
"i_o_control_multiple_file_list", "i_o_control_multiple_file",
"i_o_control_multiple_file_position_opt", "tape_opt", "are_opta",
"for_opt", "string_list", "name_list", "data_division_opt", "$@11",
"file_section_opt", "$@12", "working_storage_opt", "$@13",
"linkage_section_opt", "$@14", "report_section_opt", "report_sections",
"report_section", "$@15", "$@16", "$@17", "report_controls",
"report_control", "report_controls_control", "report_controls_page",
"heading_opt", "line_lines_opt", "lines_opt", "control_is_are",
"limit_is_are_opt", "footing_opt", "last_detail_opt", "first_detail_opt",
"final_opt", "report_break_list", "report_description", "report_item",
"$@18", "report_clauses", "report_clause", "report_clause_type",
"report_clause_type2", "$@19", "$@20", "$@21", "$@22",
"report_clause_sign_is", "report_clause_picture", "$@23",
"report_clause_usage_display", "report_clause_justified",
"report_clause_next_group", "report_clause_line",
"report_clause_line_is", "report_clause_column",
"report_clause_column_is", "report_clause_column_orientation",
"is_are_opt", "report_clause_svs", "$@24", "$@25", "$@26",
"gname_page_counter", "report_clause_group_indicate",
"report_clause_blank_zero", "indicate_opt", "upon_opt", "reset_opt",
"number_opt", "leading_trailing", "right_opt", "name_final_opt",
"integer_on_next_page", "of_opt", "screen_section_opt", "$@27",
"screen_section", "screen_item", "$@28", "screen_clauses", "$@29",
"$@30", "$@31", "$@32", "$@33", "$@34", "screen_source_destination",
"$@35", "$@36", "$@37", "screen_to_name", "screen_attrib",
"screen_attribx", "sign_clause", "separate_opt", "character_opt",
"sign_is_opt", "plus_minus_opt", "number_is_opt", "file_section", "$@38",
"$@39", "$@40", "$@41", "$@42", "$@43", "file_description",
"field_description", "$@44", "data_clauses", "redefines_clause", "$@45",
"redefines_var", "data_clause", "$@46", "sync_options", "thru_gname_opt",
"array_options", "$@47", "$@48", "$@49", "key_is_opt", "indexed_by_opt",
"index_name_list", "usage_option", "usage", "value_option",
"value_is_are", "value_list", "value", "pictures", "$@50", "picture",
"pic_elem", "multiplier_opt", "file_description_fd_clauses",
"file_description_sd_clauses", "file_description_fd_clause",
"file_description_sd_clause", "file_description_clause_block",
"file_description_clause_record", "file_description_clause_label",
"file_description_clause_value", "file_description_clause_data",
"file_description_clause_report", "file_description_clause_code_set",
"file_description_clause_linage",
"file_description_clause_linage_footing",
"file_description_clause_linage_top",
"file_description_clause_linage_bottom", "lines_at_opt", "report_is_are",
"var_strings", "chars_or_recs_opt", "to_integer_opt",
"depend_rec_varying", "from_rec_varying", "from_opt", "to_rec_varying",
"record_is_are", "std_or_omitt", "usage_opt", "times_opt", "when_opt",
"contains_opt", "character_opts", "order_opt", "data_opt",
"working_storage_section", "linkage_section", "procedure_division_opt",
"$@51", "$@52", "procedure_division", "procedure_decl", "$@53", "$@54",
"declaratives_opt", "$@55", "declaratives_division", "declaratives_decl",
"$@56", "$@57", "declaratives_procedure", "$@58", "use_phrase",
"use_phrase_exception_error", "use_phrase_option", "procedure_section",
"paragraph", "dot_or_eos", "statement_list", "statements", "statement",
"perform_statement", "if_statement", "$@59", "@60", "$@61",
"search_statement", "evaluate_statement", "@62", "$@63",
"end_evaluate_or_eos", "selection_subject_set", "@64", "@65",
"selection_subject", "when_case_list", "@66", "@67", "@68", "@69",
"$@70", "when_case", "@71", "@72", "selection_object",
"sentence_or_nothing", "if_part", "@73", "conditional_statement", "$@74",
"$@75", "not_opt", "end_if_opt", "end_then_opt", "search", "@76", "@77",
"@78", "search_all", "@79", "$@80", "search_varying_opt",
"search_at_end", "@81", "search_when_list", "search_when", "@82",
"search_when_statement", "search_when_conditional",
"search_all_when_list", "search_all_when", "$@83", "@84",
"search_all_when_statement", "search_all_when_conditional", "@85",
"end_search_opt", "unlock_statement", "proto_statement",
"trace_statement", "initiate_statement", "generate_statement",
"terminate_statement", "cancel_statement", "merge_statement", "$@86",
"$@87", "$@88", "merge_using", "sort_statement", "sort_file", "$@89",
"$@90", "$@91", "sort_variable_indexed", "$@92", "sort_keys",
"sort_keys_idx", "sort_key", "sort_key_idx", "sort_keys_names",
"sort_keys_names_idx", "sort_duplicates_opt", "sort_collating_opt",
"sort_input", "sort_output", "sort_file_list", "move_statement",
"initialize_statement", "initialize_replacing_opt",
"initialize_replacing_lists", "initialize_replacing_list",
"initialize_type_list", "compute_statement", "compute_body",
"end_compute_opt", "add_statement", "add_body", "add_to_opt",
"end_add_opt", "subtract_statement", "subtract_body", "end_subtract_opt",
"multiply_statement", "multiply_body", "end_multiply_opt",
"divide_statement", "divide_body", "end_divide_opt", "accept_statement",
"accept_hardware", "accept_chronological", "accept_screen", "$@93",
"@94", "$@95", "end_accept_opt", "display_statement", "display_line",
"display_screen", "display_varlist", "display_upon",
"display_line_options", "end_display_opt", "scr_line", "scr_position",
"scr_line_position", "accept_display_options", "accept_display_option",
"open_statement", "open_options", "open_mode", "open_varlist",
"close_statement", "close_files", "close_file", "close_options_opt",
"close_options", "with_lock_opt", "return_statement", "return_body",
"read_statement", "read_body", "read_next_opt", "read_into_opt",
"read_key_opt", "read_at_end_opt", "$@96", "$@97", "on_end", "@98",
"read_invalid_key_opt", "read_invalid_key", "@99",
"read_not_invalid_key", "@100", "end_read_opt", "end_return_opt",
"release_statement", "release_from_opt", "write_statement", "$@101",
"write_from_opt", "write_options", "end_write_opt", "rewrite_statement",
"$@102", "end_rewrite_opt", "delete_statement", "$@103",
"end_delete_opt", "start_statement", "$@104", "start_body",
"end_start_opt", "goto_statement", "goto_label", "goto_label_list",
"call_statement", "$@105", "@106", "@107", "@108", "$@109",
"call_convention_opt", "call_loadlib_statement", "$@110",
"end_call_loadlib_opt", "chain_statement", "$@111", "@112", "@113",
"$@114", "exit_statement", "stop_statement", "stop_literal",
"goback_statement", "var_list_name", "var_list_gname", "rounded_opt",
"on_size_error_opt", "$@115", "on_size_error", "@116", "size_opt",
"end_call_opt", "end_chain_opt", "set_statement", "set_list",
"set_target", "set_variable", "set_variable_or_nlit", "address_of_opt",
"string_statement", "$@117", "unstring_statement", "$@118",
"unstring_delimited", "unstring_delimited_vars", "unstring_destinations",
"unstring_dest_var", "unstring_delim_opt", "unstring_count_opt",
"unstring_tallying", "all_opt", "on_overflow_opt", "$@119",
"on_exception_or_overflow", "@120", "exception_or_overflow",
"on_not_exception", "@121", "on_overflow", "@122", "on_not_overflow",
"@123", "invalid_key_opt", "invalid_key_sentence", "@124",
"not_invalid_key_sentence", "@125", "not_excep", "string_with_pointer",
"string_from_list", "string_from", "delimited_by", "end_stringcmd_opt",
"end_unstring_opt", "inspect_statement", "$@126", "converting_clause",
"tallying_clause", "tallying_list", "tallying_for_list",
"replacing_clause", "replacing_list", "replacing_by_list",
"replacing_kind", "inspect_before_after", "initial_opt", "expr",
"expr_opt", "using_options", "@127", "@128", "returning_options",
"dummy", "using_parameters", "parm_list", "parameter", "parm_type",
"intrinsic_parm_list", "intrinsic_parm", "perform_range",
"perform_options", "@129", "$@130", "@131", "@132", "$@133", "@134",
"@135", "$@136", "@137", "@138", "@139", "perform_thru_opt",
"with_test_opt", "perform_after_opt", "perform_after", "@140",
"perform_statements", "$@141", "before_after", "condition", "$@142",
"@143", "@144", "implied_op_condition", "sign_condition",
"class_condition", "extended_cond_op", "ext_cond", "cond_op",
"conditional", "comma_opt", "sep_opt", "key_opt", "advancing_opt",
"than_to_opt", "record_opt", "at_opt", "in_opt", "in_of", "by_opt",
"with_opt", "on_opt", "gname_opt", "to_opt", "name_var_list",
"gname_list", "gname", "@145", "name_or_lit", "noallname", "gliteral",
"without_all_literal", "all_literal", "special_literal",
"var_or_nliteral", "nliteral", "literal", "signed_nliteral",
"def_name_opt", "def_name", "variable_indexed", "filename", "data_name",
"cond_name", "$@146", "name", "name_var", "variable", "$@147",
"qualified_var", "unqualified_var", "subscripts", "subscript", "integer",
"label", "anystring", 0
};
#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, 43, 45, 42, 47, 290,
291, 292, 293, 294, 295, 296, 297, 298, 299, 300,
301, 302, 303, 304, 305, 306, 307, 308, 309, 310,
311, 312, 313, 314, 315, 316, 317, 318, 319, 320,
321, 322, 323, 324, 325, 326, 327, 328, 329, 330,
331, 332, 333, 334, 335, 336, 337, 338, 339, 340,
341, 342, 343, 344, 345, 346, 347, 348, 349, 350,
351, 352, 353, 354, 355, 356, 357, 358, 359, 360,
361, 362, 363, 364, 365, 366, 367, 368, 369, 370,
371, 372, 373, 374, 375, 376, 377, 378, 379, 380,
381, 382, 383, 384, 385, 386, 387, 388, 389, 390,
391, 392, 393, 394, 395, 396, 397, 398, 399, 400,
401, 402, 403, 404, 405, 406, 407, 408, 409, 410,
411, 412, 413, 414, 415, 416, 417, 418, 419, 420,
421, 422, 423, 424, 425, 426, 427, 428, 429, 430,
431, 432, 433, 434, 435, 436, 437, 438, 439, 440,
441, 442, 443, 444, 445, 446, 447, 448, 449, 450,
451, 452, 453, 454, 455, 456, 457, 458, 459, 460,
461, 462, 463, 464, 465, 466, 467, 468, 469, 470,
471, 472, 473, 474, 475, 476, 477, 478, 479, 480,
481, 482, 483, 484, 485, 486, 487, 488, 489, 490,
491, 492, 493, 494, 495, 496, 497, 498, 499, 500,
501, 502, 503, 504, 505, 506, 507, 508, 509, 510,
511, 512, 513, 514, 515, 516, 517, 518, 519, 520,
521, 522, 523, 524, 525, 526, 527, 528, 529, 530,
531, 532, 533, 534, 535, 536, 537, 538, 539, 540,
541, 542, 543, 544, 545, 546, 547, 548, 549, 550,
551, 552, 553, 554, 555, 556, 557, 558, 559, 560,
561, 562, 563, 564, 565, 566, 567, 568, 569, 570,
571, 572, 573, 574, 575, 576, 577, 578, 579, 580,
581, 582, 583, 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,
611, 612, 613, 46, 40, 41, 44, 58
};
# endif
/* YYR1[YYN] -- Symbol number of symbol that rule YYN derives. */
static const yytype_uint16 yyr1[] =
{
0, 368, 369, 370, 370, 370, 371, 372, 371, 371,
374, 373, 375, 377, 378, 379, 376, 380, 380, 380,
381, 381, 382, 382, 383, 383, 383, 383, 383, 385,
384, 384, 386, 386, 387, 387, 389, 388, 390, 388,
388, 388, 391, 391, 392, 393, 393, 394, 394, 395,
395, 395, 396, 396, 397, 397, 397, 397, 397, 397,
397, 398, 399, 399, 400, 401, 401, 402, 402, 403,
404, 405, 406, 406, 408, 407, 409, 409, 410, 410,
411, 411, 412, 413, 413, 413, 413, 414, 414, 415,
415, 415, 416, 416, 417, 417, 418, 418, 419, 420,
420, 421, 421, 423, 422, 424, 424, 425, 425, 425,
425, 425, 425, 425, 425, 425, 426, 426, 427, 427,
428, 428, 428, 428, 428, 429, 429, 430, 430, 431,
431, 431, 432, 432, 433, 433, 434, 434, 435, 435,
435, 435, 435, 436, 436, 436, 436, 437, 437, 438,
438, 439, 439, 440, 441, 441, 441, 441, 442, 443,
443, 444, 445, 445, 446, 446, 447, 447, 448, 448,
449, 449, 449, 450, 450, 450, 452, 451, 451, 454,
453, 453, 456, 455, 455, 458, 457, 457, 459, 459,
460, 460, 462, 463, 464, 461, 465, 465, 466, 466,
466, 466, 467, 468, 469, 469, 470, 470, 471, 471,
472, 472, 473, 473, 473, 474, 474, 475, 475, 476,
476, 477, 477, 478, 478, 479, 479, 481, 480, 482,
482, 483, 483, 483, 483, 483, 483, 483, 483, 483,
483, 483, 484, 485, 485, 486, 485, 485, 487, 485,
485, 485, 485, 485, 488, 485, 485, 489, 485, 485,
485, 490, 490, 492, 491, 493, 493, 494, 495, 496,
496, 496, 496, 497, 497, 497, 497, 498, 499, 499,
499, 499, 500, 500, 500, 500, 501, 501, 501, 503,
502, 502, 504, 505, 502, 506, 506, 507, 507, 508,
509, 509, 510, 510, 511, 511, 511, 512, 512, 513,
513, 514, 514, 515, 515, 516, 516, 516, 517, 517,
519, 518, 518, 520, 520, 522, 521, 524, 523, 525,
523, 523, 526, 523, 527, 523, 528, 523, 523, 523,
523, 529, 523, 523, 531, 530, 532, 530, 533, 530,
534, 534, 535, 535, 535, 535, 535, 535, 535, 535,
535, 535, 535, 535, 535, 535, 535, 535, 535, 535,
535, 535, 535, 535, 535, 535, 536, 536, 536, 536,
536, 536, 536, 536, 536, 536, 536, 536, 536, 536,
536, 536, 536, 536, 536, 536, 536, 536, 536, 536,
536, 536, 537, 537, 538, 538, 539, 539, 540, 540,
541, 541, 541, 541, 541, 542, 542, 544, 545, 546,
543, 547, 548, 549, 543, 543, 543, 550, 550, 552,
551, 553, 553, 553, 555, 554, 556, 556, 557, 557,
557, 557, 557, 557, 557, 557, 557, 557, 558, 557,
559, 559, 559, 560, 560, 562, 561, 563, 564, 561,
565, 565, 566, 566, 567, 567, 568, 569, 569, 569,
570, 571, 571, 572, 572, 573, 573, 575, 574, 576,
576, 577, 578, 578, 579, 579, 580, 580, 581, 581,
581, 581, 581, 581, 581, 581, 581, 581, 582, 582,
583, 584, 584, 585, 586, 587, 588, 589, 590, 591,
591, 592, 592, 593, 593, 594, 594, 594, 594, 595,
595, 596, 596, 597, 597, 597, 598, 598, 599, 599,
600, 600, 601, 601, 602, 602, 603, 603, 604, 604,
605, 605, 606, 606, 607, 607, 608, 608, 609, 609,
610, 610, 611, 611, 612, 612, 613, 613, 615, 616,
614, 614, 617, 617, 618, 618, 619, 618, 620, 618,
618, 622, 621, 621, 623, 623, 624, 624, 625, 624,
626, 624, 628, 627, 627, 629, 629, 630, 630, 630,
630, 631, 631, 632, 633, 634, 634, 635, 636, 636,
637, 637, 637, 637, 637, 637, 637, 637, 637, 637,
637, 637, 637, 637, 637, 637, 637, 637, 637, 637,
637, 637, 637, 637, 637, 637, 637, 637, 637, 637,
637, 637, 637, 637, 637, 637, 637, 637, 637, 637,
637, 637, 637, 638, 640, 639, 641, 642, 639, 643,
643, 645, 646, 644, 647, 647, 649, 648, 650, 648,
651, 651, 651, 651, 653, 654, 652, 655, 656, 657,
652, 659, 658, 660, 658, 658, 661, 661, 661, 661,
661, 661, 662, 662, 664, 663, 666, 665, 667, 665,
668, 668, 669, 669, 670, 670, 672, 673, 674, 671,
676, 677, 675, 678, 678, 680, 679, 679, 681, 681,
683, 682, 684, 684, 685, 686, 686, 688, 689, 687,
690, 690, 691, 691, 692, 691, 693, 693, 694, 695,
695, 696, 696, 697, 698, 699, 700, 700, 702, 703,
704, 701, 705, 706, 706, 708, 709, 710, 707, 712,
711, 713, 713, 714, 714, 715, 716, 717, 717, 718,
718, 719, 719, 720, 720, 721, 721, 722, 722, 723,
723, 724, 724, 724, 724, 725, 725, 726, 726, 727,
727, 728, 729, 729, 729, 729, 729, 730, 730, 731,
732, 732, 733, 733, 734, 734, 734, 735, 735, 736,
736, 737, 737, 738, 738, 738, 739, 739, 740, 740,
741, 741, 742, 742, 743, 743, 744, 744, 744, 744,
744, 745, 745, 746, 746, 746, 746, 747, 747, 747,
747, 747, 748, 749, 750, 751, 752, 749, 753, 753,
754, 754, 754, 755, 756, 757, 757, 758, 758, 758,
759, 759, 759, 759, 759, 759, 760, 760, 761, 762,
762, 763, 763, 764, 764, 765, 765, 765, 765, 766,
766, 767, 767, 768, 768, 768, 768, 768, 769, 769,
770, 770, 771, 771, 772, 773, 773, 774, 774, 774,
774, 774, 775, 775, 775, 776, 776, 777, 777, 778,
778, 779, 779, 779, 780, 780, 780, 781, 781, 782,
782, 783, 783, 783, 784, 783, 785, 783, 787, 786,
788, 788, 788, 790, 789, 792, 791, 793, 793, 794,
794, 795, 796, 796, 798, 797, 799, 799, 800, 800,
800, 801, 801, 803, 802, 804, 804, 806, 805, 807,
807, 809, 808, 810, 810, 811, 811, 812, 812, 813,
814, 814, 814, 816, 817, 818, 819, 820, 815, 815,
821, 821, 821, 823, 822, 822, 824, 824, 826, 827,
828, 829, 825, 825, 830, 830, 830, 831, 831, 832,
832, 833, 834, 834, 835, 835, 836, 836, 837, 837,
837, 838, 837, 840, 839, 841, 841, 842, 842, 843,
843, 844, 845, 845, 845, 845, 846, 846, 847, 847,
848, 848, 848, 848, 848, 849, 849, 851, 850, 853,
852, 854, 854, 855, 855, 856, 856, 857, 858, 858,
859, 859, 860, 860, 861, 861, 863, 862, 865, 864,
864, 866, 866, 868, 867, 867, 870, 869, 869, 872,
871, 871, 873, 873, 873, 873, 875, 874, 877, 876,
878, 878, 879, 879, 880, 880, 880, 881, 881, 882,
882, 882, 883, 883, 884, 884, 886, 885, 885, 887,
888, 888, 889, 889, 890, 890, 890, 890, 891, 891,
892, 892, 892, 893, 893, 894, 894, 894, 894, 895,
895, 895, 896, 896, 897, 897, 897, 897, 897, 897,
897, 898, 898, 899, 900, 901, 899, 902, 902, 902,
903, 904, 904, 904, 905, 905, 906, 906, 907, 907,
907, 908, 908, 909, 910, 911, 912, 913, 911, 914,
915, 916, 911, 917, 918, 919, 911, 911, 920, 911,
911, 921, 922, 911, 923, 923, 924, 924, 925, 925,
925, 925, 925, 925, 925, 927, 926, 929, 928, 930,
930, 932, 931, 931, 933, 931, 934, 931, 931, 931,
935, 935, 935, 936, 936, 936, 937, 937, 937, 937,
938, 938, 938, 938, 938, 938, 939, 939, 939, 940,
940, 940, 941, 942, 942, 943, 943, 944, 944, 945,
945, 946, 946, 946, 947, 947, 948, 948, 949, 949,
950, 950, 951, 951, 952, 952, 953, 953, 954, 954,
955, 955, 956, 956, 957, 957, 958, 958, 959, 958,
958, 960, 960, 961, 961, 962, 962, 963, 963, 964,
964, 965, 965, 965, 965, 965, 966, 966, 967, 968,
968, 969, 969, 969, 970, 970, 971, 971, 972, 973,
973, 974, 974, 976, 975, 975, 977, 977, 977, 978,
979, 980, 979, 981, 981, 982, 982, 983, 983, 984,
984, 984, 985, 986, 986, 986, 986, 986, 987, 987
};
/* YYR2[YYN] -- Number of symbols composing right hand side of rule YYN. */
static const yytype_uint8 yyr2[] =
{
0, 2, 1, 1, 1, 2, 2, 0, 4, 3,
0, 4, 4, 0, 0, 0, 12, 0, 3, 3,
0, 1, 0, 2, 2, 2, 2, 2, 2, 0,
6, 0, 4, 0, 2, 0, 0, 6, 0, 6,
3, 1, 2, 0, 4, 1, 0, 3, 0, 0,
2, 1, 1, 2, 1, 1, 1, 1, 1, 1,
1, 4, 1, 0, 4, 1, 2, 1, 3, 3,
4, 3, 0, 2, 0, 6, 4, 0, 4, 0,
1, 0, 4, 1, 1, 1, 1, 1, 2, 1,
3, 2, 2, 3, 4, 0, 2, 1, 3, 0,
3, 1, 2, 0, 6, 2, 0, 3, 3, 4,
4, 4, 4, 6, 3, 1, 1, 0, 1, 0,
1, 1, 2, 2, 1, 2, 0, 1, 0, 1,
1, 0, 1, 0, 1, 0, 1, 0, 1, 1,
1, 2, 1, 1, 1, 1, 1, 0, 2, 1,
2, 1, 1, 5, 0, 1, 1, 1, 5, 1,
2, 2, 0, 2, 1, 0, 1, 0, 1, 0,
1, 2, 1, 1, 2, 1, 0, 9, 0, 0,
5, 0, 0, 5, 0, 0, 5, 0, 4, 0,
2, 0, 0, 0, 0, 8, 0, 2, 2, 2,
1, 1, 3, 8, 0, 3, 1, 1, 0, 1,
2, 2, 0, 2, 2, 0, 3, 0, 4, 0,
4, 0, 1, 0, 2, 1, 2, 0, 5, 1,
2, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 3, 2, 2, 0, 4, 1, 0, 4,
2, 2, 1, 1, 0, 3, 1, 0, 3, 1,
1, 5, 3, 0, 4, 3, 1, 2, 4, 5,
4, 2, 3, 2, 3, 3, 2, 2, 3, 4,
4, 3, 0, 1, 1, 1, 0, 1, 1, 0,
4, 3, 0, 0, 6, 1, 1, 0, 2, 3,
0, 1, 0, 2, 0, 2, 2, 0, 1, 1,
1, 0, 1, 1, 1, 1, 2, 2, 1, 0,
0, 5, 0, 2, 0, 0, 5, 0, 6, 0,
6, 3, 0, 5, 0, 5, 0, 5, 2, 3,
2, 0, 4, 0, 0, 3, 0, 4, 0, 3,
0, 2, 2, 2, 2, 2, 1, 2, 1, 1,
1, 1, 1, 2, 2, 1, 1, 1, 1, 1,
3, 2, 2, 3, 1, 1, 2, 2, 2, 2,
1, 2, 1, 1, 1, 1, 1, 2, 2, 1,
1, 1, 1, 1, 3, 2, 2, 3, 1, 1,
2, 2, 3, 3, 2, 0, 1, 0, 2, 1,
1, 1, 1, 1, 0, 2, 0, 0, 0, 0,
9, 0, 0, 0, 9, 1, 0, 1, 2, 0,
5, 0, 2, 2, 0, 3, 1, 1, 1, 1,
1, 1, 1, 2, 2, 2, 2, 3, 0, 4,
0, 1, 1, 0, 2, 0, 5, 0, 0, 11,
4, 0, 4, 0, 1, 2, 3, 1, 1, 1,
2, 2, 2, 1, 3, 1, 3, 0, 4, 0,
2, 2, 0, 1, 0, 2, 0, 2, 2, 2,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
5, 5, 9, 3, 5, 3, 2, 3, 7, 0,
4, 0, 3, 0, 3, 0, 1, 2, 1, 2,
2, 1, 2, 0, 1, 1, 0, 2, 0, 3,
0, 2, 1, 0, 0, 2, 2, 2, 1, 1,
0, 1, 0, 1, 0, 1, 0, 1, 0, 1,
0, 1, 0, 1, 2, 0, 0, 2, 0, 0,
8, 0, 0, 2, 1, 1, 0, 3, 0, 3,
1, 0, 8, 0, 0, 2, 1, 1, 0, 3,
0, 3, 0, 3, 1, 7, 1, 1, 1, 2,
2, 1, 1, 3, 2, 1, 1, 1, 1, 2,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 2, 0, 3, 0, 0, 6, 3,
4, 0, 0, 6, 1, 1, 0, 2, 0, 4,
1, 1, 1, 1, 0, 0, 5, 0, 0, 0,
7, 0, 2, 0, 4, 1, 1, 1, 1, 2,
4, 2, 0, 1, 0, 5, 0, 2, 0, 3,
0, 1, 0, 1, 0, 1, 0, 0, 0, 7,
0, 0, 5, 2, 0, 0, 4, 0, 1, 2,
0, 4, 1, 2, 3, 1, 2, 0, 0, 5,
1, 2, 5, 5, 0, 4, 0, 1, 2, 2,
3, 2, 2, 2, 2, 2, 2, 2, 0, 0,
0, 9, 2, 1, 1, 0, 0, 0, 10, 0,
6, 1, 2, 1, 2, 4, 4, 1, 2, 1,
2, 0, 4, 0, 1, 4, 2, 4, 2, 1,
2, 4, 5, 6, 3, 3, 1, 0, 2, 1,
2, 4, 1, 1, 1, 1, 1, 3, 1, 4,
0, 1, 3, 1, 4, 5, 6, 0, 2, 0,
1, 3, 1, 4, 6, 6, 0, 1, 3, 1,
6, 4, 0, 1, 3, 1, 6, 9, 9, 6,
4, 0, 1, 1, 1, 1, 1, 5, 6, 5,
5, 6, 5, 4, 0, 0, 0, 11, 0, 1,
1, 1, 1, 5, 4, 1, 3, 2, 2, 2,
0, 4, 3, 4, 4, 4, 0, 1, 3, 3,
2, 2, 2, 0, 2, 2, 1, 1, 1, 2,
1, 2, 3, 1, 1, 1, 1, 1, 1, 3,
2, 1, 1, 3, 2, 1, 1, 3, 1, 1,
3, 3, 2, 3, 0, 3, 1, 3, 4, 3,
1, 6, 7, 7, 0, 1, 1, 0, 2, 0,
3, 3, 2, 1, 0, 6, 0, 5, 0, 3,
1, 1, 2, 0, 4, 0, 5, 0, 1, 0,
1, 3, 0, 2, 0, 7, 0, 2, 0, 4,
3, 0, 1, 0, 6, 0, 1, 0, 6, 0,
1, 0, 5, 1, 5, 0, 1, 3, 6, 1,
1, 2, 3, 0, 0, 0, 0, 0, 13, 1,
0, 1, 1, 0, 4, 1, 1, 0, 0, 0,
0, 0, 9, 1, 1, 2, 2, 2, 2, 1,
1, 1, 3, 4, 2, 3, 0, 1, 0, 4,
3, 0, 8, 0, 3, 0, 1, 0, 1, 0,
1, 2, 4, 4, 4, 5, 1, 1, 1, 1,
1, 1, 1, 1, 1, 0, 2, 0, 8, 0,
10, 3, 0, 2, 4, 1, 3, 3, 0, 3,
0, 3, 0, 3, 0, 1, 0, 3, 0, 4,
0, 1, 1, 0, 5, 0, 0, 4, 0, 0,
5, 0, 1, 1, 2, 0, 0, 4, 0, 5,
1, 1, 3, 0, 1, 3, 1, 1, 4, 1,
1, 1, 0, 1, 0, 1, 0, 5, 3, 5,
2, 0, 4, 0, 3, 4, 4, 0, 2, 0,
5, 3, 0, 5, 0, 1, 1, 1, 1, 4,
4, 0, 1, 0, 1, 3, 3, 3, 3, 3,
3, 0, 1, 0, 0, 0, 5, 0, 2, 2,
0, 0, 2, 2, 3, 1, 1, 3, 1, 1,
1, 3, 1, 1, 2, 2, 0, 0, 6, 0,
0, 0, 8, 0, 0, 0, 15, 2, 0, 6,
4, 0, 0, 14, 0, 2, 0, 3, 0, 2,
4, 6, 8, 10, 12, 0, 8, 0, 2, 1,
1, 0, 4, 2, 0, 4, 0, 4, 3, 1,
1, 2, 1, 1, 1, 1, 1, 1, 1, 1,
2, 3, 4, 1, 3, 3, 1, 1, 1, 1,
2, 3, 2, 0, 1, 0, 1, 0, 1, 0,
1, 0, 1, 1, 0, 1, 0, 1, 0, 1,
1, 1, 0, 1, 0, 1, 0, 1, 1, 0,
0, 1, 1, 3, 1, 3, 1, 1, 0, 6,
2, 1, 1, 1, 1, 1, 1, 1, 1, 2,
2, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 2, 2, 1, 0, 1, 1, 1, 1,
1, 1, 1, 0, 5, 1, 6, 1, 1, 1,
1, 0, 5, 1, 3, 1, 1, 1, 3, 1,
3, 3, 1, 3, 1, 1, 3, 3, 1, 1
};
/* 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_uint16 yydefact[] =
{
0, 0, 0, 2, 4, 3, 31, 0, 1, 5,
0, 0, 6, 0, 178, 0, 9, 10, 0, 7,
0, 0, 561, 0, 0, 8, 0, 29, 0, 0,
12, 13, 11, 33, 176, 558, 0, 0, 95, 181,
1131, 14, 0, 0, 30, 0, 184, 0, 0, 0,
133, 35, 0, 0, 0, 187, 1295, 1296, 1288, 1271,
1270, 0, 0, 0, 0, 1264, 1265, 1263, 1261, 1262,
1215, 1244, 1247, 1255, 1256, 1258, 1257, 1269, 1246, 1287,
1290, 1293, 1215, 559, 132, 0, 0, 0, 0, 179,
0, 0, 189, 1272, 1273, 1260, 1259, 1250, 1216, 0,
0, 1291, 1230, 1231, 0, 573, 15, 20, 20, 41,
0, 0, 0, 34, 97, 0, 94, 99, 0, 182,
0, 0, 322, 1248, 1245, 0, 0, 1294, 0, 562,
22, 21, 19, 18, 38, 36, 0, 0, 0, 96,
425, 180, 555, 185, 0, 0, 177, 0, 1239, 1299,
1213, 1297, 571, 0, 16, 0, 0, 51, 0, 0,
63, 133, 133, 0, 40, 72, 52, 56, 60, 57,
58, 59, 54, 55, 128, 98, 101, 147, 417, 421,
183, 556, 191, 0, 1215, 1142, 1143, 0, 1238, 1292,
1214, 0, 0, 0, 0, 568, 0, 570, 563, 0,
564, 565, 0, 0, 0, 0, 0, 23, 43, 48,
133, 133, 62, 133, 0, 0, 133, 50, 53, 133,
73, 127, 0, 102, 0, 154, 100, 0, 149, 151,
152, 0, 0, 554, 1302, 1275, 186, 188, 320, 1249,
0, 1286, 1298, 1300, 1301, 584, 0, 574, 582, 0,
0, 596, 595, 594, 900, 0, 0, 826, 793, 969,
975, 0, 983, 881, 788, 642, 0, 842, 815, 651,
984, 0, 1240, 991, 0, 776, 0, 0, 0, 0,
809, 0, 1177, 0, 0, 896, 0, 0, 0, 0,
0, 0, 0, 802, 0, 0, 0, 0, 0, 0,
598, 618, 639, 641, 640, 644, 638, 634, 635, 631,
632, 633, 637, 627, 626, 743, 744, 600, 601, 602,
603, 604, 605, 606, 607, 823, 824, 825, 608, 840,
841, 609, 610, 612, 611, 613, 614, 615, 616, 617,
619, 622, 623, 624, 620, 621, 636, 625, 629, 630,
628, 24, 26, 25, 27, 28, 46, 0, 1235, 0,
0, 0, 0, 0, 71, 69, 0, 0, 1276, 1277,
103, 165, 155, 156, 157, 167, 148, 150, 418, 422,
429, 1274, 557, 192, 190, 324, 1141, 0, 0, 569,
593, 927, 904, 936, 932, 863, 0, 799, 797, 1215,
970, 973, 737, 736, 0, 880, 882, 894, 790, 0,
996, 1224, 863, 845, 821, 0, 656, 985, 986, 734,
1241, 0, 1285, 0, 0, 0, 684, 1114, 1189, 777,
733, 1091, 1236, 0, 0, 0, 812, 0, 877, 876,
873, 874, 875, 0, 0, 1304, 1305, 643, 0, 0,
0, 0, 0, 1164, 731, 732, 929, 1224, 936, 1278,
0, 726, 696, 175, 319, 1016, 1011, 0, 0, 1017,
173, 1296, 1236, 1236, 1065, 953, 990, 989, 987, 988,
1076, 1215, 1074, 1077, 0, 806, 0, 729, 0, 735,
728, 1032, 567, 599, 646, 692, 45, 42, 0, 39,
37, 0, 83, 84, 85, 82, 86, 87, 89, 67,
64, 65, 61, 70, 74, 106, 164, 546, 166, 169,
484, 486, 431, 0, 321, 584, 0, 575, 0, 576,
577, 586, 0, 583, 928, 899, 905, 906, 1224, 0,
938, 0, 931, 0, 838, 0, 800, 792, 0, 0,
1215, 994, 971, 972, 0, 977, 1123, 0, 888, 889,
884, 885, 886, 0, 791, 787, 0, 996, 997, 1215,
1225, 947, 0, 850, 856, 0, 822, 814, 0, 0,
652, 0, 1304, 1305, 957, 0, 959, 1283, 1183, 0,
0, 1221, 0, 0, 0, 0, 0, 0, 133, 1197,
1198, 1199, 1194, 1196, 1193, 1195, 1208, 1207, 1181, 1203,
1206, 1186, 1184, 694, 0, 775, 0, 1093, 1088, 1086,
1237, 738, 751, 0, 1289, 0, 0, 774, 813, 808,
0, 0, 871, 878, 0, 0, 1149, 0, 1145, 1178,
597, 0, 1146, 0, 1157, 930, 895, 907, 943, 726,
700, 727, 649, 704, 318, 1026, 174, 1025, 0, 0,
0, 749, 753, 0, 745, 1071, 1217, 1070, 951, 1062,
1063, 0, 133, 0, 0, 1232, 0, 807, 801, 0,
730, 1232, 0, 686, 693, 645, 133, 47, 88, 0,
0, 91, 0, 66, 77, 0, 547, 0, 168, 0,
133, 0, 133, 193, 323, 1275, 0, 0, 0, 0,
907, 937, 1180, 1179, 934, 1219, 933, 838, 0, 838,
838, 838, 0, 0, 307, 839, 307, 0, 833, 866,
867, 868, 864, 1234, 0, 0, 998, 798, 996, 0,
995, 1123, 976, 974, 1124, 979, 883, 0, 0, 0,
0, 892, 0, 998, 1215, 992, 1065, 847, 849, 848,
856, 857, 844, 846, 0, 998, 0, 658, 0, 663,
662, 657, 660, 661, 1236, 0, 961, 0, 1120, 1188,
1222, 1223, 1212, 0, 1200, 1117, 1118, 1115, 1116, 1119,
0, 1121, 0, 0, 0, 695, 686, 782, 783, 785,
784, 786, 778, 779, 552, 0, 1254, 1253, 1090, 1099,
46, 752, 1217, 0, 0, 771, 1242, 998, 0, 872,
0, 1303, 1307, 1306, 0, 0, 1167, 1177, 1165, 0,
0, 0, 897, 1065, 650, 707, 0, 697, 0, 0,
0, 1025, 761, 754, 1217, 761, 1218, 1066, 955, 1064,
1217, 0, 1073, 1075, 1233, 0, 0, 998, 0, 1044,
0, 647, 0, 0, 0, 90, 92, 0, 68, 81,
79, 115, 137, 0, 1240, 116, 118, 1217, 1217, 0,
104, 105, 0, 133, 162, 158, 159, 172, 170, 153,
546, 133, 0, 0, 133, 546, 133, 135, 0, 419,
0, 485, 490, 491, 492, 493, 494, 495, 497, 496,
0, 423, 487, 498, 499, 544, 450, 0, 477, 434,
448, 133, 450, 541, 133, 135, 430, 409, 441, 0,
433, 432, 438, 440, 442, 0, 439, 133, 196, 325,
581, 572, 579, 588, 587, 0, 0, 894, 1065, 1220,
0, 829, 838, 827, 830, 832, 838, 861, 862, 308,
0, 0, 860, 386, 0, 544, 389, 380, 0, 383,
393, 0, 399, 392, 384, 390, 385, 391, 398, 409,
865, 382, 0, 834, 996, 1236, 794, 0, 998, 1127,
1130, 980, 890, 891, 887, 893, 0, 789, 993, 949,
843, 0, 0, 820, 0, 0, 664, 0, 0, 962,
1213, 1201, 0, 1204, 1122, 1182, 1205, 0, 1192, 1190,
1187, 0, 1209, 1185, 685, 780, 553, 0, 0, 0,
1102, 1087, 764, 739, 0, 772, 0, 0, 811, 0,
879, 1150, 0, 1147, 1158, 0, 1160, 908, 1226, 0,
918, 898, 913, 945, 1227, 701, 0, 703, 707, 1023,
1022, 1021, 1024, 1012, 1020, 1252, 1251, 1014, 1267, 1268,
1266, 1013, 0, 763, 0, 0, 763, 0, 956, 952,
1068, 0, 0, 1027, 0, 1081, 1080, 1078, 1079, 996,
803, 0, 1045, 1031, 0, 1073, 1035, 1038, 692, 687,
0, 44, 93, 80, 133, 81, 75, 136, 133, 1217,
0, 133, 133, 131, 133, 0, 0, 161, 160, 171,
0, 0, 133, 135, 0, 0, 0, 0, 0, 519,
134, 520, 0, 0, 488, 489, 506, 0, 545, 0,
451, 452, 444, 542, 133, 0, 0, 408, 443, 471,
472, 445, 446, 405, 405, 470, 473, 475, 0, 133,
343, 590, 589, 1236, 909, 0, 941, 940, 208, 831,
828, 859, 858, 401, 377, 376, 0, 378, 379, 400,
388, 387, 0, 381, 395, 396, 0, 998, 0, 0,
795, 0, 0, 964, 1125, 1050, 950, 948, 0, 852,
998, 996, 998, 996, 659, 665, 654, 667, 655, 653,
958, 1284, 1202, 1210, 1191, 0, 0, 1111, 1097, 1098,
0, 755, 757, 773, 1243, 998, 1177, 1232, 0, 0,
0, 0, 912, 0, 1226, 946, 944, 0, 705, 698,
1019, 1015, 1018, 750, 1228, 756, 759, 746, 1067, 0,
954, 1046, 0, 998, 998, 1044, 1033, 1042, 0, 1228,
1040, 648, 689, 0, 133, 0, 133, 124, 1280, 120,
0, 108, 1279, 121, 0, 0, 129, 130, 114, 0,
1308, 1309, 138, 0, 140, 139, 107, 142, 163, 526,
507, 536, 537, 521, 505, 539, 538, 503, 1282, 1281,
208, 1228, 534, 133, 420, 427, 424, 447, 0, 543,
455, 479, 436, 437, 435, 453, 407, 402, 403, 0,
0, 467, 468, 469, 466, 0, 133, 135, 212, 194,
0, 197, 200, 201, 221, 1234, 0, 133, 901, 942,
935, 207, 209, 939, 206, 394, 397, 835, 796, 0,
1003, 1000, 1129, 1128, 965, 1232, 981, 0, 851, 854,
853, 855, 816, 1215, 819, 1215, 671, 668, 1211, 781,
1089, 1092, 1105, 0, 1108, 1106, 1107, 1104, 0, 740,
758, 810, 1151, 0, 1148, 1159, 0, 911, 1226, 919,
916, 717, 702, 715, 0, 0, 1229, 550, 760, 0,
1069, 1082, 1058, 1072, 805, 804, 0, 1228, 1029, 1036,
0, 1228, 1037, 76, 0, 144, 145, 143, 109, 146,
0, 122, 123, 111, 112, 110, 141, 0, 523, 522,
509, 1005, 0, 548, 0, 428, 542, 463, 478, 0,
449, 406, 404, 474, 476, 199, 210, 211, 0, 0,
0, 0, 198, 222, 223, 348, 329, 346, 327, 341,
344, 326, 338, 0, 340, 1234, 0, 592, 1215, 0,
1226, 1217, 902, 903, 920, 921, 0, 999, 0, 1236,
966, 1126, 1135, 0, 1136, 1009, 1051, 1052, 1048, 0,
0, 675, 686, 690, 671, 1113, 1113, 0, 1111, 0,
0, 1101, 742, 769, 0, 0, 0, 1232, 914, 0,
0, 716, 706, 0, 699, 708, 551, 762, 0, 0,
747, 1083, 1028, 1061, 0, 1034, 0, 1046, 1039, 0,
78, 126, 527, 524, 525, 500, 511, 0, 1006, 530,
535, 549, 501, 504, 0, 1217, 0, 456, 482, 480,
454, 213, 214, 208, 195, 225, 1275, 202, 0, 416,
0, 416, 0, 0, 339, 362, 334, 544, 365, 336,
356, 332, 359, 369, 0, 375, 368, 360, 366, 361,
367, 374, 331, 358, 0, 585, 910, 1217, 923, 0,
922, 836, 1004, 0, 1050, 1232, 1140, 1138, 1139, 0,
1010, 982, 0, 998, 998, 673, 666, 683, 691, 676,
678, 677, 672, 0, 669, 1112, 0, 0, 1111, 1094,
1111, 1111, 0, 770, 0, 0, 741, 1152, 1153, 0,
0, 917, 718, 133, 710, 0, 709, 133, 766, 0,
1047, 1236, 1056, 1043, 1084, 1041, 113, 0, 518, 516,
513, 0, 1226, 532, 534, 0, 457, 133, 1232, 483,
481, 204, 226, 227, 224, 349, 133, 414, 350, 414,
342, 345, 0, 353, 352, 0, 0, 354, 355, 0,
364, 363, 0, 357, 371, 372, 925, 0, 838, 1001,
1055, 1134, 1137, 1049, 817, 818, 690, 679, 681, 686,
1110, 1109, 1095, 1096, 1100, 0, 768, 133, 0, 0,
915, 724, 0, 0, 0, 0, 0, 748, 0, 0,
1085, 1030, 125, 517, 508, 0, 0, 0, 548, 531,
1236, 0, 0, 133, 219, 297, 415, 411, 413, 412,
410, 0, 0, 347, 0, 335, 370, 337, 333, 373,
0, 924, 837, 0, 1236, 967, 674, 0, 670, 1111,
0, 1154, 1161, 0, 0, 720, 719, 1240, 0, 712,
711, 714, 765, 1164, 1059, 1057, 0, 512, 510, 528,
0, 460, 462, 464, 0, 0, 217, 544, 282, 282,
266, 300, 311, 309, 286, 135, 0, 263, 133, 289,
292, 310, 133, 133, 133, 0, 229, 233, 236, 235,
234, 237, 232, 231, 0, 239, 0, 240, 241, 238,
0, 330, 351, 328, 926, 1002, 0, 1007, 680, 1103,
767, 1168, 0, 725, 721, 0, 713, 1144, 0, 514,
1236, 502, 458, 465, 205, 133, 0, 215, 0, 284,
283, 282, 282, 285, 286, 135, 301, 298, 312, 267,
287, 288, 133, 135, 273, 276, 133, 133, 0, 133,
0, 0, 0, 0, 228, 230, 0, 271, 277, 407,
1053, 1008, 968, 0, 1177, 1162, 723, 722, 1060, 0,
463, 0, 133, 133, 203, 299, 133, 135, 278, 281,
274, 275, 0, 479, 0, 0, 293, 257, 254, 0,
256, 247, 0, 259, 253, 0, 260, 252, 242, 265,
291, 272, 0, 0, 262, 0, 1169, 0, 1155, 1168,
529, 459, 220, 0, 0, 279, 280, 0, 0, 268,
315, 264, 407, 296, 290, 295, 302, 0, 0, 248,
245, 250, 244, 251, 243, 270, 0, 1054, 0, 0,
0, 1163, 218, 216, 317, 316, 261, 0, 304, 314,
258, 313, 255, 0, 0, 269, 1170, 1232, 1156, 303,
0, 294, 249, 246, 0, 0, 306, 305, 1171, 0,
0, 1175, 1172, 0, 0, 1176, 1173, 0, 1174
};
/* YYDEFGOTO[NTERM-NUM]. */
static const yytype_int16 yydefgoto[] =
{
-1, 2, 3, 4, 11, 12, 24, 5, 6, 36,
50, 130, 85, 132, 154, 207, 14, 33, 38, 87,
113, 156, 155, 357, 1032, 498, 359, 164, 165, 166,
167, 213, 168, 510, 511, 169, 170, 171, 172, 220,
694, 870, 1106, 1104, 173, 505, 506, 507, 691, 44,
116, 117, 139, 175, 176, 515, 695, 881, 882, 883,
1271, 1646, 222, 1278, 979, 1131, 1108, 1286, 1418, 226,
227, 228, 229, 375, 230, 885, 886, 1117, 517, 519,
699, 889, 465, 22, 39, 46, 118, 55, 142, 92,
181, 122, 237, 384, 523, 938, 1451, 1159, 1331, 1332,
1333, 1734, 1343, 1344, 1334, 1450, 1894, 1847, 1786, 1454,
1557, 1554, 1555, 1735, 1805, 1806, 1807, 1918, 1974, 1973,
1948, 1947, 1808, 1809, 1867, 1810, 1811, 1812, 1813, 1814,
1815, 1816, 1854, 1864, 1817, 1869, 1870, 1946, 1944, 1818,
1819, 1857, 1968, 1981, 960, 1820, 1859, 1970, 1939, 655,
146, 385, 524, 704, 1160, 1335, 1561, 1559, 1679, 1672,
1676, 1562, 1462, 1563, 1560, 1558, 1743, 1582, 980, 928,
1317, 1442, 929, 1741, 1667, 141, 231, 520, 1133, 232,
521, 1137, 1304, 1305, 522, 702, 930, 1145, 1314, 931,
1146, 1142, 1440, 932, 1437, 1730, 1890, 1546, 1547, 1782,
933, 1324, 934, 935, 1155, 1156, 936, 1144, 1438, 1549,
1660, 700, 701, 901, 912, 902, 903, 904, 905, 906,
907, 908, 909, 1536, 1650, 1724, 1651, 910, 1294, 1535,
1428, 1841, 1654, 1655, 1433, 1124, 1297, 937, 1310, 1139,
697, 1542, 1517, 1027, 180, 236, 30, 40, 105, 153,
198, 199, 249, 129, 194, 387, 527, 528, 706, 247,
388, 533, 946, 1466, 248, 201, 253, 639, 640, 300,
301, 302, 495, 683, 1098, 303, 304, 416, 768, 1209,
580, 581, 1005, 771, 1007, 1205, 1366, 1367, 1494, 1699,
1492, 1493, 1696, 1612, 1606, 305, 613, 1607, 862, 863,
1613, 685, 796, 461, 653, 1058, 1395, 649, 835, 1237,
837, 1055, 1394, 1514, 1515, 1714, 1770, 1634, 1392, 1393,
1510, 1712, 1766, 1632, 1763, 652, 306, 307, 308, 309,
310, 311, 312, 313, 810, 1220, 1504, 1379, 314, 315,
845, 1399, 1639, 316, 842, 621, 661, 622, 662, 1221,
1245, 1073, 1033, 1520, 1626, 1502, 317, 318, 615, 802,
803, 804, 319, 408, 565, 320, 397, 549, 547, 321,
485, 678, 322, 436, 629, 323, 414, 577, 324, 325,
326, 327, 1186, 1476, 1688, 728, 328, 329, 330, 412,
573, 760, 762, 729, 730, 731, 544, 732, 331, 443,
444, 632, 332, 405, 406, 560, 561, 562, 333, 456,
334, 391, 538, 832, 1338, 1051, 1630, 1509, 1052, 1233,
1473, 1474, 1687, 1475, 1750, 535, 646, 335, 542, 336,
948, 540, 714, 1340, 337, 833, 1236, 338, 756, 1197,
339, 848, 474, 1079, 340, 584, 585, 341, 400, 1354,
1480, 1594, 1827, 554, 342, 555, 743, 343, 404, 991,
1195, 1485, 344, 345, 479, 346, 409, 398, 569, 986,
1753, 1351, 1478, 1539, 1882, 1601, 347, 466, 467, 1241,
1063, 468, 348, 1251, 349, 1527, 682, 1093, 1095, 1096,
1260, 1412, 1408, 1094, 1401, 1402, 1356, 1602, 1488, 1755,
1925, 1523, 1719, 1640, 1838, 668, 669, 1077, 670, 1249,
671, 1083, 481, 482, 1087, 1522, 1721, 350, 809, 618,
619, 808, 1371, 1031, 1219, 1501, 1377, 1370, 1616, 425,
1015, 745, 990, 1355, 1193, 1194, 49, 1481, 1482, 1599,
184, 185, 1772, 447, 827, 1228, 824, 1226, 1505, 1708,
1831, 1960, 1229, 1832, 1929, 644, 448, 1884, 1926, 1993,
449, 450, 715, 588, 791, 794, 793, 1020, 606, 607,
608, 609, 1021, 610, 191, 99, 847, 950, 782, 571,
1056, 1397, 634, 1483, 451, 987, 187, 421, 815, 70,
427, 147, 1064, 805, 72, 73, 74, 75, 1067, 1068,
76, 77, 380, 381, 462, 1273, 1300, 428, 777, 78,
625, 79, 126, 80, 81, 150, 151, 235, 1773, 1287
};
/* YYPACT[STATE-NUM] -- Index in YYTABLE of the portion describing
STATE-NUM. */
#define YYPACT_NINF -1419
static const yytype_int16 yypact[] =
{
-63, 58, 215, -1419, -63, 255, 241, -102, -1419, 359,
197, -63, -1419, 429, 534, 391, -1419, -1419, 493, 359,
354, 619, 488, 459, 752, -1419, 359, -1419, 465, 805,
-1419, -1419, -1419, 838, -1419, -1419, 960, 671, 945, 816,
-7, -1419, 640, 705, -1419, 713, 660, 3109, 3109, 667,
23, -1419, 680, 686, 740, 845, -1419, -1419, -1419, -1419,
-1419, 1025, 1031, 1365, 1055, -1419, -1419, -1419, -1419, -1419,
-118, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, 711,
850, 546, -53, -1419, -1419, 720, 495, 847, 251, -1419,
722, 787, 812, -1419, -1419, -1419, -1419, 731, -1419, 3109,
3109, -1419, -1419, -1419, 972, 983, -1419, 839, 839, -1419,
738, 747, 749, -1419, -1419, 751, -1419, 907, 71, -1419,
753, 824, 829, -1419, -1419, 762, 3109, -1419, 779, -1419,
-1419, -1419, -1419, -1419, -1419, -1419, 823, 830, 798, -1419,
-1419, 101, -1419, -1419, 806, 873, -1419, 3109, 3109, -1419,
595, 835, -1419, 1913, 360, 1176, 1178, -1419, 1179, 1186,
883, 1175, 1175, 876, -1419, 1046, -1419, -1419, -1419, -1419,
-1419, -1419, 1193, -1419, 955, 830, -1419, 414, -1419, -1419,
866, -1419, -1419, 841, -5, -1419, -1419, 840, -1419, -1419,
-1419, 3109, 3109, 3109, 898, -1419, 402, -1419, -1419, 4434,
-1419, -1419, 848, 854, 855, 856, 859, -1419, 942, -20,
1175, 1175, -1419, 1175, 1210, 1133, 1175, -1419, -1419, 1175,
-1419, -1419, 235, -1419, 1061, 525, -1419, 210, -1419, -1419,
-1419, 1223, 1225, -1419, -1419, 235, 866, 964, -1419, -1419,
3109, -1419, 835, -1419, -1419, -1419, 934, -1419, -1419, 875,
877, -1419, -1419, -1419, 985, 985, 985, 985, 1570, 1397,
3109, 3159, 3209, 985, 985, -1419, 985, 3109, 3109, -1419,
-82, 985, 1221, -1419, 1538, 3109, 985, 985, 985, 2012,
3109, 2221, 2139, 902, 903, 985, 985, 143, 780, 1009,
985, 53, 832, 2725, 3109, 3109, 985, 985, 985, 3778,
-1419, -1419, -1419, -1419, -1419, 1121, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, -1419, -1419, 1157, 888, -1419, 894,
1145, 1381, 1229, 1231, -1419, -1419, 1259, 1260, -1419, -1419,
-1419, 938, -1419, -1419, -1419, 1208, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, -1419, -1419, -1419, 3272, 44, -1419,
-1419, 1126, -24, 1097, 1099, 1102, 3109, 1148, 2786, 1065,
912, -1419, 1365, -1419, 3109, 505, -1419, 108, 1146, 1037,
987, 1012, 2508, -1419, 1147, 396, -1419, -1419, -1419, -1419,
-1419, 789, 922, 1538, 1538, 263, 969, -1419, -1419, 2678,
-1419, 30, 1053, 3109, 1049, 1278, 1158, 1227, -1419, -1419,
-1419, -1419, -1419, 2482, 985, 349, 352, -1419, 420, 1160,
4434, 966, 968, 1283, -1419, -1419, 1165, 1012, 1097, -1419,
1305, 1170, -1419, -1419, 1080, 972, -1419, 31, 972, -1419,
-1419, 81, 1053, 1053, 375, 1117, -1419, -1419, -1419, -1419,
-1419, 440, -1419, 1206, 3109, 1174, 2824, -1419, 3109, -1419,
-1419, 1209, -1419, -1419, -1419, 1187, -1419, -1419, 1022, -1419,
-1419, 1107, -1419, -1419, -1419, -1419, 1365, -1419, 614, 1308,
1229, -1419, -1419, -1419, -1419, -1419, -1419, 1233, -1419, 1161,
-1419, -1419, -1419, 1329, 866, 973, 1224, -1419, 4434, -1419,
-1419, -1419, 1293, -1419, -1419, -1419, -1419, -1419, 1012, 3109,
827, 3109, -1419, 683, 3349, 2859, -1419, -1419, 3109, 1173,
1065, -1419, -1419, -1419, 3109, 1220, 988, 985, 313, 313,
-1419, -1419, -1419, 67, -1419, -1419, 1614, 987, -1419, 1065,
-1419, -1419, 13, -1419, 3419, 3109, -1419, -1419, 3109, 3109,
1297, 1337, 546, 546, -1419, 565, 585, -1419, -1419, 986,
25, 189, 278, 1614, 1614, 1614, 1614, 1614, 1175, -1419,
-1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, 1314,
-1419, -1419, -1419, 1020, 406, -1419, 468, -1419, -1419, -1419,
-1419, 133, -1419, 1330, -1419, 1338, 3109, 3109, -1419, -1419,
3109, 985, 505, -1419, 1352, 804, -1419, 985, -1419, -1419,
4434, 827, -1419, 789, 2430, -1419, -1419, 1168, -1419, 1170,
-1419, -1419, -1419, 1005, -1419, -1419, -1419, 1320, 1295, 1298,
1355, 133, -1419, 1345, 133, -1419, 1180, -1419, -1419, 182,
-1419, 1183, 1175, 985, 3109, 1311, 2839, -1419, -1419, 3109,
-1419, 1311, 1190, 1149, -1419, -1419, 1175, -1419, -1419, 1365,
1365, 1332, 1358, -1419, 1150, 773, -1419, 1387, -1419, 811,
317, -6, 965, -1419, -1419, 235, 1033, 1036, 3902, 130,
1168, -1419, -1419, -1419, -1419, 1346, -1419, 1273, 1372, 1273,
1273, 1273, 1086, 843, 1177, -1419, 1177, 1614, -1419, -1419,
-1419, -1419, -1419, 3609, 1252, 985, 261, -1419, 242, 985,
-1419, 988, -1419, -1419, -1419, -1419, -1419, 1136, 1144, 1122,
1211, -1419, 1614, 512, 1065, -1419, 375, -1419, -1419, -1419,
52, -1419, -1419, -1419, 1247, 261, 1250, -1419, 1072, -1419,
-1419, -1419, 263, 969, 1053, 789, -1419, 3109, -1419, -1419,
-1419, -1419, -1419, 46, 1395, 930, 930, 1399, 1399, -1419,
46, 1614, 46, 1070, 1070, -1419, 1149, -1419, -1419, -1419,
-1419, -1419, 406, -1419, 1328, 1421, -1419, -1419, 985, 1162,
-16, -1419, 1180, 3109, 1422, 2871, -1419, 261, 1266, 505,
985, -1419, -1419, -1419, 1538, 1272, -1419, -1419, -1419, 515,
1111, 985, 540, 375, -1419, 78, 972, -1419, 941, 853,
853, 1320, 4, -1419, 1180, 4, -1419, -1419, 1302, -1419,
1180, 697, 294, -1419, -1419, 103, 985, 261, 1274, 1403,
985, -1419, 4434, 1226, 1448, -1419, -1419, 1365, -1419, 1135,
1218, -1419, 1236, 1189, 1221, -1419, -1419, 1180, 1180, 1430,
-1419, -1419, 1141, 1175, 1204, 1387, -1419, -1419, -1419, 1460,
1233, 1175, 764, 764, 1175, 39, 1175, 1445, 1230, -1419,
593, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419,
1465, -1419, -1419, -1419, -1419, 1115, 457, 866, -1419, -1419,
-1419, 1175, 457, -1419, 1175, 1445, -1419, 678, -1419, 280,
-1419, -1419, -1419, -1419, -1419, 673, -1419, 1175, -1419, -1419,
-1419, -1419, -1419, -1419, -1419, 748, 1212, -84, 375, -1419,
2904, -1419, 1273, -1419, -1419, -1419, 1273, -1419, -1419, -1419,
1614, 1614, 1151, -1419, 866, 315, -1419, 900, 866, -1419,
-1419, 469, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, 89, -1419, 61, 1053, -1419, 1166, 261, -71,
-1419, -1419, -1419, -1419, -1419, -1419, 88, -1419, -1419, 1342,
-1419, 334, 985, -1419, 985, 1337, -1419, 9, 972, -1419,
695, -1419, 46, -1419, 1151, -1419, -1419, 1501, 263, 969,
-1419, 1614, 1438, -1419, -1419, -1419, -1419, 1407, 468, 1312,
-1419, -1419, -1419, -1419, 985, -1419, 3109, 3109, -1419, 985,
-1419, 969, 3109, -1419, -1419, 985, -1419, -1419, 1423, 1356,
-1419, -1419, 1444, 1343, -1419, -1419, 1359, -1419, 78, -1419,
-1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, 183, 5, 1364, 1305, 5, 4434, -1419, -1419,
-1419, 1472, 985, -1419, 1232, -1419, -1419, -1419, -1419, 61,
-1419, 985, -1419, 1452, 3109, 49, -1419, 1377, 1187, -1419,
1191, -1419, -1419, -1419, 1175, 1135, -1419, -1419, 1175, 1180,
771, 1175, 1175, 1032, 1175, 357, 866, -1419, -1419, -1419,
866, 1491, 1175, 1445, 1492, -99, 885, 1143, 866, -1419,
-1419, -1419, 1333, 866, -1419, -1419, -1419, 866, -1419, 1142,
-1419, -1419, -1419, 55, 1175, 991, 972, -1419, -1419, -1419,
-1419, -1419, -1419, 1196, 1196, 1275, -1419, 1484, 102, 41,
-1419, -1419, -1419, 1053, 1309, 443, 1363, -1419, 911, -1419,
-1419, 1151, 1151, -1419, -1419, -1419, 1155, -1419, -1419, -1419,
-1419, -1419, 1471, -1419, -1419, -1419, 972, 36, 1213, 1366,
-1419, 972, 972, -1419, -1419, 428, -1419, -1419, 1473, 460,
261, 987, 261, 987, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, 1151, 1472, 3109, -1419, -1419, 32,
1171, 985, -1419, -1419, -1419, 261, -1419, 1311, 1385, 1538,
1357, 1356, 1486, 4434, 1423, -1419, -1419, 1181, -1419, -1419,
-1419, -1419, -1419, -1419, 1341, 1305, -1419, -1419, -1419, 4434,
-1419, -1419, 985, 36, 261, 1403, -1419, 1202, 985, 1341,
1429, -1419, -1419, 1530, 1175, 159, 1175, -1419, -1419, 1085,
1085, -1419, -1419, -1419, 1533, 1535, -1419, -1419, -1419, 1536,
-1419, -1419, -1419, 1244, -1419, -1419, -1419, -1419, -1419, 1534,
-1419, -1419, -1419, -1419, 1551, -1419, -1419, -1419, -1419, -1419,
1347, 1341, 1539, 1175, 866, -1419, 866, -1419, 866, -1419,
-1419, -1419, -1419, -1419, -1419, 1540, 1474, -1419, -1419, 673,
673, -1419, -1419, -1419, -1419, 673, 1175, 1445, 937, -1419,
1382, -1419, -1419, -1419, 1396, 390, 1200, 1175, 394, -1419,
-1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, 1366,
-1419, 1524, -1419, -1419, -1419, 2915, -1419, 376, -1419, -1419,
-1419, -1419, -1419, 524, -1419, 533, 1324, -1419, -1419, -1419,
834, 535, -1419, 1495, -1419, -1419, -1419, -1419, 985, -1419,
-1419, -1419, -1419, 3109, -1419, 969, 3109, -1419, 1423, -1419,
-1419, -1419, 1181, -1419, 4434, 1217, -1419, 1339, -1419, -64,
-1419, 1437, 694, -1419, -1419, -1419, 3109, 1341, -1419, -1419,
985, 1341, -1419, -1419, 1572, -1419, -1419, -1419, -1419, -1419,
1581, -1419, -1419, -1419, -1419, -1419, -1419, 866, 157, -1419,
-55, 1279, 866, 1504, 1085, -1419, 1255, 246, 1579, 972,
-1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, 1574, 1576,
866, 866, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, 673, -1419, 3574, 1238, -1419, 62, 985,
327, 1180, -1419, -1419, 1553, -1419, 4434, -1419, 4434, 1053,
-1419, 1735, -1419, 18, -1419, 1470, -1419, -1419, -1419, 985,
985, -1419, 117, 132, 1324, 1406, 1406, 468, -1419, 468,
468, 468, 985, -1419, 449, 1466, 1262, 1311, -1419, 1356,
972, -1419, -1419, 1119, 1217, -1419, -1419, -1419, 1348, 985,
-1419, -1419, -1419, 182, 1368, -1419, 985, -1419, -1419, 985,
-1419, 4, -1419, -1419, -1419, -1419, 27, 1442, -1419, 507,
-1419, -1419, -1419, -1419, 1506, 1180, 1424, -1419, 1611, -1419,
-1419, -1419, -1419, 911, 866, -1419, 235, 985, 985, 1398,
1119, 1398, 1119, 1119, -1419, -1419, -1419, 370, -1419, -1419,
1003, -1419, -1419, -1419, 470, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, 95, -1419, -1419, 1180, -1419, 1431,
-1419, -1419, -1419, 1317, 428, 2915, -1419, -1419, -1419, 3109,
-1419, -1419, 4434, 36, 36, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, 1699, 1575, -1419, 468, 468, -1419, 834,
-1419, -1419, 1556, -1419, 985, 1370, -1419, -1419, -1419, 3109,
1356, -1419, 1593, 1175, -1419, 558, -1419, 1175, 985, 449,
-1419, 1053, -1419, -1419, 1488, -1419, -1419, 1514, -1419, 1582,
115, 1313, 1423, -1419, 1539, 866, -1419, 1175, 1311, -1419,
-1419, 1461, -1419, -1419, -1419, -1419, 1175, 397, 1628, 397,
-1419, -1419, 1119, -1419, -1419, 1292, 1119, -1419, -1419, 1119,
-1419, -1419, 1607, -1419, -1419, -1419, -1419, 4434, 1273, -1419,
1613, -1419, -1419, -1419, -1419, -1419, 132, 1140, -1419, -52,
-1419, -1419, 834, 834, 834, 468, 985, 1175, 1538, 1315,
-1419, -1419, 4103, 1640, 4227, 1119, 789, -1419, 1410, 4434,
-1419, -1419, -1419, -1419, -1419, 1590, 885, 885, 1504, -1419,
1053, 1660, 235, 1175, 1498, 4288, -1419, -1419, -1419, -1419,
-1419, 1119, 985, -1419, 1119, -1419, -1419, -1419, -1419, -1419,
4434, -1419, -1419, 1366, 1053, -1419, -1419, 1614, -1419, -1419,
789, 969, -1419, 972, 1367, -1419, -1419, 1221, 1369, -1419,
-1419, -1419, -1419, 1283, -1419, -1419, 885, -1419, -1419, 1552,
3109, -1419, 235, -1419, 866, 1558, 1468, 1115, 276, 248,
-1419, 1485, 1386, -1419, 145, 1445, 1500, -1419, 1175, -1419,
-1419, -1419, 1175, 1175, 1175, 3799, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, 122, -1419, 866, -1419, -1419, -1419,
1379, -1419, -1419, -1419, -1419, -1419, 1532, 1557, 1151, 834,
-1419, 1634, 1538, -1419, -1419, 995, -1419, -1419, 4434, -1419,
1053, -1419, -1419, -1419, -1419, 1175, 1578, 1521, 1334, -1419,
-1419, 248, 248, -1419, 1128, 1445, -1419, -1419, -1419, -1419,
-1419, -1419, 1175, 1445, -1419, -1419, 1175, 1175, 316, 1175,
3109, 1976, 1583, 921, -1419, -1419, 866, 520, -1419, 1474,
-1419, -1419, -1419, 985, -1419, 969, -1419, -1419, -1419, 1689,
246, 866, 1175, 1175, -1419, -1419, 1175, 1445, -1419, -1419,
-1419, -1419, 222, -1419, 1404, 2946, 2871, -1419, -1419, 676,
-1419, -1419, 696, -1419, -1419, 745, -1419, -1419, -1419, -1419,
-1419, -1419, 1453, 1482, -1419, 4434, 1663, 1541, -1419, 1634,
-1419, -1419, -1419, 866, 866, -1419, -1419, 1464, 866, -1419,
-1419, 1579, 1474, -1419, -1419, -1419, 1371, 3013, 3013, -1419,
-1419, -1419, -1419, -1419, -1419, -1419, 1469, -1419, 985, 3109,
1585, -1419, -1419, -1419, -1419, -1419, -1419, 3109, 1439, -1419,
-1419, -1419, -1419, 3013, 3013, -1419, 1668, 1311, -1419, 2871,
3088, -1419, -1419, -1419, 985, 3109, -1419, -1419, 1675, 1378,
985, -1419, 1684, 1538, 985, 969, 1688, 985, -1419
};
/* YYPGOTO[NTERM-NUM]. */
static const yytype_int16 yypgoto[] =
{
-1419, -1419, -1419, 1726, -1419, 915, -1419, 814, -1419, -1419,
-1419, -1419, -1419, 1630, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, 1383, -1419, -1419, -1419, -1419, 1584,
-1419, -1419, -1419, -1419, 1237, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, 635, -1419, -1419, -1419, 1240, -1419, -1419,
-1419, -1419, -1419, -1419, 1577, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, -41, -897, -1419, -1419, -1419, -1419,
-1419, 1523, -1419, -1419, -1419, -1419, 868, -1419, -1419, -1419,
606, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, 198, 455, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, 211, -1419, -1419, -36, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, -1082, -81, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, 1048, -96, -1419, -1159, -1419, -1419,
-1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -707,
621, -1205, -1419, 107, 217, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, 642, -168, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, 858, -1419, -1419, -1419, -1419, -1419, -1419, -109, -1419,
-1419, -1419, -1419, 447, -1419, 464, 450, -1419, -117, -1419,
-1419, -1419, -1419, -1419, -1419, -1419, 1089, -1419, -1419, 1090,
-1419, -1419, -1419, -1419, -1419, -1419, 137, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, 138, 901, -1419, -1419, 361, -944,
-247, 65, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, 1408,
-1419, -1419, -1419, -1419, 1643, 1412, -1419, -827, -152, -265,
-1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, 795, -1419, -1419, -1419, -1419, -1419, -1419,
307, -1419, -1419, 106, 104, -1419, -1419, -386, -1419, -1419,
-1419, 708, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, 750, -1419, -1419, 295, -1419, -1419, -1419, -1419, 418,
-1419, -1419, -1419, 48, -1419, 1163, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, -1419, 1344, -1419, 147, 1159, -1419,
-1419, 974, -128, -1419, 179, -1047, -1419, -1419, -1419, -1419,
1027, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, -1419, -690, -1419, -1419, -1419, -1419,
-1419, -1419, 1062, -1419, -1419, -1419, 1415, -1419, -1419, -1419,
-427, 1199, -1419, -1419, 1276, -1419, -1419, 884, -1419, -1419,
-1419, -1419, -1419, 1125, -1419, 498, -1419, -1419, -1026, -1419,
-1419, -1419, -1419, 364, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, 1384, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, -1419, -1419, -516, -216, -519, -709,
-1419, -1308, -1419, -1419, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -552, -1419, -1419, -1419, -1419, -1419, -1419, -1419, 581,
-1419, -1419, -1419, 586, 319, -1419, 249, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, -1419, -606, -1419, -1419, 1185, -1419,
321, 754, -1419, 1182, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, -1419, -1419, -1419, -1418, 344, -399,
-1419, 1106, -1419, -1419, -1419, -1419, -1419, -1419, 253, -1419,
-1419, 1610, 97, -1419, -1419, -1419, -1419, -1419, -1419, -1419,
-1419, -1419, -1419, -1419, -1419, 86, 1216, -62, -1072, -1419,
-810, -1419, 1228, -264, -1419, -1419, -1419, 1074, -1419, -1419,
231, -541, 1019, -756, 716, -169, -790, -1419, -1419, -321,
-1024, -693, -48, -662, -116, -390, -1419, -854, -1419, -46,
-47, -1419, 301, -982, -899, -357, -1419, -14, 1035, -1342,
-58, -174, -687, -219, -275, -774, -967, -280, -1419, 435,
-588, -281, -1419, 1768, -1419, 1096, 1685, -513, -242, 612
};
/* 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 -1289
static const yytype_int16 yytable[] =
{
71, 71, 82, 370, 508, 96, 234, 470, 469, 86,
426, 705, 233, 855, 472, 240, 631, 1043, 939, 859,
1110, 1176, 1034, 1232, 1231, 589, 981, 951, 1150, 953,
954, 955, 736, 104, 493, 1099, 1157, 1022, 1022, 816,
453, 1477, 623, 84, 997, 531, 1217, 299, 754, 95,
657, 784, 124, 125, 1075, -1215, 1003, -1215, -1215, 84,
1080, 84, 234, 765, 591, 611, 612, 56, 382, 57,
58, -426, 140, 496, 1308, 47, -1234, 486, 985, 149,
1619, 1372, 663, 623, 476, 477, -682, 1111, 1112, 1648,
1540, 749, -1234, 360, 496, 1022, 98, 599, 600, 601,
186, 188, 892, -1234, 1085, 838, 1191, -1278, 1038, 56,
757, 57, 58, 1182, 817, -1234, 1373, 1596, 1321, 1682,
214, 215, 1, 593, 594, 595, 596, 597, 1325, -1234,
1518, -1234, -1234, 616, 59, 60, 647, 696, 61, 62,
1054, 1295, 1326, 1327, 149, 243, 244, 1206, 1090, 508,
999, 459, 63, 59, 734, 658, 1183, 61, 62, -1236,
590, 98, 1683, 857, 1280, 1860, 1861, 753, 1281, 361,
362, 417, 363, 1605, 1608, 366, -688, 1648, 367, 586,
545, 7, 772, 418, 656, 650, -515, 660, 761, 56,
1609, 57, 460, 186, 785, 786, 787, 788, 789, -426,
1702, 1374, 1703, 1704, 536, 1387, -1226, -1234, 780, 98,
1390, 399, 781, 401, 403, 8, 1192, 710, 1296, 984,
413, 415, 1322, 988, 665, 1035, 1292, 1053, 71, 429,
551, 623, 435, 437, -426, 452, 557, 1375, 537, 1649,
368, 1533, 1011, 575, -1133, 483, 399, 487, 488, 1013,
1248, 1016, 114, 59, 750, -682, -426, 61, 62, 806,
15, 1213, 1169, 98, 178, 895, 1170, 56, 676, 57,
58, 663, 1545, 602, 623, 358, 98, 620, 64, 1190,
603, 591, 751, 592, -426, 1415, 943, 65, 944, 1072,
1519, 563, 1328, 1597, 1610, -1234, 591, 861, 593, 594,
595, 596, 597, 985, 358, 598, -682, 604, -1234, -1132,
-682, -46, 674, 1729, 599, 600, 601, 773, 1184, 1266,
783, 66, -1278, -1234, 1684, 1213, 1849, 1649, 962, 599,
600, 601, 865, 866, -426, 758, 759, 84, -763, 358,
1089, 1829, 1166, 776, 96, -688, -1236, 48, 478, 399,
234, 550, -426, 996, 1849, 568, 911, 556, 1198, 617,
239, 1323, 1280, 358, 1508, -515, 1281, 1207, -426, -426,
67, 1208, 1376, 1598, 620, 493, 708, 1862, 1863, 659,
1876, 740, 558, 10, 1008, -17, 624, 890, 95, 1054,
779, 1309, 1014, 13, 1018, 1018, -133, 532, 635, 179,
755, 828, 369, 1329, 1143, 891, 1389, 605, 358, 1455,
1024, 358, 667, 1086, 1240, 115, 1382, 665, 68, -1246,
1157, 1444, 1400, 202, -591, 892, 1445, 1416, 733, 1534,
1447, -426, 1737, 1738, 224, -461, 1470, 399, 1185, 550,
-7, 680, 958, 493, 1685, 1825, 1231, 945, 1223, 1224,
1937, 1173, 559, 778, 1850, 1179, 1049, 797, 733, 1368,
798, 799, 17, 820, 69, 1187, 1417, 358, 578, 203,
204, 1212, 1638, 1611, 56, -682, 57, 58, 1348, -682,
1938, 1456, 1850, 1631, 698, 1153, 1200, 10, 1202, 1199,
602, 1362, 711, 1364, 716, 1421, 1422, 603, 550, 59,
60, 737, 620, 61, 62, 602, 225, 741, 1851, 1852,
1102, -1215, 603, -1215, -1215, 1618, 1381, 1620, 1621, 1622,
893, 1793, 1050, 1225, 604, 1587, 1174, 894, 763, 1019,
1019, 764, 766, 1009, 1486, 635, 568, 102, -533, 604,
102, 1853, -533, -533, 1404, 1405, 1282, 593, 594, 595,
596, 597, 20, -1234, 985, 1057, 205, 790, 1070, 1070,
1041, 1171, 1172, 1457, 1564, 1383, 1410, 1512, 1283, 1853,
1253, -1236, 376, 666, 582, 1254, 591, 1706, 592, 814,
624, 1673, 1048, 818, 1497, 998, -1236, 103, 895, 107,
103, -169, 1471, 579, -960, 1188, 583, 830, 896, 897,
598, 1458, 1049, 1288, 1710, 667, 772, 1289, 1431, 599,
600, 601, 1175, 1359, 1360, 1302, -960, 982, 1739, 1498,
1154, 10, 1214, 1675, 605, 1487, 1624, 483, 1727, 550,
750, 851, 858, 1284, 1700, 1701, 689, 673, 224, 605,
800, 801, 21, 1120, 1001, 864, 1037, 918, 1128, 1591,
820, 1592, 65, 358, 98, 1740, 1801, 23, 751, 900,
1543, 927, 206, 1140, 1285, 1069, 1069, 1674, 1050, 620,
690, 806, 898, 1138, 1924, 1180, 1680, -1236, 1, 899,
1653, 1588, 1363, 774, 1365, -1288, 66, 108, -1271, 392,
393, 394, 395, 717, 718, 719, 720, 1625, 407, 410,
1459, 411, 250, -960, 59, 60, 419, 1855, 61, 62,
225, 430, 431, 432, 1526, 591, 27, 721, 1529, 98,
457, 458, 63, 1759, 473, 475, 1074, 1210, 1138, 1074,
149, 489, 490, 491, 102, 67, 1084, 1966, 98, 1081,
1499, 773, 28, 234, 1460, 924, 925, 98, 1922, 358,
1141, 29, 1461, 620, 1134, 1657, 32, 1361, 1583, 1777,
1778, 1923, 1181, 1681, 251, 252, 624, 636, 811, 1896,
1897, 1135, 1267, 1336, 871, 1693, 1268, 637, -119, 775,
1065, 463, -119, 68, 103, 602, 56, 422, 57, 1972,
234, 1242, 603, -119, 234, 1436, 372, 1686, 582, -960,
1246, 1489, 59, 60, 1269, 1357, 61, 62, 1088, 1839,
1490, 811, 887, 822, 1982, 1983, 888, 872, 9, 604,
583, 31, -1236, -49, 157, 19, 464, 34, -72, 69,
873, 1165, 26, 480, 874, 823, 373, 374, 56, 1151,
57, 58, 1115, 1848, 567, 1629, 1949, -32, 109, 56,
1121, 57, -49, 1126, 1127, 1129, 1152, 65, 1950, 56,
1751, 57, 1044, 59, 60, 1315, 1951, 61, 62, 1663,
192, 193, 1045, 158, 957, 712, -32, 722, 1952, 633,
1147, 63, 1495, 1149, 59, 1765, 1976, 1769, 61, 62,
1298, 66, 1775, 713, 1694, 1695, 1158, 59, 1865, 245,
1496, 61, 62, 1168, 1161, 1347, 1162, 246, 159, 1467,
1352, 1353, 1988, 1835, 1532, 1953, 59, 60, 1992, 605,
61, 62, 1996, 1824, 16, 1998, 1258, 1954, 35, 160,
161, -49, 1270, 25, 37, 620, 162, 1553, 1556, 875,
67, 16, 234, -1236, 163, 1243, 234, 56, 1247, 57,
58, -49, 59, 60, 234, -32, 61, 62, 1899, 234,
189, 190, -119, 234, 41, 1385, 1901, 595, 596, 597,
1398, 42, 59, 60, 43, -32, 61, 62, 56, 1084,
57, -540, 45, 738, -119, 84, 552, 553, 68, 624,
624, 56, 407, 57, 58, 1227, 1732, 1312, 1752, 1313,
1936, 56, 51, 57, 591, 52, 592, 64, -49, 611,
612, 1888, 1524, 53, 738, 56, 65, 471, 58, 876,
54, 593, 594, 595, 596, 597, 59, 60, 598, 83,
61, 62, -32, 915, 69, 1122, 1123, 599, 600, 601,
90, 1556, 88, 56, 877, 57, 58, 1256, 89, 878,
66, 807, 1272, 1177, 1178, 566, 93, 879, 91, -49,
1211, 190, 94, 1263, 97, 738, 633, 1265, 1299, 101,
1274, 1275, 825, 1279, 1928, 100, 56, 422, 57, 58,
-119, 1291, 106, 110, 119, -540, -49, 120, 591, 1593,
1268, 1276, 1277, 121, -117, 123, 158, 128, 1957, 67,
134, 59, 60, 1311, 131, 61, 62, 138, 852, 135,
-32, 136, 1017, 137, 738, 143, 59, 60, 1330, 63,
61, 62, 1341, 1342, 144, 56, 145, 57, 58, 148,
234, 159, 234, 174, 234, 880, 1435, -49, 1435, -49,
806, 152, 806, 806, 806, 1448, 1449, 68, 1860, 1861,
59, 60, 160, 161, 61, 62, 1677, 1678, 1550, 162,
177, 111, 1757, 112, 747, 748, 916, 163, 182, 1369,
410, 567, 1059, 183, 410, 593, 594, 595, 596, 597,
1060, 208, 1061, 209, 210, -72, 593, 594, 595, 596,
597, 211, 212, 69, 755, 84, 755, 216, 219, 221,
567, 438, 917, 238, 1357, 241, 56, 356, 57, 58,
351, 1272, 1272, 602, 1697, 364, 352, 353, 354, 1465,
603, 355, 918, 1414, -540, 1420, 365, 371, 378, 1633,
379, 59, 60, 383, 250, 61, 62, 389, 919, 390,
420, 454, 455, 1029, 920, 64, 496, 604, 494, 63,
499, 1718, 567, 234, 65, 1040, 500, 501, 1069, 806,
806, 509, 1434, 512, 513, 514, 1047, 518, 516, 534,
539, 1844, 541, 1066, 921, 543, 234, 234, 546, 98,
564, 568, 1062, 570, 576, 1446, 587, 626, 66, 71,
1468, 410, 567, 922, 620, 1097, 1469, 627, 628, 630,
641, 1877, 638, 1878, 642, 643, -1213, -1213, 1484, 645,
-1213, -1213, 1595, 459, 1537, 1985, 651, 923, 654, 672,
924, 925, 675, 677, -1213, 681, 684, 926, 686, 687,
692, 696, 698, 1698, 703, -580, 1506, 67, 707, 1507,
1780, 709, 744, 56, 422, 57, 58, 605, 806, 1584,
739, 778, 742, 767, 792, 795, 812, 813, 1828, 1525,
439, 821, 836, 1921, 1826, 831, 464, 839, 59, 60,
840, 844, 61, 62, 841, 64, 1272, -688, 1932, 423,
234, 850, 846, 854, 65, 68, 63, 860, 867, 1940,
868, 869, 884, 949, 440, 940, 59, 60, 941, 441,
61, 62, 725, -963, 952, -963, -963, 956, 217, 959,
983, 994, 59, 60, 992, 1647, 61, 62, 66, 567,
1962, 1963, 993, 567, 1002, 1965, 995, 1004, -963, -963,
1006, 69, -963, -963, 424, 1012, 1026, 1201, 597, 1203,
1028, 1036, 1030, 1039, 1761, 1042, -963, 1046, 442, 1078,
1889, 1091, 1092, 1101, 1100, 1065, 1103, 1105, 1107, -1213,
1109, 1113, 1114, 807, 1116, 1119, 1130, 67, 1132, 1222,
1136, -963, -963, 1138, 410, 1163, 1189, 1196, 1215, 1216,
1230, 1069, 1633, 1218, 1050, 1054, 1234, 1238, 1235, 1244,
591, 1252, 1255, -1213, 1259, 1262, 1290, 1293, 1303, 769,
1301, 1316, 1065, 1307, 1065, 1065, 1320, 56, 422, 57,
58, 1337, 64, 1783, 1339, 68, 1345, 1250, 1346, 591,
1358, 65, 1350, 1349, 567, 1378, 410, 1384, 1388, 1396,
1386, 1407, 59, 60, 1411, 1413, 61, 62, 1423, 1391,
1424, 1425, -1213, 423, 56, 422, 57, 58, 1484, 65,
63, 1426, 1692, 1427, 1887, 66, 1429, 1441, 1432, 1342,
1452, 69, 1439, 1843, 1453, 65, 1479, 1500, 1885, 59,
60, 1491, -963, 61, 62, 1513, 56, 1530, 57, 58,
423, -963, 1709, 66, 1516, 1521, 1531, 63, 1541, 1538,
-1213, 1309, 1713, 1548, 1551, 1589, 1716, 1552, 1615, 66,
1585, 59, 60, 1600, 67, 61, 62, 502, 1627, 1628,
234, 1637, 1652, 1658, 1065, -963, 1731, 1642, 1065, 63,
56, 1065, 57, 58, 1656, 1736, 1659, 1689, 1705, 1587,
1666, 1605, 67, 1707, 1711, 567, -1213, 567, 1720, 1722,
234, 190, 234, 1733, 1723, 59, 60, 1742, 67, 61,
62, 1726, 68, 1746, 1749, 1754, 1380, 1065, 1767, 1774,
567, 1776, 1762, 63, -963, 1781, 1760, 1785, 1299, 1299,
1840, 1834, 1846, 1836, 396, 1856, 64, 1845, 770, 1858,
68, 1866, 1883, 1065, 1879, 65, 1065, 1403, 1881, 567,
1880, 1893, 1784, 1097, 1930, 1895, 68, 1892, 69, 503,
504, 424, 234, 1919, 1955, 56, 422, 57, 58, 1942,
1956, 1958, -963, 64, 1959, 1964, 1984, 234, 1299, 66,
1975, 1967, 65, 1990, 1980, 1991, 69, 1978, 234, 1995,
59, 60, 1994, 1842, 61, 62, 1997, 18, 133, 497,
1264, -1215, 69, -1215, -1215, 64, 688, 693, 63, 218,
377, 1661, 223, 1118, 65, 1430, 66, 1868, -963, 234,
234, 1871, 1872, 1873, 234, 1662, -1215, -1215, 67, 1875,
-1215, -1215, 1904, 1898, 961, 1318, 1744, 1886, 1669, 1306,
1148, 1931, 1463, 1443, -1215, 1464, 1941, 1725, 66, 64,
913, 914, 1728, 1779, 1125, 529, 200, 1544, 65, 530,
1204, 1614, 1756, 1758, 1891, 67, 1261, -1215, 1239, 1636,
1511, 1833, 834, 1503, 1635, 1920, 68, 664, 1717, 1076,
843, 1900, 1000, 71, 1906, 1902, 1903, 574, 1905, 1025,
819, 1164, 66, 746, -1215, 947, 1472, 67, 1590, 1409,
1617, 1406, 648, 1690, 1641, 1528, 1644, 989, 1691, 1257,
386, 1933, 1934, 68, 849, 1935, 853, 1830, 1945, 1837,
829, 1668, 69, 1670, 1671, 424, 1715, 1961, 1023, 826,
1082, 1319, 127, 1010, 64, 1071, 242, 1419, 0, 0,
0, 67, 0, 65, 0, 68, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 69,
1971, 1971, 424, 0, 1586, 0, 0, 0, 0, 0,
-1215, 0, 1977, -560, 195, 0, 0, 66, 0, -1215,
71, 1979, 196, 0, 1603, 1604, 1971, 1971, 0, 68,
0, 69, 807, 1987, 807, 807, 807, 1623, 1989, 0,
-566, -566, 0, -566, 0, 0, 0, 0, 1066, 98,
0, 0, 0, -1215, 1503, 0, -566, 0, -566, 0,
0, 1643, 0, 0, 1645, 0, 67, 0, 0, 0,
0, 0, 0, 1745, 0, 69, 0, 1747, 752, 0,
1748, 0, 0, 0, 0, 0, -566, 0, 0, -566,
-566, 0, 1664, 1665, -566, 1066, 0, 1066, 1066, -566,
0, 0, -1215, 0, 0, 0, 0, 0, -566, 0,
-1215, 0, 0, -566, 68, 0, 1771, 0, 56, 0,
57, 58, 0, 0, 0, 0, 0, 0, -566, 0,
0, 0, 0, -566, 0, -566, 0, 0, 0, 0,
0, -560, 1821, 59, 60, 1823, 0, 61, 62, 0,
-1215, 807, 807, 0, 0, 1907, 1908, 0, 0, 1503,
69, 63, 0, 752, 0, 0, 0, 0, 0, 0,
-566, 0, -566, 1623, 0, 0, 0, 1909, 0, 0,
0, 0, 0, 0, 0, 0, 0, 1910, 0, -566,
-1215, 0, -566, -566, 0, 1911, -1215, 0, -560, -566,
0, 0, 0, 0, -566, 0, -566, 1066, -566, 0,
0, 1066, 0, 0, 1066, 0, 433, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, -566, 0, 0, -566, 0, -566, 0,
807, 1623, 0, 0, 0, 56, 0, 57, 445, 0,
1066, 0, 0, 0, 0, 0, -566, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, -566, 0, 0,
446, 60, 0, 0, 61, 62, 1066, 1822, 0, 1066,
0, 0, 0, -566, 0, 0, 0, 64, 63, 0,
0, 0, 0, 0, 0, 0, 65, 0, -566, -566,
0, 0, 0, -566, 0, 0, 0, 0, 0, 0,
0, 0, -566, 0, 0, 0, 0, 0, 0, 434,
0, -566, 438, 0, -566, 0, 0, 1912, 0, 0,
66, 1913, 1914, -566, 0, 0, 0, -566, -566, -566,
0, 0, 0, 0, -566, -566, -566, 0, -870, -870,
0, -870, 0, 0, 0, 0, 0, 1915, -566, -566,
0, 0, 0, -870, -870, 0, -870, 1916, 1917, 0,
0, 0, 0, 0, 0, 197, 0, 0, 0, 67,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, -870, 0, 0, -870, -870, 0,
0, 0, -870, 0, 0, 0, 0, -870, 0, 0,
0, 0, 0, 0, 64, 0, -870, 0, 1927, 0,
0, -870, 0, 65, 0, 0, 0, 68, 0, 0,
0, 0, 0, 0, 0, 0, -870, 0, 0, 0,
0, -870, 0, -870, 0, 0, 0, 0, -870, 0,
-870, -870, -870, 0, -870, -870, -870, 66, -870, -870,
-870, -870, 0, -870, -870, -870, -870, -870, -870, -870,
-870, -870, -870, 69, 0, 0, 0, 0, -870, 0,
-870, 439, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 1927, 0, 0, 0, -870, 0, 0,
-870, -870, 0, 0, 0, 0, 67, -870, 0, 0,
0, 0, -870, 0, -870, 440, -870, 0, 0, 1927,
441, 0, 0, 0, 0, 1927, 0, 0, 0, 1927,
0, 0, 1927, 0, 0, 0, 56, 0, 57, 58,
0, -870, 0, 0, -870, 0, -870, 0, 0, 0,
0, -870, 0, 0, 68, 0, 0, 0, 0, 0,
0, 59, 60, 0, -870, 61, 62, 0, 0, 442,
0, 0, 0, -1234, 0, -870, 0, 0, 0, 63,
0, 0, 0, 438, 0, 0, -1166, 0, 0, 0,
0, -870, 0, 0, 0, 0, -1166, 0, 358, 0,
69, 0, 0, 0, 0, 0, -870, -870, 0, -869,
-869, -870, -869, 0, -1215, 0, -1215, -1215, 0, 0,
-870, 0, 0, 0, -869, -869, 0, -869, 0, -870,
0, 0, -870, 0, 0, 0, 0, 0, 0, -1215,
-1215, -870, 0, -1215, -1215, -870, -870, -870, 0, 0,
0, 0, -870, -870, -870, -869, 0, -1215, -869, -869,
0, 0, 0, -869, 0, 0, -870, -870, -869, 0,
0, 0, 0, 0, 0, 0, 0, -869, 0, -870,
0, 0, -869, -870, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, -869, 0, 0,
0, 0, -869, 0, -869, 64, 0, 0, 0, -869,
0, -869, -869, -869, 65, -869, -869, -869, 0, -869,
-869, -869, -869, 0, -869, -869, -869, -869, -869, -869,
-869, -869, -869, -869, 0, 0, 0, 0, 0, -869,
0, -869, 439, 0, 0, 0, 0, 0, 66, 0,
0, 0, 0, 0, 0, 0, 0, 0, -869, 0,
0, -869, -869, 0, 0, 0, 0, 0, -869, 0,
0, 0, 0, -869, 0, -869, 440, -869, 0, 0,
0, 441, 0, -1215, -1215, 0, -1215, -1215, 0, 0,
0, 0, -1215, 0, 0, 0, 0, 67, 0, 0,
0, 0, -869, 0, 0, -869, 0, -869, 0, -1215,
-1215, 0, -869, -1215, -1215, 0, 0, 0, 0, 0,
0, 0, 98, 0, 0, -869, -1215, -1215, 0, 0,
442, 56, 0, 57, 58, 0, -869, 0, 0, 0,
0, 0, 0, 0, 0, 68, 0, 0, 0, 0,
0, 0, -869, 0, 0, 0, 59, 60, 0, 0,
61, 62, 0, 0, -1234, 0, 0, -869, -869, 0,
0, 0, -869, 0, 63, -1215, 0, -1166, 0, 0,
0, -869, 0, 0, 0, 0, 0, -1166, 0, 358,
-869, 69, 56, -869, 57, 58, 0, 0, 0, 0,
0, 0, -869, 0, 0, 548, -869, -869, -869, 0,
0, 0, 0, -869, -869, -869, 0, 59, 60, 0,
0, 61, 62, -1215, 0, 0, 0, -869, -869, 484,
56, 0, 57, 58, 0, 63, 0, 0, 0, 0,
-869, 0, 0, 0, -869, 56, 0, 57, 58, 0,
0, 0, 0, -1215, 0, 59, 60, 0, 572, 61,
62, 0, -1215, 0, 0, 56, 0, 57, 58, -1215,
59, 60, 0, 63, 61, 62, 0, -1215, 735, -1215,
-1215, 0, 0, 0, 0, 0, 0, 0, 63, 0,
59, 60, 98, 0, 61, 62, -1215, 0, 0, 0,
64, 0, -1215, -1215, 0, 0, -1215, -1215, 63, 65,
56, 0, 57, 58, 0, 0, 0, 0, 0, 0,
-1215, 56, 0, 57, 58, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 59, 60, 0, 0, 61,
62, 0, 0, 66, 0, -1215, 59, 60, 0, 0,
61, 62, 56, 63, 57, 58, 0, 0, 614, 0,
0, 64, 0, 0, 63, 0, 0, 0, 0, 0,
65, 0, 0, 0, 0, 0, 0, 59, 60, 0,
0, 61, 62, 0, 0, 0, 0, 854, 0, 0,
0, 0, 67, -1215, 0, 63, 0, 679, 0, 64,
0, 0, 0, 0, 66, 0, 0, 0, 65, 0,
0, 0, 856, 0, 64, 0, 0, 0, 0, 56,
0, 57, 58, 65, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 64, 0, 0, 0, 0, -1215,
68, 0, 66, 65, 59, 60, -1215, 0, 61, 62,
0, 0, 0, 67, 0, -1215, 0, 66, 0, 0,
0, 0, 63, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 66, 0, 64,
0, 0, 0, 0, 0, 98, 69, 0, 65, -1215,
64, 67, 0, 0, 56, 0, 57, 58, 0, 65,
0, 68, 0, 0, 0, 0, 67, 0, 0, 0,
0, 0, 0, 0, 0, 56, 0, 57, 58, 59,
60, 64, 66, 61, 62, 0, 67, 0, 0, 0,
65, 0, 0, 66, 0, 0, 0, 63, -1215, 68,
59, 60, 0, 0, 61, 62, 0, 69, 0, 0,
0, 0, 0, 0, 68, 1167, 0, 0, 63, 0,
0, 0, 0, 0, 66, 56, 0, 57, 58, 0,
0, 67, 0, 0, 68, 0, 0, 0, 0, 0,
0, 1969, 67, 0, 0, 69, -1215, 0, 64, 0,
59, 60, 0, 0, 61, 62, 0, 65, 1943, 0,
69, 0, 0, 0, 0, 0, 0, 0, 402, 0,
0, 0, 0, 67, 0, -978, 0, -978, -978, 68,
69, 0, 0, 0, 0, 0, 0, 0, 0, 0,
68, 66, -1215, 0, 0, 0, 0, 0, 0, 0,
-978, -978, 0, 0, -978, -978, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 1986, 0, -978, 0,
0, 68, 0, 64, 0, 69, 0, 0, 0, 0,
0, 0, 65, 525, 0, 0, 69, 0, 0, 0,
67, 196, 0, 0, 64, 0, 0, 0, 0, 0,
0, 0, 0, 65, 0, 0, 0, 0, 0, -578,
-578, 0, -578, 0, 0, 0, 66, 69, 0, 0,
0, 0, 0, 0, 0, -578, 0, -578, 0, 0,
0, 0, 0, 0, 0, 0, 0, 66, 68, 0,
0, 0, 0, 0, 64, 0, 0, 0, 0, 0,
0, 0, 0, 65, 0, -578, 0, 0, -578, -578,
0, 0, 0, -578, 0, 67, 0, 0, -578, 0,
0, 0, 0, 0, 0, 0, 0, -578, 0, -1234,
0, 0, -578, -1234, 69, 0, 67, 66, 0, 0,
0, 0, 0, 0, -978, 0, 0, -578, 0, 0,
0, 0, -578, -978, -578, 0, 0, 0, 0, 0,
526, 0, 0, 68, 0, 0, 0, 0, 0, 0,
0, 723, 0, -1234, -1234, 0, -1234, -1234, -1234, 0,
0, 0, 0, 0, 68, 0, 67, -978, 0, -578,
0, -578, 0, 0, 0, 0, 0, 0, 0, -1234,
724, 0, 0, -1234, 0, 0, 0, 0, -578, 69,
0, -578, -578, 0, 0, 0, 0, 0, -578, 0,
0, 0, 0, -578, 0, -578, 0, -578, 0, 0,
69, 0, 0, 0, 68, 0, -978, 0, 725, 0,
0, 723, 0, -1234, -1234, 0, -1234, -1234, -1234, 0,
0, 0, -578, 0, 0, -578, 0, -578, 0, 0,
0, 0, 0, 0, -1234, 0, 0, -1236, 0, 0,
724, 0, 0, 0, 0, -578, 0, 0, 0, 0,
69, -1234, 0, -1234, -978, 0, -578, 0, 0, 0,
0, 0, -1234, 0, 0, 0, 0, 0, 0, 0,
0, 0, -578, 0, 0, 0, 0, 0, 0, 0,
-1234, 0, 0, 0, -1234, 761, 0, -578, -578, 0,
726, 0, -578, 0, 0, -1234, -1234, 0, 0, 0,
-978, -578, 0, 0, -1234, 0, 0, 0, -1234, 0,
-578, 0, 0, -578, 0, 0, 0, 0, 0, 0,
620, -1234, -578, -1234, 84, 0, -578, -578, -578, 0,
0, 0, -1234, -578, -578, -578, 0, 0, 0, 727,
0, 0, 0, 0, 0, 0, 0, -578, -578, 0,
-1234, 0, 0, 0, -1234, 0, 0, 0, 0, 84,
726, 0, -1234, 0, 0, -1234, -1234, -1234, 1565, 1566,
0, 0, 1567, 1568, 0, 0, 0, 0, -1234, 0,
-1234, 0, 0, 0, 0, 0, 0, 0, -1234, 0,
0, 0, 0, 0, 1569, 0, 0, 0, 0, 0,
0, 0, 0, 963, 964, 0, 0, 965, 966, 727,
0, 0, 0, 0, 0, 0, 0, 0, 0, -1234,
0, 0, -1234, 0, 0, 0, 0, 0, -1234, 0,
-1234, 0, -1234, 0, 0, 0, 0, -1234, 358, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
-1234, 0, 0, 0, 0, 0, 0, 0, -1234, 1570,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 1571, 0, 1572, 0,
0, 0, 0, 0, 0, 0, 0, 1573, 0, -1234,
0, 0, -1234, 0, 967, 0, 0, 0, -1234, 0,
-1234, 0, 0, 0, 0, 1574, 0, 0, 358, -133,
0, 968, 0, 969, 0, 0, 0, 0, 0, 0,
1575, 1576, 970, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 254, 255, 0, 256, 0,
971, 0, 0, 0, -133, 0, 0, 0, 0, 0,
0, 257, 0, 258, 0, 972, 973, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 259, 0, 0, 260, 261, 0, 1577, 0, 262,
0, 0, 1578, 0, 263, 0, 0, 1787, 0, 0,
0, 0, 0, 264, 0, 1579, 0, 0, 265, 0,
0, 0, 0, 921, 0, 0, 0, 0, 0, 0,
1788, 1789, 974, 266, 0, 0, 0, 975, 267, 0,
268, 0, 0, 0, 0, 0, 0, 0, 0, 0,
976, 0, 0, 0, -133, 0, 0, 1580, 921, 1790,
0, 0, 0, 0, 0, 1581, 0, 0, 0, 254,
255, 0, 256, 358, 0, 269, 0, 270, 0, 0,
0, 0, 0, 0, 0, 257, 0, 258, 0, -133,
0, 0, 977, 0, 271, 0, 0, 272, 273, 0,
978, 0, 0, 0, 274, 0, 0, 0, 358, 275,
0, 276, 0, 277, 0, 259, 0, 0, 260, 261,
1791, 0, 0, 262, 0, 0, 0, 0, 263, 0,
0, 0, 0, 0, 0, 0, 0, 264, 278, 0,
1792, 279, 265, 280, 1793, 0, 0, 0, 0, 0,
1794, 1795, 0, 0, 0, 0, 0, 266, 0, 0,
0, 281, 267, 0, 268, 0, 0, 1796, 0, 0,
0, 0, 282, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 283, 0,
0, 0, 0, 0, 0, 0, 1797, 0, 0, 269,
0, 270, 0, 284, 285, 0, 0, 0, 286, 0,
0, 0, 0, 0, 0, 0, 0, 287, 271, 0,
0, 272, 273, 0, 0, 0, 288, 0, 274, 289,
0, 0, 0, 275, 0, 276, 0, 277, 290, 0,
0, 0, 291, 292, 293, 0, 0, 0, 1798, 294,
295, 296, 1799, 0, 0, 0, 0, 0, 0, 0,
0, 0, 278, 297, 298, 279, 1800, 280, 0, 0,
254, 255, 0, 256, 0, 0, 0, 0, 0, 1801,
492, 1802, 0, 0, 0, 281, 257, 0, 258, 0,
0, 1803, 0, 0, 1804, 0, 282, 0, 0, 0,
0, 1874, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 283, 0, 0, 0, 259, 0, 0, 260,
261, 0, 0, 0, 262, 0, 0, 284, 285, 263,
0, 0, 286, 0, 0, 0, 0, 0, 264, 0,
0, 287, 0, 265, 0, 0, 0, 0, 0, 0,
288, 0, 0, 289, 0, 0, 0, 0, 266, 0,
0, 0, 290, 267, 0, 268, 291, 292, 293, 0,
0, 0, 0, 294, 295, 296, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 297, 298, 0,
0, 0, 0, 0, 254, 255, 0, 256, 0, 0,
269, 0, 270, 0, 942, 0, 0, 0, 0, 0,
257, 0, 258, 0, 0, 0, 0, 0, 0, 271,
0, 0, 272, 273, 0, 0, 0, 0, 0, 274,
0, 0, 0, 0, 275, 0, 276, 0, 277, 0,
259, 0, 0, 260, 261, 0, 0, 0, 262, 0,
0, 0, 0, 263, 0, 0, 0, 0, 0, 0,
0, 0, 264, 278, 0, 0, 279, 265, 280, 0,
0, 1764, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 266, 0, 0, 0, 281, 267, 0, 268,
0, 0, 0, 0, 0, 0, 1787, 282, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 283, 0, 0, 0, 0, 0, 1788,
1789, 0, 0, 0, 269, 0, 270, 0, 284, 285,
0, 0, 0, 286, 0, 0, 0, 0, 0, 0,
0, 0, 287, 271, 0, 0, 272, 273, 1790, 0,
0, 288, 0, 274, 289, 0, 0, 0, 275, 0,
276, 0, 277, 290, 0, 0, 0, 291, 292, 293,
0, 0, 0, 0, 294, 295, 296, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 278, 297, 298,
279, 0, 280, 0, 0, 1768, 0, 0, 0, 0,
0, 254, 255, 0, 256, 0, 0, 0, 0, 1791,
281, 0, 0, 0, 0, 0, 0, 257, 0, 258,
0, 282, 0, 0, 0, 0, 0, 0, 0, 1792,
0, 0, 0, 1793, 0, 0, 0, 283, 0, 1794,
1795, 0, 0, 0, 0, 0, 0, 259, 0, 0,
260, 261, 284, 285, 0, 262, 1796, 286, 0, 0,
263, 0, 0, 0, 0, 0, 287, 0, 0, 264,
0, 0, 0, 0, 265, 288, 0, 0, 289, 0,
0, 0, 0, 0, 0, 1797, 0, 290, 0, 266,
0, 291, 292, 293, 267, 0, 268, 0, 294, 295,
296, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 297, 298, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 269, 0, 270, 0, 0, 0, 1798, 0, 0,
0, 1799, 0, 0, 0, 0, 0, 0, 0, 0,
271, 0, 0, 272, 273, 1800, 0, 0, 0, 0,
274, 0, 0, 0, 0, 275, 0, 276, 1801, 277,
1802, 0, 0, 0, 0, 0, 0, 0, 0, 0,
1803, 0, 0, 1804, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 278, 0, 0, 279, 0, 280,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 281, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 282, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 283, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 284,
285, 0, 0, 0, 286, 0, 0, 0, 0, 0,
0, 0, 0, 287, 0, 0, 0, 0, 0, 0,
0, 0, 288, 0, 0, 289, 0, 0, 0, 0,
0, 0, 0, 0, 290, 0, 0, 0, 291, 292,
293, 0, 0, 0, 0, 294, 295, 296, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 297,
298
};
static const yytype_int16 yycheck[] =
{
47, 48, 48, 222, 361, 63, 180, 288, 288, 50,
274, 524, 180, 675, 289, 184, 443, 827, 705, 681,
874, 965, 812, 1049, 1048, 424, 733, 717, 925, 719,
720, 721, 548, 81, 299, 862, 935, 793, 794, 627,
282, 1349, 432, 20, 753, 1, 1028, 199, 567, 63,
19, 592, 99, 100, 844, 6, 765, 8, 9, 20,
850, 20, 236, 579, 18, 40, 41, 6, 236, 8,
9, 0, 1, 89, 19, 82, 24, 293, 42, 126,
1498, 49, 472, 473, 31, 32, 138, 877, 878, 62,
1432, 24, 112, 209, 89, 851, 214, 51, 52, 53,
147, 148, 108, 187, 1, 657, 177, 26, 817, 6,
97, 8, 9, 24, 630, 170, 84, 99, 16, 24,
161, 162, 185, 35, 36, 37, 38, 39, 87, 125,
194, 215, 24, 103, 31, 32, 457, 98, 35, 36,
62, 240, 101, 102, 191, 192, 193, 138, 857, 506,
756, 8, 49, 31, 544, 124, 67, 35, 36, 26,
424, 214, 67, 679, 5, 20, 21, 566, 9, 210,
211, 253, 213, 56, 42, 216, 228, 62, 219, 421,
396, 123, 581, 265, 465, 460, 71, 468, 136, 6,
58, 8, 49, 240, 593, 594, 595, 596, 597, 128,
1618, 169, 1620, 1621, 228, 1231, 128, 155, 19, 214,
1234, 258, 23, 260, 261, 0, 287, 538, 317, 735,
267, 268, 120, 739, 42, 813, 1123, 833, 275, 275,
399, 621, 279, 280, 163, 282, 405, 205, 262, 212,
5, 84, 783, 412, 362, 292, 293, 294, 295, 790,
1077, 792, 1, 31, 187, 138, 185, 35, 36, 616,
362, 1017, 952, 214, 163, 271, 956, 6, 484, 8,
9, 661, 26, 227, 664, 359, 214, 241, 175, 988,
234, 18, 215, 20, 213, 126, 156, 184, 158, 841,
354, 407, 251, 275, 162, 187, 18, 683, 35, 36,
37, 38, 39, 42, 359, 42, 358, 261, 259, 362,
362, 306, 481, 1655, 51, 52, 53, 581, 229, 1109,
42, 218, 241, 215, 229, 1081, 78, 212, 727, 51,
52, 53, 689, 690, 263, 322, 323, 20, 354, 359,
856, 1759, 948, 585, 402, 228, 310, 354, 295, 396,
524, 398, 281, 752, 78, 294, 362, 404, 24, 329,
365, 259, 5, 359, 1388, 338, 9, 358, 297, 298,
267, 362, 340, 355, 241, 640, 528, 232, 233, 348,
258, 550, 274, 128, 774, 362, 433, 70, 402, 62,
365, 336, 791, 152, 793, 794, 357, 353, 446, 298,
569, 643, 167, 362, 917, 88, 1233, 361, 359, 19,
796, 359, 230, 310, 231, 164, 1226, 42, 315, 177,
1319, 1320, 1249, 63, 362, 108, 1325, 268, 544, 272,
1327, 360, 35, 36, 224, 189, 42, 484, 349, 486,
185, 488, 723, 708, 349, 1753, 1470, 317, 1036, 1037,
228, 964, 344, 365, 206, 968, 62, 51, 574, 1215,
54, 55, 265, 632, 361, 984, 307, 359, 72, 109,
110, 1012, 1519, 341, 6, 358, 8, 9, 1187, 362,
258, 91, 206, 1509, 171, 205, 1002, 128, 1004, 155,
227, 1200, 539, 1202, 541, 1269, 1270, 234, 545, 31,
32, 548, 241, 35, 36, 227, 296, 554, 232, 233,
867, 6, 234, 8, 9, 1497, 1225, 1499, 1500, 1501,
203, 205, 128, 1039, 261, 198, 211, 210, 575, 793,
794, 578, 579, 775, 158, 583, 294, 188, 31, 261,
188, 293, 35, 36, 1253, 1254, 189, 35, 36, 37,
38, 39, 123, 259, 42, 836, 196, 598, 839, 840,
824, 960, 961, 173, 1463, 1227, 1259, 1394, 211, 293,
1089, 310, 362, 198, 9, 1091, 18, 1624, 20, 626,
627, 211, 42, 630, 49, 754, 158, 238, 271, 94,
238, 278, 198, 197, 9, 985, 31, 644, 281, 282,
42, 211, 62, 1116, 1630, 230, 1005, 1120, 1301, 51,
52, 53, 297, 153, 154, 1128, 31, 733, 221, 84,
340, 128, 1021, 1567, 361, 249, 177, 674, 1652, 676,
187, 672, 679, 276, 1616, 1617, 22, 197, 224, 361,
234, 235, 108, 890, 760, 686, 815, 257, 895, 1476,
819, 1478, 184, 359, 214, 258, 340, 266, 215, 700,
1434, 702, 302, 206, 307, 839, 840, 297, 128, 241,
56, 1028, 355, 358, 1879, 206, 206, 249, 185, 362,
173, 1471, 1201, 118, 1203, 336, 218, 192, 336, 254,
255, 256, 257, 10, 11, 12, 13, 248, 263, 264,
310, 266, 300, 118, 31, 32, 271, 1789, 35, 36,
296, 276, 277, 278, 1407, 18, 362, 34, 1411, 214,
285, 286, 49, 1705, 289, 290, 842, 1008, 358, 845,
777, 296, 297, 298, 188, 267, 852, 1942, 214, 42,
205, 1005, 123, 917, 354, 355, 356, 214, 228, 359,
293, 263, 362, 241, 161, 1545, 4, 297, 1465, 1726,
1727, 241, 293, 293, 362, 363, 813, 347, 621, 1851,
1852, 178, 1, 1163, 1, 1602, 5, 357, 5, 214,
838, 1, 9, 315, 238, 227, 6, 7, 8, 1948,
964, 1072, 234, 20, 968, 1308, 271, 1587, 9, 214,
1075, 277, 31, 32, 33, 1195, 35, 36, 855, 1776,
277, 664, 1, 9, 1973, 1974, 5, 44, 4, 261,
31, 362, 310, 0, 1, 11, 46, 362, 5, 361,
57, 947, 18, 1, 61, 31, 311, 312, 6, 161,
8, 9, 883, 1787, 409, 1507, 170, 0, 1, 6,
891, 8, 29, 894, 895, 896, 178, 184, 182, 6,
1687, 8, 347, 31, 32, 1146, 170, 35, 36, 1556,
35, 36, 357, 50, 31, 48, 29, 194, 182, 444,
921, 49, 48, 924, 31, 1712, 1958, 1714, 35, 36,
5, 218, 1719, 66, 1603, 1604, 937, 31, 1795, 1,
66, 35, 36, 950, 156, 1186, 158, 9, 85, 1336,
1191, 1192, 1984, 1767, 1427, 170, 31, 32, 1990, 361,
35, 36, 1994, 1750, 9, 1997, 1095, 182, 123, 106,
107, 108, 161, 18, 96, 241, 113, 1450, 1451, 166,
267, 26, 1116, 249, 121, 1073, 1120, 6, 1076, 8,
9, 128, 31, 32, 1128, 108, 35, 36, 1855, 1133,
365, 366, 189, 1137, 4, 1229, 1863, 37, 38, 39,
1245, 300, 31, 32, 29, 128, 35, 36, 6, 1095,
8, 16, 166, 548, 211, 20, 74, 75, 315, 1036,
1037, 6, 557, 8, 9, 1042, 1658, 6, 1688, 8,
1897, 6, 362, 8, 18, 300, 20, 175, 185, 40,
41, 1838, 1402, 300, 579, 6, 184, 8, 9, 246,
360, 35, 36, 37, 38, 39, 31, 32, 42, 362,
35, 36, 185, 68, 361, 271, 272, 51, 52, 53,
300, 1554, 362, 6, 271, 8, 9, 1094, 362, 276,
218, 616, 1110, 153, 154, 18, 31, 284, 213, 236,
365, 366, 31, 1104, 9, 630, 631, 1108, 1126, 219,
1111, 1112, 637, 1114, 1884, 364, 6, 7, 8, 9,
307, 1122, 362, 236, 362, 120, 263, 300, 18, 1479,
5, 59, 60, 281, 321, 364, 50, 114, 1925, 267,
362, 31, 32, 1144, 265, 35, 36, 200, 673, 362,
263, 362, 42, 362, 679, 362, 31, 32, 1159, 49,
35, 36, 211, 212, 300, 6, 297, 8, 9, 367,
1304, 85, 1306, 303, 1308, 362, 1304, 314, 1306, 316,
1497, 362, 1499, 1500, 1501, 208, 209, 315, 20, 21,
31, 32, 106, 107, 35, 36, 153, 154, 1439, 113,
362, 314, 22, 316, 558, 559, 201, 121, 362, 1216,
735, 736, 231, 300, 739, 35, 36, 37, 38, 39,
239, 5, 241, 5, 5, 362, 35, 36, 37, 38,
39, 5, 309, 361, 1363, 20, 1365, 321, 5, 244,
765, 1, 237, 362, 1594, 365, 6, 265, 8, 9,
362, 1269, 1270, 227, 1613, 5, 362, 362, 362, 1335,
234, 362, 257, 1264, 259, 1266, 93, 166, 5, 1510,
5, 31, 32, 269, 300, 35, 36, 362, 273, 362,
19, 339, 339, 808, 279, 175, 89, 261, 127, 49,
362, 1641, 817, 1427, 184, 820, 362, 112, 1432, 1616,
1617, 32, 1303, 32, 5, 5, 831, 59, 330, 143,
173, 1784, 173, 838, 309, 173, 1450, 1451, 130, 214,
134, 294, 341, 271, 137, 1326, 364, 238, 218, 1336,
1336, 856, 857, 328, 241, 860, 1337, 19, 140, 72,
334, 1814, 142, 1816, 336, 22, 31, 32, 1355, 144,
35, 36, 1481, 8, 1430, 1977, 146, 352, 238, 202,
355, 356, 116, 149, 49, 116, 139, 362, 306, 222,
22, 98, 171, 1613, 5, 362, 1383, 267, 114, 1386,
1730, 48, 354, 6, 7, 8, 9, 361, 1705, 1465,
177, 365, 132, 56, 40, 335, 26, 19, 1757, 1406,
160, 9, 357, 1876, 1754, 197, 46, 72, 31, 32,
72, 26, 35, 36, 19, 175, 1434, 228, 1891, 42,
1554, 198, 202, 72, 184, 315, 49, 197, 56, 1902,
32, 241, 5, 47, 194, 362, 31, 32, 362, 199,
35, 36, 129, 6, 32, 8, 9, 321, 362, 232,
158, 289, 31, 32, 278, 1531, 35, 36, 218, 984,
1933, 1934, 278, 988, 177, 1938, 215, 177, 31, 32,
358, 361, 35, 36, 364, 40, 108, 1002, 39, 1004,
19, 19, 280, 177, 1708, 173, 49, 336, 248, 147,
1840, 177, 49, 5, 228, 1513, 321, 239, 222, 184,
271, 31, 321, 1028, 260, 5, 21, 267, 238, 1034,
5, 74, 75, 358, 1039, 263, 310, 135, 40, 72,
1045, 1655, 1763, 171, 128, 62, 42, 128, 145, 125,
18, 259, 40, 218, 117, 304, 5, 5, 165, 162,
357, 305, 1560, 361, 1562, 1563, 22, 6, 7, 8,
9, 202, 175, 1732, 151, 315, 361, 1082, 47, 18,
47, 184, 156, 310, 1089, 354, 1091, 142, 42, 188,
173, 329, 31, 32, 105, 5, 35, 36, 5, 358,
5, 5, 267, 42, 6, 7, 8, 9, 1595, 184,
49, 307, 1599, 19, 1835, 218, 5, 83, 19, 212,
178, 361, 22, 1782, 168, 184, 42, 72, 1832, 31,
32, 247, 175, 35, 36, 358, 6, 5, 8, 9,
42, 184, 1629, 218, 245, 148, 5, 49, 84, 310,
315, 336, 1633, 14, 20, 42, 1637, 21, 192, 218,
362, 31, 32, 133, 267, 35, 36, 226, 142, 347,
1784, 263, 170, 189, 1672, 218, 1657, 249, 1676, 49,
6, 1679, 8, 9, 118, 1666, 15, 310, 72, 198,
232, 56, 267, 263, 41, 1200, 361, 1202, 150, 125,
1814, 366, 1816, 182, 62, 31, 32, 19, 267, 35,
36, 338, 315, 361, 47, 42, 1221, 1715, 18, 249,
1225, 71, 347, 49, 267, 5, 1707, 169, 1726, 1727,
118, 304, 204, 304, 104, 190, 175, 119, 341, 293,
315, 181, 48, 1741, 305, 184, 1744, 1252, 131, 1254,
158, 170, 1733, 1258, 5, 361, 315, 119, 361, 318,
319, 364, 1876, 120, 251, 6, 7, 8, 9, 305,
228, 48, 315, 175, 173, 251, 48, 1891, 1776, 218,
251, 350, 184, 48, 285, 347, 361, 142, 1902, 1993,
31, 32, 48, 1780, 35, 36, 48, 11, 108, 356,
1105, 6, 361, 8, 9, 175, 506, 510, 49, 165,
227, 1553, 175, 885, 184, 1300, 218, 1798, 361, 1933,
1934, 1802, 1803, 1804, 1938, 1554, 31, 32, 267, 1805,
35, 36, 1868, 1854, 726, 1154, 1669, 1835, 1561, 1137,
922, 1890, 1335, 1319, 49, 1335, 1903, 1650, 218, 175,
701, 701, 1654, 1728, 893, 387, 153, 1436, 184, 387,
1005, 1494, 1696, 1699, 1845, 267, 1098, 72, 1058, 1514,
1392, 1763, 649, 1378, 1513, 1873, 315, 473, 1639, 845,
661, 1862, 760, 1870, 1870, 1866, 1867, 412, 1869, 802,
631, 947, 218, 557, 99, 710, 1338, 267, 1474, 1258,
1496, 1255, 458, 1594, 1523, 1410, 1527, 741, 1595, 1095,
240, 1892, 1893, 315, 669, 1896, 674, 1760, 1905, 1773,
644, 1560, 361, 1562, 1563, 364, 1635, 1929, 794, 641,
851, 1155, 104, 777, 175, 840, 191, 1265, -1, -1,
-1, 267, -1, 184, -1, 315, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, 361,
1947, 1948, 364, -1, 1469, -1, -1, -1, -1, -1,
175, -1, 1959, 0, 1, -1, -1, 218, -1, 184,
1967, 1967, 9, -1, 1489, 1490, 1973, 1974, -1, 315,
-1, 361, 1497, 1980, 1499, 1500, 1501, 1502, 1985, -1,
27, 28, -1, 30, -1, -1, -1, -1, 1513, 214,
-1, -1, -1, 218, 1519, -1, 43, -1, 45, -1,
-1, 1526, -1, -1, 1529, -1, 267, -1, -1, -1,
-1, -1, -1, 1672, -1, 361, -1, 1676, 364, -1,
1679, -1, -1, -1, -1, -1, 73, -1, -1, 76,
77, -1, 1557, 1558, 81, 1560, -1, 1562, 1563, 86,
-1, -1, 267, -1, -1, -1, -1, -1, 95, -1,
275, -1, -1, 100, 315, -1, 1715, -1, 6, -1,
8, 9, -1, -1, -1, -1, -1, -1, 115, -1,
-1, -1, -1, 120, -1, 122, -1, -1, -1, -1,
-1, 128, 1741, 31, 32, 1744, -1, 35, 36, -1,
315, 1616, 1617, -1, -1, 79, 80, -1, -1, 1624,
361, 49, -1, 364, -1, -1, -1, -1, -1, -1,
157, -1, 159, 1638, -1, -1, -1, 101, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 111, -1, 176,
355, -1, 179, 180, -1, 119, 361, -1, 185, 186,
-1, -1, -1, -1, 191, -1, 193, 1672, 195, -1,
-1, 1676, -1, -1, 1679, -1, 104, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, 220, -1, -1, 223, -1, 225, -1,
1705, 1706, -1, -1, -1, 6, -1, 8, 9, -1,
1715, -1, -1, -1, -1, -1, 243, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 254, -1, -1,
31, 32, -1, -1, 35, 36, 1741, 1742, -1, 1744,
-1, -1, -1, 270, -1, -1, -1, 175, 49, -1,
-1, -1, -1, -1, -1, -1, 184, -1, 285, 286,
-1, -1, -1, 290, -1, -1, -1, -1, -1, -1,
-1, -1, 299, -1, -1, -1, -1, -1, -1, 207,
-1, 308, 1, -1, 311, -1, -1, 251, -1, -1,
218, 255, 256, 320, -1, -1, -1, 324, 325, 326,
-1, -1, -1, -1, 331, 332, 333, -1, 27, 28,
-1, 30, -1, -1, -1, -1, -1, 281, 345, 346,
-1, -1, -1, 42, 43, -1, 45, 291, 292, -1,
-1, -1, -1, -1, -1, 362, -1, -1, -1, 267,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 73, -1, -1, 76, 77, -1,
-1, -1, 81, -1, -1, -1, -1, 86, -1, -1,
-1, -1, -1, -1, 175, -1, 95, -1, 1883, -1,
-1, 100, -1, 184, -1, -1, -1, 315, -1, -1,
-1, -1, -1, -1, -1, -1, 115, -1, -1, -1,
-1, 120, -1, 122, -1, -1, -1, -1, 127, -1,
129, 130, 131, -1, 133, 134, 135, 218, 137, 138,
139, 140, -1, 142, 143, 144, 145, 146, 147, 148,
149, 150, 151, 361, -1, -1, -1, -1, 157, -1,
159, 160, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, 1958, -1, -1, -1, 176, -1, -1,
179, 180, -1, -1, -1, -1, 267, 186, -1, -1,
-1, -1, 191, -1, 193, 194, 195, -1, -1, 1984,
199, -1, -1, -1, -1, 1990, -1, -1, -1, 1994,
-1, -1, 1997, -1, -1, -1, 6, -1, 8, 9,
-1, 220, -1, -1, 223, -1, 225, -1, -1, -1,
-1, 230, -1, -1, 315, -1, -1, -1, -1, -1,
-1, 31, 32, -1, 243, 35, 36, -1, -1, 248,
-1, -1, -1, 334, -1, 254, -1, -1, -1, 49,
-1, -1, -1, 1, -1, -1, 347, -1, -1, -1,
-1, 270, -1, -1, -1, -1, 357, -1, 359, -1,
361, -1, -1, -1, -1, -1, 285, 286, -1, 27,
28, 290, 30, -1, 6, -1, 8, 9, -1, -1,
299, -1, -1, -1, 42, 43, -1, 45, -1, 308,
-1, -1, 311, -1, -1, -1, -1, -1, -1, 31,
32, 320, -1, 35, 36, 324, 325, 326, -1, -1,
-1, -1, 331, 332, 333, 73, -1, 49, 76, 77,
-1, -1, -1, 81, -1, -1, 345, 346, 86, -1,
-1, -1, -1, -1, -1, -1, -1, 95, -1, 358,
-1, -1, 100, 362, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 115, -1, -1,
-1, -1, 120, -1, 122, 175, -1, -1, -1, 127,
-1, 129, 130, 131, 184, 133, 134, 135, -1, 137,
138, 139, 140, -1, 142, 143, 144, 145, 146, 147,
148, 149, 150, 151, -1, -1, -1, -1, -1, 157,
-1, 159, 160, -1, -1, -1, -1, -1, 218, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 176, -1,
-1, 179, 180, -1, -1, -1, -1, -1, 186, -1,
-1, -1, -1, 191, -1, 193, 194, 195, -1, -1,
-1, 199, -1, 175, 6, -1, 8, 9, -1, -1,
-1, -1, 184, -1, -1, -1, -1, 267, -1, -1,
-1, -1, 220, -1, -1, 223, -1, 225, -1, 31,
32, -1, 230, 35, 36, -1, -1, -1, -1, -1,
-1, -1, 214, -1, -1, 243, 218, 49, -1, -1,
248, 6, -1, 8, 9, -1, 254, -1, -1, -1,
-1, -1, -1, -1, -1, 315, -1, -1, -1, -1,
-1, -1, 270, -1, -1, -1, 31, 32, -1, -1,
35, 36, -1, -1, 334, -1, -1, 285, 286, -1,
-1, -1, 290, -1, 49, 267, -1, 347, -1, -1,
-1, 299, -1, -1, -1, -1, -1, 357, -1, 359,
308, 361, 6, 311, 8, 9, -1, -1, -1, -1,
-1, -1, 320, -1, -1, 19, 324, 325, 326, -1,
-1, -1, -1, 331, 332, 333, -1, 31, 32, -1,
-1, 35, 36, 315, -1, -1, -1, 345, 346, 104,
6, -1, 8, 9, -1, 49, -1, -1, -1, -1,
358, -1, -1, -1, 362, 6, -1, 8, 9, -1,
-1, -1, -1, 175, -1, 31, 32, -1, 350, 35,
36, -1, 184, -1, -1, 6, -1, 8, 9, 361,
31, 32, -1, 49, 35, 36, -1, 6, 19, 8,
9, -1, -1, -1, -1, -1, -1, -1, 49, -1,
31, 32, 214, -1, 35, 36, 218, -1, -1, -1,
175, -1, 31, 32, -1, -1, 35, 36, 49, 184,
6, -1, 8, 9, -1, -1, -1, -1, -1, -1,
49, 6, -1, 8, 9, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 31, 32, -1, -1, 35,
36, -1, -1, 218, -1, 267, 31, 32, -1, -1,
35, 36, 6, 49, 8, 9, -1, -1, 280, -1,
-1, 175, -1, -1, 49, -1, -1, -1, -1, -1,
184, -1, -1, -1, -1, -1, -1, 31, 32, -1,
-1, 35, 36, -1, -1, -1, -1, 72, -1, -1,
-1, -1, 267, 315, -1, 49, -1, 173, -1, 175,
-1, -1, -1, -1, 218, -1, -1, -1, 184, -1,
-1, -1, 173, -1, 175, -1, -1, -1, -1, 6,
-1, 8, 9, 184, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 175, -1, -1, -1, -1, 361,
315, -1, 218, 184, 31, 32, 175, -1, 35, 36,
-1, -1, -1, 267, -1, 184, -1, 218, -1, -1,
-1, -1, 49, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 218, -1, 175,
-1, -1, -1, -1, -1, 214, 361, -1, 184, 218,
175, 267, -1, -1, 6, -1, 8, 9, -1, 184,
-1, 315, -1, -1, -1, -1, 267, -1, -1, -1,
-1, -1, -1, -1, -1, 6, -1, 8, 9, 31,
32, 175, 218, 35, 36, -1, 267, -1, -1, -1,
184, -1, -1, 218, -1, -1, -1, 49, 267, 315,
31, 32, -1, -1, 35, 36, -1, 361, -1, -1,
-1, -1, -1, -1, 315, 251, -1, -1, 49, -1,
-1, -1, -1, -1, 218, 6, -1, 8, 9, -1,
-1, 267, -1, -1, 315, -1, -1, -1, -1, -1,
-1, 168, 267, -1, -1, 361, 315, -1, 175, -1,
31, 32, -1, -1, 35, 36, -1, 184, 252, -1,
361, -1, -1, -1, -1, -1, -1, -1, 49, -1,
-1, -1, -1, 267, -1, 6, -1, 8, 9, 315,
361, -1, -1, -1, -1, -1, -1, -1, -1, -1,
315, 218, 361, -1, -1, -1, -1, -1, -1, -1,
31, 32, -1, -1, 35, 36, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 168, -1, 49, -1,
-1, 315, -1, 175, -1, 361, -1, -1, -1, -1,
-1, -1, 184, 1, -1, -1, 361, -1, -1, -1,
267, 9, -1, -1, 175, -1, -1, -1, -1, -1,
-1, -1, -1, 184, -1, -1, -1, -1, -1, 27,
28, -1, 30, -1, -1, -1, 218, 361, -1, -1,
-1, -1, -1, -1, -1, 43, -1, 45, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 218, 315, -1,
-1, -1, -1, -1, 175, -1, -1, -1, -1, -1,
-1, -1, -1, 184, -1, 73, -1, -1, 76, 77,
-1, -1, -1, 81, -1, 267, -1, -1, 86, -1,
-1, -1, -1, -1, -1, -1, -1, 95, -1, 20,
-1, -1, 100, 24, 361, -1, 267, 218, -1, -1,
-1, -1, -1, -1, 175, -1, -1, 115, -1, -1,
-1, -1, 120, 184, 122, -1, -1, -1, -1, -1,
128, -1, -1, 315, -1, -1, -1, -1, -1, -1,
-1, 62, -1, 64, 65, -1, 67, 68, 69, -1,
-1, -1, -1, -1, 315, -1, 267, 218, -1, 157,
-1, 159, -1, -1, -1, -1, -1, -1, -1, 20,
91, -1, -1, 24, -1, -1, -1, -1, 176, 361,
-1, 179, 180, -1, -1, -1, -1, -1, 186, -1,
-1, -1, -1, 191, -1, 193, -1, 195, -1, -1,
361, -1, -1, -1, 315, -1, 267, -1, 129, -1,
-1, 62, -1, 64, 65, -1, 67, 68, 69, -1,
-1, -1, 220, -1, -1, 223, -1, 225, -1, -1,
-1, -1, -1, -1, 155, -1, -1, 158, -1, -1,
91, -1, -1, -1, -1, 243, -1, -1, -1, -1,
361, 172, -1, 174, 315, -1, 254, -1, -1, -1,
-1, -1, 183, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 270, -1, -1, -1, -1, -1, -1, -1,
201, -1, -1, -1, 205, 136, -1, 285, 286, -1,
211, -1, 290, -1, -1, 216, 217, -1, -1, -1,
361, 299, -1, -1, 155, -1, -1, -1, 229, -1,
308, -1, -1, 311, -1, -1, -1, -1, -1, -1,
241, 172, 320, 174, 20, -1, 324, 325, 326, -1,
-1, -1, 183, 331, 332, 333, -1, -1, -1, 260,
-1, -1, -1, -1, -1, -1, -1, 345, 346, -1,
201, -1, -1, -1, 205, -1, -1, -1, -1, 20,
211, -1, 283, -1, -1, 216, 217, 288, 64, 65,
-1, -1, 68, 69, -1, -1, -1, -1, 229, -1,
301, -1, -1, -1, -1, -1, -1, -1, 309, -1,
-1, -1, -1, -1, 90, -1, -1, -1, -1, -1,
-1, -1, -1, 64, 65, -1, -1, 68, 69, 260,
-1, -1, -1, -1, -1, -1, -1, -1, -1, 340,
-1, -1, 343, -1, -1, -1, -1, -1, 349, -1,
351, -1, 283, -1, -1, -1, -1, 288, 359, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
301, -1, -1, -1, -1, -1, -1, -1, 309, 155,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 172, -1, 174, -1,
-1, -1, -1, -1, -1, -1, -1, 183, -1, 340,
-1, -1, 343, -1, 155, -1, -1, -1, 349, -1,
351, -1, -1, -1, -1, 201, -1, -1, 359, 205,
-1, 172, -1, 174, -1, -1, -1, -1, -1, -1,
216, 217, 183, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 27, 28, -1, 30, -1,
201, -1, -1, -1, 205, -1, -1, -1, -1, -1,
-1, 43, -1, 45, -1, 216, 217, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, 73, -1, -1, 76, 77, -1, 283, -1, 81,
-1, -1, 288, -1, 86, -1, -1, 68, -1, -1,
-1, -1, -1, 95, -1, 301, -1, -1, 100, -1,
-1, -1, -1, 309, -1, -1, -1, -1, -1, -1,
91, 92, 283, 115, -1, -1, -1, 288, 120, -1,
122, -1, -1, -1, -1, -1, -1, -1, -1, -1,
301, -1, -1, -1, 340, -1, -1, 343, 309, 120,
-1, -1, -1, -1, -1, 351, -1, -1, -1, 27,
28, -1, 30, 359, -1, 157, -1, 159, -1, -1,
-1, -1, -1, -1, -1, 43, -1, 45, -1, 340,
-1, -1, 343, -1, 176, -1, -1, 179, 180, -1,
351, -1, -1, -1, 186, -1, -1, -1, 359, 191,
-1, 193, -1, 195, -1, 73, -1, -1, 76, 77,
181, -1, -1, 81, -1, -1, -1, -1, 86, -1,
-1, -1, -1, -1, -1, -1, -1, 95, 220, -1,
201, 223, 100, 225, 205, -1, -1, -1, -1, -1,
211, 212, -1, -1, -1, -1, -1, 115, -1, -1,
-1, 243, 120, -1, 122, -1, -1, 228, -1, -1,
-1, -1, 254, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 270, -1,
-1, -1, -1, -1, -1, -1, 257, -1, -1, 157,
-1, 159, -1, 285, 286, -1, -1, -1, 290, -1,
-1, -1, -1, -1, -1, -1, -1, 299, 176, -1,
-1, 179, 180, -1, -1, -1, 308, -1, 186, 311,
-1, -1, -1, 191, -1, 193, -1, 195, 320, -1,
-1, -1, 324, 325, 326, -1, -1, -1, 309, 331,
332, 333, 313, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 220, 345, 346, 223, 327, 225, -1, -1,
27, 28, -1, 30, -1, -1, -1, -1, -1, 340,
362, 342, -1, -1, -1, 243, 43, -1, 45, -1,
-1, 352, -1, -1, 355, -1, 254, -1, -1, -1,
-1, 362, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 270, -1, -1, -1, 73, -1, -1, 76,
77, -1, -1, -1, 81, -1, -1, 285, 286, 86,
-1, -1, 290, -1, -1, -1, -1, -1, 95, -1,
-1, 299, -1, 100, -1, -1, -1, -1, -1, -1,
308, -1, -1, 311, -1, -1, -1, -1, 115, -1,
-1, -1, 320, 120, -1, 122, 324, 325, 326, -1,
-1, -1, -1, 331, 332, 333, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 345, 346, -1,
-1, -1, -1, -1, 27, 28, -1, 30, -1, -1,
157, -1, 159, -1, 362, -1, -1, -1, -1, -1,
43, -1, 45, -1, -1, -1, -1, -1, -1, 176,
-1, -1, 179, 180, -1, -1, -1, -1, -1, 186,
-1, -1, -1, -1, 191, -1, 193, -1, 195, -1,
73, -1, -1, 76, 77, -1, -1, -1, 81, -1,
-1, -1, -1, 86, -1, -1, -1, -1, -1, -1,
-1, -1, 95, 220, -1, -1, 223, 100, 225, -1,
-1, 228, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 115, -1, -1, -1, 243, 120, -1, 122,
-1, -1, -1, -1, -1, -1, 68, 254, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, 270, -1, -1, -1, -1, -1, 91,
92, -1, -1, -1, 157, -1, 159, -1, 285, 286,
-1, -1, -1, 290, -1, -1, -1, -1, -1, -1,
-1, -1, 299, 176, -1, -1, 179, 180, 120, -1,
-1, 308, -1, 186, 311, -1, -1, -1, 191, -1,
193, -1, 195, 320, -1, -1, -1, 324, 325, 326,
-1, -1, -1, -1, 331, 332, 333, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 220, 345, 346,
223, -1, 225, -1, -1, 228, -1, -1, -1, -1,
-1, 27, 28, -1, 30, -1, -1, -1, -1, 181,
243, -1, -1, -1, -1, -1, -1, 43, -1, 45,
-1, 254, -1, -1, -1, -1, -1, -1, -1, 201,
-1, -1, -1, 205, -1, -1, -1, 270, -1, 211,
212, -1, -1, -1, -1, -1, -1, 73, -1, -1,
76, 77, 285, 286, -1, 81, 228, 290, -1, -1,
86, -1, -1, -1, -1, -1, 299, -1, -1, 95,
-1, -1, -1, -1, 100, 308, -1, -1, 311, -1,
-1, -1, -1, -1, -1, 257, -1, 320, -1, 115,
-1, 324, 325, 326, 120, -1, 122, -1, 331, 332,
333, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 345, 346, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, 157, -1, 159, -1, -1, -1, 309, -1, -1,
-1, 313, -1, -1, -1, -1, -1, -1, -1, -1,
176, -1, -1, 179, 180, 327, -1, -1, -1, -1,
186, -1, -1, -1, -1, 191, -1, 193, 340, 195,
342, -1, -1, -1, -1, -1, -1, -1, -1, -1,
352, -1, -1, 355, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 220, -1, -1, 223, -1, 225,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 243, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 254, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 270, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, 285,
286, -1, -1, -1, 290, -1, -1, -1, -1, -1,
-1, -1, -1, 299, -1, -1, -1, -1, -1, -1,
-1, -1, 308, -1, -1, 311, -1, -1, -1, -1,
-1, -1, -1, -1, 320, -1, -1, -1, 324, 325,
326, -1, -1, -1, -1, 331, 332, 333, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, 345,
346
};
/* YYSTOS[STATE-NUM] -- The (internal number of the) accessing
symbol of state STATE-NUM. */
static const yytype_uint16 yystos[] =
{
0, 185, 369, 370, 371, 375, 376, 123, 0, 375,
128, 372, 373, 152, 384, 362, 373, 265, 371, 375,
123, 108, 451, 266, 374, 373, 375, 362, 123, 263,
614, 362, 4, 385, 362, 123, 377, 96, 386, 452,
615, 4, 300, 29, 417, 166, 453, 82, 354, 904,
378, 362, 300, 300, 360, 455, 6, 8, 9, 31,
32, 35, 36, 49, 175, 184, 218, 267, 315, 361,
957, 958, 962, 963, 964, 965, 968, 969, 977, 979,
981, 982, 957, 362, 20, 380, 432, 387, 362, 362,
300, 213, 457, 31, 31, 965, 968, 9, 214, 943,
364, 219, 188, 238, 950, 616, 362, 94, 192, 1,
236, 314, 316, 388, 1, 164, 418, 419, 454, 362,
300, 281, 459, 364, 958, 958, 980, 981, 114, 621,
379, 265, 381, 381, 362, 362, 362, 362, 200, 420,
1, 543, 456, 362, 300, 297, 518, 959, 367, 958,
983, 984, 362, 617, 382, 390, 389, 1, 50, 85,
106, 107, 113, 121, 395, 396, 397, 398, 400, 403,
404, 405, 406, 412, 303, 421, 422, 362, 163, 298,
612, 458, 362, 300, 908, 909, 958, 954, 958, 365,
366, 942, 35, 36, 622, 1, 9, 362, 618, 619,
632, 633, 63, 109, 110, 196, 302, 383, 5, 5,
5, 5, 309, 399, 432, 432, 321, 362, 397, 5,
407, 244, 430, 422, 224, 296, 437, 438, 439, 440,
442, 544, 547, 551, 969, 985, 613, 460, 362, 365,
943, 365, 984, 958, 958, 1, 9, 627, 632, 620,
300, 362, 363, 634, 27, 28, 30, 43, 45, 73,
76, 77, 81, 86, 95, 100, 115, 120, 122, 157,
159, 176, 179, 180, 186, 191, 193, 195, 220, 223,
225, 243, 254, 270, 285, 286, 290, 299, 308, 311,
320, 324, 325, 326, 331, 332, 333, 345, 346, 636,
637, 638, 639, 643, 644, 663, 694, 695, 696, 697,
698, 699, 700, 701, 706, 707, 711, 724, 725, 730,
733, 737, 740, 743, 746, 747, 748, 749, 754, 755,
756, 766, 770, 776, 778, 795, 797, 802, 805, 808,
812, 815, 822, 825, 830, 831, 833, 844, 850, 852,
885, 362, 362, 362, 362, 362, 265, 391, 359, 394,
952, 432, 432, 432, 5, 93, 432, 432, 5, 167,
971, 166, 271, 311, 312, 441, 362, 439, 5, 5,
970, 971, 551, 269, 461, 519, 909, 623, 628, 362,
362, 779, 977, 977, 977, 977, 104, 734, 835, 958,
816, 958, 49, 958, 826, 771, 772, 977, 731, 834,
977, 977, 757, 958, 744, 958, 645, 253, 265, 977,
19, 955, 7, 42, 364, 897, 931, 958, 975, 957,
977, 977, 977, 104, 207, 958, 741, 958, 1, 160,
194, 199, 248, 767, 768, 9, 31, 911, 924, 928,
929, 952, 958, 986, 339, 339, 777, 977, 977, 8,
49, 671, 972, 1, 46, 450, 845, 846, 849, 975,
979, 8, 972, 977, 810, 977, 31, 32, 295, 832,
1, 880, 881, 958, 104, 738, 835, 958, 958, 977,
977, 977, 362, 637, 127, 640, 89, 392, 393, 362,
362, 112, 226, 318, 319, 413, 414, 415, 963, 32,
401, 402, 32, 5, 5, 423, 330, 446, 59, 447,
545, 548, 552, 462, 520, 1, 128, 624, 625, 627,
633, 1, 353, 629, 143, 793, 228, 262, 780, 173,
799, 173, 796, 173, 764, 835, 130, 736, 19, 735,
958, 943, 74, 75, 821, 823, 958, 943, 274, 344,
773, 774, 775, 952, 134, 732, 18, 977, 294, 836,
271, 947, 350, 758, 764, 943, 137, 745, 72, 197,
648, 649, 9, 31, 813, 814, 986, 364, 931, 897,
931, 18, 20, 35, 36, 37, 38, 39, 42, 51,
52, 53, 227, 234, 261, 361, 936, 937, 938, 939,
941, 40, 41, 664, 280, 726, 103, 329, 887, 888,
241, 713, 715, 953, 958, 978, 238, 19, 140, 742,
72, 768, 769, 977, 950, 950, 347, 357, 142, 635,
636, 334, 336, 22, 923, 144, 794, 947, 799, 675,
972, 146, 693, 672, 238, 517, 979, 19, 124, 348,
979, 714, 716, 953, 713, 42, 198, 230, 873, 874,
876, 878, 202, 197, 943, 116, 835, 149, 739, 173,
958, 116, 854, 641, 139, 669, 306, 222, 415, 22,
56, 416, 22, 402, 408, 424, 98, 608, 171, 448,
579, 580, 553, 5, 521, 985, 626, 114, 636, 48,
947, 958, 48, 66, 800, 930, 958, 10, 11, 12,
13, 34, 194, 62, 91, 129, 211, 260, 753, 761,
762, 763, 765, 952, 953, 19, 834, 958, 977, 177,
943, 958, 132, 824, 354, 899, 772, 448, 448, 24,
187, 215, 364, 897, 836, 943, 806, 97, 322, 323,
759, 136, 760, 958, 958, 834, 958, 56, 646, 162,
341, 651, 897, 931, 118, 214, 986, 976, 365, 365,
19, 23, 946, 42, 939, 897, 897, 897, 897, 897,
432, 932, 40, 934, 933, 335, 670, 51, 54, 55,
234, 235, 727, 728, 729, 961, 963, 977, 889, 886,
702, 715, 26, 19, 958, 956, 978, 834, 958, 769,
943, 9, 9, 31, 914, 977, 930, 912, 986, 924,
958, 197, 781, 803, 693, 676, 357, 678, 849, 72,
72, 19, 712, 716, 26, 708, 202, 944, 809, 876,
198, 432, 977, 881, 72, 951, 173, 834, 958, 951,
197, 665, 666, 667, 432, 963, 963, 56, 32, 241,
409, 1, 44, 57, 61, 166, 246, 271, 276, 284,
362, 425, 426, 427, 5, 443, 444, 1, 5, 449,
70, 88, 108, 203, 210, 271, 281, 282, 355, 362,
432, 581, 583, 584, 585, 586, 587, 588, 589, 590,
595, 362, 582, 584, 587, 68, 201, 237, 257, 273,
279, 309, 328, 352, 355, 356, 362, 432, 537, 540,
554, 557, 561, 568, 570, 571, 574, 605, 463, 970,
362, 362, 362, 156, 158, 317, 630, 781, 798, 47,
945, 753, 32, 753, 753, 753, 321, 31, 979, 232,
512, 512, 897, 64, 65, 68, 69, 155, 172, 174,
183, 201, 216, 217, 283, 288, 301, 343, 351, 432,
536, 537, 952, 158, 834, 42, 837, 953, 834, 899,
900, 827, 278, 278, 289, 215, 897, 837, 943, 873,
760, 952, 177, 837, 177, 650, 358, 652, 953, 986,
983, 939, 40, 939, 897, 898, 939, 42, 897, 931,
935, 940, 941, 935, 665, 728, 108, 611, 19, 977,
280, 891, 392, 720, 944, 978, 19, 943, 837, 177,
977, 931, 173, 928, 347, 357, 336, 977, 42, 62,
128, 783, 786, 873, 62, 679, 948, 979, 673, 231,
239, 241, 341, 848, 960, 968, 977, 966, 967, 969,
979, 966, 849, 719, 952, 944, 719, 875, 147, 811,
944, 42, 940, 879, 952, 1, 310, 882, 958, 834,
837, 177, 49, 855, 861, 856, 857, 977, 642, 635,
228, 5, 963, 321, 411, 239, 410, 222, 434, 271,
955, 944, 944, 31, 321, 432, 260, 445, 444, 5,
608, 432, 271, 272, 603, 603, 432, 432, 608, 432,
21, 433, 238, 546, 161, 178, 5, 549, 358, 607,
206, 293, 559, 985, 575, 555, 558, 432, 559, 432,
433, 161, 178, 205, 340, 572, 573, 962, 432, 465,
522, 156, 158, 263, 775, 952, 873, 251, 958, 753,
753, 897, 897, 985, 211, 297, 607, 153, 154, 985,
206, 293, 24, 67, 229, 349, 750, 836, 953, 310,
837, 177, 287, 902, 903, 828, 135, 807, 24, 155,
834, 977, 834, 977, 651, 653, 138, 358, 362, 647,
979, 365, 939, 941, 897, 40, 72, 961, 171, 892,
703, 717, 977, 978, 978, 834, 915, 958, 913, 920,
977, 948, 786, 787, 42, 145, 804, 677, 128, 679,
231, 847, 979, 720, 125, 718, 972, 720, 635, 877,
977, 851, 259, 836, 834, 40, 958, 879, 943, 117,
858, 669, 304, 432, 411, 432, 944, 1, 5, 33,
161, 428, 968, 973, 432, 432, 59, 60, 431, 432,
5, 9, 189, 211, 276, 307, 435, 987, 985, 985,
5, 432, 433, 5, 596, 240, 317, 604, 5, 968,
974, 357, 985, 165, 550, 551, 550, 361, 19, 336,
606, 432, 6, 8, 556, 979, 305, 538, 538, 942,
22, 16, 120, 259, 569, 87, 101, 102, 251, 362,
432, 466, 467, 468, 472, 523, 953, 202, 782, 151,
801, 211, 212, 470, 471, 361, 47, 979, 837, 310,
156, 839, 979, 979, 817, 901, 864, 953, 47, 153,
154, 297, 837, 836, 837, 836, 654, 655, 941, 958,
895, 890, 49, 84, 169, 205, 340, 894, 354, 705,
977, 837, 928, 951, 142, 931, 173, 786, 42, 635,
948, 358, 686, 687, 680, 674, 188, 949, 972, 709,
635, 862, 863, 977, 837, 837, 861, 329, 860, 857,
949, 105, 859, 5, 432, 126, 268, 307, 436, 987,
432, 973, 973, 5, 5, 5, 307, 19, 598, 5,
471, 949, 19, 602, 432, 551, 985, 562, 576, 22,
560, 83, 539, 573, 962, 962, 432, 433, 208, 209,
473, 464, 178, 168, 477, 19, 91, 173, 211, 310,
354, 362, 530, 571, 574, 952, 631, 768, 957, 432,
42, 198, 783, 788, 789, 791, 751, 839, 840, 42,
818, 905, 906, 951, 958, 829, 158, 249, 866, 277,
277, 247, 658, 659, 656, 48, 66, 49, 84, 205,
72, 893, 723, 977, 704, 916, 958, 958, 948, 785,
688, 687, 635, 358, 681, 682, 245, 610, 194, 354,
721, 148, 883, 869, 953, 958, 949, 853, 977, 949,
5, 5, 985, 84, 272, 597, 591, 952, 310, 841,
967, 84, 609, 973, 606, 26, 565, 566, 14, 577,
979, 20, 21, 985, 479, 480, 985, 478, 533, 525,
532, 524, 529, 531, 962, 64, 65, 68, 69, 90,
155, 172, 174, 183, 201, 216, 217, 283, 288, 301,
343, 351, 535, 537, 952, 362, 977, 198, 944, 42,
791, 635, 635, 953, 819, 943, 99, 275, 355, 907,
133, 843, 865, 977, 977, 56, 662, 665, 42, 58,
162, 341, 661, 668, 658, 192, 896, 896, 961, 895,
961, 961, 961, 977, 177, 248, 722, 142, 347, 951,
784, 786, 691, 979, 685, 960, 682, 263, 723, 710,
871, 878, 249, 977, 862, 977, 429, 952, 62, 212,
592, 594, 170, 173, 600, 601, 118, 944, 189, 15,
578, 470, 480, 970, 977, 977, 232, 542, 960, 542,
960, 960, 527, 211, 297, 607, 528, 153, 154, 526,
206, 293, 24, 67, 229, 349, 944, 790, 752, 310,
864, 906, 958, 635, 837, 837, 660, 897, 975, 657,
961, 961, 895, 895, 895, 72, 723, 263, 917, 958,
786, 41, 689, 432, 683, 938, 432, 722, 953, 870,
150, 884, 125, 62, 593, 594, 338, 948, 602, 967,
563, 432, 951, 182, 469, 481, 432, 35, 36, 221,
258, 541, 19, 534, 541, 960, 361, 960, 960, 47,
792, 635, 753, 838, 42, 867, 661, 22, 662, 961,
432, 931, 347, 692, 228, 635, 690, 18, 228, 635,
684, 960, 910, 986, 249, 635, 71, 974, 974, 609,
953, 5, 567, 971, 432, 169, 476, 68, 91, 92,
120, 181, 201, 205, 211, 212, 228, 257, 309, 313,
327, 340, 342, 352, 355, 482, 483, 484, 490, 491,
493, 494, 495, 496, 497, 498, 499, 502, 507, 508,
513, 960, 977, 960, 635, 839, 953, 820, 897, 895,
910, 918, 921, 691, 304, 955, 304, 923, 872, 974,
118, 599, 958, 971, 985, 119, 204, 475, 607, 78,
206, 232, 233, 293, 500, 500, 190, 509, 293, 514,
20, 21, 232, 233, 501, 433, 181, 492, 432, 503,
504, 432, 432, 432, 362, 483, 258, 985, 985, 305,
158, 131, 842, 48, 925, 931, 968, 979, 635, 953,
564, 432, 119, 170, 474, 361, 500, 500, 501, 433,
432, 433, 432, 432, 513, 432, 957, 79, 80, 101,
111, 119, 251, 255, 256, 281, 291, 292, 485, 120,
968, 985, 228, 241, 539, 868, 926, 977, 928, 922,
5, 566, 985, 432, 432, 432, 433, 228, 258, 516,
985, 576, 305, 252, 506, 958, 505, 489, 488, 170,
182, 170, 182, 170, 182, 251, 228, 635, 48, 173,
919, 925, 985, 985, 251, 985, 539, 350, 510, 168,
515, 958, 515, 487, 486, 251, 926, 958, 142, 957,
285, 511, 515, 515, 48, 951, 168, 958, 926, 958,
48, 347, 926, 927, 48, 931, 926, 48, 926
};
#define yyerrok (yyerrstatus = 0)
#define yyclearin (yychar = YYEMPTY)
#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.
Once GCC version 2 has supplanted version 1, this can go. However,
YYFAIL appears to be in use. Nevertheless, it is formally deprecated
in Bison 2.4.2's NEWS entry, where a plan to phase it out is
discussed. */
#define YYFAIL goto yyerrlab
#if defined YYFAIL
/* This is here to suppress warnings from the GCC cpp's
-Wunused-macros. Normally we don't worry about that warning, but
some users do, and we want to make it easy for users to remove
YYFAIL uses, which will produce warnings from Bison 2.5. */
#endif
#define YYRECOVERING() (!!yyerrstatus)
#define YYBACKUP(Token, Value) \
do \
if (yychar == YYEMPTY && yylen == 1) \
{ \
yychar = (Token); \
yylval = (Value); \
yytoken = YYTRANSLATE (yychar); \
YYPOPSTACK (1); \
goto yybackup; \
} \
else \
{ \
yyerror (YY_("syntax error: cannot back up")); \
YYERROR; \
} \
while (YYID (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))
#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 defined YYLTYPE_IS_TRIVIAL && 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 YYLEX_PARAM
# define YYLEX yylex (YYLEX_PARAM)
#else
# define YYLEX yylex ()
#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
static void
yy_symbol_value_print (yyoutput, yytype, yyvaluep)
FILE *yyoutput;
int yytype;
YYSTYPE const * const yyvaluep;
#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
{
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, ")");
}
/*------------------------------------------------------------------.
| yy_stack_print -- Print the state stack from its BOTTOM up to its |
| TOP (included). |
`------------------------------------------------------------------*/
#if (defined __STDC__ || defined __C99__FUNC__ \
|| defined __cplusplus || defined _MSC_VER)
static void
yy_stack_print (yytype_int16 *yybottom, yytype_int16 *yytop)
#else
static void
yy_stack_print (yybottom, yytop)
yytype_int16 *yybottom;
yytype_int16 *yytop;
#endif
{
YYFPRINTF (stderr, "Stack now");
for (; yybottom <= yytop; yybottom++)
{
int yybot = *yybottom;
YYFPRINTF (stderr, " %d", yybot);
}
YYFPRINTF (stderr, "\n");
}
# define YY_STACK_PRINT(Bottom, Top) \
do { \
if (yydebug) \
yy_stack_print ((Bottom), (Top)); \
} while (YYID (0))
/*------------------------------------------------.
| 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;
#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++)
{
YYFPRINTF (stderr, " $%d = ", yyi + 1);
yy_symbol_print (stderr, yyrhs[yyprhs[yyrule] + yyi],
&(yyvsp[(yyi + 1) - (yynrhs)])
);
YYFPRINTF (stderr, "\n");
}
}
# define YY_REDUCE_PRINT(Rule) \
do { \
if (yydebug) \
yy_reduce_print (yyvsp, Rule); \
} while (YYID (0))
/* 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 */
/* YYINITDEPTH -- initial size of the parser's stacks. */
#ifndef YYINITDEPTH
# define YYINITDEPTH 200
#endif
/* YYMAXDEPTH -- maximum size the stacks can grow to (effective only
if the built-in stack extension method is used).
Do not make this value too large; the results are undefined if
YYSTACK_ALLOC_MAXIMUM < YYSTACK_BYTES (YYMAXDEPTH)
evaluated with infinite-precision integer arithmetic. */
#ifndef YYMAXDEPTH
# 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
{
char *yyd = yydest;
const char *yys = yysrc;
while ((*yyd++ = *yys++) != '\0')
continue;
return yyd - 1;
}
# 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);
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)
{
int yyn = yypact[yystate];
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;
}
}
#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;
}
}
/* Prevent warnings from -Wmissing-prototypes. */
#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 */
/* The lookahead symbol. */
int yychar;
/* The semantic value of the lookahead symbol. */
YYSTYPE yylval;
/* Number of syntax errors so far. */
int yynerrs;
/*-------------------------.
| yyparse or yypush_parse. |
`-------------------------*/
#ifdef YYPARSE_PARAM
#if (defined __STDC__ || defined __C99__FUNC__ \
|| defined __cplusplus || defined _MSC_VER)
int
yyparse (void *YYPARSE_PARAM)
#else
int
yyparse (YYPARSE_PARAM)
void *YYPARSE_PARAM;
#endif
#else /* ! YYPARSE_PARAM */
#if (defined __STDC__ || defined __C99__FUNC__ \
|| defined __cplusplus || defined _MSC_VER)
int
yyparse (void)
#else
int
yyparse ()
#endif
#endif
{
int yystate;
/* Number of tokens to shift before error messages enabled. */
int yyerrstatus;
/* The stacks and their tools:
`yyss': related to states.
`yyvs': related to semantic values.
Refer to the stacks thru separate pointers, to allow yyoverflow
to reallocate them elsewhere. */
/* The state stack. */
yytype_int16 yyssa[YYINITDEPTH];
yytype_int16 *yyss;
yytype_int16 *yyssp;
/* The semantic value stack. */
YYSTYPE yyvsa[YYINITDEPTH];
YYSTYPE *yyvs;
YYSTYPE *yyvsp;
YYSIZE_T yystacksize;
int yyn;
int yyresult;
/* Lookahead token as an internal (translated) token number. */
int yytoken;
/* The variables used to return semantic value and location from the
action routines. */
YYSTYPE yyval;
#if YYERROR_VERBOSE
/* Buffer for error messages, and its allocated size. */
char yymsgbuf[128];
char *yymsg = yymsgbuf;
YYSIZE_T yymsg_alloc = sizeof yymsgbuf;
#endif
#define YYPOPSTACK(N) (yyvsp -= (N), yyssp -= (N))
/* The number of symbols on the RHS of the reduced rule.
Keep to zero when no symbol should be popped. */
int yylen = 0;
yytoken = 0;
yyss = yyssa;
yyvs = yyvsa;
yystacksize = YYINITDEPTH;
YYDPRINTF ((stderr, "Starting parse\n"));
yystate = 0;
yyerrstatus = 0;
yynerrs = 0;
yychar = YYEMPTY; /* Cause a token to be read. */
/* Initialize stack pointers.
Waste one element of value and location stack
so that they stay on the same level as the state stack.
The wasted elements are never initialized. */
yyssp = yyss;
yyvsp = yyvs;
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;
if (yyss + yystacksize - 1 <= yyssp)
{
/* Get the current used size of the three stacks, in elements. */
YYSIZE_T yysize = 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;
}
#else /* no yyoverflow */
# ifndef YYSTACK_RELOCATE
goto yyexhaustedlab;
# else
/* Extend the stack our own way. */
if (YYMAXDEPTH <= yystacksize)
goto yyexhaustedlab;
yystacksize *= 2;
if (YYMAXDEPTH < yystacksize)
yystacksize = YYMAXDEPTH;
{
yytype_int16 *yyss1 = yyss;
union yyalloc *yyptr =
(union yyalloc *) YYSTACK_ALLOC (YYSTACK_BYTES (yystacksize));
if (! yyptr)
goto yyexhaustedlab;
YYSTACK_RELOCATE (yyss_alloc, yyss);
YYSTACK_RELOCATE (yyvs_alloc, yyvs);
# undef YYSTACK_RELOCATE
if (yyss1 != yyssa)
YYSTACK_FREE (yyss1);
}
# endif
#endif /* no yyoverflow */
yyssp = yyss + yysize - 1;
yyvsp = yyvs + yysize - 1;
YYDPRINTF ((stderr, "Stack size increased to %lu\n",
(unsigned long int) yystacksize));
if (yyss + yystacksize - 1 <= yyssp)
YYABORT;
}
YYDPRINTF ((stderr, "Entering state %d\n", yystate));
if (yystate == YYFINAL)
YYACCEPT;
goto yybackup;
/*-----------.
| yybackup. |
`-----------*/
yybackup:
/* Do appropriate processing given the current state. Read a
lookahead token if we need one and don't already have one. */
/* First try to decide what to do without reference to lookahead token. */
yyn = yypact[yystate];
if (yyn == YYPACT_NINF)
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. */
if (yychar == YYEMPTY)
{
YYDPRINTF ((stderr, "Reading a token: "));
yychar = YYLEX;
}
if (yychar <= YYEOF)
{
yychar = yytoken = YYEOF;
YYDPRINTF ((stderr, "Now at end of input.\n"));
}
else
{
yytoken = YYTRANSLATE (yychar);
YY_SYMBOL_PRINT ("Next token is", yytoken, &yylval, &yylloc);
}
/* 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)
goto yydefault;
yyn = yytable[yyn];
if (yyn <= 0)
{
if (yyn == 0 || yyn == YYTABLE_NINF)
goto yyerrlab;
yyn = -yyn;
goto yyreduce;
}
/* Count tokens shifted since error; after three, turn off error
status. */
if (yyerrstatus)
yyerrstatus--;
/* Shift the lookahead token. */
YY_SYMBOL_PRINT ("Shifting", yytoken, &yylval, &yylloc);
/* Discard the shifted token. */
yychar = YYEMPTY;
yystate = yyn;
*++yyvsp = yylval;
goto yynewstate;
/*-----------------------------------------------------------.
| yydefault -- do the default action for the current state. |
`-----------------------------------------------------------*/
yydefault:
yyn = yydefact[yystate];
if (yyn == 0)
goto yyerrlab;
goto yyreduce;
/*-----------------------------.
| yyreduce -- Do a reduction. |
`-----------------------------*/
yyreduce:
/* yyn is the number of a rule to reduce with. */
yylen = yyr2[yyn];
/* If YYLEN is nonzero, implement the default value of the action:
`$$ = $1'.
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];
YY_REDUCE_PRINT (yyn);
switch (yyn)
{
case 2:
/* Line 1464 of yacc.c */
#line 309 "htcobol.y"
{ gen_main_rtn(); ;}
break;
case 3:
/* Line 1464 of yacc.c */
#line 312 "htcobol.y"
{ pgm_segment++; (yyval.ival)=1; ;}
break;
case 4:
/* Line 1464 of yacc.c */
#line 313 "htcobol.y"
{ (yyval.ival)=1 ; ;}
break;
case 5:
/* Line 1464 of yacc.c */
#line 314 "htcobol.y"
{ (yyval.ival)=1 ; ;}
break;
case 6:
/* Line 1464 of yacc.c */
#line 323 "htcobol.y"
{ pgm_segment++ ; (yyval.ival) = 1; ;}
break;
case 7:
/* Line 1464 of yacc.c */
#line 324 "htcobol.y"
{ pgm_segment++ ; nested_flag = 1; ;}
break;
case 8:
/* Line 1464 of yacc.c */
#line 324 "htcobol.y"
{ (yyval.ival) = 1; ;}
break;
case 9:
/* Line 1464 of yacc.c */
#line 325 "htcobol.y"
{pgm_segment++ ; nested_flag = 1; (yyval.ival) = 1; ;}
break;
case 10:
/* Line 1464 of yacc.c */
#line 337 "htcobol.y"
{ clear_symtab(); clear_offsets();
curr_division= CDIV_IDENT; ;}
break;
case 11:
/* Line 1464 of yacc.c */
#line 340 "htcobol.y"
{ curr_division = CDIV_COMMENT; ;}
break;
case 13:
/* Line 1464 of yacc.c */
#line 356 "htcobol.y"
{
curr_division = CDIV_IDENT;
;}
break;
case 14:
/* Line 1464 of yacc.c */
#line 360 "htcobol.y"
{
curr_division = CINITIAL;
if (pgm_header((yyvsp[(7) - (7)].str)) != 0) {
yyerror("Invalid character(s) in PROGRAM-ID name");
/* YYABORT; */
}
;}
break;
case 15:
/* Line 1464 of yacc.c */
#line 368 "htcobol.y"
{
define_special_fields();
;}
break;
case 18:
/* Line 1464 of yacc.c */
#line 375 "htcobol.y"
{ initial_flag=1; ;}
break;
case 19:
/* Line 1464 of yacc.c */
#line 376 "htcobol.y"
{ UNIMPLEMENTED("PROGRAM-ID ... COMMON clause") ;}
break;
case 21:
/* Line 1464 of yacc.c */
#line 379 "htcobol.y"
{ ;}
break;
case 24:
/* Line 1464 of yacc.c */
#line 386 "htcobol.y"
{ curr_division = CDIV_COMMENT1; ;}
break;
case 25:
/* Line 1464 of yacc.c */
#line 387 "htcobol.y"
{ curr_division = CDIV_COMMENT1; ;}
break;
case 26:
/* Line 1464 of yacc.c */
#line 388 "htcobol.y"
{ curr_division = CDIV_COMMENT1; ;}
break;
case 27:
/* Line 1464 of yacc.c */
#line 389 "htcobol.y"
{ curr_division = CDIV_COMMENT1; ;}
break;
case 28:
/* Line 1464 of yacc.c */
#line 390 "htcobol.y"
{ curr_division = CDIV_COMMENT1; ;}
break;
case 29:
/* Line 1464 of yacc.c */
#line 397 "htcobol.y"
{
curr_division = CDIV_ENVIR;
;}
break;
case 30:
/* Line 1464 of yacc.c */
#line 402 "htcobol.y"
{
curr_division = CINITIAL;
;}
break;
case 34:
/* Line 1464 of yacc.c */
#line 415 "htcobol.y"
{ ;}
break;
case 35:
/* Line 1464 of yacc.c */
#line 416 "htcobol.y"
{ ;}
break;
case 36:
/* Line 1464 of yacc.c */
#line 420 "htcobol.y"
{ envdiv_bypass_save_sw=1; ;}
break;
case 37:
/* Line 1464 of yacc.c */
#line 422 "htcobol.y"
{ envdiv_bypass_save_sw=0; ;}
break;
case 38:
/* Line 1464 of yacc.c */
#line 424 "htcobol.y"
{ envdiv_bypass_save_sw=1; ;}
break;
case 39:
/* Line 1464 of yacc.c */
#line 426 "htcobol.y"
{ envdiv_bypass_save_sw=0; ;}
break;
case 41:
/* Line 1464 of yacc.c */
#line 428 "htcobol.y"
{ yyerror("invalid format in CONFIGURATION SECTION"); ;}
break;
case 45:
/* Line 1464 of yacc.c */
#line 437 "htcobol.y"
{ ;}
break;
case 46:
/* Line 1464 of yacc.c */
#line 438 "htcobol.y"
{ ;}
break;
case 47:
/* Line 1464 of yacc.c */
#line 441 "htcobol.y"
{ stabs_on_sw = 1; ;}
break;
case 48:
/* Line 1464 of yacc.c */
#line 442 "htcobol.y"
{ ;}
break;
case 51:
/* Line 1464 of yacc.c */
#line 447 "htcobol.y"
{ yyerror("invalid format in SPECIAL-NAMES clause");;}
break;
case 61:
/* Line 1464 of yacc.c */
#line 467 "htcobol.y"
{
currency_symbol = (yyvsp[(4) - (4)].lval)->name[0];
;}
break;
case 64:
/* Line 1464 of yacc.c */
#line 476 "htcobol.y"
{;}
break;
case 65:
/* Line 1464 of yacc.c */
#line 479 "htcobol.y"
{;}
break;
case 66:
/* Line 1464 of yacc.c */
#line 480 "htcobol.y"
{;}
break;
case 67:
/* Line 1464 of yacc.c */
#line 483 "htcobol.y"
{;}
break;
case 68:
/* Line 1464 of yacc.c */
#line 484 "htcobol.y"
{;}
break;
case 69:
/* Line 1464 of yacc.c */
#line 488 "htcobol.y"
{
decimal_comma=1; ;}
break;
case 70:
/* Line 1464 of yacc.c */
#line 493 "htcobol.y"
{ screen_status_field=(yyvsp[(4) - (4)].sval); ;}
break;
case 71:
/* Line 1464 of yacc.c */
#line 497 "htcobol.y"
{ cursor_field=(yyvsp[(3) - (3)].sval); ;}
break;
case 74:
/* Line 1464 of yacc.c */
#line 504 "htcobol.y"
{if ((yyvsp[(1) - (3)].sval)->name[0] != 'S' || (yyvsp[(1) - (3)].sval)->name[1] != 'W')
yyerror("Invalid switch name");
define_switch_field((yyvsp[(3) - (3)].sval), (yyvsp[(1) - (3)].sval));;}
break;
case 75:
/* Line 1464 of yacc.c */
#line 508 "htcobol.y"
{ close_fields();;}
break;
case 76:
/* Line 1464 of yacc.c */
#line 511 "htcobol.y"
{save_switch_value((yyvsp[(4) - (4)].sval), 1);;}
break;
case 78:
/* Line 1464 of yacc.c */
#line 515 "htcobol.y"
{save_switch_value((yyvsp[(4) - (4)].sval), 0);;}
break;
case 82:
/* Line 1464 of yacc.c */
#line 524 "htcobol.y"
{
(yyvsp[(2) - (4)].sval)->defined=1;
UNIMPLEMENTED("Alphabet clause")
;}
break;
case 83:
/* Line 1464 of yacc.c */
#line 530 "htcobol.y"
{ ;}
break;
case 84:
/* Line 1464 of yacc.c */
#line 531 "htcobol.y"
{ ;}
break;
case 85:
/* Line 1464 of yacc.c */
#line 532 "htcobol.y"
{ ;}
break;
case 86:
/* Line 1464 of yacc.c */
#line 533 "htcobol.y"
{ ;}
break;
case 89:
/* Line 1464 of yacc.c */
#line 540 "htcobol.y"
{ ;}
break;
case 90:
/* Line 1464 of yacc.c */
#line 541 "htcobol.y"
{ ;}
break;
case 91:
/* Line 1464 of yacc.c */
#line 542 "htcobol.y"
{ ;}
break;
case 94:
/* Line 1464 of yacc.c */
#line 552 "htcobol.y"
{ ;}
break;
case 96:
/* Line 1464 of yacc.c */
#line 556 "htcobol.y"
{ ;}
break;
case 97:
/* Line 1464 of yacc.c */
#line 557 "htcobol.y"
{ yyerror("INPUT-OUTPUT SECTION format wrong"); ;}
break;
case 98:
/* Line 1464 of yacc.c */
#line 560 "htcobol.y"
{ ;}
break;
case 100:
/* Line 1464 of yacc.c */
#line 563 "htcobol.y"
{ ;}
break;
case 103:
/* Line 1464 of yacc.c */
#line 576 "htcobol.y"
{
(yyvsp[(3) - (3)].sval)->type='F'; /* mark as file variable */
curr_file=(yyvsp[(3) - (3)].sval);
(yyvsp[(3) - (3)].sval)->pic=0; /* suppose not indexed yet */
(yyvsp[(3) - (3)].sval)->defined=1;
(yyvsp[(3) - (3)].sval)->parent=NULL; /* assume no STATUS yet
this is "file status" var in files */
(yyvsp[(3) - (3)].sval)->organization = 2;
(yyvsp[(3) - (3)].sval)->access_mode = 1;
(yyvsp[(3) - (3)].sval)->times=-1;
(yyvsp[(3) - (3)].sval)->alternate=NULL; /* reset alternate key list */
(yyvsp[(3) - (3)].sval)->flags.optional=(yyvsp[(2) - (3)].ival); /* according to keyword */
(yyvsp[(3) - (3)].sval)->refmod_redef.declarative=NULL; /* no declarative yet */
;}
break;
case 104:
/* Line 1464 of yacc.c */
#line 591 "htcobol.y"
{
if ((curr_file->organization==ORG_INDEXED) &&
!(curr_file->ix_desc)) {
yyerror("indexed file must have a record key");
YYABORT;
}
;}
break;
case 107:
/* Line 1464 of yacc.c */
#line 605 "htcobol.y"
{ curr_file->organization=(yyvsp[(3) - (3)].ival); ;}
break;
case 108:
/* Line 1464 of yacc.c */
#line 606 "htcobol.y"
{ curr_file->filenamevar=(yyvsp[(3) - (3)].sval);;}
break;
case 109:
/* Line 1464 of yacc.c */
#line 608 "htcobol.y"
{
/*{ curr_file->access_mode=$4; }*/
if (curr_file->access_mode < 5) {
curr_file->access_mode=(yyvsp[(4) - (4)].ival);
}
else {
curr_file->access_mode = (yyvsp[(4) - (4)].ival) + 5;
}
;}
break;
case 110:
/* Line 1464 of yacc.c */
#line 617 "htcobol.y"
{ curr_file->parent=(yyvsp[(4) - (4)].sval); ;}
break;
case 111:
/* Line 1464 of yacc.c */
#line 618 "htcobol.y"
{ curr_file->ix_desc=(yyvsp[(4) - (4)].sval); ;}
break;
case 112:
/* Line 1464 of yacc.c */
#line 619 "htcobol.y"
{ curr_file->ix_desc=(yyvsp[(4) - (4)].sval); ;}
break;
case 113:
/* Line 1464 of yacc.c */
#line 621 "htcobol.y"
{ add_alternate_key((yyvsp[(5) - (6)].sval),(yyvsp[(6) - (6)].ival)); ;}
break;
case 115:
/* Line 1464 of yacc.c */
#line 623 "htcobol.y"
{ yyerror("invalid clause in select"); ;}
break;
case 118:
/* Line 1464 of yacc.c */
#line 630 "htcobol.y"
{ ;}
break;
case 120:
/* Line 1464 of yacc.c */
#line 633 "htcobol.y"
{ (yyval.sval)=NULL; ;}
break;
case 121:
/* Line 1464 of yacc.c */
#line 634 "htcobol.y"
{ (yyval.sval)=(yyvsp[(1) - (1)].sval); ;}
break;
case 122:
/* Line 1464 of yacc.c */
#line 635 "htcobol.y"
{ (yyval.sval)=(yyvsp[(2) - (2)].sval); ;}
break;
case 123:
/* Line 1464 of yacc.c */
#line 637 "htcobol.y"
{
curr_file->access_mode = curr_file->access_mode + 5;
(yyval.sval)=(yyvsp[(2) - (2)].sval);
;}
break;
case 124:
/* Line 1464 of yacc.c */
#line 641 "htcobol.y"
{ yyerror("Invalid ASSIGN clause in SELECT statement"); ;}
break;
case 125:
/* Line 1464 of yacc.c */
#line 644 "htcobol.y"
{ (yyval.ival)=1; ;}
break;
case 126:
/* Line 1464 of yacc.c */
#line 645 "htcobol.y"
{ (yyval.ival)=0; ;}
break;
case 127:
/* Line 1464 of yacc.c */
#line 648 "htcobol.y"
{ (yyval.ival)=1; ;}
break;
case 128:
/* Line 1464 of yacc.c */
#line 649 "htcobol.y"
{ (yyval.ival)=0; ;}
break;
case 132:
/* Line 1464 of yacc.c */
#line 656 "htcobol.y"
{ ;}
break;
case 134:
/* Line 1464 of yacc.c */
#line 660 "htcobol.y"
{ ;}
break;
case 138:
/* Line 1464 of yacc.c */
#line 668 "htcobol.y"
{ (yyval.ival)=1; ;}
break;
case 139:
/* Line 1464 of yacc.c */
#line 669 "htcobol.y"
{ (yyval.ival)=2; ;}
break;
case 140:
/* Line 1464 of yacc.c */
#line 670 "htcobol.y"
{ (yyval.ival)=3; ;}
break;
case 141:
/* Line 1464 of yacc.c */
#line 671 "htcobol.y"
{ (yyval.ival)=4; ;}
break;
case 142:
/* Line 1464 of yacc.c */
#line 672 "htcobol.y"
{ yyerror("invalid option, %s",(yyvsp[(1) - (1)].sval)->name); ;}
break;
case 143:
/* Line 1464 of yacc.c */
#line 675 "htcobol.y"
{ (yyval.ival)=1; ;}
break;
case 144:
/* Line 1464 of yacc.c */
#line 676 "htcobol.y"
{ (yyval.ival)=2; ;}
break;
case 145:
/* Line 1464 of yacc.c */
#line 677 "htcobol.y"
{ (yyval.ival)=3; ;}
break;
case 146:
/* Line 1464 of yacc.c */
#line 679 "htcobol.y"
{ yyerror("invalid access option, %s", (yyvsp[(1) - (1)].sval)->name); ;}
break;
case 148:
/* Line 1464 of yacc.c */
#line 684 "htcobol.y"
{ UNIMPLEMENTED("I-O-CONTROL paragraph") ;}
break;
case 155:
/* Line 1464 of yacc.c */
#line 699 "htcobol.y"
{ ;}
break;
case 156:
/* Line 1464 of yacc.c */
#line 700 "htcobol.y"
{ ;}
break;
case 157:
/* Line 1464 of yacc.c */
#line 701 "htcobol.y"
{ ;}
break;
case 161:
/* Line 1464 of yacc.c */
#line 711 "htcobol.y"
{ ;}
break;
case 163:
/* Line 1464 of yacc.c */
#line 714 "htcobol.y"
{ ;}
break;
case 170:
/* Line 1464 of yacc.c */
#line 729 "htcobol.y"
{ (yyval.sval) = (yyvsp[(1) - (1)].sval); ;}
break;
case 171:
/* Line 1464 of yacc.c */
#line 730 "htcobol.y"
{ (yyval.sval) = (yyvsp[(2) - (2)].sval); ;}
break;
case 172:
/* Line 1464 of yacc.c */
#line 731 "htcobol.y"
{ yyerror("string expected"); ;}
break;
case 173:
/* Line 1464 of yacc.c */
#line 734 "htcobol.y"
{ (yyval.sval) = (struct sym *)chain_var((yyvsp[(1) - (1)].sval)); ;}
break;
case 174:
/* Line 1464 of yacc.c */
#line 735 "htcobol.y"
{ (yyval.sval) = (struct sym *)chain_var((yyvsp[(2) - (2)].sval)); ;}
break;
case 175:
/* Line 1464 of yacc.c */
#line 736 "htcobol.y"
{ yyerror("variable expected"); ;}
break;
case 176:
/* Line 1464 of yacc.c */
#line 745 "htcobol.y"
{ curr_division = CDIV_DATA; ;}
break;
case 177:
/* Line 1464 of yacc.c */
#line 751 "htcobol.y"
{ curr_division = CINITIAL; ;}
break;
case 179:
/* Line 1464 of yacc.c */
#line 758 "htcobol.y"
{ curr_field=NULL; ;}
break;
case 180:
/* Line 1464 of yacc.c */
#line 759 "htcobol.y"
{ close_fields(); ;}
break;
case 182:
/* Line 1464 of yacc.c */
#line 766 "htcobol.y"
{ curr_field=NULL; ;}
break;
case 183:
/* Line 1464 of yacc.c */
#line 767 "htcobol.y"
{ close_fields(); ;}
break;
case 185:
/* Line 1464 of yacc.c */
#line 774 "htcobol.y"
{ at_linkage=1; curr_field=NULL; has_linkage++; ;}
break;
case 186:
/* Line 1464 of yacc.c */
#line 775 "htcobol.y"
{ close_fields(); at_linkage=0; ;}
break;
case 188:
/* Line 1464 of yacc.c */
#line 791 "htcobol.y"
{ ;}
break;
case 192:
/* Line 1464 of yacc.c */
#line 800 "htcobol.y"
{ /*curr_division = CDIV_FD;*/ ;}
break;
case 193:
/* Line 1464 of yacc.c */
#line 802 "htcobol.y"
{
(yyvsp[(3) - (3)].sval)->type='W';
(yyvsp[(3) - (3)].sval)->picstr = 0;
(yyvsp[(3) - (3)].sval)->parent = 0;
(yyvsp[(3) - (3)].sval)->clone = 0;
(yyvsp[(3) - (3)].sval)->times = -1;
curr_division = CDIV_PROC;
UNIMPLEMENTED("Report Section")
;}
break;
case 194:
/* Line 1464 of yacc.c */
#line 812 "htcobol.y"
{
curr_division = CDIV_DATA;
;}
break;
case 195:
/* Line 1464 of yacc.c */
#line 816 "htcobol.y"
{
/* update_report_field($4); */
/* define_field(1,$4); */
;}
break;
case 198:
/* Line 1464 of yacc.c */
#line 824 "htcobol.y"
{ ;}
break;
case 199:
/* Line 1464 of yacc.c */
#line 825 "htcobol.y"
{ ;}
break;
case 200:
/* Line 1464 of yacc.c */
#line 826 "htcobol.y"
{ ;}
break;
case 201:
/* Line 1464 of yacc.c */
#line 827 "htcobol.y"
{ ;}
break;
case 224:
/* Line 1464 of yacc.c */
#line 876 "htcobol.y"
{ (yyvsp[(2) - (2)].sval)->defined=1; ;}
break;
case 227:
/* Line 1464 of yacc.c */
#line 884 "htcobol.y"
{
if ((yyvsp[(2) - (2)].sval) == NULL) {
(yyvsp[(2) - (2)].sval) = alloc_filler();
picix=piccnt=v_flag=n_flag=decimals=pscale=0;
picture[picix]=0;
}
define_field((yyvsp[(1) - (2)].ival),(yyvsp[(2) - (2)].sval));
curr_division = CDIV_DATA;
;}
break;
case 228:
/* Line 1464 of yacc.c */
#line 894 "htcobol.y"
{
update_report_field((yyvsp[(2) - (5)].sval));
curr_division = CDIV_DATA;
;}
break;
case 231:
/* Line 1464 of yacc.c */
#line 904 "htcobol.y"
{ ;}
break;
case 232:
/* Line 1464 of yacc.c */
#line 905 "htcobol.y"
{ ;}
break;
case 233:
/* Line 1464 of yacc.c */
#line 906 "htcobol.y"
{ ;}
break;
case 234:
/* Line 1464 of yacc.c */
#line 907 "htcobol.y"
{ ;}
break;
case 235:
/* Line 1464 of yacc.c */
#line 908 "htcobol.y"
{ ;}
break;
case 236:
/* Line 1464 of yacc.c */
#line 909 "htcobol.y"
{ ;}
break;
case 237:
/* Line 1464 of yacc.c */
#line 910 "htcobol.y"
{ ;}
break;
case 238:
/* Line 1464 of yacc.c */
#line 911 "htcobol.y"
{ ;}
break;
case 239:
/* Line 1464 of yacc.c */
#line 912 "htcobol.y"
{ ;}
break;
case 240:
/* Line 1464 of yacc.c */
#line 913 "htcobol.y"
{ ;}
break;
case 241:
/* Line 1464 of yacc.c */
#line 914 "htcobol.y"
{ ;}
break;
case 242:
/* Line 1464 of yacc.c */
#line 917 "htcobol.y"
{ ;}
break;
case 243:
/* Line 1464 of yacc.c */
#line 920 "htcobol.y"
{ ;}
break;
case 244:
/* Line 1464 of yacc.c */
#line 921 "htcobol.y"
{ ;}
break;
case 245:
/* Line 1464 of yacc.c */
#line 922 "htcobol.y"
{ curr_division = CDIV_PROC; ;}
break;
case 246:
/* Line 1464 of yacc.c */
#line 923 "htcobol.y"
{ curr_division = CDIV_DATA; ;}
break;
case 247:
/* Line 1464 of yacc.c */
#line 924 "htcobol.y"
{ ;}
break;
case 248:
/* Line 1464 of yacc.c */
#line 925 "htcobol.y"
{ curr_division = CDIV_PROC; ;}
break;
case 249:
/* Line 1464 of yacc.c */
#line 926 "htcobol.y"
{ curr_division = CDIV_DATA; ;}
break;
case 250:
/* Line 1464 of yacc.c */
#line 927 "htcobol.y"
{ ;}
break;
case 251:
/* Line 1464 of yacc.c */
#line 928 "htcobol.y"
{ ;}
break;
case 252:
/* Line 1464 of yacc.c */
#line 929 "htcobol.y"
{ ;}
break;
case 253:
/* Line 1464 of yacc.c */
#line 930 "htcobol.y"
{ ;}
break;
case 254:
/* Line 1464 of yacc.c */
#line 931 "htcobol.y"
{ curr_division = CDIV_PROC; ;}
break;
case 255:
/* Line 1464 of yacc.c */
#line 932 "htcobol.y"
{ curr_division = CDIV_DATA; ;}
break;
case 256:
/* Line 1464 of yacc.c */
#line 933 "htcobol.y"
{ ;}
break;
case 257:
/* Line 1464 of yacc.c */
#line 934 "htcobol.y"
{ curr_division = CDIV_PROC; ;}
break;
case 258:
/* Line 1464 of yacc.c */
#line 935 "htcobol.y"
{ curr_division = CDIV_DATA; ;}
break;
case 259:
/* Line 1464 of yacc.c */
#line 936 "htcobol.y"
{ ;}
break;
case 260:
/* Line 1464 of yacc.c */
#line 937 "htcobol.y"
{ ;}
break;
case 261:
/* Line 1464 of yacc.c */
#line 940 "htcobol.y"
{ ;}
break;
case 262:
/* Line 1464 of yacc.c */
#line 941 "htcobol.y"
{ ;}
break;
case 263:
/* Line 1464 of yacc.c */
#line 945 "htcobol.y"
{
curr_division = CDIV_PIC;
;}
break;
case 264:
/* Line 1464 of yacc.c */
#line 948 "htcobol.y"
{ curr_division = CDIV_DATA; ;}
break;
case 265:
/* Line 1464 of yacc.c */
#line 951 "htcobol.y"
{ ;}
break;
case 266:
/* Line 1464 of yacc.c */
#line 952 "htcobol.y"
{ ;}
break;
case 269:
/* Line 1464 of yacc.c */
#line 961 "htcobol.y"
{ ;}
break;
case 270:
/* Line 1464 of yacc.c */
#line 962 "htcobol.y"
{ ;}
break;
case 271:
/* Line 1464 of yacc.c */
#line 963 "htcobol.y"
{ ;}
break;
case 272:
/* Line 1464 of yacc.c */
#line 964 "htcobol.y"
{ ;}
break;
case 277:
/* Line 1464 of yacc.c */
#line 973 "htcobol.y"
{ ;}
break;
case 278:
/* Line 1464 of yacc.c */
#line 976 "htcobol.y"
{ (yyval.ival)=(yyvsp[(2) - (3)].ival); ;}
break;
case 279:
/* Line 1464 of yacc.c */
#line 977 "htcobol.y"
{ (yyval.ival)=(yyvsp[(3) - (4)].ival); ;}
break;
case 280:
/* Line 1464 of yacc.c */
#line 978 "htcobol.y"
{ (yyval.ival)=(yyvsp[(3) - (4)].ival); ;}
break;
case 281:
/* Line 1464 of yacc.c */
#line 979 "htcobol.y"
{ (yyval.ival)=(yyvsp[(2) - (3)].ival); ;}
break;
case 282:
/* Line 1464 of yacc.c */
#line 982 "htcobol.y"
{ (yyval.ival)=0; ;}
break;
case 283:
/* Line 1464 of yacc.c */
#line 983 "htcobol.y"
{ (yyval.ival)=0; ;}
break;
case 284:
/* Line 1464 of yacc.c */
#line 984 "htcobol.y"
{ (yyval.ival)=1; ;}
break;
case 285:
/* Line 1464 of yacc.c */
#line 985 "htcobol.y"
{ (yyval.ival)=2; ;}
break;
case 287:
/* Line 1464 of yacc.c */
#line 989 "htcobol.y"
{ ;}
break;
case 288:
/* Line 1464 of yacc.c */
#line 990 "htcobol.y"
{ ;}
break;
case 289:
/* Line 1464 of yacc.c */
#line 993 "htcobol.y"
{ curr_division = CDIV_PROC; ;}
break;
case 290:
/* Line 1464 of yacc.c */
#line 995 "htcobol.y"
{ curr_division = CDIV_DATA; ;}
break;
case 291:
/* Line 1464 of yacc.c */
#line 996 "htcobol.y"
{ ;}
break;
case 292:
/* Line 1464 of yacc.c */
#line 997 "htcobol.y"
{ curr_division = CDIV_PROC; ;}
break;
case 293:
/* Line 1464 of yacc.c */
#line 998 "htcobol.y"
{ curr_division = CDIV_DATA; ;}
break;
case 294:
/* Line 1464 of yacc.c */
#line 999 "htcobol.y"
{ ;}
break;
case 295:
/* Line 1464 of yacc.c */
#line 1001 "htcobol.y"
{ ;}
break;
case 296:
/* Line 1464 of yacc.c */
#line 1002 "htcobol.y"
{ ;}
break;
case 298:
/* Line 1464 of yacc.c */
#line 1005 "htcobol.y"
{ ;}
break;
case 299:
/* Line 1464 of yacc.c */
#line 1008 "htcobol.y"
{ ;}
break;
case 301:
/* Line 1464 of yacc.c */
#line 1011 "htcobol.y"
{ ;}
break;
case 303:
/* Line 1464 of yacc.c */
#line 1014 "htcobol.y"
{ ;}
break;
case 305:
/* Line 1464 of yacc.c */
#line 1017 "htcobol.y"
{ ;}
break;
case 306:
/* Line 1464 of yacc.c */
#line 1018 "htcobol.y"
{ ;}
break;
case 308:
/* Line 1464 of yacc.c */
#line 1021 "htcobol.y"
{ ;}
break;
case 309:
/* Line 1464 of yacc.c */
#line 1024 "htcobol.y"
{ ;}
break;
case 310:
/* Line 1464 of yacc.c */
#line 1025 "htcobol.y"
{ ;}
break;
case 312:
/* Line 1464 of yacc.c */
#line 1028 "htcobol.y"
{ ;}
break;
case 313:
/* Line 1464 of yacc.c */
#line 1031 "htcobol.y"
{ ;}
break;
case 314:
/* Line 1464 of yacc.c */
#line 1032 "htcobol.y"
{ ;}
break;
case 315:
/* Line 1464 of yacc.c */
#line 1035 "htcobol.y"
{ ;}
break;
case 316:
/* Line 1464 of yacc.c */
#line 1036 "htcobol.y"
{ ;}
break;
case 317:
/* Line 1464 of yacc.c */
#line 1037 "htcobol.y"
{ ;}
break;
case 320:
/* Line 1464 of yacc.c */
#line 1051 "htcobol.y"
{
screen_io_enable++;
curr_field=NULL;
HTG_prg_uses_term = 1;
;}
break;
case 321:
/* Line 1464 of yacc.c */
#line 1056 "htcobol.y"
{ close_fields(); ;}
break;
case 325:
/* Line 1464 of yacc.c */
#line 1069 "htcobol.y"
{
if ((yyvsp[(2) - (2)].sval) == NULL) {
(yyvsp[(2) - (2)].sval) = alloc_filler();
}
picix=piccnt=v_flag=n_flag=decimals=pscale=0;
picture[picix]=0;
define_field((yyvsp[(1) - (2)].ival),(yyvsp[(2) - (2)].sval));
;}
break;
case 326:
/* Line 1464 of yacc.c */
#line 1077 "htcobol.y"
{ update_screen_field((yyvsp[(2) - (5)].sval),(yyvsp[(4) - (5)].sival)); ;}
break;
case 327:
/* Line 1464 of yacc.c */
#line 1080 "htcobol.y"
{ curr_division = CDIV_PROC; ;}
break;
case 328:
/* Line 1464 of yacc.c */
#line 1083 "htcobol.y"
{ curr_division = CDIV_DATA;
scr_set_line((yyvsp[(1) - (6)].sival),(yyvsp[(6) - (6)].sval),(yyvsp[(5) - (6)].ival)); (yyval.sival)=(yyvsp[(1) - (6)].sival); ;}
break;
case 329:
/* Line 1464 of yacc.c */
#line 1085 "htcobol.y"
{ curr_division = CDIV_PROC; ;}
break;
case 330:
/* Line 1464 of yacc.c */
#line 1088 "htcobol.y"
{ curr_division = CDIV_DATA;
scr_set_column((yyvsp[(1) - (6)].sival),(yyvsp[(6) - (6)].sval),(yyvsp[(5) - (6)].ival)); (yyval.sival)=(yyvsp[(1) - (6)].sival); ;}
break;
case 331:
/* Line 1464 of yacc.c */
#line 1091 "htcobol.y"
{ (yyvsp[(1) - (3)].sival)->attr |= (yyvsp[(3) - (3)].ival); (yyval.sival)=(yyvsp[(1) - (3)].sival); ;}
break;
case 332:
/* Line 1464 of yacc.c */
#line 1092 "htcobol.y"
{ curr_division = CDIV_PROC; ;}
break;
case 333:
/* Line 1464 of yacc.c */
#line 1093 "htcobol.y"
{ curr_division = CDIV_DATA;
(yyvsp[(1) - (5)].sival)->color = NULL;
(yyvsp[(1) - (5)].sival)->foreground = (yyvsp[(5) - (5)].sval); (yyval.sival)=(yyvsp[(1) - (5)].sival); ;}
break;
case 334:
/* Line 1464 of yacc.c */
#line 1096 "htcobol.y"
{ curr_division = CDIV_PROC; ;}
break;
case 335:
/* Line 1464 of yacc.c */
#line 1097 "htcobol.y"
{ curr_division = CDIV_DATA;
(yyvsp[(1) - (5)].sival)->color = NULL;
(yyvsp[(1) - (5)].sival)->background = (yyvsp[(5) - (5)].sval); (yyval.sival)=(yyvsp[(1) - (5)].sival); ;}
break;
case 336:
/* Line 1464 of yacc.c */
#line 1100 "htcobol.y"
{ curr_division = CDIV_PROC; ;}
break;
case 337:
/* Line 1464 of yacc.c */
#line 1101 "htcobol.y"
{ curr_division = CDIV_DATA;
(yyvsp[(1) - (5)].sival)->foreground = NULL;
(yyvsp[(1) - (5)].sival)->background = NULL;
(yyvsp[(1) - (5)].sival)->color = (yyvsp[(5) - (5)].sval); (yyval.sival)=(yyvsp[(1) - (5)].sival); ;}
break;
case 339:
/* Line 1464 of yacc.c */
#line 1108 "htcobol.y"
{ curr_field->value = (yyvsp[(3) - (3)].lval); (yyval.sival)=(yyvsp[(1) - (3)].sival); ;}
break;
case 341:
/* Line 1464 of yacc.c */
#line 1110 "htcobol.y"
{ curr_division = CDIV_PROC; ;}
break;
case 342:
/* Line 1464 of yacc.c */
#line 1111 "htcobol.y"
{ curr_division = CDIV_DATA;
(yyvsp[(1) - (4)].sival)->size = (yyvsp[(4) - (4)].sval); (yyval.sival)=(yyvsp[(1) - (4)].sival); ;}
break;
case 343:
/* Line 1464 of yacc.c */
#line 1113 "htcobol.y"
{ (yyval.sival) = alloc_scr_info(); ;}
break;
case 344:
/* Line 1464 of yacc.c */
#line 1116 "htcobol.y"
{ curr_division = CDIV_PROC; ;}
break;
case 345:
/* Line 1464 of yacc.c */
#line 1117 "htcobol.y"
{
curr_division = CDIV_DATA;
(yyvsp[(0) - (3)].sival)->from = (yyvsp[(0) - (3)].sival)->to = (yyvsp[(3) - (3)].sval);
;}
break;
case 346:
/* Line 1464 of yacc.c */
#line 1121 "htcobol.y"
{ curr_division = CDIV_PROC; ;}
break;
case 347:
/* Line 1464 of yacc.c */
#line 1123 "htcobol.y"
{
curr_division = CDIV_DATA;
(yyvsp[(0) - (4)].sival)->from = (yyvsp[(3) - (4)].sval); (yyvsp[(0) - (4)].sival)->to = (yyvsp[(4) - (4)].sval);
;}
break;
case 348:
/* Line 1464 of yacc.c */
#line 1127 "htcobol.y"
{ curr_division = CDIV_PROC; ;}
break;
case 349:
/* Line 1464 of yacc.c */
#line 1128 "htcobol.y"
{
curr_division = CDIV_DATA;
(yyvsp[(0) - (3)].sival)->from = NULL; (yyvsp[(0) - (3)].sival)->to = (yyvsp[(3) - (3)].sval);
;}
break;
case 350:
/* Line 1464 of yacc.c */
#line 1134 "htcobol.y"
{ (yyval.sval)=NULL; ;}
break;
case 351:
/* Line 1464 of yacc.c */
#line 1135 "htcobol.y"
{ (yyval.sval) = (yyvsp[(2) - (2)].sval); ;}
break;
case 352:
/* Line 1464 of yacc.c */
#line 1138 "htcobol.y"
{ (yyval.ival) = SCR_BLANK_SCREEN; ;}
break;
case 353:
/* Line 1464 of yacc.c */
#line 1139 "htcobol.y"
{ (yyval.ival) = SCR_BLANK_LINE; ;}
break;
case 354:
/* Line 1464 of yacc.c */
#line 1140 "htcobol.y"
{ (yyval.ival) = SCR_ERASE_EOL; ;}
break;
case 355:
/* Line 1464 of yacc.c */
#line 1141 "htcobol.y"
{ (yyval.ival) = SCR_ERASE_EOS; ;}
break;
case 356:
/* Line 1464 of yacc.c */
#line 1142 "htcobol.y"
{ (yyval.ival) = SCR_ERASE_EOL; ;}
break;
case 357:
/* Line 1464 of yacc.c */
#line 1143 "htcobol.y"
{ (yyval.ival) = SCR_BELL; ;}
break;
case 358:
/* Line 1464 of yacc.c */
#line 1144 "htcobol.y"
{ (yyval.ival) = (yyvsp[(1) - (1)].ival); ;}
break;
case 359:
/* Line 1464 of yacc.c */
#line 1145 "htcobol.y"
{ (yyval.ival) = SCR_FULL; ;}
break;
case 360:
/* Line 1464 of yacc.c */
#line 1146 "htcobol.y"
{ (yyval.ival) = SCR_REQUIRED; ;}
break;
case 361:
/* Line 1464 of yacc.c */
#line 1147 "htcobol.y"
{ (yyval.ival) = SCR_SECURE; ;}
break;
case 362:
/* Line 1464 of yacc.c */
#line 1148 "htcobol.y"
{ (yyval.ival) = SCR_AUTO; ;}
break;
case 363:
/* Line 1464 of yacc.c */
#line 1149 "htcobol.y"
{ (yyval.ival) = SCR_JUST_RIGHT; ;}
break;
case 364:
/* Line 1464 of yacc.c */
#line 1150 "htcobol.y"
{ (yyval.ival) = SCR_JUST_LEFT; ;}
break;
case 365:
/* Line 1464 of yacc.c */
#line 1151 "htcobol.y"
{ (yyval.ival) = SCR_BLINK; ;}
break;
case 366:
/* Line 1464 of yacc.c */
#line 1152 "htcobol.y"
{ (yyval.ival) = SCR_REVERSE_VIDEO; ;}
break;
case 367:
/* Line 1464 of yacc.c */
#line 1153 "htcobol.y"
{ (yyval.ival) = SCR_UNDERLINE; ;}
break;
case 368:
/* Line 1464 of yacc.c */
#line 1154 "htcobol.y"
{ (yyval.ival) = SCR_LOWLIGHT; ;}
break;
case 369:
/* Line 1464 of yacc.c */
#line 1155 "htcobol.y"
{ (yyval.ival) = SCR_HIGHLIGHT; ;}
break;
case 370:
/* Line 1464 of yacc.c */
#line 1156 "htcobol.y"
{ (yyval.ival) = SCR_BLANK_WHEN_ZERO; ;}
break;
case 371:
/* Line 1464 of yacc.c */
#line 1157 "htcobol.y"
{ (yyval.ival) = SCR_NOECHO; ;}
break;
case 372:
/* Line 1464 of yacc.c */
#line 1158 "htcobol.y"
{ (yyval.ival) = SCR_UPDATE; ;}
break;
case 373:
/* Line 1464 of yacc.c */
#line 1159 "htcobol.y"
{ (yyval.ival) = SCR_NO_ADVANCING; ;}
break;
case 374:
/* Line 1464 of yacc.c */
#line 1160 "htcobol.y"
{ (yyval.ival) = SCR_UPPER; ;}
break;
case 375:
/* Line 1464 of yacc.c */
#line 1161 "htcobol.y"
{ (yyval.ival) = SCR_LOWER; ;}
break;
case 376:
/* Line 1464 of yacc.c */
#line 1165 "htcobol.y"
{ (yyval.ival) = SCR_BLANK_SCREEN; ;}
break;
case 377:
/* Line 1464 of yacc.c */
#line 1166 "htcobol.y"
{ (yyval.ival) = SCR_BLANK_LINE; ;}
break;
case 378:
/* Line 1464 of yacc.c */
#line 1167 "htcobol.y"
{ (yyval.ival) = SCR_ERASE_EOL; ;}
break;
case 379:
/* Line 1464 of yacc.c */
#line 1168 "htcobol.y"
{ (yyval.ival) = SCR_ERASE_EOS; ;}
break;
case 380:
/* Line 1464 of yacc.c */
#line 1169 "htcobol.y"
{ (yyval.ival) = SCR_ERASE_EOL; ;}
break;
case 381:
/* Line 1464 of yacc.c */
#line 1170 "htcobol.y"
{ (yyval.ival) = SCR_BELL; ;}
break;
case 382:
/* Line 1464 of yacc.c */
#line 1171 "htcobol.y"
{ (yyval.ival) = (yyvsp[(1) - (1)].ival); ;}
break;
case 383:
/* Line 1464 of yacc.c */
#line 1172 "htcobol.y"
{ (yyval.ival) = SCR_FULL; ;}
break;
case 384:
/* Line 1464 of yacc.c */
#line 1173 "htcobol.y"
{ (yyval.ival) = SCR_REQUIRED; ;}
break;
case 385:
/* Line 1464 of yacc.c */
#line 1174 "htcobol.y"
{ (yyval.ival) = SCR_SECURE; ;}
break;
case 386:
/* Line 1464 of yacc.c */
#line 1175 "htcobol.y"
{ (yyval.ival) = SCR_AUTO; ;}
break;
case 387:
/* Line 1464 of yacc.c */
#line 1176 "htcobol.y"
{ (yyval.ival) = SCR_JUST_RIGHT; ;}
break;
case 388:
/* Line 1464 of yacc.c */
#line 1177 "htcobol.y"
{ (yyval.ival) = SCR_JUST_LEFT; ;}
break;
case 389:
/* Line 1464 of yacc.c */
#line 1178 "htcobol.y"
{ (yyval.ival) = SCR_BLINK; ;}
break;
case 390:
/* Line 1464 of yacc.c */
#line 1179 "htcobol.y"
{ (yyval.ival) = SCR_REVERSE_VIDEO; ;}
break;
case 391:
/* Line 1464 of yacc.c */
#line 1180 "htcobol.y"
{ (yyval.ival) = SCR_UNDERLINE; ;}
break;
case 392:
/* Line 1464 of yacc.c */
#line 1181 "htcobol.y"
{ (yyval.ival) = SCR_LOWLIGHT; ;}
break;
case 393:
/* Line 1464 of yacc.c */
#line 1182 "htcobol.y"
{ (yyval.ival) = SCR_HIGHLIGHT; ;}
break;
case 394:
/* Line 1464 of yacc.c */
#line 1183 "htcobol.y"
{ (yyval.ival) = SCR_BLANK_WHEN_ZERO; ;}
break;
case 395:
/* Line 1464 of yacc.c */
#line 1184 "htcobol.y"
{ (yyval.ival) = SCR_NOECHO; ;}
break;
case 396:
/* Line 1464 of yacc.c */
#line 1185 "htcobol.y"
{ (yyval.ival) = SCR_UPDATE; ;}
break;
case 397:
/* Line 1464 of yacc.c */
#line 1186 "htcobol.y"
{ (yyval.ival) = SCR_NO_ADVANCING; ;}
break;
case 398:
/* Line 1464 of yacc.c */
#line 1187 "htcobol.y"
{ (yyval.ival) = SCR_UPPER; ;}
break;
case 399:
/* Line 1464 of yacc.c */
#line 1188 "htcobol.y"
{ (yyval.ival) = SCR_LOWER; ;}
break;
case 400:
/* Line 1464 of yacc.c */
#line 1189 "htcobol.y"
{ (yyval.ival) = 0; fg = (yyvsp[(2) - (2)].ival); ;}
break;
case 401:
/* Line 1464 of yacc.c */
#line 1190 "htcobol.y"
{ (yyval.ival) = 0; bg = (yyvsp[(2) - (2)].ival); ;}
break;
case 402:
/* Line 1464 of yacc.c */
#line 1195 "htcobol.y"
{ (yyval.ival) = SCR_SIGN_LEADING | (yyvsp[(3) - (3)].ival); ;}
break;
case 403:
/* Line 1464 of yacc.c */
#line 1197 "htcobol.y"
{ (yyval.ival) = (yyvsp[(3) - (3)].ival); ;}
break;
case 404:
/* Line 1464 of yacc.c */
#line 1200 "htcobol.y"
{ (yyval.ival) = SCR_SIGN_SEPARATE; ;}
break;
case 405:
/* Line 1464 of yacc.c */
#line 1201 "htcobol.y"
{ (yyval.ival) = 0; ;}
break;
case 410:
/* Line 1464 of yacc.c */
#line 1212 "htcobol.y"
{ (yyval.ival) = 1; ;}
break;
case 411:
/* Line 1464 of yacc.c */
#line 1213 "htcobol.y"
{ (yyval.ival) = 1; ;}
break;
case 412:
/* Line 1464 of yacc.c */
#line 1214 "htcobol.y"
{ (yyval.ival) = -1; ;}
break;
case 413:
/* Line 1464 of yacc.c */
#line 1215 "htcobol.y"
{ (yyval.ival) = -1; ;}
break;
case 414:
/* Line 1464 of yacc.c */
#line 1216 "htcobol.y"
{ (yyval.ival) = 0; ;}
break;
case 417:
/* Line 1464 of yacc.c */
#line 1229 "htcobol.y"
{ curr_division = CDIV_FD; ;}
break;
case 418:
/* Line 1464 of yacc.c */
#line 1231 "htcobol.y"
{ curr_division = CDIV_DATA; ;}
break;
case 419:
/* Line 1464 of yacc.c */
#line 1233 "htcobol.y"
{
curr_field=NULL;
if ((yyvsp[(4) - (7)].sval)->filenamevar == NULL) {
yyerror("External file name not defined for file %s", (yyvsp[(4) - (7)].sval)->name);
}
;}
break;
case 420:
/* Line 1464 of yacc.c */
#line 1240 "htcobol.y"
{
close_fields();
alloc_file_entry((yyvsp[(4) - (9)].sval));
gen_fdesc((yyvsp[(4) - (9)].sval),(yyvsp[(9) - (9)].sval));
;}
break;
case 421:
/* Line 1464 of yacc.c */
#line 1245 "htcobol.y"
{ curr_division = CDIV_FD; ;}
break;
case 422:
/* Line 1464 of yacc.c */
#line 1246 "htcobol.y"
{ curr_division = CDIV_DATA; ;}
break;
case 423:
/* Line 1464 of yacc.c */
#line 1248 "htcobol.y"
{
(yyvsp[(4) - (7)].sval)->organization=2;
curr_field=NULL;
;}
break;
case 424:
/* Line 1464 of yacc.c */
#line 1253 "htcobol.y"
{
close_fields();
alloc_file_entry((yyvsp[(4) - (9)].sval));
(yyvsp[(4) - (9)].sval)->sort_file = 1;
gen_fdesc((yyvsp[(4) - (9)].sval),(yyvsp[(9) - (9)].sval));
;}
break;
case 425:
/* Line 1464 of yacc.c */
#line 1259 "htcobol.y"
{ yyerror("missing or invalid file description entry"); ;}
break;
case 427:
/* Line 1464 of yacc.c */
#line 1263 "htcobol.y"
{ (yyval.sval)=(yyvsp[(1) - (1)].sval); ;}
break;
case 428:
/* Line 1464 of yacc.c */
#line 1265 "htcobol.y"
{
if (((yyvsp[(2) - (2)].sval) != NULL) && ((yyvsp[(2) - (2)].sval)->level == 1)) {
/* multiple 01 records (for a file descriptor) */
(yyvsp[(2) - (2)].sval)->redefines=(yyvsp[(1) - (2)].sval);
(yyval.sval)=(yyvsp[(2) - (2)].sval);
}
else
(yyval.sval)=(yyvsp[(1) - (2)].sval);
;}
break;
case 429:
/* Line 1464 of yacc.c */
#line 1280 "htcobol.y"
{
picix=piccnt=v_flag=n_flag=decimals=pscale=0;
if ((yyvsp[(1) - (2)].ival) == 78) {
yyerror("level 78 not supported");
}
if ((yyvsp[(2) - (2)].sval)==NULL) {
define_field((yyvsp[(1) - (2)].ival),alloc_filler());
}
else {
define_field((yyvsp[(1) - (2)].ival),(yyvsp[(2) - (2)].sval));
}
;}
break;
case 430:
/* Line 1464 of yacc.c */
#line 1293 "htcobol.y"
{
(yyval.sval)=(yyvsp[(2) - (5)].sval);
if (((yyval.sval) == NULL) || ((yyval.sval)->level != 66))
update_field(curr_field);
;}
break;
case 434:
/* Line 1464 of yacc.c */
#line 1306 "htcobol.y"
{ curr_division = CDIV_PROC; /* parsing variable */ ;}
break;
case 435:
/* Line 1464 of yacc.c */
#line 1308 "htcobol.y"
{
curr_division = CDIV_DATA;
if ((yyvsp[(-2) - (3)].sval) != NULL) {
(yyvsp[(-2) - (3)].sval)->redefines = lookup_for_redefines((yyvsp[(3) - (3)].sval));
}
else {
yywarn("cannot redefine an unnamed field");
}
;}
break;
case 436:
/* Line 1464 of yacc.c */
#line 1319 "htcobol.y"
{ (yyval.sval)=(yyvsp[(1) - (1)].sval); ;}
break;
case 437:
/* Line 1464 of yacc.c */
#line 1320 "htcobol.y"
{ (yyval.sval)=(yyvsp[(1) - (1)].sval); ;}
break;
case 441:
/* Line 1464 of yacc.c */
#line 1326 "htcobol.y"
{
curr_field->flags.separate_sign = ((yyvsp[(1) - (1)].ival) & SCR_SIGN_SEPARATE) ? 1 : 0;
curr_field->flags.leading_sign = ((yyvsp[(1) - (1)].ival) & SCR_SIGN_LEADING) ? 1 : 0; ;}
break;
case 443:
/* Line 1464 of yacc.c */
#line 1330 "htcobol.y"
{curr_field->flags.sync=1;;}
break;
case 444:
/* Line 1464 of yacc.c */
#line 1331 "htcobol.y"
{if ((yyvsp[(2) - (2)].ival) != 2) curr_field->flags.just_r=1;;}
break;
case 445:
/* Line 1464 of yacc.c */
#line 1332 "htcobol.y"
{save_named_sect(curr_field);;}
break;
case 446:
/* Line 1464 of yacc.c */
#line 1333 "htcobol.y"
{;}
break;
case 447:
/* Line 1464 of yacc.c */
#line 1334 "htcobol.y"
{ curr_field->flags.blank=1; ;}
break;
case 448:
/* Line 1464 of yacc.c */
#line 1335 "htcobol.y"
{ curr_division = CDIV_PROC /* for parsing variable */; ;}
break;
case 449:
/* Line 1464 of yacc.c */
#line 1337 "htcobol.y"
{ curr_division = CDIV_DATA;
update_renames_field((yyvsp[(3) - (4)].sval), (yyvsp[(4) - (4)].sval));;}
break;
case 450:
/* Line 1464 of yacc.c */
#line 1341 "htcobol.y"
{(yyval.ival)=0;;}
break;
case 451:
/* Line 1464 of yacc.c */
#line 1342 "htcobol.y"
{(yyval.ival)=2;;}
break;
case 452:
/* Line 1464 of yacc.c */
#line 1343 "htcobol.y"
{(yyval.ival)=1;;}
break;
case 453:
/* Line 1464 of yacc.c */
#line 1345 "htcobol.y"
{ (yyval.sval) = NULL;;}
break;
case 454:
/* Line 1464 of yacc.c */
#line 1346 "htcobol.y"
{ (yyval.sval) = (yyvsp[(2) - (2)].sval);;}
break;
case 455:
/* Line 1464 of yacc.c */
#line 1352 "htcobol.y"
{ curr_field->times = (yyvsp[(2) - (3)].ival); curr_field->occurs_flg++; ;}
break;
case 457:
/* Line 1464 of yacc.c */
#line 1355 "htcobol.y"
{ curr_division = CDIV_PROC; /* needed for parsing variable */ ;}
break;
case 458:
/* Line 1464 of yacc.c */
#line 1357 "htcobol.y"
{
curr_division = CDIV_DATA;
create_occurs_info((yyvsp[(2) - (9)].ival),(yyvsp[(4) - (9)].ival),(yyvsp[(9) - (9)].sval));
;}
break;
case 460:
/* Line 1464 of yacc.c */
#line 1365 "htcobol.y"
{
(yyvsp[(4) - (4)].sval)->level=0;
if ((yyvsp[(1) - (4)].ival) == ASCENDING) {
(yyvsp[(4) - (4)].sval)->level=-1;
}
if ((yyvsp[(1) - (4)].ival) == DESCENDING) {
(yyvsp[(4) - (4)].sval)->level=-2;
}
(yyval.sval)=(yyvsp[(4) - (4)].sval);
;}
break;
case 461:
/* Line 1464 of yacc.c */
#line 1375 "htcobol.y"
{ (yyval.sval)=NULL; ;}
break;
case 462:
/* Line 1464 of yacc.c */
#line 1379 "htcobol.y"
{
/*define_implicit_field($4, $1, curr_field->times);*/
/* Fix Me: Does not work, thus dup vars can be defined
if ($4->defined) {
yyerror("variable redefined, '%s'",$4->name);
$4->defined=1;
}
else {
define_implicit_field($4, $1, curr_field->times);
} */
;}
break;
case 464:
/* Line 1464 of yacc.c */
#line 1394 "htcobol.y"
{
define_implicit_field((yyvsp[(1) - (1)].sval), (yyvsp[(-2) - (1)].sval), curr_field->times);
/* Fix Me: Does not work, thus dup vars can be defined
if ($4->defined) {
yyerror("variable redefined, '%s'",$4->name);
$4->defined=1;
}
else {
define_implicit_field($4, $1, curr_field->times);
} */
;}
break;
case 465:
/* Line 1464 of yacc.c */
#line 1406 "htcobol.y"
{
define_implicit_field((yyvsp[(2) - (2)].sval),(yyvsp[(-2) - (2)].sval),curr_field->times);
;}
break;
case 466:
/* Line 1464 of yacc.c */
#line 1414 "htcobol.y"
{ set_usage(curr_field, (yyvsp[(3) - (3)].ival)); ;}
break;
case 467:
/* Line 1464 of yacc.c */
#line 1417 "htcobol.y"
{ (yyval.ival)=(yyvsp[(1) - (1)].ival); ;}
break;
case 468:
/* Line 1464 of yacc.c */
#line 1418 "htcobol.y"
{ (yyval.ival)=USAGE_DISPLAY; ;}
break;
case 469:
/* Line 1464 of yacc.c */
#line 1419 "htcobol.y"
{ (yyval.ival)=USAGE_POINTER; ;}
break;
case 475:
/* Line 1464 of yacc.c */
#line 1436 "htcobol.y"
{ set_variable_values((yyvsp[(1) - (1)].lval),(yyvsp[(1) - (1)].lval)); ;}
break;
case 476:
/* Line 1464 of yacc.c */
#line 1438 "htcobol.y"
{
set_variable_values((yyvsp[(1) - (3)].lval),(yyvsp[(3) - (3)].lval));
;}
break;
case 477:
/* Line 1464 of yacc.c */
#line 1447 "htcobol.y"
{
curr_division = CDIV_PIC;
/* first pic char found */
picix=piccnt=v_flag=n_flag=decimals=pscale=0;
picture[picix]=0;
;}
break;
case 478:
/* Line 1464 of yacc.c */
#line 1454 "htcobol.y"
{
/* finish picture */
picture[picix+2]=0;
curr_field->decimals=decimals;
curr_field->pscale=pscale;
if (curr_field->type == DTYPE_DISPLAY && piccnt > 18) {
yyerror("Maximum elementary numeric item size of %s > 18 digits exceeded", curr_field->name);
}
if (curr_field->type == DTYPE_ALPHANUMERIC && piccnt > 12750) {
yyerror("Maximum elementary alphanumeric item size of %s > 12750 exceeded", curr_field->name);
}
;}
break;
case 481:
/* Line 1464 of yacc.c */
#line 1472 "htcobol.y"
{
if (!save_pic_char ( (yyvsp[(1) - (2)].ival), (yyvsp[(2) - (2)].ival) )) {
yyerror("invalid char in picture");
YYERROR;
}
;}
break;
case 482:
/* Line 1464 of yacc.c */
#line 1480 "htcobol.y"
{ (yyval.ival) = 1; ;}
break;
case 483:
/* Line 1464 of yacc.c */
#line 1481 "htcobol.y"
{ (yyval.ival) = (yyvsp[(1) - (1)].ival); ;}
break;
case 488:
/* Line 1464 of yacc.c */
#line 1492 "htcobol.y"
{ (yyvsp[(0) - (2)].sval)->type = 'K'; ;}
break;
case 489:
/* Line 1464 of yacc.c */
#line 1493 "htcobol.y"
{ (yyvsp[(0) - (2)].sval)->type = 'J'; ;}
break;
case 500:
/* Line 1464 of yacc.c */
#line 1511 "htcobol.y"
{
/* unimplemented - clause ignored */
;}
break;
case 501:
/* Line 1464 of yacc.c */
#line 1518 "htcobol.y"
{
if ((yyvsp[(4) - (5)].lval) != NULL) {
UNIMPLEMENTED ("RECORD CONTAINS integer1 TO integer2 CHARACTERS clause")
/* unimplemented */
}
;}
break;
case 502:
/* Line 1464 of yacc.c */
#line 1527 "htcobol.y"
{
if ((yyvsp[(9) - (9)].sval) != NULL) {
set_rec_varying_info( (yyvsp[(-2) - (9)].sval),(yyvsp[(6) - (9)].lval),(yyvsp[(7) - (9)].lval),(yyvsp[(9) - (9)].sval) );
}
else {
yyerror("clause \'DEPENDING ON data-name-1\' is missing");
}
;}
break;
case 503:
/* Line 1464 of yacc.c */
#line 1537 "htcobol.y"
{ /* obsolete */ ;}
break;
case 504:
/* Line 1464 of yacc.c */
#line 1541 "htcobol.y"
{
if ((yyvsp[(-2) - (5)].sval)->filenamevar != NULL) {
yyerror("Re-defining file name defined in SELECT statement");
}
else {
(yyvsp[(-2) - (5)].sval)->filenamevar = (yyvsp[(5) - (5)].sval);
}
;}
break;
case 505:
/* Line 1464 of yacc.c */
#line 1551 "htcobol.y"
{ /* obsolete */ ;}
break;
case 506:
/* Line 1464 of yacc.c */
#line 1554 "htcobol.y"
{ save_report( (yyvsp[(2) - (2)].sval),(yyvsp[(0) - (2)].sval) ); ;}
break;
case 507:
/* Line 1464 of yacc.c */
#line 1558 "htcobol.y"
{ UNIMPLEMENTED ("Code-set is alphabet") /* unimplemented */ ;}
break;
case 508:
/* Line 1464 of yacc.c */
#line 1565 "htcobol.y"
{ UNIMPLEMENTED ("Linage is clause") /* unimplemented */ ;}
break;
case 510:
/* Line 1464 of yacc.c */
#line 1568 "htcobol.y"
{ /* unimplemented */ ;}
break;
case 512:
/* Line 1464 of yacc.c */
#line 1571 "htcobol.y"
{ /* unimplemented */ ;}
break;
case 514:
/* Line 1464 of yacc.c */
#line 1574 "htcobol.y"
{ /* unimplemented */ ;}
break;
case 521:
/* Line 1464 of yacc.c */
#line 1584 "htcobol.y"
{ ;}
break;
case 522:
/* Line 1464 of yacc.c */
#line 1585 "htcobol.y"
{ ;}
break;
case 527:
/* Line 1464 of yacc.c */
#line 1593 "htcobol.y"
{ ;}
break;
case 528:
/* Line 1464 of yacc.c */
#line 1595 "htcobol.y"
{ (yyval.sval) = NULL; ;}
break;
case 529:
/* Line 1464 of yacc.c */
#line 1596 "htcobol.y"
{ (yyval.sval) = (yyvsp[(3) - (3)].sval); ;}
break;
case 530:
/* Line 1464 of yacc.c */
#line 1599 "htcobol.y"
{ (yyval.lval) = NULL; ;}
break;
case 531:
/* Line 1464 of yacc.c */
#line 1600 "htcobol.y"
{ (yyval.lval) = (yyvsp[(2) - (2)].lval); ;}
break;
case 534:
/* Line 1464 of yacc.c */
#line 1607 "htcobol.y"
{ (yyval.lval) = NULL; ;}
break;
case 535:
/* Line 1464 of yacc.c */
#line 1608 "htcobol.y"
{ (yyval.lval) = (yyvsp[(2) - (2)].lval); ;}
break;
case 558:
/* Line 1464 of yacc.c */
#line 1672 "htcobol.y"
{
curr_division = CDIV_PROC;
;}
break;
case 559:
/* Line 1464 of yacc.c */
#line 1676 "htcobol.y"
{
proc_header((yyvsp[(4) - (5)].ival));
;}
break;
case 560:
/* Line 1464 of yacc.c */
#line 1681 "htcobol.y"
{
/* close procedure_division sections & paragraphs */
close_section(); /* this also closes paragraph */
resolve_labels();
proc_trail((yyvsp[(4) - (8)].ival));
;}
break;
case 564:
/* Line 1464 of yacc.c */
#line 1693 "htcobol.y"
{ close_section(); open_section((yyvsp[(1) - (1)].sval)); ;}
break;
case 565:
/* Line 1464 of yacc.c */
#line 1694 "htcobol.y"
{ close_paragr(); open_paragr((yyvsp[(1) - (1)].sval)); ;}
break;
case 566:
/* Line 1464 of yacc.c */
#line 1695 "htcobol.y"
{free_expr_list(); stabs_line();;}
break;
case 568:
/* Line 1464 of yacc.c */
#line 1697 "htcobol.y"
{ yyerror("unknown or wrong statement"); ;}
break;
case 570:
/* Line 1464 of yacc.c */
#line 1698 "htcobol.y"
{ ;}
break;
case 571:
/* Line 1464 of yacc.c */
#line 1703 "htcobol.y"
{
decl_lbl=loc_label++;
gen_jmplabel(decl_lbl);
;}
break;
case 572:
/* Line 1464 of yacc.c */
#line 1710 "htcobol.y"
{
gen_dstlabel(decl_lbl);
;}
break;
case 577:
/* Line 1464 of yacc.c */
#line 1722 "htcobol.y"
{ close_paragr(); open_paragr((yyvsp[(1) - (1)].sval)); ;}
break;
case 578:
/* Line 1464 of yacc.c */
#line 1723 "htcobol.y"
{free_expr_list(); stabs_line();;}
break;
case 580:
/* Line 1464 of yacc.c */
#line 1724 "htcobol.y"
{ yyerror("unknown or wrong statement"); ;}
break;
case 582:
/* Line 1464 of yacc.c */
#line 1730 "htcobol.y"
{
close_section();
open_section((yyvsp[(1) - (1)].sval));
;}
break;
case 584:
/* Line 1464 of yacc.c */
#line 1735 "htcobol.y"
{ yyerror("section name expected"); ;}
break;
case 585:
/* Line 1464 of yacc.c */
#line 1739 "htcobol.y"
{ /* mark_decl_list($6); */ ;}
break;
case 586:
/* Line 1464 of yacc.c */
#line 1740 "htcobol.y"
{ yyerror("use statement expected"); ;}
break;
case 591:
/* Line 1464 of yacc.c */
#line 1748 "htcobol.y"
{ (yyval.glistval)=(yyvsp[(1) - (1)].glistval); ;}
break;
case 592:
/* Line 1464 of yacc.c */
#line 1750 "htcobol.y"
{
(yyval.glistval)=NULL;
UNIMPLEMENTED ("Declaratives open-mode clause")
/* unimplemented */
;}
break;
case 593:
/* Line 1464 of yacc.c */
#line 1761 "htcobol.y"
{
struct sym *lab=(yyvsp[(1) - (3)].sval);
if (lab->defined != 0) {
lab = install(lab->name,SYTB_LAB,2);
}
lab->defined = 1;
(yyval.sval)=lab;
;}
break;
case 594:
/* Line 1464 of yacc.c */
#line 1772 "htcobol.y"
{
struct sym *lab=(yyvsp[(1) - (2)].sval);
if (lab->defined != 0) {
if ((lab=lookup_label(lab,curr_section))==NULL) {
lab = install((yyvsp[(1) - (2)].sval)->name,SYTB_LAB,2);
}
}
lab->parent = curr_section;
lab->defined=1;
(yyval.sval)=lab;
;}
break;
case 597:
/* Line 1464 of yacc.c */
#line 1794 "htcobol.y"
{ ;}
break;
case 642:
/* Line 1464 of yacc.c */
#line 1843 "htcobol.y"
{ stabs_line(); ;}
break;
case 644:
/* Line 1464 of yacc.c */
#line 1853 "htcobol.y"
{ gen_dstlabel((yyvsp[(1) - (1)].dval)); ;}
break;
case 646:
/* Line 1464 of yacc.c */
#line 1855 "htcobol.y"
{ (yyval.dval)=gen_passlabel(); gen_dstlabel((yyvsp[(1) - (2)].dval)); ;}
break;
case 647:
/* Line 1464 of yacc.c */
#line 1857 "htcobol.y"
{ gen_dstlabel((yyvsp[(3) - (4)].dval)); ;}
break;
case 651:
/* Line 1464 of yacc.c */
#line 1866 "htcobol.y"
{ (yyval.ival) = gen_evaluate_start(); ;}
break;
case 652:
/* Line 1464 of yacc.c */
#line 1868 "htcobol.y"
{ compute_subject_set_size((yyvsp[(3) - (3)].ssbjval)); ;}
break;
case 653:
/* Line 1464 of yacc.c */
#line 1871 "htcobol.y"
{ release_sel_subject((yyvsp[(2) - (6)].ival),(yyvsp[(3) - (6)].ssbjval)); ;}
break;
case 656:
/* Line 1464 of yacc.c */
#line 1878 "htcobol.y"
{ (yyval.sval)=NULL; /* to store non-numeric symbols */ ;}
break;
case 657:
/* Line 1464 of yacc.c */
#line 1879 "htcobol.y"
{ (yyval.ssbjval)=save_sel_subject((yyvsp[(2) - (2)].ival),NULL,(yyvsp[(1) - (2)].sval)); ;}
break;
case 658:
/* Line 1464 of yacc.c */
#line 1881 "htcobol.y"
{ (yyval.sval)=NULL; /* to store non-numeric symbols */ ;}
break;
case 659:
/* Line 1464 of yacc.c */
#line 1883 "htcobol.y"
{ (yyval.ssbjval)=save_sel_subject((yyvsp[(4) - (4)].ival),(yyvsp[(1) - (4)].ssbjval),(yyvsp[(3) - (4)].sval)); ;}
break;
case 660:
/* Line 1464 of yacc.c */
#line 1887 "htcobol.y"
{
if (push_expr((yyvsp[(1) - (1)].sval)))
(yyval.ival)=SSUBJ_EXPR;
else {
(yyvsp[(0) - (1)].sval) = (yyvsp[(1) - (1)].sval);
(yyval.ival)=SSUBJ_STR;
}
;}
break;
case 661:
/* Line 1464 of yacc.c */
#line 1895 "htcobol.y"
{ push_condition(); (yyval.ival)=SSUBJ_COND; ;}
break;
case 662:
/* Line 1464 of yacc.c */
#line 1896 "htcobol.y"
{ (yyval.ival)=SSUBJ_TRUE; ;}
break;
case 663:
/* Line 1464 of yacc.c */
#line 1897 "htcobol.y"
{ (yyval.ival)=SSUBJ_FALSE; ;}
break;
case 664:
/* Line 1464 of yacc.c */
#line 1900 "htcobol.y"
{ (yyval.ival) = loc_label++; /* mark end of "when" case */ ;}
break;
case 665:
/* Line 1464 of yacc.c */
#line 1901 "htcobol.y"
{ (yyval.ssbjval)=(yyvsp[(-1) - (2)].ssbjval); /* store inherited subject set */ ;}
break;
case 666:
/* Line 1464 of yacc.c */
#line 1904 "htcobol.y"
{ (yyval.ival)=gen_end_when((yyvsp[(-2) - (5)].ival),(yyvsp[(2) - (5)].ival),(yyvsp[(5) - (5)].ival)); ;}
break;
case 667:
/* Line 1464 of yacc.c */
#line 1905 "htcobol.y"
{ (yyval.ival) = loc_label++; ;}
break;
case 668:
/* Line 1464 of yacc.c */
#line 1906 "htcobol.y"
{ (yyval.ssbjval)=(yyvsp[(-1) - (3)].ssbjval); ;}
break;
case 669:
/* Line 1464 of yacc.c */
#line 1908 "htcobol.y"
{ gen_bypass_when_case((yyvsp[(1) - (5)].ival)); ;}
break;
case 670:
/* Line 1464 of yacc.c */
#line 1910 "htcobol.y"
{ (yyval.ival)=gen_end_when((yyvsp[(-2) - (7)].ival),(yyvsp[(3) - (7)].ival),(yyvsp[(7) - (7)].ival)); ;}
break;
case 671:
/* Line 1464 of yacc.c */
#line 1913 "htcobol.y"
{ (yyval.sval) = NULL; ;}
break;
case 672:
/* Line 1464 of yacc.c */
#line 1915 "htcobol.y"
{
gen_when_check(0,(yyvsp[(0) - (2)].ssbjval),(yyvsp[(2) - (2)].ival),(yyvsp[(-1) - (2)].ival),(yyvsp[(1) - (2)].sval));
(yyval.ival)=0;
;}
break;
case 673:
/* Line 1464 of yacc.c */
#line 1920 "htcobol.y"
{ (yyval.sval) = NULL; ;}
break;
case 674:
/* Line 1464 of yacc.c */
#line 1922 "htcobol.y"
{
gen_when_check((yyvsp[(1) - (4)].ival)+1,(yyvsp[(0) - (4)].ssbjval),(yyvsp[(4) - (4)].ival),(yyvsp[(-1) - (4)].ival),(yyvsp[(3) - (4)].sval));
(yyval.ival)=(yyvsp[(1) - (4)].ival)+1;
;}
break;
case 675:
/* Line 1464 of yacc.c */
#line 1926 "htcobol.y"
{ (yyval.ival)=-1; ;}
break;
case 676:
/* Line 1464 of yacc.c */
#line 1929 "htcobol.y"
{ (yyval.ival)=SOBJ_ANY; ;}
break;
case 677:
/* Line 1464 of yacc.c */
#line 1930 "htcobol.y"
{ (yyval.ival)=SOBJ_TRUE; ;}
break;
case 678:
/* Line 1464 of yacc.c */
#line 1931 "htcobol.y"
{ (yyval.ival)=SOBJ_FALSE; ;}
break;
case 679:
/* Line 1464 of yacc.c */
#line 1933 "htcobol.y"
{
if (push_expr((yyvsp[(2) - (2)].sval))) {
if ((yyvsp[(1) - (2)].ival))
(yyval.ival)=SOBJ_NEGEXPR;
else
(yyval.ival)=SOBJ_EXPR;
}
else {
/* non-numeric comparation */
(yyvsp[(0) - (2)].sval) = (yyvsp[(2) - (2)].sval);
if ((yyvsp[(1) - (2)].ival))
(yyval.ival)=SOBJ_NEGSTR;
else
(yyval.ival)=SOBJ_STR;
}
;}
break;
case 680:
/* Line 1464 of yacc.c */
#line 1950 "htcobol.y"
{
if (push_expr((yyvsp[(4) - (4)].sval)) && push_expr((yyvsp[(2) - (4)].sval))) {
if ((yyvsp[(1) - (4)].ival))
(yyval.ival)=SOBJ_NEGRANGE;
else
(yyval.ival)=SOBJ_RANGE;
}
else {
yyerror("ranges only accepted for numeric variables");
}
;}
break;
case 681:
/* Line 1464 of yacc.c */
#line 1962 "htcobol.y"
{
gen_condition((yyvsp[(2) - (2)].sval));
if ((yyvsp[(1) - (2)].ival))
(yyval.ival)=SOBJ_NEGCOND;
else
(yyval.ival)=SOBJ_COND;
;}
break;
case 682:
/* Line 1464 of yacc.c */
#line 1972 "htcobol.y"
{ (yyval.ival) = 0; ;}
break;
case 683:
/* Line 1464 of yacc.c */
#line 1973 "htcobol.y"
{ (yyval.ival) = 1; ;}
break;
case 684:
/* Line 1464 of yacc.c */
#line 1978 "htcobol.y"
{ (yyval.dval)=gen_testif(); ;}
break;
case 685:
/* Line 1464 of yacc.c */
#line 1980 "htcobol.y"
{ (yyval.dval)=(yyvsp[(3) - (5)].dval); ;}
break;
case 686:
/* Line 1464 of yacc.c */
#line 1988 "htcobol.y"
{ stabs_line(); ;}
break;
case 688:
/* Line 1464 of yacc.c */
#line 1989 "htcobol.y"
{ stabs_line(); ;}
break;
case 690:
/* Line 1464 of yacc.c */
#line 1996 "htcobol.y"
{ (yyval.ival)=0; ;}
break;
case 691:
/* Line 1464 of yacc.c */
#line 1997 "htcobol.y"
{ (yyval.ival)=1; ;}
break;
case 696:
/* Line 1464 of yacc.c */
#line 2007 "htcobol.y"
{
(yyval.dval)=loc_label++; /* determine END label name */
gen_marklabel();
/* yydebug=1; */
;}
break;
case 697:
/* Line 1464 of yacc.c */
#line 2013 "htcobol.y"
{
(yyval.dval)=loc_label++; /* determine search loop start label */
if ((yyvsp[(3) - (3)].sval) == NULL) {
(yyvsp[(3) - (3)].sval)=determine_table_index_name((yyvsp[(1) - (3)].sval));
if ((yyvsp[(3) - (3)].sval) == NULL) {
yyerror("Unable to determine search index for table '%s'", (yyvsp[(1) - (3)].sval)->name);
}
}
gen_jmplabel((yyval.dval)); /* generate GOTO search loop start */
;}
break;
case 698:
/* Line 1464 of yacc.c */
#line 2024 "htcobol.y"
{
gen_jmplabel((yyvsp[(2) - (5)].dval)); /* generate GOTO END */
gen_dstlabel((yyvsp[(4) - (5)].dval)); /* generate search loop start label */
(yyval.dval) = (yyvsp[(2) - (5)].dval);
;}
break;
case 699:
/* Line 1464 of yacc.c */
#line 2030 "htcobol.y"
{
/* increment loop index, check for end */
gen_SearchLoopCheck((yyvsp[(5) - (7)].dval), (yyvsp[(3) - (7)].sval), (yyvsp[(1) - (7)].sval));
gen_jmplabel((yyvsp[(4) - (7)].dval)); /* generate goto search loop start label */
gen_dstlabel((yyvsp[(2) - (7)].dval)); /* generate END label */
;}
break;
case 700:
/* Line 1464 of yacc.c */
#line 2040 "htcobol.y"
{
lbend=loc_label++; /* determine END label name */
gen_marklabel();
lbstart=loc_label++; /* determine search_all loop start label */
(yyval.sval)=determine_table_index_name((yyvsp[(1) - (1)].sval));
if ((yyval.sval) == NULL) {
yyerror("Unable to determine search index for table '%s'", (yyvsp[(1) - (1)].sval)->name);
}
else {
/* Initilize and store search table index boundaries */
Initialize_SearchAll_Boundaries((yyvsp[(1) - (1)].sval), (yyval.sval));
}
gen_jmplabel(lbstart); /* generate GOTO search_all loop start */
;}
break;
case 701:
/* Line 1464 of yacc.c */
#line 2058 "htcobol.y"
{
gen_jmplabel(lbend); /* generate GOTO END */
gen_dstlabel(lbstart); /* generate search loop start label */
;}
break;
case 702:
/* Line 1464 of yacc.c */
#line 2063 "htcobol.y"
{
/* adjust loop index, check for end */
gen_SearchAllLoopCheck((yyvsp[(3) - (5)].dval), (yyvsp[(2) - (5)].sval), (yyvsp[(1) - (5)].sval), curr_field, lbstart, lbend);
;}
break;
case 703:
/* Line 1464 of yacc.c */
#line 2070 "htcobol.y"
{ (yyval.sval)=(yyvsp[(2) - (2)].sval); ;}
break;
case 704:
/* Line 1464 of yacc.c */
#line 2071 "htcobol.y"
{ (yyval.sval)=NULL; ;}
break;
case 705:
/* Line 1464 of yacc.c */
#line 2076 "htcobol.y"
{
(yyval.dval)=loc_label++; /* determine ATEND label name */
gen_dstlabel((yyval.dval)); /* determine ATEND label name */
;}
break;
case 706:
/* Line 1464 of yacc.c */
#line 2081 "htcobol.y"
{
(yyval.dval)=(yyvsp[(3) - (4)].dval);
;}
break;
case 707:
/* Line 1464 of yacc.c */
#line 2085 "htcobol.y"
{
(yyval.dval)=loc_label++; /* determine ATEND label name */
gen_dstlabel((yyval.dval)); /* determine ATEND label name */
;}
break;
case 708:
/* Line 1464 of yacc.c */
#line 2092 "htcobol.y"
{ (yyval.dval)=(yyvsp[(1) - (1)].dval); ;}
break;
case 709:
/* Line 1464 of yacc.c */
#line 2093 "htcobol.y"
{ (yyval.dval)=(yyvsp[(1) - (2)].dval); ;}
break;
case 710:
/* Line 1464 of yacc.c */
#line 2098 "htcobol.y"
{ (yyval.dval)=gen_testif(); ;}
break;
case 711:
/* Line 1464 of yacc.c */
#line 2100 "htcobol.y"
{
(yyval.dval) = (yyvsp[(0) - (4)].dval);
gen_jmplabel((yyval.dval)); /* generate GOTO END */
gen_dstlabel((yyvsp[(3) - (4)].dval));
;}
break;
case 714:
/* Line 1464 of yacc.c */
#line 2122 "htcobol.y"
{ gen_compare((yyvsp[(1) - (3)].sval),(yyvsp[(2) - (3)].ival),(yyvsp[(3) - (3)].sval)); ;}
break;
case 717:
/* Line 1464 of yacc.c */
#line 2130 "htcobol.y"
{ curr_field = NULL; ;}
break;
case 718:
/* Line 1464 of yacc.c */
#line 2132 "htcobol.y"
{ (yyval.dval)=gen_testif(); ;}
break;
case 719:
/* Line 1464 of yacc.c */
#line 2134 "htcobol.y"
{
gen_jmplabel(lbend); /* generate GOTO END */
gen_dstlabel((yyvsp[(4) - (5)].dval));
;}
break;
case 722:
/* Line 1464 of yacc.c */
#line 2151 "htcobol.y"
{
if ((yyvsp[(3) - (5)].ival) != EQUAL)
yyerror("Only = conditional allowed in search all statement");
if (curr_field == NULL)
curr_field = (yyvsp[(1) - (5)].sval);
gen_compare((yyvsp[(1) - (5)].sval),(yyvsp[(3) - (5)].ival),(yyvsp[(5) - (5)].sval));
;}
break;
case 723:
/* Line 1464 of yacc.c */
#line 2159 "htcobol.y"
{
if ((yyvsp[(3) - (5)].ival) != EQUAL)
yyerror("Only = conditional allowed in search all statement");
if (curr_field == NULL)
curr_field = (yyvsp[(1) - (5)].sval);
gen_compare((yyvsp[(1) - (5)].sval),(yyvsp[(3) - (5)].ival),(struct sym *)(yyvsp[(5) - (5)].lval));
;}
break;
case 724:
/* Line 1464 of yacc.c */
#line 2166 "htcobol.y"
{ (yyval.dval)=gen_andstart(); ;}
break;
case 725:
/* Line 1464 of yacc.c */
#line 2167 "htcobol.y"
{ gen_dstlabel((yyvsp[(3) - (4)].dval)); ;}
break;
case 728:
/* Line 1464 of yacc.c */
#line 2175 "htcobol.y"
{ gen_unlock((yyvsp[(2) - (2)].sval)); ;}
break;
case 729:
/* Line 1464 of yacc.c */
#line 2178 "htcobol.y"
{ gen_tcob_proto1( (yyvsp[(2) - (2)].sval) ); ;}
break;
case 730:
/* Line 1464 of yacc.c */
#line 2179 "htcobol.y"
{ gen_tcob_proto2( (yyvsp[(2) - (3)].sval),(yyvsp[(3) - (3)].sval) ); ;}
break;
case 731:
/* Line 1464 of yacc.c */
#line 2182 "htcobol.y"
{ ;}
break;
case 732:
/* Line 1464 of yacc.c */
#line 2183 "htcobol.y"
{ ;}
break;
case 736:
/* Line 1464 of yacc.c */
#line 2195 "htcobol.y"
{ gen_cancel((yyvsp[(2) - (2)].sval)); ;}
break;
case 737:
/* Line 1464 of yacc.c */
#line 2196 "htcobol.y"
{ gen_cancel(NULL); ;}
break;
case 738:
/* Line 1464 of yacc.c */
#line 2202 "htcobol.y"
{ sort_keys_append((yyvsp[(2) - (3)].sval), (yyvsp[(3) - (3)].glistval)); ;}
break;
case 739:
/* Line 1464 of yacc.c */
#line 2204 "htcobol.y"
{ gen_sort((yyvsp[(2) - (5)].sval)); ;}
break;
case 740:
/* Line 1464 of yacc.c */
#line 2206 "htcobol.y"
{ gen_sort_using((yyvsp[(2) - (7)].sval), (yyvsp[(7) - (7)].snval)); ;}
break;
case 741:
/* Line 1464 of yacc.c */
#line 2208 "htcobol.y"
{
if ((yyvsp[(9) - (9)].snval) != NULL) {
gen_sort_giving((yyvsp[(2) - (9)].sval), (yyvsp[(9) - (9)].snval));
}
;}
break;
case 742:
/* Line 1464 of yacc.c */
#line 2215 "htcobol.y"
{ (yyval.snval)=(yyvsp[(2) - (2)].snval); ;}
break;
case 745:
/* Line 1464 of yacc.c */
#line 2225 "htcobol.y"
{ sort_keys_append((yyvsp[(2) - (3)].sval), (yyvsp[(3) - (3)].glistval)); ;}
break;
case 746:
/* Line 1464 of yacc.c */
#line 2227 "htcobol.y"
{ gen_sort((yyvsp[(2) - (6)].sval)); ;}
break;
case 747:
/* Line 1464 of yacc.c */
#line 2229 "htcobol.y"
{
if ((yyvsp[(8) - (8)].snval) != NULL) {
gen_sort_using((yyvsp[(2) - (8)].sval), (yyvsp[(8) - (8)].snval));
}
;}
break;
case 748:
/* Line 1464 of yacc.c */
#line 2235 "htcobol.y"
{
if ((yyvsp[(10) - (10)].snval) != NULL) {
gen_sort_giving((yyvsp[(2) - (10)].sval), (yyvsp[(10) - (10)].snval));
}
;}
break;
case 749:
/* Line 1464 of yacc.c */
#line 2244 "htcobol.y"
{ sort_keys_append((yyvsp[(2) - (3)].sval), (yyvsp[(3) - (3)].glistval)); ;}
break;
case 750:
/* Line 1464 of yacc.c */
#line 2246 "htcobol.y"
{ gen_sort((yyvsp[(2) - (6)].sval)); ;}
break;
case 751:
/* Line 1464 of yacc.c */
#line 2250 "htcobol.y"
{ (yyval.glistval)=sort_keys_list_append(NULL, (yyvsp[(1) - (1)].glistval)); ;}
break;
case 752:
/* Line 1464 of yacc.c */
#line 2251 "htcobol.y"
{ (yyval.glistval)=sort_keys_list_append((yyvsp[(1) - (2)].glistval), (yyvsp[(2) - (2)].glistval)); ;}
break;
case 753:
/* Line 1464 of yacc.c */
#line 2255 "htcobol.y"
{ (yyval.glistval)=sort_keys_list_append(NULL, (yyvsp[(1) - (1)].glistval)); ;}
break;
case 754:
/* Line 1464 of yacc.c */
#line 2256 "htcobol.y"
{ (yyval.glistval)=sort_keys_list_append((yyvsp[(1) - (2)].glistval), (yyvsp[(2) - (2)].glistval)); ;}
break;
case 755:
/* Line 1464 of yacc.c */
#line 2261 "htcobol.y"
{ (yyval.glistval)=sort_key_list_create((yyvsp[(4) - (4)].glistval), (yyvsp[(2) - (4)].ival)); ;}
break;
case 756:
/* Line 1464 of yacc.c */
#line 2266 "htcobol.y"
{ (yyval.glistval)=sort_key_list_create((yyvsp[(4) - (4)].glistval), (yyvsp[(2) - (4)].ival)); ;}
break;
case 757:
/* Line 1464 of yacc.c */
#line 2270 "htcobol.y"
{ (yyval.glistval) = gvar_list_append(NULL, (yyvsp[(1) - (1)].sval), source_lineno); ;}
break;
case 758:
/* Line 1464 of yacc.c */
#line 2271 "htcobol.y"
{ (yyval.glistval) = gvar_list_append((yyvsp[(1) - (2)].glistval), (yyvsp[(2) - (2)].sval), source_lineno); ;}
break;
case 759:
/* Line 1464 of yacc.c */
#line 2275 "htcobol.y"
{ (yyval.glistval) = gvar_list_append(NULL, (yyvsp[(1) - (1)].sval), source_lineno); ;}
break;
case 760:
/* Line 1464 of yacc.c */
#line 2276 "htcobol.y"
{ (yyval.glistval) = gvar_list_append((yyvsp[(1) - (2)].glistval), (yyvsp[(2) - (2)].sval), source_lineno); ;}
break;
case 762:
/* Line 1464 of yacc.c */
#line 2281 "htcobol.y"
{
UNIMPLEMENTED ("SORT with duplicates in order clause")
/* unimplemented */
;}
break;
case 764:
/* Line 1464 of yacc.c */
#line 2289 "htcobol.y"
{ UNIMPLEMENTED ("SORT/MERGE collating sequence clause") /* unimplemented */ ;}
break;
case 765:
/* Line 1464 of yacc.c */
#line 2294 "htcobol.y"
{ (yyval.snval)=NULL; ;}
break;
case 766:
/* Line 1464 of yacc.c */
#line 2295 "htcobol.y"
{ (yyval.snval)=(yyvsp[(2) - (2)].snval); ;}
break;
case 767:
/* Line 1464 of yacc.c */
#line 2298 "htcobol.y"
{ (yyval.snval)=NULL; ;}
break;
case 768:
/* Line 1464 of yacc.c */
#line 2299 "htcobol.y"
{ (yyval.snval)=(yyvsp[(2) - (2)].snval); ;}
break;
case 769:
/* Line 1464 of yacc.c */
#line 2302 "htcobol.y"
{ (yyval.snval) = alloc_sortfile_node((yyvsp[(1) - (1)].sval)); ;}
break;
case 770:
/* Line 1464 of yacc.c */
#line 2304 "htcobol.y"
{
(yyvsp[(1) - (2)].snval)->next = alloc_sortfile_node((yyvsp[(2) - (2)].sval)); (yyval.snval)=(yyvsp[(1) - (2)].snval);
;}
break;
case 771:
/* Line 1464 of yacc.c */
#line 2311 "htcobol.y"
{ gen_moves((yyvsp[(2) - (4)].sval), (yyvsp[(4) - (4)].glistval)); ;}
break;
case 772:
/* Line 1464 of yacc.c */
#line 2312 "htcobol.y"
{ gen_movecorr((yyvsp[(3) - (5)].sval), (yyvsp[(5) - (5)].sval)); ;}
break;
case 773:
/* Line 1464 of yacc.c */
#line 2313 "htcobol.y"
{ gen_movelength((yyvsp[(4) - (6)].sval), (yyvsp[(6) - (6)].sval)); ;}
break;
case 774:
/* Line 1464 of yacc.c */
#line 2314 "htcobol.y"
{ yyerror("Expected variable"); ;}
break;
case 775:
/* Line 1464 of yacc.c */
#line 2319 "htcobol.y"
{ gen_initializes((yyvsp[(2) - (3)].glistval)); ;}
break;
case 776:
/* Line 1464 of yacc.c */
#line 2320 "htcobol.y"
{ yyerror("INITIALIZE: expected a variable name");;}
break;
case 778:
/* Line 1464 of yacc.c */
#line 2324 "htcobol.y"
{ UNIMPLEMENTED ("INITIALIZE ... REPLACING clause") ;}
break;
case 781:
/* Line 1464 of yacc.c */
#line 2331 "htcobol.y"
{ /* not implimented */ ;}
break;
case 782:
/* Line 1464 of yacc.c */
#line 2334 "htcobol.y"
{ ;}
break;
case 783:
/* Line 1464 of yacc.c */
#line 2335 "htcobol.y"
{ ;}
break;
case 784:
/* Line 1464 of yacc.c */
#line 2336 "htcobol.y"
{ ;}
break;
case 785:
/* Line 1464 of yacc.c */
#line 2337 "htcobol.y"
{ ;}
break;
case 786:
/* Line 1464 of yacc.c */
#line 2338 "htcobol.y"
{ ;}
break;
case 788:
/* Line 1464 of yacc.c */
#line 2344 "htcobol.y"
{ yyerror(err_msg_bad_form, "COMPUTE");;}
break;
case 789:
/* Line 1464 of yacc.c */
#line 2348 "htcobol.y"
{
if ((yyvsp[(2) - (4)].ival) != EQUAL)
yyerror("= expected");
else if ((yyvsp[(4) - (4)].mose) == NULL)
gen_compute1((yyvsp[(1) - (4)].mval), (yyvsp[(3) - (4)].sval));
else
gen_compute2((yyvsp[(1) - (4)].mval), (yyvsp[(3) - (4)].sval), (yyvsp[(4) - (4)].mose));
delete_mathvar_info((yyvsp[(1) - (4)].mval));
if ((yyvsp[(4) - (4)].mose) != NULL)
tmose = NULL;
;}
break;
case 793:
/* Line 1464 of yacc.c */
#line 2368 "htcobol.y"
{ yyerror(err_msg_bad_form, "ADD");;}
break;
case 794:
/* Line 1464 of yacc.c */
#line 2372 "htcobol.y"
{
gen_add1((yyvsp[(1) - (4)].mval), (yyvsp[(3) - (4)].mval), (yyvsp[(4) - (4)].mose));
delete_mathvar_info((yyvsp[(1) - (4)].mval));
delete_mathvar_info((yyvsp[(3) - (4)].mval));
if ((yyvsp[(4) - (4)].mose) != NULL)
tmose = NULL;
;}
break;
case 795:
/* Line 1464 of yacc.c */
#line 2380 "htcobol.y"
{
gen_add2((yyvsp[(1) - (5)].mval), (yyvsp[(4) - (5)].mval), (yyvsp[(2) - (5)].sval), (yyvsp[(5) - (5)].mose));
delete_mathvar_info((yyvsp[(1) - (5)].mval));
delete_mathvar_info((yyvsp[(4) - (5)].mval));
if ((yyvsp[(5) - (5)].mose) != NULL)
tmose = NULL;
;}
break;
case 796:
/* Line 1464 of yacc.c */
#line 2388 "htcobol.y"
{
gen_addcorr1((yyvsp[(2) - (6)].mval), (yyvsp[(4) - (6)].mval), (yyvsp[(5) - (6)].ival), (yyvsp[(6) - (6)].mose));
delete_mathvar_info((yyvsp[(2) - (6)].mval));
delete_mathvar_info((yyvsp[(4) - (6)].mval));
if ((yyvsp[(6) - (6)].mose) != NULL)
tmose = NULL;
;}
break;
case 797:
/* Line 1464 of yacc.c */
#line 2397 "htcobol.y"
{ (yyval.sval) = NULL; ;}
break;
case 798:
/* Line 1464 of yacc.c */
#line 2398 "htcobol.y"
{ (yyval.sval) = (yyvsp[(2) - (2)].sval); ;}
break;
case 802:
/* Line 1464 of yacc.c */
#line 2409 "htcobol.y"
{ yyerror(err_msg_bad_form, "SUBTRACT");;}
break;
case 803:
/* Line 1464 of yacc.c */
#line 2413 "htcobol.y"
{
gen_subtract1((yyvsp[(1) - (4)].mval), (yyvsp[(3) - (4)].mval), (yyvsp[(4) - (4)].mose));
delete_mathvar_info((yyvsp[(1) - (4)].mval));
delete_mathvar_info((yyvsp[(3) - (4)].mval));
if ((yyvsp[(4) - (4)].mose) != NULL)
tmose = NULL;
;}
break;
case 804:
/* Line 1464 of yacc.c */
#line 2421 "htcobol.y"
{
assert_numeric_sy((yyvsp[(3) - (6)].sval));
gen_subtract2((yyvsp[(1) - (6)].mval), (yyvsp[(5) - (6)].mval), (yyvsp[(3) - (6)].sval), (yyvsp[(6) - (6)].mose));
delete_mathvar_info((yyvsp[(1) - (6)].mval));
delete_mathvar_info((yyvsp[(5) - (6)].mval));
if ((yyvsp[(6) - (6)].mose) != NULL)
tmose = NULL;
;}
break;
case 805:
/* Line 1464 of yacc.c */
#line 2430 "htcobol.y"
{
gen_subtractcorr1((yyvsp[(2) - (6)].mval), (yyvsp[(4) - (6)].mval), (yyvsp[(5) - (6)].ival), (yyvsp[(6) - (6)].mose));
delete_mathvar_info((yyvsp[(2) - (6)].mval));
delete_mathvar_info((yyvsp[(4) - (6)].mval));
if ((yyvsp[(6) - (6)].mose) != NULL)
tmose = NULL;
;}
break;
case 809:
/* Line 1464 of yacc.c */
#line 2446 "htcobol.y"
{ yyerror(err_msg_bad_form, "MULTIPLY");;}
break;
case 810:
/* Line 1464 of yacc.c */
#line 2450 "htcobol.y"
{
assert_numeric_sy((yyvsp[(1) - (6)].sval));
assert_numeric_sy((yyvsp[(3) - (6)].sval));
gen_multiply2((yyvsp[(5) - (6)].mval), (yyvsp[(1) - (6)].sval), (yyvsp[(3) - (6)].sval), (yyvsp[(6) - (6)].mose));
delete_mathvar_info((yyvsp[(5) - (6)].mval));
if ((yyvsp[(6) - (6)].mose) != NULL)
tmose = NULL;
;}
break;
case 811:
/* Line 1464 of yacc.c */
#line 2459 "htcobol.y"
{
assert_numeric_sy((yyvsp[(1) - (4)].sval));
gen_multiply1((yyvsp[(3) - (4)].mval), (yyvsp[(1) - (4)].sval), (yyvsp[(4) - (4)].mose));
delete_mathvar_info((yyvsp[(3) - (4)].mval));
if ((yyvsp[(4) - (4)].mose) != NULL)
tmose = NULL;
;}
break;
case 815:
/* Line 1464 of yacc.c */
#line 2476 "htcobol.y"
{ yyerror(err_msg_bad_form, "DIVIDE");;}
break;
case 816:
/* Line 1464 of yacc.c */
#line 2480 "htcobol.y"
{
assert_numeric_sy((yyvsp[(1) - (6)].sval));
assert_numeric_sy((yyvsp[(3) - (6)].sval));
gen_divide2((yyvsp[(5) - (6)].mval), (yyvsp[(1) - (6)].sval), (yyvsp[(3) - (6)].sval), (yyvsp[(6) - (6)].mose));
delete_mathvar_info((yyvsp[(5) - (6)].mval));
if ((yyvsp[(6) - (6)].mose) != NULL)
tmose = NULL;
;}
break;
case 817:
/* Line 1464 of yacc.c */
#line 2489 "htcobol.y"
{
assert_numeric_sy((yyvsp[(1) - (9)].sval));
assert_numeric_sy((yyvsp[(3) - (9)].sval));
assert_numeric_dest_sy((yyvsp[(5) - (9)].sval));
gen_divide4((yyvsp[(1) - (9)].sval), (yyvsp[(3) - (9)].sval), (yyvsp[(5) - (9)].sval), (yyvsp[(8) - (9)].sval), (yyvsp[(6) - (9)].ival), (yyvsp[(9) - (9)].mose));
if ((yyvsp[(9) - (9)].mose) != NULL)
tmose = NULL;
;}
break;
case 818:
/* Line 1464 of yacc.c */
#line 2498 "htcobol.y"
{
assert_numeric_sy((yyvsp[(1) - (9)].sval));
assert_numeric_sy((yyvsp[(3) - (9)].sval));
assert_numeric_dest_sy((yyvsp[(5) - (9)].sval));
gen_divide4((yyvsp[(3) - (9)].sval), (yyvsp[(1) - (9)].sval), (yyvsp[(5) - (9)].sval), (yyvsp[(8) - (9)].sval), (yyvsp[(6) - (9)].ival), (yyvsp[(9) - (9)].mose));
if ((yyvsp[(9) - (9)].mose) != NULL)
tmose = NULL;
;}
break;
case 819:
/* Line 1464 of yacc.c */
#line 2507 "htcobol.y"
{
assert_numeric_sy((yyvsp[(1) - (6)].sval));
assert_numeric_sy((yyvsp[(3) - (6)].sval));
gen_divide2((yyvsp[(5) - (6)].mval), (yyvsp[(3) - (6)].sval), (yyvsp[(1) - (6)].sval), (yyvsp[(6) - (6)].mose));
delete_mathvar_info((yyvsp[(5) - (6)].mval));
if ((yyvsp[(6) - (6)].mose) != NULL)
tmose = NULL;
;}
break;
case 820:
/* Line 1464 of yacc.c */
#line 2516 "htcobol.y"
{
assert_numeric_sy((yyvsp[(1) - (4)].sval));
gen_divide1((yyvsp[(3) - (4)].mval), (yyvsp[(1) - (4)].sval), (yyvsp[(4) - (4)].mose));
delete_mathvar_info((yyvsp[(3) - (4)].mval));
if ((yyvsp[(4) - (4)].mose) != NULL)
tmose = NULL;
;}
break;
case 826:
/* Line 1464 of yacc.c */
#line 2534 "htcobol.y"
{ yyerror(err_msg_bad_form, "ACCEPT");;}
break;
case 827:
/* Line 1464 of yacc.c */
#line 2537 "htcobol.y"
{ gen_accept_from_inkey((yyvsp[(2) - (5)].sval)); ;}
break;
case 828:
/* Line 1464 of yacc.c */
#line 2538 "htcobol.y"
{ gen_accept_from_inkey((yyvsp[(2) - (6)].sval)); ;}
break;
case 829:
/* Line 1464 of yacc.c */
#line 2539 "htcobol.y"
{ gen_accept_from_cmdline((yyvsp[(2) - (5)].sval)); ;}
break;
case 830:
/* Line 1464 of yacc.c */
#line 2540 "htcobol.y"
{ gen_accept_from_escapekey((yyvsp[(2) - (5)].sval)); ;}
break;
case 831:
/* Line 1464 of yacc.c */
#line 2542 "htcobol.y"
{
save_literal((yyvsp[(5) - (6)].lval),'X');
(yyvsp[(5) - (6)].lval)->all=0;
gen_accept_env_var((yyvsp[(2) - (6)].sval), (yyvsp[(5) - (6)].lval));
;}
break;
case 832:
/* Line 1464 of yacc.c */
#line 2550 "htcobol.y"
{
gen_accept_from_chron((yyvsp[(2) - (5)].sval), (yyvsp[(4) - (5)].ival), 0);
;}
break;
case 833:
/* Line 1464 of yacc.c */
#line 2556 "htcobol.y"
{
/* walter acrescentei co ao final de todo gen_accept( */
/* gen_accept($2, $3, 1); */
co = ((bg * 8) + fg);
gen_accept((yyvsp[(2) - (4)].sval), (yyvsp[(3) - (4)].ival), 1, co);
;}
break;
case 834:
/* Line 1464 of yacc.c */
#line 2563 "htcobol.y"
{
screen_io_enable++;
HTG_prg_uses_term = 1;
/* gen_accept($2, $3, 1); */
co = ((bg * 8) + fg);
gen_accept((yyvsp[(2) - (5)].sval), (yyvsp[(3) - (5)].ival), 1, co);
;}
break;
case 835:
/* Line 1464 of yacc.c */
#line 2570 "htcobol.y"
{
gen_store_fnres((yyvsp[(7) - (7)].sval));
(yyval.dval) = gen_check_zero();
;}
break;
case 836:
/* Line 1464 of yacc.c */
#line 2574 "htcobol.y"
{ gen_dstlabel((yyvsp[(8) - (9)].dval)); ;}
break;
case 842:
/* Line 1464 of yacc.c */
#line 2586 "htcobol.y"
{ yyerror(err_msg_bad_form, "DISPLAY");;}
break;
case 843:
/* Line 1464 of yacc.c */
#line 2591 "htcobol.y"
{ gen_display_line((yyvsp[(3) - (5)].ival), (yyvsp[(4) - (5)].ival), 0); ;}
break;
case 844:
/* Line 1464 of yacc.c */
#line 2595 "htcobol.y"
{
/* walter acrescentei co ao final de todo gen_accept( */
/* gen_accept($2, $3, 1); */
co = ((bg * 8) + fg);
gen_display_screen((yyvsp[(3) - (4)].ival), co); ;}
break;
case 845:
/* Line 1464 of yacc.c */
#line 2602 "htcobol.y"
{ put_disp_list((yyvsp[(1) - (1)].sval)); ;}
break;
case 846:
/* Line 1464 of yacc.c */
#line 2603 "htcobol.y"
{ put_disp_list((yyvsp[(3) - (3)].sval)); ;}
break;
case 847:
/* Line 1464 of yacc.c */
#line 2606 "htcobol.y"
{ (yyval.ival) = 1; ;}
break;
case 848:
/* Line 1464 of yacc.c */
#line 2607 "htcobol.y"
{ (yyval.ival) = 1; ;}
break;
case 849:
/* Line 1464 of yacc.c */
#line 2608 "htcobol.y"
{ (yyval.ival) = 2; ;}
break;
case 850:
/* Line 1464 of yacc.c */
#line 2611 "htcobol.y"
{ (yyval.ival) = 0; ;}
break;
case 851:
/* Line 1464 of yacc.c */
#line 2612 "htcobol.y"
{ (yyval.ival) = (yyvsp[(1) - (4)].ival) | SCR_NO_ADVANCING; ;}
break;
case 852:
/* Line 1464 of yacc.c */
#line 2613 "htcobol.y"
{ (yyval.ival) = (yyvsp[(1) - (3)].ival) | SCR_ERASE_EOL; ;}
break;
case 853:
/* Line 1464 of yacc.c */
#line 2614 "htcobol.y"
{ (yyval.ival) = (yyvsp[(1) - (4)].ival) | SCR_ERASE_EOS; ;}
break;
case 854:
/* Line 1464 of yacc.c */
#line 2615 "htcobol.y"
{ (yyval.ival) = (yyvsp[(1) - (4)].ival) | SCR_ERASE_EOL; ;}
break;
case 855:
/* Line 1464 of yacc.c */
#line 2616 "htcobol.y"
{ (yyval.ival) = (yyvsp[(1) - (4)].ival) | SCR_ERASE_EOS; ;}
break;
case 858:
/* Line 1464 of yacc.c */
#line 2629 "htcobol.y"
{
screen_io_enable++;
HTG_prg_uses_term = 1;
push_expr((yyvsp[(3) - (3)].sval));
gen_gotoy_expr();
;}
break;
case 859:
/* Line 1464 of yacc.c */
#line 2638 "htcobol.y"
{
screen_io_enable++;
HTG_prg_uses_term = 1;
push_expr((yyvsp[(3) - (3)].sval));
gen_gotox_expr();
;}
break;
case 860:
/* Line 1464 of yacc.c */
#line 2645 "htcobol.y"
{
screen_io_enable++;
HTG_prg_uses_term = 1;
push_expr((yyvsp[(2) - (2)].sval));
gen_gotox_expr();
;}
break;
case 861:
/* Line 1464 of yacc.c */
#line 2654 "htcobol.y"
{
screen_io_enable++;
HTG_prg_uses_term = 1;
scr_push_display_position((yyvsp[(2) - (2)].lval));
;}
break;
case 862:
/* Line 1464 of yacc.c */
#line 2660 "htcobol.y"
{
screen_io_enable++;
HTG_prg_uses_term = 1;
scr_push_display_position((yyvsp[(2) - (2)].sval));
;}
break;
case 863:
/* Line 1464 of yacc.c */
#line 2668 "htcobol.y"
{ fg = 0; bg = 0; (yyval.ival) = 0; ;}
break;
case 864:
/* Line 1464 of yacc.c */
#line 2669 "htcobol.y"
{ (yyval.ival) = (yyvsp[(1) - (2)].ival) | (yyvsp[(2) - (2)].ival); ;}
break;
case 865:
/* Line 1464 of yacc.c */
#line 2672 "htcobol.y"
{ (yyval.ival) = (yyvsp[(2) - (2)].ival); ;}
break;
case 866:
/* Line 1464 of yacc.c */
#line 2673 "htcobol.y"
{ (yyval.ival) = 0; ;}
break;
case 867:
/* Line 1464 of yacc.c */
#line 2674 "htcobol.y"
{ (yyval.ival) = 0; ;}
break;
case 868:
/* Line 1464 of yacc.c */
#line 2675 "htcobol.y"
{ (yyval.ival) = 0; ;}
break;
case 869:
/* Line 1464 of yacc.c */
#line 2682 "htcobol.y"
{ HTG_prg_uses_fileio = 1; ;}
break;
case 870:
/* Line 1464 of yacc.c */
#line 2683 "htcobol.y"
{ yyerror(err_msg_bad_form, "OPEN");;}
break;
case 871:
/* Line 1464 of yacc.c */
#line 2686 "htcobol.y"
{ ;}
break;
case 872:
/* Line 1464 of yacc.c */
#line 2687 "htcobol.y"
{ ;}
break;
case 873:
/* Line 1464 of yacc.c */
#line 2691 "htcobol.y"
{ (yyval.ival)=1; ;}
break;
case 874:
/* Line 1464 of yacc.c */
#line 2692 "htcobol.y"
{ (yyval.ival)=2; ;}
break;
case 875:
/* Line 1464 of yacc.c */
#line 2693 "htcobol.y"
{ (yyval.ival)=3; ;}
break;
case 876:
/* Line 1464 of yacc.c */
#line 2694 "htcobol.y"
{ (yyval.ival)=4; ;}
break;
case 877:
/* Line 1464 of yacc.c */
#line 2695 "htcobol.y"
{ yyerror("invalid OPEN mode"); ;}
break;
case 878:
/* Line 1464 of yacc.c */
#line 2698 "htcobol.y"
{ gen_open((yyvsp[(0) - (1)].ival), (yyvsp[(1) - (1)].sval)); ;}
break;
case 879:
/* Line 1464 of yacc.c */
#line 2699 "htcobol.y"
{ gen_open((yyvsp[(0) - (3)].ival), (yyvsp[(3) - (3)].sval)); ;}
break;
case 881:
/* Line 1464 of yacc.c */
#line 2706 "htcobol.y"
{ yyerror(err_msg_bad_form, "CLOSE");;}
break;
case 884:
/* Line 1464 of yacc.c */
#line 2713 "htcobol.y"
{ gen_close((yyvsp[(1) - (2)].sval)); ;}
break;
case 885:
/* Line 1464 of yacc.c */
#line 2717 "htcobol.y"
{
(yyval.ival)=0;
UNIMPLEMENTED ("CLOSE options clause")
;}
break;
case 886:
/* Line 1464 of yacc.c */
#line 2721 "htcobol.y"
{ (yyval.ival)=(yyvsp[(1) - (1)].ival); ;}
break;
case 887:
/* Line 1464 of yacc.c */
#line 2724 "htcobol.y"
{ ;}
break;
case 888:
/* Line 1464 of yacc.c */
#line 2725 "htcobol.y"
{ ;}
break;
case 889:
/* Line 1464 of yacc.c */
#line 2726 "htcobol.y"
{ ;}
break;
case 890:
/* Line 1464 of yacc.c */
#line 2727 "htcobol.y"
{ ;}
break;
case 891:
/* Line 1464 of yacc.c */
#line 2728 "htcobol.y"
{ ;}
break;
case 892:
/* Line 1464 of yacc.c */
#line 2731 "htcobol.y"
{ (yyval.ival)=1; ;}
break;
case 893:
/* Line 1464 of yacc.c */
#line 2732 "htcobol.y"
{ (yyval.ival)=2; ;}
break;
case 894:
/* Line 1464 of yacc.c */
#line 2733 "htcobol.y"
{ (yyval.ival)=0; ;}
break;
case 896:
/* Line 1464 of yacc.c */
#line 2740 "htcobol.y"
{ yyerror(err_msg_bad_form, "RETURN");;}
break;
case 897:
/* Line 1464 of yacc.c */
#line 2746 "htcobol.y"
{
if (gen_reads((yyvsp[(1) - (3)].sval), (yyvsp[(3) - (3)].sval), NULL, 1, 4, 0) != 0) {
YYABORT;
}
;}
break;
case 898:
/* Line 1464 of yacc.c */
#line 2755 "htcobol.y"
{
if (gen_reads((yyvsp[(1) - (4)].sval), (yyvsp[(3) - (4)].sval), NULL, 1, 5, 0) != 0) {
YYABORT;
}
else {
ginfo_container4((yyvsp[(4) - (4)].gic));
gic = NULL;
}
;}
break;
case 899:
/* Line 1464 of yacc.c */
#line 2769 "htcobol.y"
{ ;}
break;
case 900:
/* Line 1464 of yacc.c */
#line 2770 "htcobol.y"
{ yyerror(err_msg_bad_form, "READ");;}
break;
case 901:
/* Line 1464 of yacc.c */
#line 2779 "htcobol.y"
{
if (gen_reads((yyvsp[(1) - (6)].sval), (yyvsp[(4) - (6)].sval), (yyvsp[(6) - (6)].sval), (yyvsp[(2) - (6)].ival), 0, (yyvsp[(5) - (6)].ival)) != 0) {
YYABORT;
}
else {
gen_perform_decl((yyvsp[(1) - (6)].sval));
}
;}
break;
case 902:
/* Line 1464 of yacc.c */
#line 2794 "htcobol.y"
{
if (gen_reads((yyvsp[(1) - (7)].sval), (yyvsp[(4) - (7)].sval), (yyvsp[(6) - (7)].sval), (yyvsp[(2) - (7)].ival), 1, (yyvsp[(5) - (7)].ival)) != 0) {
YYABORT;
}
else {
ginfo_container4((yyvsp[(7) - (7)].gic));
gen_perform_decl((yyvsp[(1) - (7)].sval));
gic = NULL;
}
;}
break;
case 903:
/* Line 1464 of yacc.c */
#line 2811 "htcobol.y"
{
if (gen_reads((yyvsp[(1) - (7)].sval), (yyvsp[(4) - (7)].sval), (yyvsp[(6) - (7)].sval), (yyvsp[(2) - (7)].ival), 2, (yyvsp[(5) - (7)].ival)) != 0) {
YYABORT;
}
else {
gen_test_invalid_keys ((yyvsp[(7) - (7)].iks), (yyvsp[(1) - (7)].sval), 23);
gen_perform_decl((yyvsp[(1) - (7)].sval));
}
;}
break;
case 904:
/* Line 1464 of yacc.c */
#line 2822 "htcobol.y"
{ (yyval.ival) = 0; ;}
break;
case 905:
/* Line 1464 of yacc.c */
#line 2823 "htcobol.y"
{ (yyval.ival) = 1; ;}
break;
case 906:
/* Line 1464 of yacc.c */
#line 2824 "htcobol.y"
{ (yyval.ival) = 2; ;}
break;
case 907:
/* Line 1464 of yacc.c */
#line 2827 "htcobol.y"
{ (yyval.sval) = NULL; ;}
break;
case 908:
/* Line 1464 of yacc.c */
#line 2828 "htcobol.y"
{ (yyval.sval) = (yyvsp[(2) - (2)].sval); ;}
break;
case 909:
/* Line 1464 of yacc.c */
#line 2831 "htcobol.y"
{ (yyval.sval) = NULL; ;}
break;
case 910:
/* Line 1464 of yacc.c */
#line 2832 "htcobol.y"
{ (yyval.sval) = (yyvsp[(3) - (3)].sval); ;}
break;
case 911:
/* Line 1464 of yacc.c */
#line 2836 "htcobol.y"
{
ginfo_container2((yyvsp[(3) - (3)].gic), 2);
(yyval.gic)=ginfo_container3((yyvsp[(3) - (3)].gic), 2);
;}
break;
case 912:
/* Line 1464 of yacc.c */
#line 2841 "htcobol.y"
{
ginfo_container2((yyvsp[(2) - (2)].gic), 1);
(yyval.gic)=ginfo_container3((yyvsp[(2) - (2)].gic), 1);
;}
break;
case 913:
/* Line 1464 of yacc.c */
#line 2846 "htcobol.y"
{
ginfo_container2((yyvsp[(1) - (1)].gic), 1);
(yyval.gic)=ginfo_container3((yyvsp[(1) - (1)].gic), 1);
;}
break;
case 914:
/* Line 1464 of yacc.c */
#line 2851 "htcobol.y"
{
ginfo_container2((yyvsp[(2) - (4)].gic), 1);
;}
break;
case 915:
/* Line 1464 of yacc.c */
#line 2855 "htcobol.y"
{
ginfo_container2((yyvsp[(6) - (6)].gic), 2);
(yyval.gic)=ginfo_container3((yyvsp[(6) - (6)].gic), 3);
;}
break;
case 916:
/* Line 1464 of yacc.c */
#line 2860 "htcobol.y"
{
ginfo_container2((yyvsp[(1) - (3)].gic), 1);
;}
break;
case 917:
/* Line 1464 of yacc.c */
#line 2864 "htcobol.y"
{
ginfo_container2((yyvsp[(5) - (5)].gic), 2);
(yyval.gic)=ginfo_container3((yyvsp[(5) - (5)].gic), 3);
;}
break;
case 918:
/* Line 1464 of yacc.c */
#line 2871 "htcobol.y"
{
if ( gic == NULL ) {
gic=ginfo_container0();
}
(yyval.gic)=ginfo_container1(gic);
stabs_line();
;}
break;
case 919:
/* Line 1464 of yacc.c */
#line 2879 "htcobol.y"
{
(yyval.gic)=(yyvsp[(2) - (3)].gic);
;}
break;
case 920:
/* Line 1464 of yacc.c */
#line 2884 "htcobol.y"
{ (yyval.iks) = gen_invalid_keys ((yyvsp[(1) - (1)].ike), NULL); ;}
break;
case 921:
/* Line 1464 of yacc.c */
#line 2885 "htcobol.y"
{ (yyval.iks) = gen_invalid_keys (NULL, (yyvsp[(1) - (1)].ike)); ;}
break;
case 922:
/* Line 1464 of yacc.c */
#line 2886 "htcobol.y"
{ (yyval.iks) = gen_invalid_keys ((yyvsp[(1) - (2)].ike), (yyvsp[(2) - (2)].ike)); ;}
break;
case 923:
/* Line 1464 of yacc.c */
#line 2889 "htcobol.y"
{ (yyval.ike) = gen_before_invalid_key (); ;}
break;
case 924:
/* Line 1464 of yacc.c */
#line 2890 "htcobol.y"
{ (yyval.ike) = gen_after_invalid_key ((yyvsp[(3) - (4)].ike)); ;}
break;
case 925:
/* Line 1464 of yacc.c */
#line 2893 "htcobol.y"
{ (yyval.ike) = gen_before_invalid_key (); ;}
break;
case 926:
/* Line 1464 of yacc.c */
#line 2894 "htcobol.y"
{ (yyval.ike) = gen_after_invalid_key ((yyvsp[(4) - (5)].ike)); ;}
break;
case 931:
/* Line 1464 of yacc.c */
#line 2909 "htcobol.y"
{
gen_release((yyvsp[(2) - (3)].sval), (yyvsp[(3) - (3)].sval));
;}
break;
case 932:
/* Line 1464 of yacc.c */
#line 2914 "htcobol.y"
{ (yyval.sval) = NULL; ;}
break;
case 933:
/* Line 1464 of yacc.c */
#line 2915 "htcobol.y"
{ (yyval.sval) = (yyvsp[(2) - (2)].sval); ;}
break;
case 934:
/* Line 1464 of yacc.c */
#line 2922 "htcobol.y"
{
if ((yyvsp[(2) - (4)].sval)->level != 1)
yyerror("variable %s could not be used for WRITE", (yyvsp[(2) - (4)].sval)->name);
gen_write((yyvsp[(2) - (4)].sval), (yyvsp[(4) - (4)].sval), (yyvsp[(3) - (4)].sval), write_advancing_sw);
;}
break;
case 935:
/* Line 1464 of yacc.c */
#line 2928 "htcobol.y"
{gen_test_invalid_keys ((yyvsp[(6) - (7)].iks), (yyvsp[(2) - (7)].sval), 22);;}
break;
case 936:
/* Line 1464 of yacc.c */
#line 2931 "htcobol.y"
{ (yyval.sval) = NULL; ;}
break;
case 937:
/* Line 1464 of yacc.c */
#line 2932 "htcobol.y"
{ (yyval.sval) = (yyvsp[(2) - (2)].sval); ;}
break;
case 938:
/* Line 1464 of yacc.c */
#line 2935 "htcobol.y"
{ (yyval.sval) = NULL; write_advancing_sw = 0; ;}
break;
case 939:
/* Line 1464 of yacc.c */
#line 2937 "htcobol.y"
{
/* gen_loadvar($3); */
(yyval.sval) = (yyvsp[(3) - (4)].sval);
write_advancing_sw = (yyvsp[(1) - (4)].ival);
;}
break;
case 940:
/* Line 1464 of yacc.c */
#line 2943 "htcobol.y"
{
write_advancing_sw = -(yyvsp[(1) - (3)].ival);
(yyval.sval) = NULL;
;}
break;
case 943:
/* Line 1464 of yacc.c */
#line 2957 "htcobol.y"
{
if ((yyvsp[(2) - (3)].sval)->level != 1)
yyerror("variable %s could not be used for REWRITE", (yyvsp[(2) - (3)].sval)->name);
gen_rewrite((yyvsp[(2) - (3)].sval), (yyvsp[(3) - (3)].sval));
;}
break;
case 944:
/* Line 1464 of yacc.c */
#line 2963 "htcobol.y"
{gen_test_invalid_keys ((yyvsp[(5) - (6)].iks), (yyvsp[(2) - (6)].sval), 22);;}
break;
case 947:
/* Line 1464 of yacc.c */
#line 2973 "htcobol.y"
{ gen_delete((yyvsp[(2) - (3)].sval)); ;}
break;
case 948:
/* Line 1464 of yacc.c */
#line 2975 "htcobol.y"
{gen_test_invalid_keys ((yyvsp[(5) - (6)].iks), (yyvsp[(2) - (6)].sval), 23);;}
break;
case 951:
/* Line 1464 of yacc.c */
#line 2986 "htcobol.y"
{gen_test_invalid_keys ((yyvsp[(3) - (3)].iks), (yyvsp[(2) - (3)].sval), 23);;}
break;
case 953:
/* Line 1464 of yacc.c */
#line 2990 "htcobol.y"
{ gen_start((yyvsp[(1) - (1)].sval),0,NULL); (yyval.sval) = (yyvsp[(1) - (1)].sval);;}
break;
case 954:
/* Line 1464 of yacc.c */
#line 2991 "htcobol.y"
{ gen_start((yyvsp[(1) - (5)].sval),(yyvsp[(4) - (5)].ival),(yyvsp[(5) - (5)].sval)); (yyval.sval) = (yyvsp[(1) - (5)].sval);;}
break;
case 957:
/* Line 1464 of yacc.c */
#line 3005 "htcobol.y"
{ gen_goto((yyvsp[(3) - (3)].lstval)); ;}
break;
case 958:
/* Line 1464 of yacc.c */
#line 3007 "htcobol.y"
{
if (is_numeric_sy((yyvsp[(6) - (6)].sval)))
gen_goto_depending((yyvsp[(3) - (6)].lstval), (yyvsp[(6) - (6)].sval));
else yyerror("variable '%s' must be numeric", (yyvsp[(6) - (6)].sval)->name);
;}
break;
case 959:
/* Line 1464 of yacc.c */
#line 3013 "htcobol.y"
{ (yyval.lstval) = insert_list(NULL, (yyvsp[(1) - (1)].sval)); ;}
break;
case 960:
/* Line 1464 of yacc.c */
#line 3016 "htcobol.y"
{ (yyval.lstval) = insert_list(NULL, (yyvsp[(1) - (1)].sval)); ;}
break;
case 961:
/* Line 1464 of yacc.c */
#line 3017 "htcobol.y"
{ (yyval.lstval) = insert_list((yyvsp[(1) - (2)].lstval), (yyvsp[(2) - (2)].sval)); ;}
break;
case 962:
/* Line 1464 of yacc.c */
#line 3018 "htcobol.y"
{ (yyval.lstval) = insert_list((yyvsp[(1) - (3)].lstval), (yyvsp[(3) - (3)].sval)); ;}
break;
case 963:
/* Line 1464 of yacc.c */
#line 3023 "htcobol.y"
{ curr_call_mode=CM_REF; ;}
break;
case 964:
/* Line 1464 of yacc.c */
#line 3028 "htcobol.y"
{ (yyval.ival) = loc_label++; /* exception check */ ;}
break;
case 965:
/* Line 1464 of yacc.c */
#line 3029 "htcobol.y"
{ (yyval.ival) = loc_label++; /* not exception check */ ;}
break;
case 966:
/* Line 1464 of yacc.c */
#line 3030 "htcobol.y"
{
(yyval.ival) = emt_call((struct lit *)(yyvsp[(4) - (8)].sval), (yyvsp[(5) - (8)].ival), (yyvsp[(7) - (8)].ival), (yyvsp[(8) - (8)].ival), (yyvsp[(6) - (8)].sval));
/* gen_store_fnres($6); */
/* If paramater is a variable then dynamic link libs are required */
/*
if ($4->litflag == 0 ) {
HTG_prg_uses_dcall = 1;
}
*/
;}
break;
case 967:
/* Line 1464 of yacc.c */
#line 3041 "htcobol.y"
{ check_call_except((yyvsp[(10) - (11)].ival), (yyvsp[(11) - (11)].ival), (yyvsp[(7) - (11)].ival), (yyvsp[(8) - (11)].ival), (yyvsp[(9) - (11)].ival)); ;}
break;
case 969:
/* Line 1464 of yacc.c */
#line 3043 "htcobol.y"
{ yyerror(err_msg_bad_form, "CALL"); ;}
break;
case 970:
/* Line 1464 of yacc.c */
#line 3046 "htcobol.y"
{ curr_call_convention = 0; ;}
break;
case 971:
/* Line 1464 of yacc.c */
#line 3047 "htcobol.y"
{ curr_call_convention = 0; ;}
break;
case 972:
/* Line 1464 of yacc.c */
#line 3048 "htcobol.y"
{ curr_call_convention = 1; ;}
break;
case 973:
/* Line 1464 of yacc.c */
#line 3056 "htcobol.y"
{
emt_call_loadlib((struct lit *)(yyvsp[(2) - (2)].sval));
;}
break;
case 975:
/* Line 1464 of yacc.c */
#line 3060 "htcobol.y"
{ yyerror(err_msg_bad_form, "CALL-LOADLIB"); ;}
break;
case 976:
/* Line 1464 of yacc.c */
#line 3064 "htcobol.y"
{ ;}
break;
case 977:
/* Line 1464 of yacc.c */
#line 3065 "htcobol.y"
{ ;}
break;
case 978:
/* Line 1464 of yacc.c */
#line 3070 "htcobol.y"
{ curr_call_mode=CM_CHAIN; ;}
break;
case 979:
/* Line 1464 of yacc.c */
#line 3072 "htcobol.y"
{ (yyval.ival) = loc_label++; /* exception check */ ;}
break;
case 980:
/* Line 1464 of yacc.c */
#line 3073 "htcobol.y"
{ (yyval.ival) = gen_chain((yyvsp[(3) - (5)].sval),(yyvsp[(4) - (5)].ival),(yyvsp[(5) - (5)].ival)); ;}
break;
case 981:
/* Line 1464 of yacc.c */
#line 3075 "htcobol.y"
{/* check_call_except($9,$10,$<ival>6,$<ival>7,$<ival>8);*/ ;}
break;
case 983:
/* Line 1464 of yacc.c */
#line 3077 "htcobol.y"
{ yyerror(err_msg_bad_form, "CHAIN"); ;}
break;
case 984:
/* Line 1464 of yacc.c */
#line 3082 "htcobol.y"
{ gen_exit(0); ;}
break;
case 985:
/* Line 1464 of yacc.c */
#line 3083 "htcobol.y"
{ gen_exit(0); ;}
break;
case 986:
/* Line 1464 of yacc.c */
#line 3084 "htcobol.y"
{ gen_exit(1); ;}
break;
case 987:
/* Line 1464 of yacc.c */
#line 3089 "htcobol.y"
{ gen_stoprun(); ;}
break;
case 988:
/* Line 1464 of yacc.c */
#line 3091 "htcobol.y"
{
struct sym *sy;
/* walter acrescentei 0 ao final */
gen_display_line(2, SCR_NO_ADVANCING, 0);
sy = define_temp_field(DTYPE_ALPHANUMERIC,1);
/* walter acrescentei 0 ao final
gen_accept(sy, 0, 1); */
gen_accept(sy, 0, 1, 0);
;}
break;
case 989:
/* Line 1464 of yacc.c */
#line 3103 "htcobol.y"
{
save_literal((yyvsp[(1) - (1)].lval),'X');
(yyvsp[(1) - (1)].lval)->all=0;
put_disp_list((struct sym *)(yyvsp[(1) - (1)].lval));
;}
break;
case 990:
/* Line 1464 of yacc.c */
#line 3109 "htcobol.y"
{
save_literal((yyvsp[(1) - (1)].lval),'X');
(yyvsp[(1) - (1)].lval)->all=0;
put_disp_list((struct sym *)(yyvsp[(1) - (1)].lval));
;}
break;
case 991:
/* Line 1464 of yacc.c */
#line 3118 "htcobol.y"
{ gen_goback(); ;}
break;
case 992:
/* Line 1464 of yacc.c */
#line 3122 "htcobol.y"
{
(yyval.mval) = create_mathvar_info(NULL, (yyvsp[(1) - (3)].sval), (yyvsp[(2) - (3)].ival));
;}
break;
case 993:
/* Line 1464 of yacc.c */
#line 3126 "htcobol.y"
{
(yyval.mval) = create_mathvar_info((yyvsp[(1) - (4)].mval), (yyvsp[(2) - (4)].sval), (yyvsp[(3) - (4)].ival));
;}
break;
case 994:
/* Line 1464 of yacc.c */
#line 3132 "htcobol.y"
{
(yyval.mval) = create_mathvar_info(NULL, (yyvsp[(1) - (2)].sval), 0);
;}
break;
case 995:
/* Line 1464 of yacc.c */
#line 3136 "htcobol.y"
{
(yyval.mval) = create_mathvar_info((yyvsp[(1) - (3)].mval), (yyvsp[(2) - (3)].sval), 0);
;}
break;
case 996:
/* Line 1464 of yacc.c */
#line 3142 "htcobol.y"
{ (yyval.ival)=0; ;}
break;
case 997:
/* Line 1464 of yacc.c */
#line 3143 "htcobol.y"
{ (yyval.ival)=1; ;}
break;
case 998:
/* Line 1464 of yacc.c */
#line 3148 "htcobol.y"
{
(yyval.mose)=NULL;
;}
break;
case 999:
/* Line 1464 of yacc.c */
#line 3153 "htcobol.y"
{
(yyval.mose)=math_on_size_error4((yyvsp[(4) - (4)].mose), 2);
;}
break;
case 1000:
/* Line 1464 of yacc.c */
#line 3158 "htcobol.y"
{
(yyval.mose)=math_on_size_error4((yyvsp[(3) - (3)].mose), 1);
;}
break;
case 1001:
/* Line 1464 of yacc.c */
#line 3164 "htcobol.y"
{
(yyvsp[(3) - (6)].mose)->lbl1=(yyvsp[(3) - (6)].mose)->ose;
;}
break;
case 1002:
/* Line 1464 of yacc.c */
#line 3168 "htcobol.y"
{
(yyval.mose)=math_on_size_error4((yyvsp[(8) - (8)].mose), 3);
;}
break;
case 1003:
/* Line 1464 of yacc.c */
#line 3175 "htcobol.y"
{
if ( tmose == NULL ) {
tmose=math_on_size_error0();
(yyval.mose)=math_on_size_error1(tmose);
}
else {
(yyval.mose)=math_on_size_error1(tmose);
}
stabs_line();
;}
break;
case 1004:
/* Line 1464 of yacc.c */
#line 3186 "htcobol.y"
{
math_on_size_error2(tmose);
(yyval.mose)=(yyvsp[(2) - (3)].mose);
;}
break;
case 1012:
/* Line 1464 of yacc.c */
#line 3210 "htcobol.y"
{ gen_set_list((yyvsp[(1) - (4)].sval),SET_TO,(yyvsp[(4) - (4)].sval),0,(yyvsp[(3) - (4)].ival)); ;}
break;
case 1013:
/* Line 1464 of yacc.c */
#line 3212 "htcobol.y"
{ gen_set_list((yyvsp[(1) - (4)].sval),SET_UP_BY,(yyvsp[(4) - (4)].sval),0,0); ;}
break;
case 1014:
/* Line 1464 of yacc.c */
#line 3214 "htcobol.y"
{ gen_set_list((yyvsp[(1) - (4)].sval),SET_DOWN_BY,(yyvsp[(4) - (4)].sval),0,0); ;}
break;
case 1015:
/* Line 1464 of yacc.c */
#line 3216 "htcobol.y"
{ gen_set((yyvsp[(2) - (5)].sval),SET_TO,(yyvsp[(5) - (5)].sval),(yyvsp[(1) - (5)].ival),(yyvsp[(4) - (5)].ival)); ;}
break;
case 1016:
/* Line 1464 of yacc.c */
#line 3221 "htcobol.y"
{ (yyval.sval) = (yyvsp[(1) - (1)].sval); ;}
break;
case 1017:
/* Line 1464 of yacc.c */
#line 3222 "htcobol.y"
{ (yyval.sval) = (struct sym *)chain_var((yyvsp[(1) - (1)].sval)); ;}
break;
case 1018:
/* Line 1464 of yacc.c */
#line 3226 "htcobol.y"
{ (yyval.sval) = (yyvsp[(1) - (1)].sval); ;}
break;
case 1019:
/* Line 1464 of yacc.c */
#line 3227 "htcobol.y"
{ (yyval.sval) = NULL; ;}
break;
case 1020:
/* Line 1464 of yacc.c */
#line 3231 "htcobol.y"
{ (yyval.sval) = (yyvsp[(1) - (1)].sval); ;}
break;
case 1021:
/* Line 1464 of yacc.c */
#line 3232 "htcobol.y"
{ (yyval.sval) = (struct sym *)define_num_lit(1); ;}
break;
case 1022:
/* Line 1464 of yacc.c */
#line 3233 "htcobol.y"
{ (yyval.sval) = (struct sym *)spe_lit_ZE; ;}
break;
case 1023:
/* Line 1464 of yacc.c */
#line 3234 "htcobol.y"
{ (yyval.sval) = NULL; ;}
break;
case 1024:
/* Line 1464 of yacc.c */
#line 3236 "htcobol.y"
{
(yyval.sval) = (struct sym *)1;
/* no (struct sym *) may have this value! */
;}
break;
case 1025:
/* Line 1464 of yacc.c */
#line 3243 "htcobol.y"
{ (yyval.ival) = 0; ;}
break;
case 1026:
/* Line 1464 of yacc.c */
#line 3244 "htcobol.y"
{ (yyval.ival) = 1; ;}
break;
case 1027:
/* Line 1464 of yacc.c */
#line 3251 "htcobol.y"
{
gen_stringcmd( (yyvsp[(2) - (5)].sfval), (yyvsp[(4) - (5)].sval), (yyvsp[(5) - (5)].sval) );
;}
break;
case 1029:
/* Line 1464 of yacc.c */
#line 3262 "htcobol.y"
{
gen_unstring( (yyvsp[(2) - (7)].sval), (yyvsp[(3) - (7)].udval), (yyvsp[(5) - (7)].udstval), (yyvsp[(6) - (7)].sval), (yyvsp[(7) - (7)].sval) );
;}
break;
case 1031:
/* Line 1464 of yacc.c */
#line 3269 "htcobol.y"
{ (yyval.udval)=(yyvsp[(3) - (3)].udval); ;}
break;
case 1032:
/* Line 1464 of yacc.c */
#line 3270 "htcobol.y"
{ (yyval.udval)=NULL; ;}
break;
case 1033:
/* Line 1464 of yacc.c */
#line 3273 "htcobol.y"
{ (yyval.udval)=alloc_unstring_delimited((yyvsp[(1) - (2)].ival),(yyvsp[(2) - (2)].sval)); ;}
break;
case 1034:
/* Line 1464 of yacc.c */
#line 3274 "htcobol.y"
{
struct unstring_delimited *ud;
ud=alloc_unstring_delimited((yyvsp[(3) - (4)].ival),(yyvsp[(4) - (4)].sval));
ud->next = (yyvsp[(1) - (4)].udval);
(yyval.udval)=ud;
;}
break;
case 1035:
/* Line 1464 of yacc.c */
#line 3282 "htcobol.y"
{ (yyval.udstval)=(yyvsp[(1) - (1)].udstval); ;}
break;
case 1036:
/* Line 1464 of yacc.c */
#line 3284 "htcobol.y"
{
(yyvsp[(3) - (3)].udstval)->next = (yyvsp[(1) - (3)].udstval);
(yyval.udstval) = (yyvsp[(3) - (3)].udstval);
;}
break;
case 1037:
/* Line 1464 of yacc.c */
#line 3290 "htcobol.y"
{
(yyval.udstval) = alloc_unstring_dest( (yyvsp[(1) - (3)].sval), (yyvsp[(2) - (3)].sval), (yyvsp[(3) - (3)].sval) );
;}
break;
case 1038:
/* Line 1464 of yacc.c */
#line 3295 "htcobol.y"
{ (yyval.sval)=NULL; ;}
break;
case 1039:
/* Line 1464 of yacc.c */
#line 3296 "htcobol.y"
{ (yyval.sval)=(yyvsp[(3) - (3)].sval); ;}
break;
case 1040:
/* Line 1464 of yacc.c */
#line 3299 "htcobol.y"
{ (yyval.sval)=NULL; ;}
break;
case 1041:
/* Line 1464 of yacc.c */
#line 3300 "htcobol.y"
{ (yyval.sval)=(yyvsp[(3) - (3)].sval); ;}
break;
case 1042:
/* Line 1464 of yacc.c */
#line 3303 "htcobol.y"
{ (yyval.sval)=NULL; ;}
break;
case 1043:
/* Line 1464 of yacc.c */
#line 3304 "htcobol.y"
{ (yyval.sval)=(yyvsp[(3) - (3)].sval); ;}
break;
case 1044:
/* Line 1464 of yacc.c */
#line 3307 "htcobol.y"
{ (yyval.ival)=0; ;}
break;
case 1045:
/* Line 1464 of yacc.c */
#line 3308 "htcobol.y"
{ (yyval.ival)=1; ;}
break;
case 1046:
/* Line 1464 of yacc.c */
#line 3311 "htcobol.y"
{ curr_division = CDIV_EXCEPTION; ;}
break;
case 1047:
/* Line 1464 of yacc.c */
#line 3314 "htcobol.y"
{ curr_division = CDIV_PROC; ;}
break;
case 1048:
/* Line 1464 of yacc.c */
#line 3317 "htcobol.y"
{ (yyval.ival) = begin_on_except(); ;}
break;
case 1049:
/* Line 1464 of yacc.c */
#line 3318 "htcobol.y"
{ gen_jmplabel((yyvsp[(0) - (4)].dval)); (yyval.ival)=(yyvsp[(3) - (4)].ival); ;}
break;
case 1050:
/* Line 1464 of yacc.c */
#line 3319 "htcobol.y"
{ (yyval.ival) = 0; ;}
break;
case 1053:
/* Line 1464 of yacc.c */
#line 3326 "htcobol.y"
{ (yyval.ival) = begin_on_except(); ;}
break;
case 1054:
/* Line 1464 of yacc.c */
#line 3327 "htcobol.y"
{ gen_jmplabel((yyvsp[(-1) - (5)].dval)); (yyval.ival)=(yyvsp[(4) - (5)].ival); ;}
break;
case 1055:
/* Line 1464 of yacc.c */
#line 3328 "htcobol.y"
{ (yyval.ival) = 0; ;}
break;
case 1056:
/* Line 1464 of yacc.c */
#line 3331 "htcobol.y"
{ (yyval.dval) = gen_at_end(1); ;}
break;
case 1057:
/* Line 1464 of yacc.c */
#line 3332 "htcobol.y"
{ gen_dstlabel((yyvsp[(3) - (4)].dval)); ;}
break;
case 1059:
/* Line 1464 of yacc.c */
#line 3336 "htcobol.y"
{ (yyval.dval) = gen_at_end(0); ;}
break;
case 1060:
/* Line 1464 of yacc.c */
#line 3337 "htcobol.y"
{ gen_dstlabel((yyvsp[(4) - (5)].dval)); ;}
break;
case 1062:
/* Line 1464 of yacc.c */
#line 3342 "htcobol.y"
{(yyval.iks) = gen_invalid_keys((yyvsp[(1) - (1)].ike), NULL);;}
break;
case 1063:
/* Line 1464 of yacc.c */
#line 3343 "htcobol.y"
{(yyval.iks) = gen_invalid_keys(NULL, (yyvsp[(1) - (1)].ike));;}
break;
case 1064:
/* Line 1464 of yacc.c */
#line 3345 "htcobol.y"
{(yyval.iks) = gen_invalid_keys((yyvsp[(1) - (2)].ike), (yyvsp[(2) - (2)].ike));;}
break;
case 1065:
/* Line 1464 of yacc.c */
#line 3346 "htcobol.y"
{ (yyval.iks) = NULL;;}
break;
case 1066:
/* Line 1464 of yacc.c */
#line 3349 "htcobol.y"
{ (yyval.ike) = gen_before_invalid_key(); ;}
break;
case 1067:
/* Line 1464 of yacc.c */
#line 3350 "htcobol.y"
{ (yyval.ike) = gen_after_invalid_key((yyvsp[(3) - (4)].ike)); ;}
break;
case 1068:
/* Line 1464 of yacc.c */
#line 3353 "htcobol.y"
{ (yyval.ike) = gen_before_invalid_key(); ;}
break;
case 1069:
/* Line 1464 of yacc.c */
#line 3354 "htcobol.y"
{ (yyval.ike) = gen_after_invalid_key((yyvsp[(4) - (5)].ike)); ;}
break;
case 1072:
/* Line 1464 of yacc.c */
#line 3361 "htcobol.y"
{ (yyval.sval) = (yyvsp[(3) - (3)].sval); ;}
break;
case 1073:
/* Line 1464 of yacc.c */
#line 3362 "htcobol.y"
{ (yyval.sval) = NULL; ;}
break;
case 1074:
/* Line 1464 of yacc.c */
#line 3365 "htcobol.y"
{ (yyval.sfval) = (yyvsp[(1) - (1)].sfval); ;}
break;
case 1075:
/* Line 1464 of yacc.c */
#line 3366 "htcobol.y"
{
(yyvsp[(3) - (3)].sfval)->next = (yyvsp[(1) - (3)].sfval);
(yyval.sfval) = (yyvsp[(3) - (3)].sfval);
;}
break;
case 1076:
/* Line 1464 of yacc.c */
#line 3370 "htcobol.y"
{ yyerror("variable expected"); ;}
break;
case 1077:
/* Line 1464 of yacc.c */
#line 3373 "htcobol.y"
{
/* Item with no DELIMITED BY section implies use delimiter of next item */
(yyval.sfval) = alloc_string_from( (yyvsp[(1) - (1)].sval), (struct sym *)-1 );
;}
break;
case 1078:
/* Line 1464 of yacc.c */
#line 3377 "htcobol.y"
{
(yyval.sfval) = alloc_string_from( (yyvsp[(1) - (4)].sval), (yyvsp[(4) - (4)].sval) );
;}
break;
case 1079:
/* Line 1464 of yacc.c */
#line 3382 "htcobol.y"
{ (yyval.sval)=(yyvsp[(1) - (1)].sval); ;}
break;
case 1080:
/* Line 1464 of yacc.c */
#line 3383 "htcobol.y"
{ (yyval.sval)=NULL; ;}
break;
case 1081:
/* Line 1464 of yacc.c */
#line 3384 "htcobol.y"
{ yyerror("SIZE or identifier expected"); ;}
break;
case 1086:
/* Line 1464 of yacc.c */
#line 3399 "htcobol.y"
{ gen_inspect((yyvsp[(2) - (3)].sval),(void *)(yyvsp[(3) - (3)].tlval),0); ;}
break;
case 1087:
/* Line 1464 of yacc.c */
#line 3400 "htcobol.y"
{ gen_inspect((yyvsp[(2) - (5)].sval),(void *)(yyvsp[(5) - (5)].repval),1); ;}
break;
case 1088:
/* Line 1464 of yacc.c */
#line 3403 "htcobol.y"
{ gen_inspect((yyvsp[(2) - (3)].sval),(void *)(yyvsp[(3) - (3)].cvval),2); ;}
break;
case 1089:
/* Line 1464 of yacc.c */
#line 3407 "htcobol.y"
{
(yyval.cvval) = alloc_converting_struct((yyvsp[(2) - (5)].sval),(yyvsp[(4) - (5)].sval),(yyvsp[(5) - (5)].baval));
;}
break;
case 1090:
/* Line 1464 of yacc.c */
#line 3412 "htcobol.y"
{ (yyval.tlval)=(yyvsp[(2) - (2)].tlval); ;}
break;
case 1091:
/* Line 1464 of yacc.c */
#line 3413 "htcobol.y"
{ (yyval.tlval)=NULL; ;}
break;
case 1092:
/* Line 1464 of yacc.c */
#line 3417 "htcobol.y"
{
(yyval.tlval) = alloc_tallying_list((yyvsp[(1) - (4)].tlval),(yyvsp[(2) - (4)].sval),(yyvsp[(4) - (4)].tfval)); ;}
break;
case 1093:
/* Line 1464 of yacc.c */
#line 3419 "htcobol.y"
{ (yyval.tlval) = NULL; ;}
break;
case 1094:
/* Line 1464 of yacc.c */
#line 3423 "htcobol.y"
{
(yyval.tfval) = alloc_tallying_for_list((yyvsp[(1) - (3)].tfval),INSPECT_CHARACTERS,NULL,(yyvsp[(3) - (3)].baval)); ;}
break;
case 1095:
/* Line 1464 of yacc.c */
#line 3426 "htcobol.y"
{
(yyval.tfval) = alloc_tallying_for_list((yyvsp[(1) - (4)].tfval),INSPECT_ALL,(yyvsp[(3) - (4)].sval),(yyvsp[(4) - (4)].baval)); ;}
break;
case 1096:
/* Line 1464 of yacc.c */
#line 3429 "htcobol.y"
{
(yyval.tfval) = alloc_tallying_for_list((yyvsp[(1) - (4)].tfval),INSPECT_LEADING,(yyvsp[(3) - (4)].sval),(yyvsp[(4) - (4)].baval)); ;}
break;
case 1097:
/* Line 1464 of yacc.c */
#line 3431 "htcobol.y"
{ (yyval.tfval) = NULL; ;}
break;
case 1098:
/* Line 1464 of yacc.c */
#line 3435 "htcobol.y"
{ (yyval.repval) = (yyvsp[(2) - (2)].repval); ;}
break;
case 1099:
/* Line 1464 of yacc.c */
#line 3436 "htcobol.y"
{ (yyval.repval) = NULL; ;}
break;
case 1100:
/* Line 1464 of yacc.c */
#line 3440 "htcobol.y"
{
(yyval.repval) = alloc_replacing_list((yyvsp[(1) - (5)].repval),INSPECT_CHARACTERS,NULL,(yyvsp[(4) - (5)].sval),(yyvsp[(5) - (5)].baval)); ;}
break;
case 1101:
/* Line 1464 of yacc.c */
#line 3443 "htcobol.y"
{
(yyval.repval) = alloc_replacing_list((yyvsp[(1) - (3)].repval),(yyvsp[(2) - (3)].ival),(yyvsp[(3) - (3)].rbval),NULL,NULL); ;}
break;
case 1102:
/* Line 1464 of yacc.c */
#line 3445 "htcobol.y"
{ (yyval.repval) = NULL; ;}
break;
case 1103:
/* Line 1464 of yacc.c */
#line 3449 "htcobol.y"
{
(yyval.rbval) = alloc_replacing_by_list((yyvsp[(1) - (5)].rbval),(yyvsp[(2) - (5)].sval),(yyvsp[(4) - (5)].sval),(yyvsp[(5) - (5)].baval)); ;}
break;
case 1104:
/* Line 1464 of yacc.c */
#line 3451 "htcobol.y"
{ (yyval.rbval) = NULL; ;}
break;
case 1105:
/* Line 1464 of yacc.c */
#line 3454 "htcobol.y"
{ (yyval.ival) = INSPECT_ALL; ;}
break;
case 1106:
/* Line 1464 of yacc.c */
#line 3455 "htcobol.y"
{ (yyval.ival) = INSPECT_LEADING; ;}
break;
case 1107:
/* Line 1464 of yacc.c */
#line 3456 "htcobol.y"
{ (yyval.ival) = INSPECT_TRAILING; ;}
break;
case 1108:
/* Line 1464 of yacc.c */
#line 3457 "htcobol.y"
{ (yyval.ival) = INSPECT_FIRST; ;}
break;
case 1109:
/* Line 1464 of yacc.c */
#line 3462 "htcobol.y"
{ (yyval.baval) = alloc_inspect_before_after((yyvsp[(1) - (4)].baval),1,(yyvsp[(4) - (4)].sval)); ;}
break;
case 1110:
/* Line 1464 of yacc.c */
#line 3465 "htcobol.y"
{ (yyval.baval) = alloc_inspect_before_after((yyvsp[(1) - (4)].baval),2,(yyvsp[(4) - (4)].sval)); ;}
break;
case 1111:
/* Line 1464 of yacc.c */
#line 3466 "htcobol.y"
{ (yyval.baval) = alloc_inspect_before_after(NULL,0,NULL); ;}
break;
case 1114:
/* Line 1464 of yacc.c */
#line 3474 "htcobol.y"
{ (yyval.sval) = (yyvsp[(1) - (1)].sval); ;}
break;
case 1115:
/* Line 1464 of yacc.c */
#line 3475 "htcobol.y"
{ (yyval.sval) =
(struct sym *)create_expr('*',(struct expr *)(yyvsp[(1) - (3)].sval),(struct expr *)(yyvsp[(3) - (3)].sval)); ;}
break;
case 1116:
/* Line 1464 of yacc.c */
#line 3477 "htcobol.y"
{ (yyval.sval) =
(struct sym *)create_expr('/',(struct expr *)(yyvsp[(1) - (3)].sval),(struct expr *)(yyvsp[(3) - (3)].sval)); ;}
break;
case 1117:
/* Line 1464 of yacc.c */
#line 3479 "htcobol.y"
{ (yyval.sval) =
(struct sym *)create_expr('+',(struct expr *)(yyvsp[(1) - (3)].sval),(struct expr *)(yyvsp[(3) - (3)].sval)); ;}
break;
case 1118:
/* Line 1464 of yacc.c */
#line 3481 "htcobol.y"
{ (yyval.sval) =
(struct sym *)create_expr('-',(struct expr *)(yyvsp[(1) - (3)].sval),(struct expr *)(yyvsp[(3) - (3)].sval)); ;}
break;
case 1119:
/* Line 1464 of yacc.c */
#line 3483 "htcobol.y"
{ (yyval.sval) =
(struct sym *)create_expr('^',(struct expr *)(yyvsp[(1) - (3)].sval),(struct expr *)(yyvsp[(3) - (3)].sval)); ;}
break;
case 1120:
/* Line 1464 of yacc.c */
#line 3485 "htcobol.y"
{ (yyval.sval)=(yyvsp[(2) - (3)].sval); ;}
break;
case 1121:
/* Line 1464 of yacc.c */
#line 3490 "htcobol.y"
{ (yyval.sval) = (struct sym *)-1; ;}
break;
case 1122:
/* Line 1464 of yacc.c */
#line 3491 "htcobol.y"
{ (yyval.sval) = (yyvsp[(1) - (1)].sval); ;}
break;
case 1123:
/* Line 1464 of yacc.c */
#line 3494 "htcobol.y"
{ (yyval.ival)=0; ;}
break;
case 1124:
/* Line 1464 of yacc.c */
#line 3495 "htcobol.y"
{ (yyval.ival)=0; /* to save how many parameters */ ;}
break;
case 1125:
/* Line 1464 of yacc.c */
#line 3496 "htcobol.y"
{ (yyval.ival)=CALL; ;}
break;
case 1126:
/* Line 1464 of yacc.c */
#line 3497 "htcobol.y"
{ (yyval.ival)=(yyvsp[(2) - (5)].ival); ;}
break;
case 1127:
/* Line 1464 of yacc.c */
#line 3500 "htcobol.y"
{ (yyval.sval)=0; ;}
break;
case 1128:
/* Line 1464 of yacc.c */
#line 3501 "htcobol.y"
{ (yyval.sval)=(yyvsp[(2) - (2)].sval); ;}
break;
case 1129:
/* Line 1464 of yacc.c */
#line 3502 "htcobol.y"
{ (yyval.sval)=(yyvsp[(2) - (2)].sval); ;}
break;
case 1131:
/* Line 1464 of yacc.c */
#line 3507 "htcobol.y"
{ (yyval.ival)=0; ;}
break;
case 1132:
/* Line 1464 of yacc.c */
#line 3508 "htcobol.y"
{ gen_save_usings((yyvsp[(2) - (2)].glistval)); (yyval.ival)=1; ;}
break;
case 1133:
/* Line 1464 of yacc.c */
#line 3509 "htcobol.y"
{ gen_save_chainings((yyvsp[(2) - (2)].glistval)); (yyval.ival)=2; ;}
break;
case 1134:
/* Line 1464 of yacc.c */
#line 3514 "htcobol.y"
{ if ((yyvsp[(0) - (3)].ival) == USING)
gen_save_using((yyvsp[(3) - (3)].sval));
else if ((yyvsp[(0) - (3)].ival) == CALL) {
gen_push_using((yyvsp[(3) - (3)].sval));
}
;}
break;
case 1135:
/* Line 1464 of yacc.c */
#line 3521 "htcobol.y"
{ if ((yyvsp[(0) - (1)].ival) == USING)
gen_save_using((yyvsp[(1) - (1)].sval));
else if ((yyvsp[(0) - (1)].ival) == CALL) {
gen_push_using((yyvsp[(1) - (1)].sval));
}
;}
break;
case 1136:
/* Line 1464 of yacc.c */
#line 3529 "htcobol.y"
{(yyval.sval)=(yyvsp[(1) - (1)].sval);
if ((yyval.sval)->litflag==1) {
struct lit *lp=(struct lit *)(yyval.sval);
lp->call_mode=curr_call_mode;
}
else
(yyval.sval)->call_mode=curr_call_mode;
;}
break;
case 1137:
/* Line 1464 of yacc.c */
#line 3539 "htcobol.y"
{ if ( curr_call_mode == CM_CHAIN )
yyerror("parameter types not allowed on CHAIN");
else
{
(yyval.sval)=(yyvsp[(3) - (3)].sval);
curr_call_mode=(yyvsp[(2) - (3)].ival);
if ((yyval.sval)->litflag==1) {
struct lit *lp=(struct lit *)(yyval.sval);
lp->call_mode=curr_call_mode;
}
else
(yyval.sval)->call_mode=curr_call_mode;
}
;}
break;
case 1138:
/* Line 1464 of yacc.c */
#line 3559 "htcobol.y"
{(yyval.ival)=CM_REF;;}
break;
case 1139:
/* Line 1464 of yacc.c */
#line 3560 "htcobol.y"
{(yyval.ival)=CM_VAL;;}
break;
case 1140:
/* Line 1464 of yacc.c */
#line 3561 "htcobol.y"
{(yyval.ival)=CM_CONT;;}
break;
case 1141:
/* Line 1464 of yacc.c */
#line 3566 "htcobol.y"
{ gen_push_using((yyvsp[(3) - (3)].sval)); ;}
break;
case 1142:
/* Line 1464 of yacc.c */
#line 3567 "htcobol.y"
{ gen_push_using((yyvsp[(1) - (1)].sval)); ;}
break;
case 1143:
/* Line 1464 of yacc.c */
#line 3570 "htcobol.y"
{(yyval.sval)=(yyvsp[(1) - (1)].sval);(yyval.sval)->call_mode=CM_REF;;}
break;
case 1144:
/* Line 1464 of yacc.c */
#line 3573 "htcobol.y"
{
gen_perform_thru((yyvsp[(1) - (2)].sval),(yyvsp[(2) - (2)].sval));
(yyval.sval) = ((yyvsp[(2) - (2)].sval) == NULL) ? (yyvsp[(1) - (2)].sval) : (yyvsp[(2) - (2)].sval);
;}
break;
case 1145:
/* Line 1464 of yacc.c */
#line 3578 "htcobol.y"
{ (yyval.sval) = NULL; ;}
break;
case 1146:
/* Line 1464 of yacc.c */
#line 3580 "htcobol.y"
{
gen_push_int((yyvsp[(1) - (2)].sval));
(yyval.dval)=gen_marklabel();
gen_perform_test_counter((yyval.dval));
;}
break;
case 1147:
/* Line 1464 of yacc.c */
#line 3586 "htcobol.y"
{
gen_perform_times((yyvsp[(3) - (4)].dval));
;}
break;
case 1148:
/* Line 1464 of yacc.c */
#line 3589 "htcobol.y"
{ (yyval.sval) = NULL; ;}
break;
case 1149:
/* Line 1464 of yacc.c */
#line 3591 "htcobol.y"
{
if ((yyvsp[(1) - (2)].ival) == 2) {
(yyval.ddval).lb2=gen_passlabel();
}
(yyval.ddval).lb1=gen_marklabel();
;}
break;
case 1150:
/* Line 1464 of yacc.c */
#line 3598 "htcobol.y"
{
(yyval.ddval).lb1=gen_orstart();
if ((yyvsp[(1) - (4)].ival) == 2) {
(yyval.ddval).lb2=gen_passlabel();
gen_dstlabel((yyvsp[(3) - (4)].ddval).lb2);
}
;}
break;
case 1151:
/* Line 1464 of yacc.c */
#line 3606 "htcobol.y"
{
if ((yyvsp[(1) - (6)].ival) == 2) {
gen_jmplabel((yyvsp[(3) - (6)].ddval).lb1);
gen_dstlabel((yyvsp[(5) - (6)].ddval).lb2);
gen_jmplabel((yyvsp[(3) - (6)].ddval).lb2);
gen_dstlabel((yyvsp[(5) - (6)].ddval).lb1);
}
else {
gen_jmplabel((yyvsp[(3) - (6)].ddval).lb1);
gen_dstlabel((yyvsp[(5) - (6)].ddval).lb1);
}
;}
break;
case 1152:
/* Line 1464 of yacc.c */
#line 3618 "htcobol.y"
{ (yyval.sval) = NULL; ;}
break;
case 1153:
/* Line 1464 of yacc.c */
#line 3620 "htcobol.y"
{
/*
Check if initailization of the 'VARYING identifier' is required.
Initailization of the 'VARYING identifier' is not neccessary if
it is the same as the 'FROM identifier'.
*/
if ((yyvsp[(5) - (8)].sval)->litflag == '1') {
gen_move((yyvsp[(5) - (8)].sval),(yyvsp[(3) - (8)].sval));
}
else {
if(strcmp((yyvsp[(5) - (8)].sval)->name, (yyvsp[(3) - (8)].sval)->name) != 0) {
gen_move((yyvsp[(5) - (8)].sval),(yyvsp[(3) - (8)].sval));
}
}
/* BEFORE=1 AFTER=2 */
if ((yyvsp[(1) - (8)].ival) == 2) {
(yyval.ddval).lb2=gen_passlabel();
}
(yyval.ddval).lb1=gen_marklabel();
;}
break;
case 1154:
/* Line 1464 of yacc.c */
#line 3641 "htcobol.y"
{
(yyval.dval)=gen_orstart();
/* BEFORE=1 AFTER=2 */
if ((yyvsp[(1) - (10)].ival) == 2) {
gen_add((yyvsp[(7) - (10)].sval),(yyvsp[(3) - (10)].sval),0);
gen_dstlabel((yyvsp[(9) - (10)].ddval).lb2);
}
;}
break;
case 1155:
/* Line 1464 of yacc.c */
#line 3651 "htcobol.y"
{
int i;
struct perf_info *rf;
/*struct perform_info *rpi;*/
char *vn;
/* Check for duplicate variables in VARYING/AFTER */
if ((yyvsp[(12) - (13)].pfvals) != NULL) {
if ((vn = check_perform_variables((yyvsp[(3) - (13)].sval), (yyvsp[(12) - (13)].pfvals))) != NULL) {
yyerror("Duplicate variable '%s' in VARYING/AFTER clause", vn);
}
}
if ((yyvsp[(1) - (13)].ival) == 2) {
if ((yyvsp[(12) - (13)].pfvals) != NULL) {
for (i=5; i>=0; i--) {
rf = (yyvsp[(12) - (13)].pfvals)->pf[i];
if (rf != NULL) {
gen_jmplabel(rf->ljmp);
gen_dstlabel(rf->lend);
}
}
}
gen_jmplabel((yyvsp[(9) - (13)].ddval).lb1);
gen_dstlabel((yyvsp[(11) - (13)].dval));
}
else {
if ((yyvsp[(12) - (13)].pfvals) != NULL) {
for (i=5; i>=0; i--) {
rf = (yyvsp[(12) - (13)].pfvals)->pf[i];
if (rf != NULL) {
gen_add(rf->pname1, rf->pname2, 0);
gen_jmplabel(rf->ljmp);
gen_dstlabel(rf->lend);
}
}
}
gen_add((yyvsp[(7) - (13)].sval),(yyvsp[(3) - (13)].sval),0);
gen_jmplabel((yyvsp[(9) - (13)].ddval).lb1);
gen_dstlabel((yyvsp[(11) - (13)].dval));
}
;}
break;
case 1156:
/* Line 1464 of yacc.c */
#line 3693 "htcobol.y"
{ (yyval.sval) = NULL; ;}
break;
case 1157:
/* Line 1464 of yacc.c */
#line 3695 "htcobol.y"
{
gen_perform_thru((yyvsp[(1) - (2)].sval),(yyvsp[(2) - (2)].sval));
(yyval.sval) = NULL;
;}
break;
case 1158:
/* Line 1464 of yacc.c */
#line 3700 "htcobol.y"
{
(yyval.dval)=gen_marklabel();
/* BEFORE=1 AFTER=2 */
if ((yyvsp[(3) - (4)].ival) == 2) {
gen_perform_thru((yyvsp[(1) - (4)].sval),(yyvsp[(2) - (4)].sval));
}
;}
break;
case 1159:
/* Line 1464 of yacc.c */
#line 3708 "htcobol.y"
{
unsigned long lbl;
lbl=gen_orstart();
/* BEFORE=1 AFTER=2 */
if ((yyvsp[(3) - (6)].ival) == 1) {
gen_perform_thru((yyvsp[(1) - (6)].sval),(yyvsp[(2) - (6)].sval));
}
gen_jmplabel((yyvsp[(5) - (6)].dval));
gen_dstlabel(lbl);
;}
break;
case 1160:
/* Line 1464 of yacc.c */
#line 3719 "htcobol.y"
{
unsigned long lbl;
gen_push_int((yyvsp[(3) - (4)].sval));
lbl = gen_marklabel();
gen_perform_test_counter(lbl);
gen_perform_thru((yyvsp[(1) - (4)].sval),(yyvsp[(2) - (4)].sval));
gen_perform_times(lbl);
;}
break;
case 1161:
/* Line 1464 of yacc.c */
#line 3729 "htcobol.y"
{
/*
Check if initailization of the 'VARYING identifier' is required.
Initailization of the 'VARYING identifier' is not neccessary if
it is the same as the 'FROM identifier'.
*/
if ((yyvsp[(7) - (10)].sval)->litflag == '1') {
gen_move((yyvsp[(7) - (10)].sval),(yyvsp[(5) - (10)].sval));
}
else {
if(strcmp((yyvsp[(7) - (10)].sval)->name, (yyvsp[(5) - (10)].sval)->name) != 0) {
gen_move((yyvsp[(7) - (10)].sval),(yyvsp[(5) - (10)].sval));
}
}
if ((yyvsp[(3) - (10)].ival) == 2) {
(yyval.ddval).lb2=gen_passlabel();
}
(yyval.ddval).lb1 = gen_marklabel();
;}
break;
case 1162:
/* Line 1464 of yacc.c */
#line 3749 "htcobol.y"
{
(yyval.dval) = gen_orstart();
/* BEFORE=1 AFTER=2 */
if ((yyvsp[(3) - (12)].ival) == 2) {
gen_add((yyvsp[(9) - (12)].sval),(yyvsp[(5) - (12)].sval), 0);
gen_dstlabel((yyvsp[(11) - (12)].ddval).lb2);
}
;}
break;
case 1163:
/* Line 1464 of yacc.c */
#line 3758 "htcobol.y"
{
int i;
struct perf_info *rf;
/*struct perform_info *rpi;*/
char *vn = NULL;
/* Check for duplicate varaibles in VARYING/AFTER */
if ((yyvsp[(14) - (14)].pfvals) != NULL) {
if ((vn = check_perform_variables((yyvsp[(5) - (14)].sval), (yyvsp[(14) - (14)].pfvals))) != NULL) {
yyerror("Duplicate variable '%s' in VARYING/AFTER clause", vn);
}
}
gen_perform_thru((yyvsp[(1) - (14)].sval),(yyvsp[(2) - (14)].sval));
/* BEFORE=1 AFTER=2 */
if ((yyvsp[(3) - (14)].ival) == 2) {
if ((yyvsp[(14) - (14)].pfvals) != NULL) {
for (i=5; i>=0; i--) {
rf = (yyvsp[(14) - (14)].pfvals)->pf[i];
if (rf != NULL) {
gen_jmplabel(rf->ljmp);
gen_dstlabel(rf->lend);
}
}
}
gen_jmplabel((yyvsp[(11) - (14)].dval));
gen_dstlabel((yyvsp[(13) - (14)].dval));
}
else {
if ((yyvsp[(14) - (14)].pfvals) != NULL) {
for (i=5; i>=0; i--) {
rf = (yyvsp[(14) - (14)].pfvals)->pf[i];
if (rf != NULL) {
gen_add(rf->pname1, rf->pname2, 0);
gen_jmplabel(rf->ljmp);
gen_dstlabel(rf->lend);
}
}
}
gen_add((yyvsp[(9) - (14)].sval),(yyvsp[(5) - (14)].sval),0);
gen_jmplabel((yyvsp[(11) - (14)].dval));
gen_dstlabel((yyvsp[(13) - (14)].dval));
}
(yyval.sval) = NULL;
;}
break;
case 1164:
/* Line 1464 of yacc.c */
#line 3805 "htcobol.y"
{ (yyval.sval) = NULL; ;}
break;
case 1165:
/* Line 1464 of yacc.c */
#line 3806 "htcobol.y"
{ (yyval.sval) = (yyvsp[(2) - (2)].sval);;}
break;
case 1166:
/* Line 1464 of yacc.c */
#line 3808 "htcobol.y"
{ (yyval.ival)=1; perform_after_sw=1; ;}
break;
case 1167:
/* Line 1464 of yacc.c */
#line 3810 "htcobol.y"
{
(yyval.ival)=(yyvsp[(3) - (3)].ival);
perform_after_sw=(yyvsp[(3) - (3)].ival);
;}
break;
case 1168:
/* Line 1464 of yacc.c */
#line 3815 "htcobol.y"
{ (yyval.pfvals)=NULL; ;}
break;
case 1169:
/* Line 1464 of yacc.c */
#line 3817 "htcobol.y"
{
(yyval.pfvals)=create_perform_info();
(yyval.pfvals)->pf[0] = (yyvsp[(2) - (2)].pfval);
(yyval.pfvals)=(yyval.pfvals);
;}
break;
case 1170:
/* Line 1464 of yacc.c */
#line 3823 "htcobol.y"
{
(yyval.pfvals)=create_perform_info();
(yyval.pfvals)->pf[0] = (yyvsp[(2) - (4)].pfval);
(yyval.pfvals)->pf[1] = (yyvsp[(4) - (4)].pfval);
(yyval.pfvals)=(yyval.pfvals);
;}
break;
case 1171:
/* Line 1464 of yacc.c */
#line 3831 "htcobol.y"
{
(yyval.pfvals)=create_perform_info();
(yyval.pfvals)->pf[0] = (yyvsp[(2) - (6)].pfval);
(yyval.pfvals)->pf[1] = (yyvsp[(4) - (6)].pfval);
(yyval.pfvals)->pf[2] = (yyvsp[(6) - (6)].pfval);
(yyval.pfvals)=(yyval.pfvals);
;}
break;
case 1172:
/* Line 1464 of yacc.c */
#line 3840 "htcobol.y"
{
(yyval.pfvals)=create_perform_info();
(yyval.pfvals)->pf[0] = (yyvsp[(2) - (8)].pfval);
(yyval.pfvals)->pf[1] = (yyvsp[(4) - (8)].pfval);
(yyval.pfvals)->pf[2] = (yyvsp[(6) - (8)].pfval);
(yyval.pfvals)->pf[3] = (yyvsp[(8) - (8)].pfval);
(yyval.pfvals)=(yyval.pfvals);
;}
break;
case 1173:
/* Line 1464 of yacc.c */
#line 3850 "htcobol.y"
{
(yyval.pfvals)=create_perform_info();
(yyval.pfvals)->pf[0] = (yyvsp[(2) - (10)].pfval);
(yyval.pfvals)->pf[1] = (yyvsp[(4) - (10)].pfval);
(yyval.pfvals)->pf[2] = (yyvsp[(6) - (10)].pfval);
(yyval.pfvals)->pf[3] = (yyvsp[(8) - (10)].pfval);
(yyval.pfvals)->pf[4] = (yyvsp[(10) - (10)].pfval);
(yyval.pfvals)=(yyval.pfvals);
;}
break;
case 1174:
/* Line 1464 of yacc.c */
#line 3861 "htcobol.y"
{
(yyval.pfvals)=create_perform_info();
(yyval.pfvals)->pf[0] = (yyvsp[(2) - (12)].pfval);
(yyval.pfvals)->pf[1] = (yyvsp[(4) - (12)].pfval);
(yyval.pfvals)->pf[2] = (yyvsp[(6) - (12)].pfval);
(yyval.pfvals)->pf[3] = (yyvsp[(8) - (12)].pfval);
(yyval.pfvals)->pf[4] = (yyvsp[(10) - (12)].pfval);
(yyval.pfvals)->pf[5] = (yyvsp[(12) - (12)].pfval);
(yyval.pfvals)=(yyval.pfvals);
;}
break;
case 1175:
/* Line 1464 of yacc.c */
#line 3874 "htcobol.y"
{
/*
Check if initailization of the 'VARYING identifier' is required.
Initailization of the 'VARYING identifier' is not neccessary if
it is the same as the 'FROM identifier'.
*/
if ((yyvsp[(3) - (6)].sval)->litflag == '1') {
gen_move((yyvsp[(3) - (6)].sval),(yyvsp[(1) - (6)].sval));
}
else {
if(strcmp((yyvsp[(3) - (6)].sval)->name, (yyvsp[(1) - (6)].sval)->name) != 0) {
gen_move((yyvsp[(3) - (6)].sval),(yyvsp[(1) - (6)].sval));
}
}
/* BEFORE=1 AFTER=2 */
if (perform_after_sw == 2) {
(yyval.ddval).lb2=gen_passlabel();
}
(yyval.ddval).lb1 = gen_marklabel();
;}
break;
case 1176:
/* Line 1464 of yacc.c */
#line 3895 "htcobol.y"
{
unsigned long lbl;
lbl=gen_orstart();
/* BEFORE=1 AFTER=2 */
if (perform_after_sw == 2) {
gen_add((yyvsp[(5) - (8)].sval),(yyvsp[(1) - (8)].sval),0);
gen_dstlabel((yyvsp[(7) - (8)].ddval).lb2);
(yyval.pfval) = create_perf_info((yyvsp[(5) - (8)].sval), (yyvsp[(1) - (8)].sval), (yyvsp[(7) - (8)].ddval).lb1, lbl);
}
else {
(yyval.pfval) = create_perf_info((yyvsp[(5) - (8)].sval), (yyvsp[(1) - (8)].sval), (yyvsp[(7) - (8)].ddval).lb1, lbl);
}
;}
break;
case 1177:
/* Line 1464 of yacc.c */
#line 3909 "htcobol.y"
{stabs_line();;}
break;
case 1179:
/* Line 1464 of yacc.c */
#line 3915 "htcobol.y"
{ (yyval.ival)=1; ;}
break;
case 1180:
/* Line 1464 of yacc.c */
#line 3916 "htcobol.y"
{ (yyval.ival)=2; ;}
break;
case 1181:
/* Line 1464 of yacc.c */
#line 3920 "htcobol.y"
{
if ((yyvsp[(2) - (2)].ival) & COND_UNARY) {
if ((yyvsp[(2) - (2)].ival) & COND_CLASS) {
gen_class_check((yyvsp[(1) - (2)].sval),(yyvsp[(2) - (2)].ival));
}
else {
struct sym *sy = (struct sym *)save_special_literal('0','9', "%ZEROS%");
gen_compare((yyvsp[(1) - (2)].sval),(yyvsp[(2) - (2)].ival)&~COND_UNARY,sy);
}
}
;}
break;
case 1182:
/* Line 1464 of yacc.c */
#line 3932 "htcobol.y"
{
if ((yyvsp[(2) - (4)].ival) & COND_UNARY) {
if ((int)(yyvsp[(4) - (4)].sval) != -1) {
yyerror("class or sign conditions are unary");
}
}
else {
if ((int)(yyvsp[(4) - (4)].sval) == -1) {
yyerror("expression expected in a binary condition");
}
else {
gen_compare((yyvsp[(1) - (4)].sval),(yyvsp[(2) - (4)].ival),(yyvsp[(4) - (4)].sval));
}
}
(yyval.condval).sy=(yyvsp[(1) - (4)].sval); /* for implied operands */
(yyval.condval).oper=(yyvsp[(2) - (4)].ival);
;}
break;
case 1183:
/* Line 1464 of yacc.c */
#line 3949 "htcobol.y"
{ gen_not(); (yyval.condval)=(yyvsp[(2) - (2)].condval); ;}
break;
case 1184:
/* Line 1464 of yacc.c */
#line 3952 "htcobol.y"
{ (yyval.dval)=gen_andstart(); ;}
break;
case 1185:
/* Line 1464 of yacc.c */
#line 3954 "htcobol.y"
{ gen_dstlabel((yyvsp[(3) - (4)].dval)); (yyval.condval)=(yyvsp[(4) - (4)].condval); ;}
break;
case 1186:
/* Line 1464 of yacc.c */
#line 3957 "htcobol.y"
{ (yyval.dval)=gen_orstart(); ;}
break;
case 1187:
/* Line 1464 of yacc.c */
#line 3959 "htcobol.y"
{ gen_dstlabel((yyvsp[(3) - (4)].dval)); (yyval.condval)=(yyvsp[(4) - (4)].condval); ;}
break;
case 1188:
/* Line 1464 of yacc.c */
#line 3960 "htcobol.y"
{ (yyval.condval) = (yyvsp[(2) - (3)].condval); ;}
break;
case 1189:
/* Line 1464 of yacc.c */
#line 3962 "htcobol.y"
{
/*if ($1->level != 88)
yyerror("condition unknown");*/
gen_condition((yyvsp[(1) - (1)].sval));
(yyval.condval).sy=NULL;
(yyval.condval).oper=0;
;}
break;
case 1190:
/* Line 1464 of yacc.c */
#line 3971 "htcobol.y"
{ (yyval.condval) = (yyvsp[(1) - (1)].condval); ;}
break;
case 1191:
/* Line 1464 of yacc.c */
#line 3973 "htcobol.y"
{
if ((yyvsp[(-2) - (2)].condval).sy == NULL) {
yyerror("invalid implied condition");
}
else {
gen_compare((yyvsp[(-2) - (2)].condval).sy,(yyvsp[(1) - (2)].ival),(yyvsp[(2) - (2)].sval));
}
(yyval.condval).sy = (yyvsp[(-2) - (2)].condval).sy;
(yyval.condval).oper = (yyvsp[(1) - (2)].ival);
;}
break;
case 1192:
/* Line 1464 of yacc.c */
#line 3984 "htcobol.y"
{ /* implied both the first operand and the operator */
if (((yyvsp[(-2) - (1)].condval).sy == NULL)||
((yyvsp[(-2) - (1)].condval).oper & COND_UNARY)) {
yyerror("invalid implied condition");
}
else {
gen_compare((yyvsp[(-2) - (1)].condval).sy,(yyvsp[(-2) - (1)].condval).oper,(yyvsp[(1) - (1)].sval));
}
(yyval.condval).sy = (yyvsp[(-2) - (1)].condval).sy;
(yyval.condval).oper = (yyvsp[(-2) - (1)].condval).oper;
;}
break;
case 1193:
/* Line 1464 of yacc.c */
#line 3997 "htcobol.y"
{ (yyval.ival)=GREATER; ;}
break;
case 1194:
/* Line 1464 of yacc.c */
#line 3998 "htcobol.y"
{ (yyval.ival)=LESS; ;}
break;
case 1195:
/* Line 1464 of yacc.c */
#line 3999 "htcobol.y"
{ (yyval.ival)=EQUAL; ;}
break;
case 1196:
/* Line 1464 of yacc.c */
#line 4002 "htcobol.y"
{ (yyval.ival)=CLASS_NUMERIC; ;}
break;
case 1197:
/* Line 1464 of yacc.c */
#line 4003 "htcobol.y"
{ (yyval.ival)=CLASS_ALPHABETIC; ;}
break;
case 1198:
/* Line 1464 of yacc.c */
#line 4004 "htcobol.y"
{ (yyval.ival)=CLASS_ALPHABETIC_LOWER; ;}
break;
case 1199:
/* Line 1464 of yacc.c */
#line 4005 "htcobol.y"
{ (yyval.ival)=CLASS_ALPHABETIC_UPPER; ;}
break;
case 1200:
/* Line 1464 of yacc.c */
#line 4008 "htcobol.y"
{ (yyval.ival) = (yyvsp[(2) - (2)].ival); ;}
break;
case 1201:
/* Line 1464 of yacc.c */
#line 4009 "htcobol.y"
{ (yyval.ival) = (yyvsp[(3) - (3)].ival) ^ 7; ;}
break;
case 1202:
/* Line 1464 of yacc.c */
#line 4010 "htcobol.y"
{ (yyval.ival) = (yyvsp[(2) - (4)].ival) | (yyvsp[(4) - (4)].ival); ;}
break;
case 1203:
/* Line 1464 of yacc.c */
#line 4011 "htcobol.y"
{ (yyval.ival) = (yyvsp[(1) - (1)].ival); ;}
break;
case 1204:
/* Line 1464 of yacc.c */
#line 4012 "htcobol.y"
{ (yyval.ival) = (yyvsp[(3) - (3)].ival) ^ 7; ;}
break;
case 1205:
/* Line 1464 of yacc.c */
#line 4013 "htcobol.y"
{ (yyval.ival) = (yyvsp[(1) - (3)].ival) | (yyvsp[(3) - (3)].ival); ;}
break;
case 1206:
/* Line 1464 of yacc.c */
#line 4016 "htcobol.y"
{ (yyval.ival) = (yyvsp[(1) - (1)].ival); ;}
break;
case 1207:
/* Line 1464 of yacc.c */
#line 4017 "htcobol.y"
{ (yyval.ival) = (yyvsp[(1) - (1)].ival) | COND_UNARY | COND_CLASS; ;}
break;
case 1208:
/* Line 1464 of yacc.c */
#line 4018 "htcobol.y"
{ (yyval.ival) = (yyvsp[(1) - (1)].ival) | COND_UNARY; ;}
break;
case 1209:
/* Line 1464 of yacc.c */
#line 4021 "htcobol.y"
{ (yyval.ival) = (yyvsp[(1) - (1)].ival); ;}
break;
case 1210:
/* Line 1464 of yacc.c */
#line 4022 "htcobol.y"
{ (yyval.ival) = (yyvsp[(2) - (2)].ival) ^ 7; ;}
break;
case 1211:
/* Line 1464 of yacc.c */
#line 4023 "htcobol.y"
{ (yyval.ival) = (yyvsp[(1) - (3)].ival) | (yyvsp[(3) - (3)].ival); ;}
break;
case 1212:
/* Line 1464 of yacc.c */
#line 4026 "htcobol.y"
{ (yyval.ival) = (yyvsp[(1) - (2)].ival); ;}
break;
case 1222:
/* Line 1464 of yacc.c */
#line 4054 "htcobol.y"
{ ;}
break;
case 1223:
/* Line 1464 of yacc.c */
#line 4055 "htcobol.y"
{ ;}
break;
case 1238:
/* Line 1464 of yacc.c */
#line 4083 "htcobol.y"
{ (yyval.sval) = (yyvsp[(1) - (1)].sval); ;}
break;
case 1239:
/* Line 1464 of yacc.c */
#line 4084 "htcobol.y"
{ (yyval.sval) = NULL; ;}
break;
case 1241:
/* Line 1464 of yacc.c */
#line 4087 "htcobol.y"
{ ;}
break;
case 1242:
/* Line 1464 of yacc.c */
#line 4090 "htcobol.y"
{ (yyval.glistval) = gvar_list_append(NULL, (yyvsp[(1) - (1)].sval), source_lineno); ;}
break;
case 1243:
/* Line 1464 of yacc.c */
#line 4092 "htcobol.y"
{ (yyval.glistval) = gvar_list_append((yyvsp[(1) - (3)].glistval), (yyvsp[(3) - (3)].sval), source_lineno); ;}
break;
case 1244:
/* Line 1464 of yacc.c */
#line 4095 "htcobol.y"
{ (yyval.glistval) = gvar_list_append(NULL, (yyvsp[(1) - (1)].sval), source_lineno); ;}
break;
case 1245:
/* Line 1464 of yacc.c */
#line 4097 "htcobol.y"
{ (yyval.glistval) = gvar_list_append((yyvsp[(1) - (3)].glistval), (yyvsp[(3) - (3)].sval), source_lineno); ;}
break;
case 1246:
/* Line 1464 of yacc.c */
#line 4099 "htcobol.y"
{
/*if (!is_variable($1)) {
yyerror("The symbol \"%s\" is not an allowed argument here", $1->name);
}*/
(yyval.sval) = (yyvsp[(1) - (1)].sval); ;}
break;
case 1247:
/* Line 1464 of yacc.c */
#line 4104 "htcobol.y"
{ (yyval.sval) = (struct sym *)(yyvsp[(1) - (1)].lval);;}
break;
case 1248:
/* Line 1464 of yacc.c */
#line 4105 "htcobol.y"
{
(yyvsp[(2) - (3)].sval)->type = 'f'; /* function type */
(yyval.ival)=CALL;
;}
break;
case 1249:
/* Line 1464 of yacc.c */
#line 4109 "htcobol.y"
{
(yyval.sval) = gen_intrinsic_call((struct sym *)(yyvsp[(2) - (6)].sval));
;}
break;
case 1250:
/* Line 1464 of yacc.c */
#line 4112 "htcobol.y"
{
(yyvsp[(2) - (2)].sval)->type = 'f'; /* function type */
(yyval.ival)=CALL;
(yyval.sval) = gen_intrinsic_call((struct sym *)(yyvsp[(2) - (2)].sval));
;}
break;
case 1251:
/* Line 1464 of yacc.c */
#line 4119 "htcobol.y"
{ (yyval.sval) = (yyvsp[(1) - (1)].sval); ;}
break;
case 1252:
/* Line 1464 of yacc.c */
#line 4120 "htcobol.y"
{ (yyval.sval) = (struct sym *)(yyvsp[(1) - (1)].lval); ;}
break;
case 1253:
/* Line 1464 of yacc.c */
#line 4123 "htcobol.y"
{ (yyval.sval) = (yyvsp[(1) - (1)].sval); ;}
break;
case 1254:
/* Line 1464 of yacc.c */
#line 4124 "htcobol.y"
{ (yyval.sval) = (struct sym *)(yyvsp[(1) - (1)].lval); ;}
break;
case 1257:
/* Line 1464 of yacc.c */
#line 4131 "htcobol.y"
{ (yyval.lval)=(yyvsp[(1) - (1)].lval); ;}
break;
case 1258:
/* Line 1464 of yacc.c */
#line 4132 "htcobol.y"
{ (yyval.lval)=(yyvsp[(1) - (1)].lval); ;}
break;
case 1259:
/* Line 1464 of yacc.c */
#line 4135 "htcobol.y"
{ (yyvsp[(2) - (2)].lval)->all=1; (yyval.lval)=(yyvsp[(2) - (2)].lval); ;}
break;
case 1260:
/* Line 1464 of yacc.c */
#line 4136 "htcobol.y"
{ (yyval.lval)=(yyvsp[(2) - (2)].lval); ;}
break;
case 1261:
/* Line 1464 of yacc.c */
#line 4139 "htcobol.y"
{ (yyval.lval)=spe_lit_SP; ;}
break;
case 1262:
/* Line 1464 of yacc.c */
#line 4140 "htcobol.y"
{ (yyval.lval)=spe_lit_ZE; ;}
break;
case 1263:
/* Line 1464 of yacc.c */
#line 4141 "htcobol.y"
{ (yyval.lval)=spe_lit_QU; ;}
break;
case 1264:
/* Line 1464 of yacc.c */
#line 4142 "htcobol.y"
{ (yyval.lval)=spe_lit_HV; ;}
break;
case 1265:
/* Line 1464 of yacc.c */
#line 4143 "htcobol.y"
{ (yyval.lval)=spe_lit_LV; ;}
break;
case 1266:
/* Line 1464 of yacc.c */
#line 4146 "htcobol.y"
{ (yyval.sval) = (yyvsp[(1) - (1)].sval); ;}
break;
case 1267:
/* Line 1464 of yacc.c */
#line 4147 "htcobol.y"
{ (yyval.sval) = (struct sym *)(yyvsp[(1) - (1)].lval); ;}
break;
case 1268:
/* Line 1464 of yacc.c */
#line 4150 "htcobol.y"
{ save_literal((yyvsp[(1) - (1)].lval),'9'); (yyvsp[(1) - (1)].lval)->all = 0; (yyval.lval)=(yyvsp[(1) - (1)].lval); ;}
break;
case 1269:
/* Line 1464 of yacc.c */
#line 4153 "htcobol.y"
{ save_literal((yyvsp[(1) - (1)].lval),'9'); (yyvsp[(1) - (1)].lval)->all=0; (yyval.lval)=(yyvsp[(1) - (1)].lval); ;}
break;
case 1270:
/* Line 1464 of yacc.c */
#line 4154 "htcobol.y"
{ save_literal((yyvsp[(1) - (1)].lval),'X'); (yyvsp[(1) - (1)].lval)->all=0; (yyval.lval)=(yyvsp[(1) - (1)].lval); ;}
break;
case 1271:
/* Line 1464 of yacc.c */
#line 4157 "htcobol.y"
{ check_decimal_point((yyvsp[(1) - (1)].lval)); (yyval.lval)=(yyvsp[(1) - (1)].lval); ;}
break;
case 1272:
/* Line 1464 of yacc.c */
#line 4158 "htcobol.y"
{ check_decimal_point((yyvsp[(2) - (2)].lval)); (yyval.lval)=(yyvsp[(2) - (2)].lval); ;}
break;
case 1273:
/* Line 1464 of yacc.c */
#line 4160 "htcobol.y"
{
check_decimal_point((yyvsp[(2) - (2)].lval));
invert_literal_sign( (yyvsp[(2) - (2)].lval) );
(yyval.lval)=(yyvsp[(2) - (2)].lval);
;}
break;
case 1274:
/* Line 1464 of yacc.c */
#line 4167 "htcobol.y"
{ (yyval.sval) = (yyvsp[(1) - (1)].sval); ;}
break;
case 1275:
/* Line 1464 of yacc.c */
#line 4168 "htcobol.y"
{ (yyval.sval) = NULL; ;}
break;
case 1276:
/* Line 1464 of yacc.c */
#line 4172 "htcobol.y"
{
if ((yyvsp[(1) - (1)].sval)->defined)
yyerror("variable redefined, %s",(yyvsp[(1) - (1)].sval)->name);
(yyvsp[(1) - (1)].sval)->defined=1;
(yyval.sval)=(yyvsp[(1) - (1)].sval);
;}
break;
case 1277:
/* Line 1464 of yacc.c */
#line 4178 "htcobol.y"
{ (yyval.sval)=alloc_filler(); ;}
break;
case 1278:
/* Line 1464 of yacc.c */
#line 4182 "htcobol.y"
{
if ((yyvsp[(1) - (1)].sval)->occurs_flg == 0 && !in_occurs((yyvsp[(1) - (1)].sval))) // walter
yyerror("\"%s\" is not an indexed variable ", (yyvsp[(1) - (1)].sval)->name);
(yyval.sval)=(yyvsp[(1) - (1)].sval);
;}
break;
case 1279:
/* Line 1464 of yacc.c */
#line 4207 "htcobol.y"
{ (yyval.sval)=(struct sym *)(yyvsp[(1) - (1)].lval); ;}
break;
case 1280:
/* Line 1464 of yacc.c */
#line 4208 "htcobol.y"
{(yyval.sval)=(yyvsp[(1) - (1)].sval); ;}
break;
case 1281:
/* Line 1464 of yacc.c */
#line 4211 "htcobol.y"
{ (yyval.sval)=(struct sym *)(yyvsp[(1) - (1)].lval); ;}
break;
case 1282:
/* Line 1464 of yacc.c */
#line 4212 "htcobol.y"
{(yyval.sval)=(yyvsp[(1) - (1)].sval); ;}
break;
case 1283:
/* Line 1464 of yacc.c */
#line 4215 "htcobol.y"
{ curr_division = CDIV_SUBSCRIPTS; ;}
break;
case 1284:
/* Line 1464 of yacc.c */
#line 4216 "htcobol.y"
{
curr_division = CDIV_PROC;
(yyval.sval) = (struct sym *)create_subscripted_var( (yyvsp[(1) - (5)].sval), (yyvsp[(4) - (5)].rval) );
/*check_subscripts($$);*/
;}
break;
case 1285:
/* Line 1464 of yacc.c */
#line 4221 "htcobol.y"
{ (yyval.sval)=(yyvsp[(1) - (1)].sval); ;}
break;
case 1286:
/* Line 1464 of yacc.c */
#line 4224 "htcobol.y"
{
(yyval.sval)=(struct sym *)create_refmoded_var((yyvsp[(1) - (6)].sval), (yyvsp[(3) - (6)].sval), (yyvsp[(5) - (6)].sval)); check_refmods((struct sym *)(yyval.sval));
is_var=1;
;}
break;
case 1287:
/* Line 1464 of yacc.c */
#line 4228 "htcobol.y"
{ is_var=1; ;}
break;
case 1288:
/* Line 1464 of yacc.c */
#line 4229 "htcobol.y"
{ yyerror("Invalid argument expecting variable"); is_var=2; ;}
break;
case 1289:
/* Line 1464 of yacc.c */
#line 4232 "htcobol.y"
{
if (!is_var)
yyerror("Invalid argument expecting variable");
is_var=0;
;}
break;
case 1290:
/* Line 1464 of yacc.c */
#line 4260 "htcobol.y"
{
(yyval.sval)=(yyvsp[(1) - (1)].sval);
if (need_subscripts && (yyvsp[(1) - (1)].sval)->occurs_flg == 0) {
/* verify if the variable is present in the same area of occurs clause */
if(!in_occurs((yyvsp[(1) - (1)].sval))) {
yyerror("this variable \'%s\' must be subscripted or indexed", (yyvsp[(1) - (1)].sval)->name);
need_subscripts=0;
}
}
;}
break;
case 1291:
/* Line 1464 of yacc.c */
#line 4271 "htcobol.y"
{ curr_division = CDIV_SUBSCRIPTS; ;}
break;
case 1292:
/* Line 1464 of yacc.c */
#line 4273 "htcobol.y"
{
curr_division = CDIV_PROC;
(yyval.sval) = (struct sym *)create_subscripted_var( (yyvsp[(1) - (5)].sval), (yyvsp[(4) - (5)].rval) );
check_subscripts((yyval.sval));
;}
break;
case 1293:
/* Line 1464 of yacc.c */
#line 4281 "htcobol.y"
{
(yyval.sval)=(yyvsp[(1) - (1)].sval);
if ((yyvsp[(1) - (1)].sval)->clone != 0)
yyerror("this variable \'%s\' must be qualified", (yyvsp[(1) - (1)].sval)->name);
;}
break;
case 1294:
/* Line 1464 of yacc.c */
#line 4287 "htcobol.y"
{
(yyval.sval)=lookup_parent((yyvsp[(1) - (3)].sval),(yyvsp[(3) - (3)].sval));
if ((yyval.sval) == NULL) {
yyerror("this variable \'%s\' is not defined in '%s'", (yyvsp[(1) - (3)].sval)->name, (yyvsp[(3) - (3)].sval)->name);
(yyval.sval)=(yyvsp[(1) - (3)].sval);
}
;}
break;
case 1295:
/* Line 1464 of yacc.c */
#line 4297 "htcobol.y"
{
if (((yyvsp[(1) - (1)].sval)->defined == 0) && ((yyvsp[(1) - (1)].sval)->type == 0))
{
yyerror("Undefined variable \'%s\' found", (yyvsp[(1) - (1)].sval)->name);
}
(yyval.sval)=(yyvsp[(1) - (1)].sval);
;}
break;
case 1296:
/* Line 1464 of yacc.c */
#line 4304 "htcobol.y"
{ need_subscripts=1; (yyval.sval)=(yyvsp[(1) - (1)].sval); ;}
break;
case 1297:
/* Line 1464 of yacc.c */
#line 4307 "htcobol.y"
{ (yyval.rval) = (yyvsp[(1) - (1)].rval); ;}
break;
case 1298:
/* Line 1464 of yacc.c */
#line 4308 "htcobol.y"
{ (yyval.rval) = add_subscript( (yyvsp[(1) - (3)].rval), (yyvsp[(3) - (3)].rval) ); ;}
break;
case 1299:
/* Line 1464 of yacc.c */
#line 4311 "htcobol.y"
{ (yyval.rval) = create_subscript( (yyvsp[(1) - (1)].sval) ); ;}
break;
case 1300:
/* Line 1464 of yacc.c */
#line 4312 "htcobol.y"
{ (yyval.rval) = add_subscript_item( (yyvsp[(1) - (3)].rval), '+', (yyvsp[(3) - (3)].sval) ); ;}
break;
case 1301:
/* Line 1464 of yacc.c */
#line 4313 "htcobol.y"
{ (yyval.rval) = add_subscript_item( (yyvsp[(1) - (3)].rval), '-', (yyvsp[(3) - (3)].sval) ); ;}
break;
case 1302:
/* Line 1464 of yacc.c */
#line 4317 "htcobol.y"
{
char *s;
(yyval.ival)=0;
s=(yyvsp[(1) - (1)].lval)->name;
while (isdigit(*s))
(yyval.ival) = (yyval.ival) * 10 + *s++ - '0';
if (*s)
yyerror("only integers accepted here");
;}
break;
case 1303:
/* Line 1464 of yacc.c */
#line 4329 "htcobol.y"
{
struct sym *lab=(yyvsp[(1) - (3)].sval);
struct sym *sec=(yyvsp[(3) - (3)].sval);
if (sec->defined == 0) {
sec->defined = 2;
sec->parent = NULL;
} else {
if ((sec=lookup_label((yyvsp[(3) - (3)].sval),NULL))==NULL) {
sec = install((yyvsp[(3) - (3)].sval)->name,SYTB_LAB,2);
sec->defined=2;
sec->parent = NULL;
}
}
if (lab->defined == 0) {
lab->defined = 2;
lab->parent = (yyvsp[(3) - (3)].sval);
} else {
if ((lab=lookup_label((yyvsp[(1) - (3)].sval),(yyvsp[(3) - (3)].sval)))==NULL) {
lab = install((yyvsp[(1) - (3)].sval)->name,SYTB_LAB,2);
lab->defined=2;
lab->parent = (yyvsp[(3) - (3)].sval);
}
}
(yyval.sval) = lab;
;}
break;
case 1304:
/* Line 1464 of yacc.c */
#line 4356 "htcobol.y"
{
struct sym *lab=(yyvsp[(1) - (1)].sval);
if (lab->defined == 0) {
lab->defined = 2;
lab->parent = curr_section;
}
else {
if ((lab=lookup_label(lab,curr_section))==NULL) {
lab = install((yyvsp[(1) - (1)].sval)->name,SYTB_LAB,2);
lab->defined=2;
lab->parent = curr_section;
}
}
(yyval.sval) = lab;
;}
break;
case 1305:
/* Line 1464 of yacc.c */
#line 4371 "htcobol.y"
{(yyval.sval)=define_label((struct sym *)(yyvsp[(1) - (1)].lval),1,NULL,0);;}
break;
case 1306:
/* Line 1464 of yacc.c */
#line 4372 "htcobol.y"
{(yyval.sval)=define_label((struct sym *)(yyvsp[(1) - (3)].lval),1,(struct sym *)(yyvsp[(3) - (3)].lval),1);;}
break;
case 1307:
/* Line 1464 of yacc.c */
#line 4373 "htcobol.y"
{(yyval.sval)=define_label((struct sym *)(yyvsp[(1) - (3)].lval),1,(yyvsp[(3) - (3)].sval),0);;}
break;
/* Line 1464 of yacc.c */
#line 12262 "htcobol.tab.c"
default: break;
}
YY_SYMBOL_PRINT ("-> $$ =", yyr1[yyn], &yyval, &yyloc);
YYPOPSTACK (yylen);
yylen = 0;
YY_STACK_PRINT (yyss, yyssp);
*++yyvsp = yyval;
/* 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 = yytable[yystate];
else
yystate = yydefgoto[yyn - YYNTOKENS];
goto yynewstate;
/*------------------------------------.
| yyerrlab -- here on detecting error |
`------------------------------------*/
yyerrlab:
/* If not already recovering from an error, report this error. */
if (!yyerrstatus)
{
++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
}
if (yyerrstatus == 3)
{
/* If just tried and failed to reuse lookahead token after an
error, discard it. */
if (yychar <= YYEOF)
{
/* Return failure if at end of input. */
if (yychar == YYEOF)
YYABORT;
}
else
{
yydestruct ("Error: discarding",
yytoken, &yylval);
yychar = YYEMPTY;
}
}
/* Else will try to reuse lookahead token after shifting the error
token. */
goto yyerrlab1;
/*---------------------------------------------------.
| yyerrorlab -- error raised explicitly by YYERROR. |
`---------------------------------------------------*/
yyerrorlab:
/* 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;
/* 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;
/*-------------------------------------------------------------.
| yyerrlab1 -- common code for both syntax error and YYERROR. |
`-------------------------------------------------------------*/
yyerrlab1:
yyerrstatus = 3; /* Each real token shifted decrements this. */
for (;;)
{
yyn = yypact[yystate];
if (yyn != YYPACT_NINF)
{
yyn += YYTERROR;
if (0 <= yyn && yyn <= YYLAST && yycheck[yyn] == YYTERROR)
{
yyn = yytable[yyn];
if (0 < yyn)
break;
}
}
/* Pop the current state because it cannot handle the error token. */
if (yyssp == yyss)
YYABORT;
yydestruct ("Error: popping",
yystos[yystate], yyvsp);
YYPOPSTACK (1);
yystate = *yyssp;
YY_STACK_PRINT (yyss, yyssp);
}
*++yyvsp = yylval;
/* Shift the error token. */
YY_SYMBOL_PRINT ("Shifting", yystos[yyn], yyvsp, yylsp);
yystate = yyn;
goto yynewstate;
/*-------------------------------------.
| yyacceptlab -- YYACCEPT comes here. |
`-------------------------------------*/
yyacceptlab:
yyresult = 0;
goto yyreturn;
/*-----------------------------------.
| yyabortlab -- YYABORT comes here. |
`-----------------------------------*/
yyabortlab:
yyresult = 1;
goto yyreturn;
#if !defined(yyoverflow) || YYERROR_VERBOSE
/*-------------------------------------------------.
| yyexhaustedlab -- memory exhaustion comes here. |
`-------------------------------------------------*/
yyexhaustedlab:
yyerror (YY_("memory exhausted"));
yyresult = 2;
/* Fall through. */
#endif
yyreturn:
if (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)
{
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);
#endif
/* Make sure YYID is used. */
return YYID (yyresult);
}
/* Line 1684 of yacc.c */
#line 4379 "htcobol.y"
/*
** Yacc auxiliary routines
*/
/* ***********************************************
* hterror is called where yyerror is normally *
* called within the parser, but it also passes*
* an error number and severity. The error *
* number identifies the longer description of *
* the error message in the compiler document- *
* ation. The severity is used to set the *
* return code that the compiler will return. *
***********************************************/
void hterror(int erno, int severity, char *s,...)
{
HTG_temporary_error_code = erno;
HTG_temporary_severity = severity;
yyerror(s);
HTG_temporary_error_code = 256;
HTG_temporary_severity = 8;
return;
}
void yywarn(char *s,...)
{
va_list ap;
va_start (ap, s);
HTG_temporary_severity = 4;
yyerror(s, ap);
va_end(ap);
HTG_temporary_severity = 8;
}
extern FILE *o_lst;
void yyerror(char *s,...)
{
char buff1[BUFSIZ], buff2[BUFSIZ];
const char *label;
va_list argptr;
int slen=0;
/* Determine the type of the error */
switch (HTG_temporary_severity)
{
case TCOB_SEVERITY_INFO:
label = "info: ";
break;
case TCOB_SEVERITY_WARN:
label = "warning: ";
if (HTG_RETURN_CODE < 4)
HTG_RETURN_CODE = 4;
wrncnt++;
break;
case TCOB_SEVERITY_ERROR:
label = "error: ";
if (HTG_RETURN_CODE < 8)
HTG_RETURN_CODE = 8;
errcnt++;
break;
default:
label = "error: ";
if (HTG_RETURN_CODE < HTG_temporary_severity)
HTG_RETURN_CODE = HTG_temporary_severity;
errcnt++;
break;
}
/* Build the error message */
va_start(argptr,s);
vsprintf (buff1, s, argptr);
va_end (argptr);
/* Display the error */
slen = strlen(yytext);
if (slen != 0) {
sprintf (buff2, "%s:%6d: %s%s, on or before \'%s\'\n",
source_filename, source_lineno, label, buff1, yytext);
}
else {
sprintf (buff2, "%s:%6d: %s%s\n",
source_filename, source_lineno, label, buff1);
}
fputs (buff2, stderr);
if (HTG_list_flag)
fputs (buff2, o_lst);
}
static void
assert_numeric_sy (struct sym *sy)
{
if (!is_numeric_sy(sy))
yyerror("invalid (non numeric) variable or literal \'%s\' used in arithmetic verb", sy->name);
}
static void
assert_numeric_dest_sy (struct sym *sy)
{
if (!is_numeric_dest_sy(sy))
yyerror("invalid destination variable \'%s\' used in arithmetic verb", sy->name);
}
Reference in New Issue View Git Blame Copy Permalink