#ifndef lint
static char const
yyrcsid[] = "$FreeBSD: src/usr.bin/yacc/skeleton.c,v 1.28.2.1 2001/07/19 05:46:39 peter Exp $";
#endif
#include <stdlib.h>
#define YYBYACC 1
#define YYMAJOR 1
#define YYMINOR 9
#define YYLEX yylex()
#define YYEMPTY -1
#define yyclearin (yychar=(YYEMPTY))
#define yyerrok (yyerrflag=0)
#define YYRECOVERING() (yyerrflag!=0)
#if defined(__cplusplus) || __STDC__
static int yygrowstack(void);
#else
static int yygrowstack();
#endif
#define YYPREFIX "yy"
#line 51 "parse.y"
#define malloc(x) GC_malloc(x)
#define realloc(x,y) GC_realloc(x,y)
#define free(x) GC_free(x)
#if defined(TOWNS)
#include <alloca.h>
#endif
#include <ctype.h>
#include "ca.h"
#include <sys/types.h>
#include <sys/stat.h>
#include "parse.h"
#define NOPR (prresult=0)
extern int gdef,mgdef,ldef;
extern SNODE parse_snode;
extern int main_parser, allow_create_var;
int prresult;
static int ind;
static FNODE t;
static NODE a,b;
static NODE2 a2;
static pointer val;
static QUOTE quote;
extern jmp_buf env;
#line 83 "parse.y"
typedef union {
FNODE f;
SNODE s;
NODE n;
NODE2 n2;
int i;
pointer p;
} YYSTYPE;
#line 59 "y.tab.c"
#define YYERRCODE 256
#define STRUCT 257
#define POINT 258
#define NEWSTRUCT 259
#define ANS 260
#define FDEF 261
#define PFDEF 262
#define MODDEF 263
#define MODEND 264
#define GLOBAL 265
#define MGLOBAL 266
#define LOCAL 267
#define LOCALF 268
#define CMP 269
#define OR 270
#define AND 271
#define CAR 272
#define CDR 273
#define QUOTED 274
#define COLONCOLON 275
#define DO 276
#define WHILE 277
#define FOR 278
#define IF 279
#define ELSE 280
#define BREAK 281
#define RETURN 282
#define CONTINUE 283
#define PARIF 284
#define MAP 285
#define RECMAP 286
#define TIMER 287
#define GF2NGEN 288
#define GFPNGEN 289
#define GFSNGEN 290
#define GETOPT 291
#define FOP_AND 292
#define FOP_OR 293
#define FOP_IMPL 294
#define FOP_REPL 295
#define FOP_EQUIV 296
#define FOP_NOT 297
#define LOP 298
#define FORMULA 299
#define UCASE 300
#define LCASE 301
#define STR 302
#define SELF 303
#define BOPASS 304
#define PLUS 305
#define MINUS 306
const short yylhs[] = { -1,
0, 6, 16, 17, 6, 18, 19, 6, 20, 21,
6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
6, 6, 6, 6, 6, 6, 22, 23, 24, 6,
6, 6, 6, 15, 15, 1, 1, 7, 13, 13,
12, 12, 11, 11, 8, 8, 9, 9, 10, 10,
14, 14, 2, 2, 5, 4, 4, 4, 4, 4,
4, 4, 4, 4, 4, 4, 4, 4, 4, 4,
4, 4, 4, 4, 4, 4, 4, 4, 4, 3,
3, 3, 3, 3, 3, 3, 3, 3, 3, 3,
3, 3, 3, 3, 3, 3, 3, 3, 3, 3,
3, 3, 3, 3, 3, 3, 3, 3, 3, 3,
};
const short yylen[] = { 2,
1, 1, 0, 0, 5, 0, 0, 5, 0, 0,
5, 3, 6, 2, 1, 2, 2, 2, 3, 5,
7, 9, 5, 7, 8, 6, 0, 0, 0, 12,
3, 2, 2, 1, 1, 0, 1, 3, 1, 3,
1, 3, 1, 3, 0, 2, 0, 1, 1, 3,
1, 3, 1, 1, 3, 1, 1, 1, 1, 1,
1, 1, 4, 6, 6, 6, 7, 4, 3, 8,
4, 6, 7, 4, 4, 3, 1, 4, 3, 1,
5, 3, 3, 2, 2, 3, 2, 2, 3, 3,
3, 3, 3, 3, 3, 2, 3, 3, 2, 3,
3, 3, 3, 3, 3, 5, 3, 4, 4, 2,
};
const short yydefred[] = { 0,
0, 0, 0, 58, 0, 0, 0, 0, 3, 6,
9, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 59, 60, 61, 0,
0, 57, 77, 0, 56, 0, 0, 0, 0, 0,
45, 0, 34, 35, 0, 0, 0, 0, 0, 1,
15, 2, 33, 53, 54, 0, 0, 27, 0, 0,
32, 0, 0, 0, 41, 0, 0, 0, 0, 0,
0, 0, 0, 16, 0, 0, 18, 17, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 84, 0,
0, 0, 0, 0, 0, 0, 0, 0, 14, 0,
0, 0, 0, 0, 0, 31, 43, 0, 0, 0,
0, 12, 0, 0, 0, 0, 0, 0, 0, 0,
19, 0, 0, 0, 0, 69, 0, 0, 0, 38,
46, 0, 0, 76, 86, 0, 107, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 79, 0, 39, 0, 108,
28, 0, 0, 0, 0, 0, 42, 74, 75, 109,
0, 0, 0, 0, 0, 71, 0, 0, 0, 0,
68, 0, 0, 0, 0, 0, 0, 0, 78, 0,
0, 0, 0, 44, 5, 8, 11, 0, 23, 0,
0, 63, 0, 0, 0, 0, 0, 0, 0, 51,
0, 0, 0, 0, 0, 13, 40, 29, 26, 0,
0, 0, 72, 65, 66, 0, 0, 0, 0, 64,
0, 0, 0, 24, 0, 21, 0, 67, 0, 0,
52, 73, 0, 0, 70, 25, 37, 0, 22, 45,
0, 30,
};
const short yydgoto[] = { 47,
268, 229, 96, 49, 230, 151, 51, 92, 97, 98,
128, 66, 179, 231, 52, 62, 184, 63, 185, 64,
186, 124, 212, 253,
};
const short yysindex[] = { 377,
-28, -273, -33, 0, -289, -287, -280, -28, 0, 0,
0, -278, -11, -1, 3, 377, 16, 23, 25, -28,
412, -28, 37, 39, 40, 41, 0, 0, 0, 42,
720, 0, 0, -37, 0, 720, 720, 720, 720, 720,
0, 434, 0, 0, 720, 720, 0, 1868, -89, 0,
0, 0, 0, 0, 0, -90, -273, 0, 44, -28,
0, -226, -226, -226, 0, -27, 720, 720, 720, -183,
720, 720, 720, 0, -34, 1868, 0, 0, -197, -194,
-182, 720, 10, 476, 720, 720, -185, 17, 17, 476,
-185, 276, -273, 720, 1999, 2350, 27, 77, 60, 720,
720, 720, 720, 720, 720, 720, 720, 720, 0, 720,
720, 720, 720, 720, 720, 720, 720, 720, 0, -273,
720, -273, 82, 85, 720, 0, 0, 84, 84, 84,
-172, 0, 2014, 2057, 2087, 96, 100, 78, 108, 720,
0, -19, 98, 113, 2132, 0, 119, 36, -25, 0,
0, 121, 2145, 0, 0, 720, 0, -7, 147, 101,
156, 1374, 2507, 2363, 2074, -32, 2350, 17, 17, -94,
-94, -94, -94, 2350, 2193, 0, 2277, 0, -40, 0,
0, 122, -136, -28, -28, -28, 0, 0, 0, 0,
720, 377, 720, 377, -23, 0, 720, 720, 720, 720,
0, 125, 109, -273, 642, 126, 2350, 720, 0, -28,
-273, 720, -28, 0, 0, 0, 0, 127, 0, 111,
-107, 0, 133, 134, 135, 2235, 720, 116, 124, 0,
11, 699, -89, 720, 2471, 0, 0, 0, 0, -28,
720, 377, 0, 0, 0, 720, 145, 720, 720, 0,
-273, 146, 150, 0, 159, 0, 2409, 0, 1868, 2350,
0, 0, -122, 377, 0, 0, 0, 65, 0, 0,
328, 0,
};
const short yyrindex[] = { 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 1517, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 104, 140, 0, 0, 793, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
163, 148, 163, 0, 756, 0, 0, 0, 0, 0,
0, 0, 0, 371, 80, -21, 1094, 1554, 1590, 422,
1131, 0, 0, 0, 0, 34, 0, 7, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 163, 0, 0, -17, -12, -10,
0, 0, 0, 0, 0, 0, 0, 0, 0, -21,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 1778, 1929, 47,
1971, 54, 1681, 1289, 9, 904, 1036, 1626, 1665, 1168,
1204, 1242, 1279, 1392, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
163, 0, 148, 0, 0, 0, 163, 163, 163, 0,
0, 0, 1710, 0, 0, 0, 458, 0, 0, 0,
0, 163, 0, 0, 0, 0, 0, 0, 0, 0,
1, 0, 0, 0, 0, 0, 163, 0, 0, 0,
0, 0, 830, 163, 1317, 0, 0, 0, 0, 0,
163, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 32,
0, 0, 87, 0, 0, 0, 0, 0, 0, 0,
0, 0,
};
const short yygindex[] = { 0,
0, 856, 114, 6, -39, 139, 0, -57, 2604, 0,
-6, 0, 0, 0, 2575, 0, 0, 0, 0, 0,
0, 0, 0, 0,
};
#define YYTABLESIZE 2845
const short yytable[] = { 115,
20, 121, 86, 211, 116, 140, 57, 44, 44, 113,
111, 58, 112, 59, 114, 203, 131, 222, 4, 47,
60, 196, 65, 7, 197, 10, 54, 55, 67, 116,
43, 43, 122, 20, 113, 111, 20, 112, 68, 114,
20, 4, 69, 20, 104, 20, 7, 48, 10, 104,
146, 250, 104, 116, 251, 71, 129, 130, 113, 20,
20, 115, 72, 114, 73, 48, 104, 104, 48, 104,
104, 104, 55, 127, 49, 55, 79, 49, 80, 81,
82, 83, 98, 125, 210, 85, 115, 98, 85, 101,
98, 20, 49, 136, 101, 49, 20, 101, 204, 48,
204, 104, 47, 142, 98, 98, 143, 98, 98, 98,
115, 101, 101, 48, 101, 101, 101, 109, 144, 155,
156, 157, 180, 20, 181, 20, 49, 183, 187, 48,
48, 48, 104, 104, 76, 191, 193, 116, 50, 98,
192, 198, 113, 111, 84, 112, 101, 114, 194, 87,
88, 89, 90, 91, 70, 95, 199, 49, 49, 201,
202, 205, 213, 214, 227, 234, 228, 240, 120, 241,
98, 98, 242, 243, 244, 245, 248, 101, 101, 267,
133, 134, 135, 116, 249, 258, 262, 270, 113, 111,
263, 112, 116, 114, 115, 145, 47, 113, 111, 264,
112, 47, 114, 47, 47, 48, 47, 153, 109, 36,
233, 261, 271, 158, 159, 160, 161, 162, 163, 164,
165, 166, 0, 167, 168, 169, 170, 171, 172, 173,
174, 175, 0, 0, 177, 0, 100, 101, 102, 0,
115, 0, 0, 0, 0, 0, 0, 0, 0, 115,
0, 0, 0, 0, 0, 0, 20, 20, 0, 20,
20, 20, 20, 20, 20, 20, 20, 20, 20, 207,
109, 0, 20, 20, 20, 0, 20, 20, 20, 20,
0, 20, 20, 20, 20, 20, 20, 20, 20, 20,
20, 20, 0, 0, 0, 109, 0, 20, 0, 20,
20, 20, 20, 20, 104, 48, 0, 48, 40, 54,
55, 44, 104, 226, 0, 42, 98, 98, 37, 109,
38, 235, 0, 0, 0, 0, 0, 0, 0, 0,
219, 0, 221, 0, 43, 46, 0, 0, 98, 98,
98, 98, 98, 0, 98, 95, 101, 101, 101, 101,
98, 0, 0, 0, 0, 48, 0, 101, 0, 257,
40, 259, 260, 44, 0, 0, 45, 42, 0, 100,
37, 39, 38, 0, 0, 0, 0, 48, 0, 0,
256, 0, 0, 0, 48, 0, 43, 46, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 41, 0,
150, 0, 269, 109, 0, 0, 99, 0, 0, 40,
0, 99, 44, 0, 99, 100, 42, 102, 45, 37,
0, 38, 0, 39, 100, 101, 102, 0, 99, 99,
0, 99, 99, 99, 0, 43, 46, 0, 0, 0,
0, 0, 0, 0, 40, 0, 0, 44, 0, 109,
41, 42, 272, 108, 37, 0, 38, 110, 109, 0,
0, 0, 110, 99, 0, 110, 40, 45, 0, 0,
43, 46, 39, 42, 0, 94, 37, 0, 38, 110,
110, 0, 110, 110, 110, 0, 0, 0, 0, 0,
0, 0, 0, 46, 99, 99, 0, 0, 50, 41,
0, 50, 45, 0, 0, 0, 0, 39, 0, 0,
0, 0, 116, 0, 110, 0, 50, 113, 111, 50,
112, 0, 114, 0, 45, 0, 0, 0, 0, 39,
0, 1, 2, 0, 3, 4, 5, 6, 7, 8,
9, 10, 11, 12, 0, 110, 110, 13, 14, 15,
50, 16, 17, 18, 19, 0, 20, 21, 22, 23,
24, 25, 26, 27, 28, 29, 30, 0, 0, 115,
0, 0, 31, 0, 32, 33, 34, 35, 36, 0,
0, 50, 50, 1, 2, 0, 3, 4, 5, 6,
7, 8, 9, 10, 11, 12, 0, 0, 0, 13,
14, 15, 0, 16, 17, 18, 19, 0, 20, 21,
22, 23, 24, 25, 26, 27, 28, 29, 30, 0,
0, 0, 0, 0, 31, 0, 32, 33, 34, 35,
36, 0, 1, 2, 0, 3, 4, 5, 6, 7,
8, 9, 10, 11, 12, 0, 0, 0, 13, 14,
15, 0, 16, 17, 18, 19, 0, 20, 21, 22,
23, 24, 25, 26, 27, 28, 29, 30, 0, 0,
3, 4, 0, 31, 99, 32, 33, 34, 35, 36,
0, 232, 0, 13, 14, 15, 0, 0, 0, 0,
93, 0, 3, 4, 0, 23, 24, 25, 26, 27,
28, 29, 30, 0, 0, 13, 14, 15, 31, 0,
32, 33, 75, 35, 36, 0, 0, 23, 24, 25,
26, 27, 28, 29, 30, 110, 0, 0, 0, 0,
31, 40, 32, 33, 75, 35, 36, 0, 42, 0,
94, 37, 0, 38, 100, 101, 102, 0, 0, 0,
0, 0, 40, 0, 0, 0, 0, 0, 46, 42,
0, 0, 37, 0, 38, 0, 0, 103, 104, 105,
106, 107, 0, 108, 0, 0, 0, 0, 109, 46,
0, 0, 0, 0, 0, 0, 0, 0, 0, 45,
0, 62, 62, 0, 39, 0, 62, 62, 62, 62,
62, 0, 62, 0, 0, 0, 0, 0, 0, 0,
45, 0, 0, 62, 62, 39, 62, 62, 62, 0,
0, 0, 0, 0, 0, 0, 0, 0, 80, 80,
0, 0, 0, 80, 80, 80, 80, 80, 0, 80,
0, 0, 0, 0, 0, 0, 62, 0, 62, 62,
80, 80, 0, 80, 80, 80, 0, 56, 0, 0,
0, 0, 0, 0, 0, 81, 81, 0, 0, 0,
81, 81, 81, 81, 81, 0, 81, 0, 0, 62,
62, 0, 0, 0, 0, 80, 80, 81, 81, 0,
81, 81, 81, 0, 0, 0, 0, 0, 0, 0,
0, 4, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 123, 13, 14, 0, 80, 80, 0, 0,
0, 0, 81, 81, 0, 23, 24, 25, 26, 27,
28, 29, 30, 0, 0, 0, 0, 0, 147, 105,
32, 33, 75, 35, 105, 0, 0, 105, 152, 0,
0, 0, 0, 81, 81, 0, 0, 3, 4, 0,
0, 105, 105, 0, 105, 105, 105, 0, 0, 0,
13, 14, 15, 0, 0, 176, 0, 178, 3, 4,
0, 0, 23, 24, 25, 26, 27, 28, 29, 30,
0, 13, 14, 15, 0, 31, 105, 32, 33, 75,
35, 36, 0, 23, 24, 25, 26, 27, 28, 29,
30, 0, 0, 62, 0, 0, 31, 0, 32, 33,
75, 35, 36, 0, 62, 62, 62, 105, 105, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 62, 62, 62,
62, 62, 0, 62, 0, 0, 0, 0, 62, 62,
0, 80, 80, 80, 0, 0, 237, 0, 0, 0,
0, 83, 0, 0, 0, 0, 83, 0, 0, 83,
0, 0, 0, 0, 80, 80, 80, 80, 80, 0,
80, 0, 0, 83, 83, 80, 80, 83, 81, 81,
81, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 81, 81, 81, 81, 81, 0, 81, 83, 85,
85, 0, 81, 81, 85, 85, 85, 85, 85, 0,
85, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 85, 85, 0, 85, 85, 85, 0, 0, 83,
83, 0, 0, 0, 0, 0, 96, 96, 0, 0,
0, 96, 96, 96, 96, 96, 0, 96, 0, 0,
0, 0, 0, 0, 0, 0, 85, 85, 96, 96,
0, 96, 96, 96, 0, 105, 105, 105, 105, 105,
0, 105, 0, 91, 91, 0, 0, 105, 91, 91,
91, 91, 91, 0, 91, 0, 0, 85, 85, 0,
0, 0, 0, 96, 96, 91, 91, 0, 91, 91,
91, 0, 0, 0, 0, 0, 0, 0, 0, 92,
92, 0, 0, 0, 92, 92, 92, 92, 92, 0,
92, 0, 0, 0, 96, 96, 0, 0, 0, 0,
91, 92, 92, 0, 92, 92, 92, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 94, 94, 0,
0, 0, 94, 94, 94, 94, 94, 0, 94, 0,
0, 91, 91, 0, 0, 0, 92, 0, 0, 94,
94, 0, 94, 94, 94, 0, 0, 0, 0, 0,
0, 0, 0, 0, 93, 93, 0, 0, 0, 93,
93, 93, 93, 93, 103, 93, 0, 92, 92, 103,
0, 0, 103, 0, 94, 0, 93, 93, 0, 93,
93, 93, 0, 0, 0, 0, 103, 103, 0, 103,
103, 103, 106, 0, 0, 0, 0, 106, 0, 0,
106, 0, 85, 85, 85, 94, 94, 0, 0, 0,
0, 93, 0, 0, 106, 106, 0, 106, 106, 0,
0, 103, 0, 0, 0, 85, 85, 85, 85, 85,
0, 85, 0, 0, 0, 0, 0, 85, 0, 96,
96, 96, 93, 93, 0, 0, 0, 0, 0, 106,
116, 0, 103, 103, 0, 113, 111, 0, 112, 0,
114, 0, 96, 96, 96, 96, 96, 82, 96, 0,
0, 0, 82, 0, 96, 82, 91, 91, 91, 0,
106, 106, 0, 0, 0, 0, 0, 0, 0, 82,
82, 0, 0, 82, 0, 0, 0, 0, 0, 91,
91, 91, 91, 91, 0, 91, 0, 115, 0, 0,
0, 91, 92, 92, 92, 0, 0, 0, 0, 0,
0, 0, 0, 0, 82, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 92, 92, 92, 92, 92,
0, 92, 0, 0, 0, 0, 0, 92, 0, 0,
94, 94, 94, 0, 0, 82, 82, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 94, 94, 94, 94, 94, 0, 94,
0, 0, 0, 0, 0, 94, 0, 93, 93, 93,
0, 0, 62, 62, 0, 0, 0, 0, 62, 62,
0, 62, 0, 62, 0, 0, 0, 0, 0, 0,
93, 93, 93, 93, 93, 62, 93, 62, 0, 62,
0, 0, 93, 103, 103, 0, 0, 0, 0, 87,
0, 0, 103, 0, 87, 0, 87, 87, 87, 0,
0, 0, 0, 0, 0, 0, 0, 62, 0, 0,
62, 87, 87, 0, 87, 87, 87, 0, 0, 0,
106, 0, 0, 0, 0, 88, 0, 0, 0, 0,
88, 0, 88, 88, 88, 0, 0, 0, 0, 0,
0, 0, 100, 101, 102, 0, 87, 88, 88, 0,
88, 88, 88, 0, 0, 0, 0, 0, 0, 0,
0, 89, 0, 0, 0, 103, 89, 0, 89, 89,
89, 108, 0, 0, 0, 0, 109, 87, 87, 0,
0, 0, 88, 89, 89, 0, 89, 89, 89, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
90, 0, 0, 0, 0, 90, 0, 90, 90, 90,
0, 0, 0, 88, 88, 0, 102, 0, 89, 0,
0, 102, 90, 90, 102, 90, 90, 90, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 102, 102,
0, 102, 102, 102, 0, 63, 63, 0, 0, 89,
89, 63, 63, 0, 63, 0, 63, 90, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 63, 0,
63, 0, 63, 102, 62, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 62, 62, 62, 90, 90,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
63, 0, 0, 63, 102, 102, 0, 0, 62, 62,
62, 62, 62, 95, 62, 0, 0, 0, 95, 62,
62, 95, 87, 87, 87, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 95, 95, 0, 95, 95,
95, 0, 0, 0, 0, 87, 87, 87, 87, 87,
0, 87, 0, 0, 0, 0, 0, 87, 88, 88,
88, 0, 0, 0, 0, 0, 0, 0, 0, 0,
95, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 88, 88, 88, 88, 88, 0, 88, 0, 0,
0, 0, 0, 88, 89, 89, 89, 0, 0, 0,
0, 95, 95, 44, 116, 0, 0, 0, 0, 113,
111, 0, 112, 0, 114, 0, 0, 89, 89, 89,
89, 89, 0, 89, 0, 0, 43, 0, 117, 89,
118, 0, 0, 90, 90, 90, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 90, 90, 90, 90,
90, 115, 90, 0, 97, 0, 0, 63, 90, 97,
0, 0, 97, 0, 102, 102, 102, 0, 63, 63,
63, 0, 0, 0, 102, 0, 97, 97, 0, 97,
97, 97, 0, 0, 0, 0, 0, 0, 0, 0,
0, 63, 63, 63, 63, 63, 100, 63, 0, 0,
0, 100, 63, 63, 100, 0, 0, 0, 0, 0,
0, 97, 0, 0, 0, 0, 0, 0, 100, 100,
0, 100, 100, 100, 0, 116, 0, 0, 0, 154,
113, 111, 0, 112, 0, 114, 95, 95, 95, 0,
116, 0, 97, 97, 188, 113, 111, 0, 112, 117,
114, 118, 0, 100, 0, 0, 0, 0, 0, 95,
95, 95, 95, 95, 117, 95, 118, 0, 0, 0,
0, 95, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 115, 116, 100, 100, 0, 189, 113, 111,
0, 112, 0, 114, 0, 0, 0, 115, 0, 0,
116, 0, 0, 0, 0, 113, 111, 117, 112, 118,
114, 0, 0, 116, 0, 0, 0, 190, 113, 111,
0, 112, 0, 114, 0, 0, 100, 101, 102, 0,
0, 0, 0, 0, 0, 0, 0, 117, 0, 118,
115, 0, 0, 0, 0, 0, 0, 0, 0, 103,
104, 105, 106, 107, 0, 108, 0, 115, 116, 0,
109, 110, 0, 113, 111, 200, 112, 0, 114, 0,
115, 116, 0, 0, 0, 206, 113, 111, 0, 112,
0, 114, 117, 0, 118, 0, 0, 0, 97, 0,
0, 0, 0, 0, 0, 117, 0, 118, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
97, 97, 97, 97, 97, 115, 97, 0, 0, 116,
0, 0, 97, 0, 113, 111, 0, 112, 115, 114,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
208, 0, 0, 117, 0, 118, 0, 0, 0, 0,
0, 0, 100, 100, 100, 100, 100, 100, 101, 102,
0, 116, 0, 0, 100, 0, 113, 111, 246, 112,
0, 114, 100, 101, 102, 0, 115, 0, 0, 0,
103, 104, 105, 106, 107, 117, 108, 118, 0, 0,
0, 109, 110, 0, 0, 103, 104, 105, 106, 107,
0, 108, 0, 116, 0, 0, 109, 110, 113, 111,
0, 112, 0, 114, 0, 100, 101, 102, 115, 0,
0, 0, 0, 0, 0, 0, 0, 117, 0, 118,
0, 0, 100, 101, 102, 0, 0, 0, 103, 104,
105, 106, 107, 0, 108, 100, 101, 102, 0, 109,
110, 0, 0, 0, 0, 103, 104, 105, 106, 209,
115, 108, 0, 0, 0, 0, 109, 0, 103, 104,
105, 106, 107, 0, 108, 0, 116, 0, 0, 109,
110, 113, 111, 0, 112, 0, 114, 0, 0, 116,
100, 101, 102, 0, 113, 111, 0, 112, 0, 114,
117, 0, 118, 100, 101, 102, 0, 0, 0, 0,
0, 0, 0, 103, 104, 105, 106, 107, 0, 108,
0, 0, 0, 0, 109, 110, 103, 104, 105, 106,
107, 0, 108, 115, 0, 116, 0, 109, 110, 265,
113, 111, 0, 112, 0, 114, 115, 0, 0, 0,
0, 100, 101, 102, 0, 0, 0, 0, 0, 117,
0, 118, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 103, 104, 105, 106, 107, 0,
108, 0, 0, 0, 0, 109, 110, 0, 0, 0,
0, 0, 115, 100, 101, 102, 0, 116, 0, 0,
0, 0, 113, 111, 0, 112, 0, 114, 0, 0,
0, 0, 0, 0, 0, 0, 103, 104, 105, 106,
107, 0, 108, 118, 0, 0, 0, 109, 110, 0,
0, 0, 0, 116, 0, 100, 101, 102, 113, 111,
0, 112, 0, 114, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 115, 0, 0, 0, 103, 104,
105, 106, 107, 0, 108, 53, 0, 0, 0, 109,
110, 0, 61, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 74, 77, 78, 0, 0, 0,
115, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 100, 101,
102, 0, 119, 0, 0, 0, 0, 0, 0, 0,
0, 100, 101, 102, 126, 0, 0, 0, 0, 0,
132, 103, 104, 105, 106, 107, 0, 108, 0, 99,
141, 0, 109, 110, 103, 104, 105, 0, 0, 0,
108, 0, 0, 0, 0, 109, 0, 0, 0, 0,
0, 0, 0, 0, 137, 138, 139, 100, 101, 102,
0, 0, 0, 0, 0, 0, 0, 0, 148, 149,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
103, 104, 105, 106, 107, 0, 108, 0, 0, 0,
0, 109, 110, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 182, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 100,
101, 102, 0, 195, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 215, 216,
217, 0, 103, 104, 105, 106, 107, 0, 108, 0,
0, 0, 0, 109, 0, 100, 101, 102, 0, 0,
0, 0, 0, 0, 236, 0, 0, 239, 0, 0,
0, 0, 0, 0, 218, 0, 220, 0, 103, 104,
223, 224, 225, 0, 108, 0, 0, 0, 0, 109,
0, 0, 0, 0, 254, 238, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
247, 0, 0, 266, 0, 0, 0, 252, 0, 0,
0, 0, 0, 0, 255,
};
const short yycheck[] = { 94,
0, 91, 40, 44, 37, 40, 40, 36, 36, 42,
43, 301, 45, 301, 47, 41, 44, 41, 36, 41,
301, 41, 301, 36, 44, 36, 300, 301, 40, 37,
59, 59, 123, 33, 42, 43, 36, 45, 40, 47,
40, 59, 40, 43, 36, 45, 59, 41, 59, 41,
41, 41, 44, 37, 44, 40, 63, 64, 42, 59,
60, 94, 40, 47, 40, 59, 58, 59, 62, 61,
62, 63, 41, 300, 41, 44, 40, 44, 40, 40,
40, 40, 36, 40, 125, 123, 94, 41, 123, 36,
44, 91, 59, 277, 41, 62, 96, 44, 124, 93,
124, 93, 124, 301, 58, 59, 301, 61, 62, 63,
94, 58, 59, 0, 61, 62, 63, 303, 301, 93,
44, 62, 41, 123, 40, 125, 93, 44, 301, 16,
124, 125, 124, 125, 21, 40, 59, 37, 0, 93,
41, 44, 42, 43, 31, 45, 93, 47, 41, 36,
37, 38, 39, 40, 16, 42, 44, 124, 125, 41,
125, 41, 41, 300, 40, 40, 58, 41, 258, 59,
124, 125, 280, 41, 41, 41, 61, 124, 125, 302,
67, 68, 69, 37, 61, 41, 41, 123, 42, 43,
41, 45, 37, 47, 94, 82, 93, 42, 43, 41,
45, 62, 47, 41, 125, 92, 59, 94, 303, 123,
205, 251, 270, 100, 101, 102, 103, 104, 105, 106,
107, 108, -1, 110, 111, 112, 113, 114, 115, 116,
117, 118, -1, -1, 121, -1, 269, 270, 271, -1,
94, -1, -1, -1, -1, -1, -1, -1, -1, 94,
-1, -1, -1, -1, -1, -1, 256, 257, -1, 259,
260, 261, 262, 263, 264, 265, 266, 267, 268, 156,
303, -1, 272, 273, 274, -1, 276, 277, 278, 279,
-1, 281, 282, 283, 284, 285, 286, 287, 288, 289,
290, 291, -1, -1, -1, 303, -1, 297, -1, 299,
300, 301, 302, 303, 296, 192, -1, 194, 33, 300,
301, 36, 304, 200, -1, 40, 270, 271, 43, 303,
45, 208, -1, -1, -1, -1, -1, -1, -1, -1,
192, -1, 194, -1, 59, 60, -1, -1, 292, 293,
294, 295, 296, -1, 298, 232, 293, 294, 295, 296,
304, -1, -1, -1, -1, 242, -1, 304, -1, 246,
33, 248, 249, 36, -1, -1, 91, 40, -1, 269,
43, 96, 45, -1, -1, -1, -1, 264, -1, -1,
242, -1, -1, -1, 271, -1, 59, 60, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 123, -1,
125, -1, 264, 303, -1, -1, 36, -1, -1, 33,
-1, 41, 36, -1, 44, 269, 40, 271, 91, 43,
-1, 45, -1, 96, 269, 270, 271, -1, 58, 59,
-1, 61, 62, 63, -1, 59, 60, -1, -1, -1,
-1, -1, -1, -1, 33, -1, -1, 36, -1, 303,
123, 40, 125, 298, 43, -1, 45, 36, 303, -1,
-1, -1, 41, 93, -1, 44, 33, 91, -1, -1,
59, 60, 96, 40, -1, 42, 43, -1, 45, 58,
59, -1, 61, 62, 63, -1, -1, -1, -1, -1,
-1, -1, -1, 60, 124, 125, -1, -1, 41, 123,
-1, 44, 91, -1, -1, -1, -1, 96, -1, -1,
-1, -1, 37, -1, 93, -1, 59, 42, 43, 62,
45, -1, 47, -1, 91, -1, -1, -1, -1, 96,
-1, 256, 257, -1, 259, 260, 261, 262, 263, 264,
265, 266, 267, 268, -1, 124, 125, 272, 273, 274,
93, 276, 277, 278, 279, -1, 281, 282, 283, 284,
285, 286, 287, 288, 289, 290, 291, -1, -1, 94,
-1, -1, 297, -1, 299, 300, 301, 302, 303, -1,
-1, 124, 125, 256, 257, -1, 259, 260, 261, 262,
263, 264, 265, 266, 267, 268, -1, -1, -1, 272,
273, 274, -1, 276, 277, 278, 279, -1, 281, 282,
283, 284, 285, 286, 287, 288, 289, 290, 291, -1,
-1, -1, -1, -1, 297, -1, 299, 300, 301, 302,
303, -1, 256, 257, -1, 259, 260, 261, 262, 263,
264, 265, 266, 267, 268, -1, -1, -1, 272, 273,
274, -1, 276, 277, 278, 279, -1, 281, 282, 283,
284, 285, 286, 287, 288, 289, 290, 291, -1, -1,
259, 260, -1, 297, 304, 299, 300, 301, 302, 303,
-1, 40, -1, 272, 273, 274, -1, -1, -1, -1,
257, -1, 259, 260, -1, 284, 285, 286, 287, 288,
289, 290, 291, -1, -1, 272, 273, 274, 297, -1,
299, 300, 301, 302, 303, -1, -1, 284, 285, 286,
287, 288, 289, 290, 291, 304, -1, -1, -1, -1,
297, 33, 299, 300, 301, 302, 303, -1, 40, -1,
42, 43, -1, 45, 269, 270, 271, -1, -1, -1,
-1, -1, 33, -1, -1, -1, -1, -1, 60, 40,
-1, -1, 43, -1, 45, -1, -1, 292, 293, 294,
295, 296, -1, 298, -1, -1, -1, -1, 303, 60,
-1, -1, -1, -1, -1, -1, -1, -1, -1, 91,
-1, 36, 37, -1, 96, -1, 41, 42, 43, 44,
45, -1, 47, -1, -1, -1, -1, -1, -1, -1,
91, -1, -1, 58, 59, 96, 61, 62, 63, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 36, 37,
-1, -1, -1, 41, 42, 43, 44, 45, -1, 47,
-1, -1, -1, -1, -1, -1, 91, -1, 93, 94,
58, 59, -1, 61, 62, 63, -1, 2, -1, -1,
-1, -1, -1, -1, -1, 36, 37, -1, -1, -1,
41, 42, 43, 44, 45, -1, 47, -1, -1, 124,
125, -1, -1, -1, -1, 93, 94, 58, 59, -1,
61, 62, 63, -1, -1, -1, -1, -1, -1, -1,
-1, 260, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 57, 272, 273, -1, 124, 125, -1, -1,
-1, -1, 93, 94, -1, 284, 285, 286, 287, 288,
289, 290, 291, -1, -1, -1, -1, -1, 83, 36,
299, 300, 301, 302, 41, -1, -1, 44, 93, -1,
-1, -1, -1, 124, 125, -1, -1, 259, 260, -1,
-1, 58, 59, -1, 61, 62, 63, -1, -1, -1,
272, 273, 274, -1, -1, 120, -1, 122, 259, 260,
-1, -1, 284, 285, 286, 287, 288, 289, 290, 291,
-1, 272, 273, 274, -1, 297, 93, 299, 300, 301,
302, 303, -1, 284, 285, 286, 287, 288, 289, 290,
291, -1, -1, 258, -1, -1, 297, -1, 299, 300,
301, 302, 303, -1, 269, 270, 271, 124, 125, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 292, 293, 294,
295, 296, -1, 298, -1, -1, -1, -1, 303, 304,
-1, 269, 270, 271, -1, -1, 211, -1, -1, -1,
-1, 36, -1, -1, -1, -1, 41, -1, -1, 44,
-1, -1, -1, -1, 292, 293, 294, 295, 296, -1,
298, -1, -1, 58, 59, 303, 304, 62, 269, 270,
271, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, 292, 293, 294, 295, 296, -1, 298, 93, 36,
37, -1, 303, 304, 41, 42, 43, 44, 45, -1,
47, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, 58, 59, -1, 61, 62, 63, -1, -1, 124,
125, -1, -1, -1, -1, -1, 36, 37, -1, -1,
-1, 41, 42, 43, 44, 45, -1, 47, -1, -1,
-1, -1, -1, -1, -1, -1, 93, 94, 58, 59,
-1, 61, 62, 63, -1, 292, 293, 294, 295, 296,
-1, 298, -1, 36, 37, -1, -1, 304, 41, 42,
43, 44, 45, -1, 47, -1, -1, 124, 125, -1,
-1, -1, -1, 93, 94, 58, 59, -1, 61, 62,
63, -1, -1, -1, -1, -1, -1, -1, -1, 36,
37, -1, -1, -1, 41, 42, 43, 44, 45, -1,
47, -1, -1, -1, 124, 125, -1, -1, -1, -1,
93, 58, 59, -1, 61, 62, 63, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 36, 37, -1,
-1, -1, 41, 42, 43, 44, 45, -1, 47, -1,
-1, 124, 125, -1, -1, -1, 93, -1, -1, 58,
59, -1, 61, 62, 63, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 36, 37, -1, -1, -1, 41,
42, 43, 44, 45, 36, 47, -1, 124, 125, 41,
-1, -1, 44, -1, 93, -1, 58, 59, -1, 61,
62, 63, -1, -1, -1, -1, 58, 59, -1, 61,
62, 63, 36, -1, -1, -1, -1, 41, -1, -1,
44, -1, 269, 270, 271, 124, 125, -1, -1, -1,
-1, 93, -1, -1, 58, 59, -1, 61, 62, -1,
-1, 93, -1, -1, -1, 292, 293, 294, 295, 296,
-1, 298, -1, -1, -1, -1, -1, 304, -1, 269,
270, 271, 124, 125, -1, -1, -1, -1, -1, 93,
37, -1, 124, 125, -1, 42, 43, -1, 45, -1,
47, -1, 292, 293, 294, 295, 296, 36, 298, -1,
-1, -1, 41, -1, 304, 44, 269, 270, 271, -1,
124, 125, -1, -1, -1, -1, -1, -1, -1, 58,
59, -1, -1, 62, -1, -1, -1, -1, -1, 292,
293, 294, 295, 296, -1, 298, -1, 94, -1, -1,
-1, 304, 269, 270, 271, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 93, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 292, 293, 294, 295, 296,
-1, 298, -1, -1, -1, -1, -1, 304, -1, -1,
269, 270, 271, -1, -1, 124, 125, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, 292, 293, 294, 295, 296, -1, 298,
-1, -1, -1, -1, -1, 304, -1, 269, 270, 271,
-1, -1, 36, 37, -1, -1, -1, -1, 42, 43,
-1, 45, -1, 47, -1, -1, -1, -1, -1, -1,
292, 293, 294, 295, 296, 59, 298, 61, -1, 63,
-1, -1, 304, 295, 296, -1, -1, -1, -1, 36,
-1, -1, 304, -1, 41, -1, 43, 44, 45, -1,
-1, -1, -1, -1, -1, -1, -1, 91, -1, -1,
94, 58, 59, -1, 61, 62, 63, -1, -1, -1,
304, -1, -1, -1, -1, 36, -1, -1, -1, -1,
41, -1, 43, 44, 45, -1, -1, -1, -1, -1,
-1, -1, 269, 270, 271, -1, 93, 58, 59, -1,
61, 62, 63, -1, -1, -1, -1, -1, -1, -1,
-1, 36, -1, -1, -1, 292, 41, -1, 43, 44,
45, 298, -1, -1, -1, -1, 303, 124, 125, -1,
-1, -1, 93, 58, 59, -1, 61, 62, 63, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
36, -1, -1, -1, -1, 41, -1, 43, 44, 45,
-1, -1, -1, 124, 125, -1, 36, -1, 93, -1,
-1, 41, 58, 59, 44, 61, 62, 63, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 58, 59,
-1, 61, 62, 63, -1, 36, 37, -1, -1, 124,
125, 42, 43, -1, 45, -1, 47, 93, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 59, -1,
61, -1, 63, 93, 258, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 269, 270, 271, 124, 125,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
91, -1, -1, 94, 124, 125, -1, -1, 292, 293,
294, 295, 296, 36, 298, -1, -1, -1, 41, 303,
304, 44, 269, 270, 271, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 58, 59, -1, 61, 62,
63, -1, -1, -1, -1, 292, 293, 294, 295, 296,
-1, 298, -1, -1, -1, -1, -1, 304, 269, 270,
271, -1, -1, -1, -1, -1, -1, -1, -1, -1,
93, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, 292, 293, 294, 295, 296, -1, 298, -1, -1,
-1, -1, -1, 304, 269, 270, 271, -1, -1, -1,
-1, 124, 125, 36, 37, -1, -1, -1, -1, 42,
43, -1, 45, -1, 47, -1, -1, 292, 293, 294,
295, 296, -1, 298, -1, -1, 59, -1, 61, 304,
63, -1, -1, 269, 270, 271, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 292, 293, 294, 295,
296, 94, 298, -1, 36, -1, -1, 258, 304, 41,
-1, -1, 44, -1, 294, 295, 296, -1, 269, 270,
271, -1, -1, -1, 304, -1, 58, 59, -1, 61,
62, 63, -1, -1, -1, -1, -1, -1, -1, -1,
-1, 292, 293, 294, 295, 296, 36, 298, -1, -1,
-1, 41, 303, 304, 44, -1, -1, -1, -1, -1,
-1, 93, -1, -1, -1, -1, -1, -1, 58, 59,
-1, 61, 62, 63, -1, 37, -1, -1, -1, 41,
42, 43, -1, 45, -1, 47, 269, 270, 271, -1,
37, -1, 124, 125, 41, 42, 43, -1, 45, 61,
47, 63, -1, 93, -1, -1, -1, -1, -1, 292,
293, 294, 295, 296, 61, 298, 63, -1, -1, -1,
-1, 304, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 94, 37, 124, 125, -1, 41, 42, 43,
-1, 45, -1, 47, -1, -1, -1, 94, -1, -1,
37, -1, -1, -1, -1, 42, 43, 61, 45, 63,
47, -1, -1, 37, -1, -1, -1, 41, 42, 43,
-1, 45, -1, 47, -1, -1, 269, 270, 271, -1,
-1, -1, -1, -1, -1, -1, -1, 61, -1, 63,
94, -1, -1, -1, -1, -1, -1, -1, -1, 292,
293, 294, 295, 296, -1, 298, -1, 94, 37, -1,
303, 304, -1, 42, 43, 44, 45, -1, 47, -1,
94, 37, -1, -1, -1, 41, 42, 43, -1, 45,
-1, 47, 61, -1, 63, -1, -1, -1, 270, -1,
-1, -1, -1, -1, -1, 61, -1, 63, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
292, 293, 294, 295, 296, 94, 298, -1, -1, 37,
-1, -1, 304, -1, 42, 43, -1, 45, 94, 47,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
58, -1, -1, 61, -1, 63, -1, -1, -1, -1,
-1, -1, 292, 293, 294, 295, 296, 269, 270, 271,
-1, 37, -1, -1, 304, -1, 42, 43, 44, 45,
-1, 47, 269, 270, 271, -1, 94, -1, -1, -1,
292, 293, 294, 295, 296, 61, 298, 63, -1, -1,
-1, 303, 304, -1, -1, 292, 293, 294, 295, 296,
-1, 298, -1, 37, -1, -1, 303, 304, 42, 43,
-1, 45, -1, 47, -1, 269, 270, 271, 94, -1,
-1, -1, -1, -1, -1, -1, -1, 61, -1, 63,
-1, -1, 269, 270, 271, -1, -1, -1, 292, 293,
294, 295, 296, -1, 298, 269, 270, 271, -1, 303,
304, -1, -1, -1, -1, 292, 293, 294, 295, 93,
94, 298, -1, -1, -1, -1, 303, -1, 292, 293,
294, 295, 296, -1, 298, -1, 37, -1, -1, 303,
304, 42, 43, -1, 45, -1, 47, -1, -1, 37,
269, 270, 271, -1, 42, 43, -1, 45, -1, 47,
61, -1, 63, 269, 270, 271, -1, -1, -1, -1,
-1, -1, -1, 292, 293, 294, 295, 296, -1, 298,
-1, -1, -1, -1, 303, 304, 292, 293, 294, 295,
296, -1, 298, 94, -1, 37, -1, 303, 304, 41,
42, 43, -1, 45, -1, 47, 94, -1, -1, -1,
-1, 269, 270, 271, -1, -1, -1, -1, -1, 61,
-1, 63, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 292, 293, 294, 295, 296, -1,
298, -1, -1, -1, -1, 303, 304, -1, -1, -1,
-1, -1, 94, 269, 270, 271, -1, 37, -1, -1,
-1, -1, 42, 43, -1, 45, -1, 47, -1, -1,
-1, -1, -1, -1, -1, -1, 292, 293, 294, 295,
296, -1, 298, 63, -1, -1, -1, 303, 304, -1,
-1, -1, -1, 37, -1, 269, 270, 271, 42, 43,
-1, 45, -1, 47, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 94, -1, -1, -1, 292, 293,
294, 295, 296, -1, 298, 1, -1, -1, -1, 303,
304, -1, 8, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 20, 21, 22, -1, -1, -1,
94, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 269, 270,
271, -1, 48, -1, -1, -1, -1, -1, -1, -1,
-1, 269, 270, 271, 60, -1, -1, -1, -1, -1,
66, 292, 293, 294, 295, 296, -1, 298, -1, 46,
76, -1, 303, 304, 292, 293, 294, -1, -1, -1,
298, -1, -1, -1, -1, 303, -1, -1, -1, -1,
-1, -1, -1, -1, 71, 72, 73, 269, 270, 271,
-1, -1, -1, -1, -1, -1, -1, -1, 85, 86,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
292, 293, 294, 295, 296, -1, 298, -1, -1, -1,
-1, 303, 304, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 125, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, 269,
270, 271, -1, 140, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 184, 185,
186, -1, 292, 293, 294, 295, 296, -1, 298, -1,
-1, -1, -1, 303, -1, 269, 270, 271, -1, -1,
-1, -1, -1, -1, 210, -1, -1, 213, -1, -1,
-1, -1, -1, -1, 191, -1, 193, -1, 292, 293,
197, 198, 199, -1, 298, -1, -1, -1, -1, 303,
-1, -1, -1, -1, 240, 212, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
227, -1, -1, 259, -1, -1, -1, 234, -1, -1,
-1, -1, -1, -1, 241,
};
#define YYFINAL 47
#ifndef YYDEBUG
#define YYDEBUG 0
#endif
#define YYMAXTOKEN 306
#if YYDEBUG
const char * const yyname[] = {
"end-of-file",0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
"'!'",0,0,"'$'","'%'","'&'",0,"'('","')'","'*'","'+'","','","'-'",0,"'/'",0,0,0,
0,0,0,0,0,0,0,"':'","';'","'<'","'='","'>'","'?'",0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,"'['",0,"']'","'^'",0,"'`'",0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,"'{'","'|'","'}'",0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"STRUCT",
"POINT","NEWSTRUCT","ANS","FDEF","PFDEF","MODDEF","MODEND","GLOBAL","MGLOBAL",
"LOCAL","LOCALF","CMP","OR","AND","CAR","CDR","QUOTED","COLONCOLON","DO",
"WHILE","FOR","IF","ELSE","BREAK","RETURN","CONTINUE","PARIF","MAP","RECMAP",
"TIMER","GF2NGEN","GFPNGEN","GFSNGEN","GETOPT","FOP_AND","FOP_OR","FOP_IMPL",
"FOP_REPL","FOP_EQUIV","FOP_NOT","LOP","FORMULA","UCASE","LCASE","STR","SELF",
"BOPASS","PLUS","MINUS",
};
const char * const yyrule[] = {
"$accept : start",
"start : stat",
"stat : tail",
"$$1 :",
"$$2 :",
"stat : GLOBAL $$1 pvars $$2 tail",
"$$3 :",
"$$4 :",
"stat : MGLOBAL $$3 pvars $$4 tail",
"$$5 :",
"$$6 :",
"stat : LOCAL $$5 pvars $$6 tail",
"stat : LOCALF vars tail",
"stat : STRUCT rawstr '{' members '}' tail",
"stat : expr tail",
"stat : complex",
"stat : BREAK tail",
"stat : CONTINUE tail",
"stat : RETURN tail",
"stat : RETURN expr tail",
"stat : IF '(' node ')' stat",
"stat : IF '(' node ')' stat ELSE stat",
"stat : FOR '(' node ';' node ';' node ')' stat",
"stat : WHILE '(' node ')' stat",
"stat : DO stat WHILE '(' node ')' tail",
"stat : LCASE '(' node ')' ':' '=' expr tail",
"stat : PFDEF LCASE '(' node ')' tail",
"$$7 :",
"$$8 :",
"$$9 :",
"stat : FDEF LCASE $$7 '(' $$8 node $$9 ')' desc '{' stats '}'",
"stat : MODDEF LCASE tail",
"stat : MODEND tail",
"stat : error tail",
"tail : ';'",
"tail : '$'",
"desc :",
"desc : STR",
"complex : '{' stats '}'",
"members : rawstr",
"members : members ',' rawstr",
"vars : LCASE",
"vars : vars ',' LCASE",
"pvars : UCASE",
"pvars : pvars ',' UCASE",
"stats :",
"stats : stats stat",
"node :",
"node : _node",
"_node : expr",
"_node : _node ',' expr",
"optlist : opt",
"optlist : optlist ',' opt",
"rawstr : UCASE",
"rawstr : LCASE",
"opt : rawstr '=' expr",
"pexpr : STR",
"pexpr : FORMULA",
"pexpr : ANS",
"pexpr : GF2NGEN",
"pexpr : GFPNGEN",
"pexpr : GFSNGEN",
"pexpr : LCASE",
"pexpr : LCASE '(' node ')'",
"pexpr : LCASE '(' node '|' optlist ')'",
"pexpr : MAP '(' LCASE ',' node ')'",
"pexpr : RECMAP '(' LCASE ',' node ')'",
"pexpr : LCASE '{' node '}' '(' node ')'",
"pexpr : GETOPT '(' rawstr ')'",
"pexpr : GETOPT '(' ')'",
"pexpr : TIMER '(' expr ',' expr ',' expr ')'",
"pexpr : PARIF '(' LCASE ')'",
"pexpr : PARIF '(' LCASE ',' node ')'",
"pexpr : '(' '*' expr ')' '(' node ')'",
"pexpr : CAR '(' expr ')'",
"pexpr : CDR '(' expr ')'",
"pexpr : '(' expr ')'",
"pexpr : UCASE",
"pexpr : pexpr '[' expr ']'",
"pexpr : pexpr POINT rawstr",
"expr : pexpr",
"expr : '(' STRUCT rawstr ')' pexpr",
"expr : expr '=' expr",
"expr : expr BOPASS expr",
"expr : expr SELF",
"expr : SELF expr",
"expr : '[' node ']'",
"expr : '+' expr",
"expr : '-' expr",
"expr : expr '+' expr",
"expr : expr '-' expr",
"expr : expr '*' expr",
"expr : expr '/' expr",
"expr : expr '%' expr",
"expr : expr '^' expr",
"expr : expr CMP expr",
"expr : '!' expr",
"expr : expr OR expr",
"expr : expr AND expr",
"expr : FOP_NOT expr",
"expr : expr FOP_AND expr",
"expr : expr FOP_OR expr",
"expr : expr FOP_IMPL expr",
"expr : expr FOP_REPL expr",
"expr : expr FOP_EQUIV expr",
"expr : expr LOP expr",
"expr : expr '?' expr ':' expr",
"expr : '<' node '>'",
"expr : NEWSTRUCT '(' rawstr ')'",
"expr : QUOTED '(' expr ')'",
"expr : '`' expr",
};
#endif
#if YYDEBUG
#include <stdio.h>
#endif
#ifdef YYSTACKSIZE
#undef YYMAXDEPTH
#define YYMAXDEPTH YYSTACKSIZE
#else
#ifdef YYMAXDEPTH
#define YYSTACKSIZE YYMAXDEPTH
#else
#define YYSTACKSIZE 10000
#define YYMAXDEPTH 10000
#endif
#endif
#define YYINITSTACKSIZE 200
int yydebug;
int yynerrs;
int yyerrflag;
int yychar;
short *yyssp;
YYSTYPE *yyvsp;
YYSTYPE yyval;
YYSTYPE yylval;
short *yyss;
short *yysslim;
YYSTYPE *yyvs;
int yystacksize;
/* allocate initial stack or double stack size, up to YYMAXDEPTH */
static int yygrowstack()
{
int newsize, i;
short *newss;
YYSTYPE *newvs;
if ((newsize = yystacksize) == 0)
newsize = YYINITSTACKSIZE;
else if (newsize >= YYMAXDEPTH)
return -1;
else if ((newsize *= 2) > YYMAXDEPTH)
newsize = YYMAXDEPTH;
i = yyssp - yyss;
newss = yyss ? (short *)realloc(yyss, newsize * sizeof *newss) :
(short *)malloc(newsize * sizeof *newss);
if (newss == NULL)
return -1;
yyss = newss;
yyssp = newss + i;
newvs = yyvs ? (YYSTYPE *)realloc(yyvs, newsize * sizeof *newvs) :
(YYSTYPE *)malloc(newsize * sizeof *newvs);
if (newvs == NULL)
return -1;
yyvs = newvs;
yyvsp = newvs + i;
yystacksize = newsize;
yysslim = yyss + newsize - 1;
return 0;
}
#define YYABORT goto yyabort
#define YYREJECT goto yyabort
#define YYACCEPT goto yyaccept
#define YYERROR goto yyerrlab
#ifndef YYPARSE_PARAM
#if defined(__cplusplus) || __STDC__
#define YYPARSE_PARAM_ARG void
#define YYPARSE_PARAM_DECL
#else /* ! ANSI-C/C++ */
#define YYPARSE_PARAM_ARG
#define YYPARSE_PARAM_DECL
#endif /* ANSI-C/C++ */
#else /* YYPARSE_PARAM */
#ifndef YYPARSE_PARAM_TYPE
#define YYPARSE_PARAM_TYPE void *
#endif
#if defined(__cplusplus) || __STDC__
#define YYPARSE_PARAM_ARG YYPARSE_PARAM_TYPE YYPARSE_PARAM
#define YYPARSE_PARAM_DECL
#else /* ! ANSI-C/C++ */
#define YYPARSE_PARAM_ARG YYPARSE_PARAM
#define YYPARSE_PARAM_DECL YYPARSE_PARAM_TYPE YYPARSE_PARAM;
#endif /* ANSI-C/C++ */
#endif /* ! YYPARSE_PARAM */
int
yyparse (YYPARSE_PARAM_ARG)
YYPARSE_PARAM_DECL
{
register int yym, yyn, yystate;
#if YYDEBUG
register const char *yys;
if ((yys = getenv("YYDEBUG")))
{
yyn = *yys;
if (yyn >= '0' && yyn <= '9')
yydebug = yyn - '0';
}
#endif
yynerrs = 0;
yyerrflag = 0;
yychar = (-1);
if (yyss == NULL && yygrowstack()) goto yyoverflow;
yyssp = yyss;
yyvsp = yyvs;
*yyssp = yystate = 0;
yyloop:
if ((yyn = yydefred[yystate])) goto yyreduce;
if (yychar < 0)
{
if ((yychar = yylex()) < 0) yychar = 0;
#if YYDEBUG
if (yydebug)
{
yys = 0;
if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
if (!yys) yys = "illegal-symbol";
printf("%sdebug: state %d, reading %d (%s)\n",
YYPREFIX, yystate, yychar, yys);
}
#endif
}
if ((yyn = yysindex[yystate]) && (yyn += yychar) >= 0 &&
yyn <= YYTABLESIZE && yycheck[yyn] == yychar)
{
#if YYDEBUG
if (yydebug)
printf("%sdebug: state %d, shifting to state %d\n",
YYPREFIX, yystate, yytable[yyn]);
#endif
if (yyssp >= yysslim && yygrowstack())
{
goto yyoverflow;
}
*++yyssp = yystate = yytable[yyn];
*++yyvsp = yylval;
yychar = (-1);
if (yyerrflag > 0) --yyerrflag;
goto yyloop;
}
if ((yyn = yyrindex[yystate]) && (yyn += yychar) >= 0 &&
yyn <= YYTABLESIZE && yycheck[yyn] == yychar)
{
yyn = yytable[yyn];
goto yyreduce;
}
if (yyerrflag) goto yyinrecovery;
#if defined(lint) || defined(__GNUC__)
goto yynewerror;
#endif
yynewerror:
yyerror("syntax error");
#if defined(lint) || defined(__GNUC__)
goto yyerrlab;
#endif
yyerrlab:
++yynerrs;
yyinrecovery:
if (yyerrflag < 3)
{
yyerrflag = 3;
for (;;)
{
if ((yyn = yysindex[*yyssp]) && (yyn += YYERRCODE) >= 0 &&
yyn <= YYTABLESIZE && yycheck[yyn] == YYERRCODE)
{
#if YYDEBUG
if (yydebug)
printf("%sdebug: state %d, error recovery shifting\
to state %d\n", YYPREFIX, *yyssp, yytable[yyn]);
#endif
if (yyssp >= yysslim && yygrowstack())
{
goto yyoverflow;
}
*++yyssp = yystate = yytable[yyn];
*++yyvsp = yylval;
goto yyloop;
}
else
{
#if YYDEBUG
if (yydebug)
printf("%sdebug: error recovery discarding state %d\n",
YYPREFIX, *yyssp);
#endif
if (yyssp <= yyss) goto yyabort;
--yyssp;
--yyvsp;
}
}
}
else
{
if (yychar == 0) goto yyabort;
#if YYDEBUG
if (yydebug)
{
yys = 0;
if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
if (!yys) yys = "illegal-symbol";
printf("%sdebug: state %d, error recovery discards token %d (%s)\n",
YYPREFIX, yystate, yychar, yys);
}
#endif
yychar = (-1);
goto yyloop;
}
yyreduce:
#if YYDEBUG
if (yydebug)
printf("%sdebug: state %d, reducing by rule %d (%s)\n",
YYPREFIX, yystate, yyn, yyrule[yyn]);
#endif
yym = yylen[yyn];
yyval = yyvsp[1-yym];
switch (yyn)
{
case 1:
#line 131 "parse.y"
{ parse_snode = yyvsp[0].s; YYACCEPT; }
break;
case 2:
#line 134 "parse.y"
{ yyval.s = 0; }
break;
case 3:
#line 135 "parse.y"
{ gdef=1; }
break;
case 4:
#line 135 "parse.y"
{ gdef=0; }
break;
case 5:
#line 136 "parse.y"
{ yyval.s = 0; NOPR; }
break;
case 6:
#line 137 "parse.y"
{ mgdef=1; }
break;
case 7:
#line 137 "parse.y"
{ mgdef=0; }
break;
case 8:
#line 138 "parse.y"
{ yyval.s = 0; NOPR; }
break;
case 9:
#line 139 "parse.y"
{ ldef=1; }
break;
case 10:
#line 139 "parse.y"
{ ldef=0; }
break;
case 11:
#line 140 "parse.y"
{ yyval.s = 0; NOPR; }
break;
case 12:
#line 142 "parse.y"
{ appenduflist(yyvsp[-1].n); yyval.s = 0; NOPR; }
break;
case 13:
#line 144 "parse.y"
{ structdef(yyvsp[-4].p,yyvsp[-2].n); yyval.s = 0; NOPR; }
break;
case 14:
#line 146 "parse.y"
{ yyval.s = mksnode(1,S_SINGLE,yyvsp[-1].f); }
break;
case 15:
#line 148 "parse.y"
{ yyval.s = yyvsp[0].s; }
break;
case 16:
#line 150 "parse.y"
{ yyval.s = mksnode(0,S_BREAK); }
break;
case 17:
#line 152 "parse.y"
{ yyval.s = mksnode(0,S_CONTINUE); }
break;
case 18:
#line 154 "parse.y"
{ yyval.s = mksnode(1,S_RETURN,0); }
break;
case 19:
#line 156 "parse.y"
{ yyval.s = mksnode(1,S_RETURN,yyvsp[-1].f); }
break;
case 20:
#line 158 "parse.y"
{ yyval.s = mksnode(4,S_IFELSE,yyvsp[-4].i,yyvsp[-2].n,yyvsp[0].s,0); yyvsp[0].s?yyval.s->ln=yyvsp[0].s->ln:0; NOPR; }
break;
case 21:
#line 160 "parse.y"
{ yyval.s = mksnode(4,S_IFELSE,yyvsp[-6].i,yyvsp[-4].n,yyvsp[-2].s,yyvsp[0].s); yyvsp[0].s?yyval.s->ln=yyvsp[0].s->ln:0; NOPR; }
break;
case 22:
#line 162 "parse.y"
{ yyval.s = mksnode(5,S_FOR,yyvsp[-8].i,yyvsp[-6].n,yyvsp[-4].n?yyvsp[-4].n:ONENODE,yyvsp[-2].n,yyvsp[0].s); yyvsp[0].s?yyval.s->ln=yyvsp[0].s->ln:0; NOPR; }
break;
case 23:
#line 164 "parse.y"
{ yyval.s = mksnode(5,S_FOR,yyvsp[-4].i,0,yyvsp[-2].n,0,yyvsp[0].s); yyvsp[0].s?yyval.s->ln=yyvsp[0].s->ln:0; NOPR; }
break;
case 24:
#line 166 "parse.y"
{ yyval.s = mksnode(3,S_DO,yyvsp[-6].i,yyvsp[-5].s,yyvsp[-2].n); }
break;
case 25:
#line 168 "parse.y"
{ yyval.s = mksnode(3,S_PFDEF,yyvsp[-7].p,yyvsp[-5].n,yyvsp[-1].f); NOPR; }
break;
case 26:
#line 170 "parse.y"
{ yyval.s = mksnode(3,S_PFDEF,yyvsp[-4].p,yyvsp[-2].n,0); NOPR; }
break;
case 27:
#line 171 "parse.y"
{ mkpvs(yyvsp[0].p); }
break;
case 28:
#line 171 "parse.y"
{ ldef = 1; }
break;
case 29:
#line 171 "parse.y"
{ ldef = -1; }
break;
case 30:
#line 172 "parse.y"
{
mkuf(yyvsp[-10].p,asir_infile->name,yyvsp[-6].n,
mksnode(1,S_CPLX,yyvsp[-1].n),yyvsp[-11].i,asir_infile->ln,yyvsp[-3].p,CUR_MODULE);
yyval.s = 0; NOPR;
}
break;
case 31:
#line 178 "parse.y"
{ CUR_MODULE = mkmodule(yyvsp[-1].p); MPVS = CUR_MODULE->pvs; yyval.s = 0; NOPR; }
break;
case 32:
#line 180 "parse.y"
{ CUR_MODULE = 0; MPVS = 0; yyval.s = 0; NOPR; }
break;
case 33:
#line 182 "parse.y"
{ yyerrok; yyval.s = 0; }
break;
case 34:
#line 185 "parse.y"
{ if ( main_parser ) prresult = 1; }
break;
case 35:
#line 187 "parse.y"
{ if ( main_parser ) prresult = 0; }
break;
case 36:
#line 190 "parse.y"
{ yyval.p = 0; }
break;
case 37:
#line 192 "parse.y"
{ yyval.p = yyvsp[0].p; }
break;
case 38:
#line 195 "parse.y"
{ yyval.s = mksnode(1,S_CPLX,yyvsp[-1].n); }
break;
case 39:
#line 198 "parse.y"
{ MKNODE(yyval.n,yyvsp[0].p,0); }
break;
case 40:
#line 200 "parse.y"
{ appendtonode(yyvsp[-2].n,yyvsp[0].p,&yyval.n); }
break;
case 41:
#line 203 "parse.y"
{ MKNODE(yyval.n,yyvsp[0].p,0); }
break;
case 42:
#line 205 "parse.y"
{ appendtonode(yyvsp[-2].n,yyvsp[0].p,&yyval.n); }
break;
case 43:
#line 208 "parse.y"
{ val = (pointer)makepvar(yyvsp[0].p); MKNODE(yyval.n,val,0); }
break;
case 44:
#line 210 "parse.y"
{ appendtonode(yyvsp[-2].n,(pointer)makepvar(yyvsp[0].p),&yyval.n); }
break;
case 45:
#line 213 "parse.y"
{ yyval.n = 0; }
break;
case 46:
#line 215 "parse.y"
{ appendtonode(yyvsp[-1].n,(pointer)yyvsp[0].s,&yyval.n); }
break;
case 47:
#line 218 "parse.y"
{ yyval.n = 0; }
break;
case 48:
#line 220 "parse.y"
{ yyval.n = yyvsp[0].n; }
break;
case 49:
#line 223 "parse.y"
{ MKNODE(yyval.n,yyvsp[0].f,0); }
break;
case 50:
#line 225 "parse.y"
{ appendtonode(yyvsp[-2].n,(pointer)yyvsp[0].f,&yyval.n); }
break;
case 51:
#line 228 "parse.y"
{ MKNODE(yyval.n,yyvsp[0].f,0); }
break;
case 52:
#line 230 "parse.y"
{ appendtonode(yyvsp[-2].n,(pointer)yyvsp[0].f,&yyval.n); }
break;
case 53:
#line 233 "parse.y"
{ yyval.p = yyvsp[0].p; }
break;
case 54:
#line 235 "parse.y"
{ yyval.p = yyvsp[0].p; }
break;
case 55:
#line 238 "parse.y"
{ yyval.f = mkfnode(2,I_OPT,yyvsp[-2].p,yyvsp[0].f); }
break;
case 56:
#line 241 "parse.y"
{ yyval.f = mkfnode(1,I_STR,yyvsp[0].p); }
break;
case 57:
#line 243 "parse.y"
{ yyval.f = mkfnode(1,I_FORMULA,yyvsp[0].p); }
break;
case 58:
#line 245 "parse.y"
{ yyval.f = mkfnode(1,I_ANS,yyvsp[0].i); }
break;
case 59:
#line 247 "parse.y"
{ yyval.f = mkfnode(0,I_GF2NGEN); }
break;
case 60:
#line 249 "parse.y"
{ yyval.f = mkfnode(0,I_GFPNGEN); }
break;
case 61:
#line 251 "parse.y"
{ yyval.f = mkfnode(0,I_GFSNGEN); }
break;
case 62:
#line 253 "parse.y"
{
FUNC f;
searchf(noargsysf,yyvsp[0].p,&f);
if ( f )
yyval.f = mkfnode(2,I_FUNC,f,0);
else {
searchc(yyvsp[0].p,&f);
if ( f )
yyval.f = mkfnode(2,I_FUNC,f,mkfnode(1,I_LIST,0));
else {
searchf(sysf,yyvsp[0].p,&f);
if ( !f )
searchf(ubinf,yyvsp[0].p,&f);
if ( !f )
searchpf(yyvsp[0].p,&f);
if ( !f )
searchf(usrf,yyvsp[0].p,&f);
if ( f )
makesrvar(f,(P *)&val);
else
makevar(yyvsp[0].p,(P *)&val);
yyval.f = mkfnode(1,I_FORMULA,val);
}
}
}
break;
case 63:
#line 280 "parse.y"
{
gen_searchf(yyvsp[-3].p,(FUNC *)&val);
print_crossref(val);
yyval.f = mkfnode(2,I_FUNC,val,mkfnode(1,I_LIST,yyvsp[-1].n));
}
break;
case 64:
#line 287 "parse.y"
{
gen_searchf(yyvsp[-5].p,(FUNC *)&val);
print_crossref(val);
yyval.f = mkfnode(3,I_FUNC_OPT,val,
mkfnode(1,I_LIST,yyvsp[-3].n),mkfnode(1,I_LIST,yyvsp[-1].n));
}
break;
case 65:
#line 294 "parse.y"
{
gen_searchf(yyvsp[-3].p,(FUNC *)&val);
print_crossref(val);
yyval.f = mkfnode(2,I_MAP,val,mkfnode(1,I_LIST,yyvsp[-1].n));
}
break;
case 66:
#line 300 "parse.y"
{
gen_searchf(yyvsp[-3].p,(FUNC *)&val);
print_crossref(val);
yyval.f = mkfnode(2,I_RECMAP,val,mkfnode(1,I_LIST,yyvsp[-1].n));
}
break;
case 67:
#line 306 "parse.y"
{
searchpf(yyvsp[-6].p,(FUNC *)&val);
yyval.f = mkfnode(2,I_PFDERIV,val,mkfnode(1,I_LIST,yyvsp[-1].n),mkfnode(1,I_LIST,yyvsp[-4].n));
}
break;
case 68:
#line 311 "parse.y"
{
yyval.f = mkfnode(2,I_GETOPT,yyvsp[-1].p);
}
break;
case 69:
#line 315 "parse.y"
{
yyval.f = mkfnode(2,I_GETOPT,0);
}
break;
case 70:
#line 319 "parse.y"
{
yyval.f = mkfnode(3,I_TIMER,yyvsp[-5].f,yyvsp[-3].f,yyvsp[-1].f);
}
break;
case 71:
#line 323 "parse.y"
{
searchf(parif,yyvsp[-1].p,(FUNC *)&val);
if ( !val )
mkparif(yyvsp[-1].p,(FUNC *)&val);
yyval.f = mkfnode(2,I_FUNC,val,0);
}
break;
case 72:
#line 330 "parse.y"
{
searchf(parif,yyvsp[-3].p,(FUNC *)&val);
if ( !val )
mkparif(yyvsp[-3].p,(FUNC *)&val);
yyval.f = mkfnode(2,I_FUNC,val,mkfnode(1,I_LIST,yyvsp[-1].n));
}
break;
case 73:
#line 337 "parse.y"
{
yyval.f = mkfnode(2,I_IFUNC,yyvsp[-4].f,mkfnode(1,I_LIST,yyvsp[-1].n));
}
break;
case 74:
#line 341 "parse.y"
{ yyval.f = mkfnode(1,I_CAR,yyvsp[-1].f); }
break;
case 75:
#line 343 "parse.y"
{ yyval.f = mkfnode(1,I_CDR,yyvsp[-1].f); }
break;
case 76:
#line 345 "parse.y"
{ yyval.f = mkfnode(1,I_PAREN,yyvsp[-1].f); }
break;
case 77:
#line 347 "parse.y"
{
if ( main_parser || allow_create_var )
yyval.f = mkfnode(2,I_PVAR,makepvar(yyvsp[0].p),0);
else {
ind = searchpvar(yyvsp[0].p);
if ( ind == -1 ) {
fprintf(stderr,"%s : no such variable.\n",yyvsp[0].p);
YYABORT;
} else
yyval.f = mkfnode(2,I_PVAR,ind,0);
}
}
break;
case 78:
#line 360 "parse.y"
{
if ( yyvsp[-3].f->id == I_PVAR || yyvsp[-3].f->id == I_INDEX ) {
appendtonode((NODE)yyvsp[-3].f->arg[1],(pointer)yyvsp[-1].f,&a);
yyvsp[-3].f->arg[1] = (pointer)a; yyval.f = yyvsp[-3].f;
} else {
MKNODE(a,yyvsp[-1].f,0);
yyval.f = mkfnode(2,I_INDEX,(pointer)yyvsp[-3].f,a);
}
}
break;
case 79:
#line 370 "parse.y"
{ yyval.f = mkfnode(2,I_POINT,yyvsp[-2].f,yyvsp[0].p); }
break;
case 80:
#line 373 "parse.y"
{ yyval.f = yyvsp[0].f; }
break;
case 81:
#line 375 "parse.y"
{ yyval.f = mkfnode(3,I_CAST,structtoindex(yyvsp[-2].p),yyvsp[0].f,0); }
break;
case 82:
#line 377 "parse.y"
{ yyval.f = mkfnode(2,I_ASSPVAR,yyvsp[-2].f,yyvsp[0].f); }
break;
case 83:
#line 379 "parse.y"
{ yyval.f = mkfnode(2,I_ASSPVAR,yyvsp[-2].f,mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f)); }
break;
case 84:
#line 381 "parse.y"
{ yyval.f = mkfnode(2,I_POSTSELF,yyvsp[0].p,yyvsp[-1].f); }
break;
case 85:
#line 383 "parse.y"
{ yyval.f = mkfnode(2,I_PRESELF,yyvsp[-1].p,yyvsp[0].f); }
break;
case 86:
#line 385 "parse.y"
{ yyval.f = mkfnode(1,I_LIST,yyvsp[-1].n); }
break;
case 87:
#line 387 "parse.y"
{ yyval.f = yyvsp[0].f; }
break;
case 88:
#line 389 "parse.y"
{ yyval.f = mkfnode(1,I_MINUS,yyvsp[0].f); }
break;
case 89:
#line 391 "parse.y"
{ yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f); }
break;
case 90:
#line 393 "parse.y"
{ yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f); }
break;
case 91:
#line 395 "parse.y"
{ yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f); }
break;
case 92:
#line 397 "parse.y"
{ yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f); }
break;
case 93:
#line 399 "parse.y"
{ yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f); }
break;
case 94:
#line 401 "parse.y"
{ yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f); }
break;
case 95:
#line 403 "parse.y"
{ yyval.f = mkfnode(3,I_COP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); }
break;
case 96:
#line 405 "parse.y"
{ yyval.f = mkfnode(1,I_NOT,yyvsp[0].f); }
break;
case 97:
#line 407 "parse.y"
{ yyval.f = mkfnode(2,I_OR,yyvsp[-2].f,yyvsp[0].f); }
break;
case 98:
#line 409 "parse.y"
{ yyval.f = mkfnode(2,I_AND,yyvsp[-2].f,yyvsp[0].f); }
break;
case 99:
#line 411 "parse.y"
{ yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[0].f,0); }
break;
case 100:
#line 413 "parse.y"
{ yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); }
break;
case 101:
#line 415 "parse.y"
{ yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); }
break;
case 102:
#line 417 "parse.y"
{ yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); }
break;
case 103:
#line 419 "parse.y"
{ yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); }
break;
case 104:
#line 421 "parse.y"
{ yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); }
break;
case 105:
#line 423 "parse.y"
{ yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); }
break;
case 106:
#line 425 "parse.y"
{ yyval.f = mkfnode(3,I_CE,yyvsp[-4].f,yyvsp[-2].f,yyvsp[0].f); }
break;
case 107:
#line 427 "parse.y"
{ yyval.f = mkfnode(1,I_EV,yyvsp[-1].n); }
break;
case 108:
#line 429 "parse.y"
{ yyval.f = mkfnode(1,I_NEWCOMP,(int)structtoindex(yyvsp[-1].p)); }
break;
case 109:
#line 431 "parse.y"
{ MKQUOTE(quote,yyvsp[-1].f); yyval.f = mkfnode(1,I_FORMULA,(pointer)quote); }
break;
case 110:
#line 433 "parse.y"
{ MKQUOTE(quote,yyvsp[0].f); yyval.f = mkfnode(1,I_FORMULA,(pointer)quote); }
break;
#line 1695 "y.tab.c"
}
yyssp -= yym;
yystate = *yyssp;
yyvsp -= yym;
yym = yylhs[yyn];
if (yystate == 0 && yym == 0)
{
#if YYDEBUG
if (yydebug)
printf("%sdebug: after reduction, shifting from state 0 to\
state %d\n", YYPREFIX, YYFINAL);
#endif
yystate = YYFINAL;
*++yyssp = YYFINAL;
*++yyvsp = yyval;
if (yychar < 0)
{
if ((yychar = yylex()) < 0) yychar = 0;
#if YYDEBUG
if (yydebug)
{
yys = 0;
if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
if (!yys) yys = "illegal-symbol";
printf("%sdebug: state %d, reading %d (%s)\n",
YYPREFIX, YYFINAL, yychar, yys);
}
#endif
}
if (yychar == 0) goto yyaccept;
goto yyloop;
}
if ((yyn = yygindex[yym]) && (yyn += yystate) >= 0 &&
yyn <= YYTABLESIZE && yycheck[yyn] == yystate)
yystate = yytable[yyn];
else
yystate = yydgoto[yym];
#if YYDEBUG
if (yydebug)
printf("%sdebug: after reduction, shifting from state %d \
to state %d\n", YYPREFIX, *yyssp, yystate);
#endif
if (yyssp >= yysslim && yygrowstack())
{
goto yyoverflow;
}
*++yyssp = yystate;
*++yyvsp = yyval;
goto yyloop;
yyoverflow:
yyerror("yacc stack overflow");
yyabort:
return (1);
yyaccept:
return (0);
}