mirror of
https://github.com/GnoConsortium/gno.git
synced 2024-11-18 19:09:31 +00:00
99bb125e6e
http://plan9.bell-labs.com/who/bwk/ This is version 970821 without modification for GNO/ME compatibility. It's being included in the repository to assist in importing future versions of awk from Bell Labs. ---------------------------------------------------------------------- Added Files: awk/FIXES awk/README awk/awk.1 awk/awk.h awk/awkgram.y awk/b.c awk/lex.c awk/lib.c awk/main.c awk/makefile awk/maketab.c awk/missing95.c awk/parse.c awk/proto.h awk/run.c awk/tran.c awk/ytab.c awk/ytab.h awk/ytabc.bak awk/ytabh.bak ---------------------------------------------------------------------- -- Dave Tribby
1613 lines
53 KiB
C
1613 lines
53 KiB
C
|
|
#line 26 "awkgram.y"
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include "awk.h"
|
|
|
|
void checkdup(Node *list, Cell *item);
|
|
int yywrap(void) { return(1); }
|
|
|
|
Node *beginloc = 0;
|
|
Node *endloc = 0;
|
|
int infunc = 0; /* = 1 if in arglist or body of func */
|
|
int inloop = 0; /* = 1 if in while, for, do */
|
|
char *curfname = 0; /* current function name */
|
|
Node *arglist = 0; /* list of args for current function */
|
|
|
|
#line 41 "awkgram.y"
|
|
typedef union {
|
|
Node *p;
|
|
Cell *cp;
|
|
int i;
|
|
char *s;
|
|
} YYSTYPE;
|
|
extern int yyerrflag;
|
|
#ifndef YYMAXDEPTH
|
|
#define YYMAXDEPTH 150
|
|
#endif
|
|
YYSTYPE yylval;
|
|
YYSTYPE yyval;
|
|
#define FIRSTTOKEN 57346
|
|
#define PROGRAM 57347
|
|
#define PASTAT 57348
|
|
#define PASTAT2 57349
|
|
#define XBEGIN 57350
|
|
#define XEND 57351
|
|
#define NL 57352
|
|
#define ARRAY 57353
|
|
#define MATCH 57354
|
|
#define NOTMATCH 57355
|
|
#define MATCHOP 57356
|
|
#define FINAL 57357
|
|
#define DOT 57358
|
|
#define ALL 57359
|
|
#define CCL 57360
|
|
#define NCCL 57361
|
|
#define CHAR 57362
|
|
#define OR 57363
|
|
#define STAR 57364
|
|
#define QUEST 57365
|
|
#define PLUS 57366
|
|
#define AND 57367
|
|
#define BOR 57368
|
|
#define APPEND 57369
|
|
#define EQ 57370
|
|
#define GE 57371
|
|
#define GT 57372
|
|
#define LE 57373
|
|
#define LT 57374
|
|
#define NE 57375
|
|
#define IN 57376
|
|
#define ARG 57377
|
|
#define BLTIN 57378
|
|
#define BREAK 57379
|
|
#define CLOSE 57380
|
|
#define CONTINUE 57381
|
|
#define DELETE 57382
|
|
#define DO 57383
|
|
#define EXIT 57384
|
|
#define FOR 57385
|
|
#define FUNC 57386
|
|
#define SUB 57387
|
|
#define GSUB 57388
|
|
#define IF 57389
|
|
#define INDEX 57390
|
|
#define LSUBSTR 57391
|
|
#define MATCHFCN 57392
|
|
#define NEXT 57393
|
|
#define NEXTFILE 57394
|
|
#define ADD 57395
|
|
#define MINUS 57396
|
|
#define MULT 57397
|
|
#define DIVIDE 57398
|
|
#define MOD 57399
|
|
#define ASSIGN 57400
|
|
#define ASGNOP 57401
|
|
#define ADDEQ 57402
|
|
#define SUBEQ 57403
|
|
#define MULTEQ 57404
|
|
#define DIVEQ 57405
|
|
#define MODEQ 57406
|
|
#define POWEQ 57407
|
|
#define PRINT 57408
|
|
#define PRINTF 57409
|
|
#define SPRINTF 57410
|
|
#define ELSE 57411
|
|
#define INTEST 57412
|
|
#define CONDEXPR 57413
|
|
#define POSTINCR 57414
|
|
#define PREINCR 57415
|
|
#define POSTDECR 57416
|
|
#define PREDECR 57417
|
|
#define VAR 57418
|
|
#define IVAR 57419
|
|
#define VARNF 57420
|
|
#define CALL 57421
|
|
#define NUMBER 57422
|
|
#define STRING 57423
|
|
#define REGEXPR 57424
|
|
#define GETLINE 57425
|
|
#define RETURN 57426
|
|
#define SPLIT 57427
|
|
#define SUBSTR 57428
|
|
#define WHILE 57429
|
|
#define CAT 57430
|
|
#define NOT 57431
|
|
#define UMINUS 57432
|
|
#define POWER 57433
|
|
#define DECR 57434
|
|
#define INCR 57435
|
|
#define INDIRECT 57436
|
|
#define LASTTOKEN 57437
|
|
#define YYEOFCODE 1
|
|
#define YYERRCODE 2
|
|
|
|
#line 444 "awkgram.y"
|
|
|
|
|
|
void setfname(Cell *p)
|
|
{
|
|
if (isarr(p))
|
|
ERROR "%s is an array, not a function", p->nval SYNTAX;
|
|
else if (isfcn(p))
|
|
ERROR "you can't define function %s more than once", p->nval SYNTAX;
|
|
curfname = p->nval;
|
|
}
|
|
|
|
int constnode(Node *p)
|
|
{
|
|
return isvalue(p) && ((Cell *) (p->narg[0]))->csub == CCON;
|
|
}
|
|
|
|
char *strnode(Node *p)
|
|
{
|
|
return ((Cell *)(p->narg[0]))->sval;
|
|
}
|
|
|
|
Node *notnull(Node *n)
|
|
{
|
|
switch (n->nobj) {
|
|
case LE: case LT: case EQ: case NE: case GT: case GE:
|
|
case BOR: case AND: case NOT:
|
|
return n;
|
|
default:
|
|
return op2(NE, n, nullnode);
|
|
}
|
|
}
|
|
|
|
void checkdup(Node *vl, Cell *cp) /* check if name already in list */
|
|
{
|
|
char *s = cp->nval;
|
|
for ( ; vl; vl = vl->nnext) {
|
|
if (strcmp(s, ((Cell *)(vl->narg[0]))->nval) == 0) {
|
|
ERROR "duplicate argument %s", s SYNTAX;
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
short yyexca[] =
|
|
{-1, 0,
|
|
1, 28,
|
|
8, 28,
|
|
9, 28,
|
|
12, 28,
|
|
13, 28,
|
|
16, 28,
|
|
45, 28,
|
|
46, 28,
|
|
54, 28,
|
|
55, 28,
|
|
56, 28,
|
|
58, 28,
|
|
60, 28,
|
|
78, 28,
|
|
86, 28,
|
|
87, 28,
|
|
88, 28,
|
|
89, 28,
|
|
90, 28,
|
|
91, 28,
|
|
95, 28,
|
|
97, 28,
|
|
98, 28,
|
|
101, 28,
|
|
102, 28,
|
|
105, 28,
|
|
108, 28,
|
|
109, 28,
|
|
110, 28,
|
|
-2, 0,
|
|
-1, 1,
|
|
1, -1,
|
|
-2, 0,
|
|
-1, 157,
|
|
15, 30,
|
|
-2, 0,
|
|
-1, 176,
|
|
14, 0,
|
|
24, 0,
|
|
38, 0,
|
|
39, 0,
|
|
40, 0,
|
|
41, 0,
|
|
42, 0,
|
|
43, 0,
|
|
44, 0,
|
|
-2, 63,
|
|
-1, 177,
|
|
14, 0,
|
|
24, 0,
|
|
38, 0,
|
|
39, 0,
|
|
40, 0,
|
|
41, 0,
|
|
42, 0,
|
|
43, 0,
|
|
44, 0,
|
|
-2, 64,
|
|
-1, 178,
|
|
14, 0,
|
|
24, 0,
|
|
38, 0,
|
|
39, 0,
|
|
40, 0,
|
|
41, 0,
|
|
42, 0,
|
|
43, 0,
|
|
44, 0,
|
|
-2, 65,
|
|
-1, 179,
|
|
14, 0,
|
|
24, 0,
|
|
38, 0,
|
|
39, 0,
|
|
40, 0,
|
|
41, 0,
|
|
42, 0,
|
|
43, 0,
|
|
44, 0,
|
|
-2, 66,
|
|
-1, 180,
|
|
14, 0,
|
|
24, 0,
|
|
38, 0,
|
|
39, 0,
|
|
40, 0,
|
|
41, 0,
|
|
42, 0,
|
|
43, 0,
|
|
44, 0,
|
|
-2, 67,
|
|
-1, 181,
|
|
14, 0,
|
|
24, 0,
|
|
38, 0,
|
|
39, 0,
|
|
40, 0,
|
|
41, 0,
|
|
42, 0,
|
|
43, 0,
|
|
44, 0,
|
|
-2, 68,
|
|
-1, 183,
|
|
14, 0,
|
|
24, 0,
|
|
38, 0,
|
|
39, 0,
|
|
40, 0,
|
|
41, 0,
|
|
42, 0,
|
|
43, 0,
|
|
44, 0,
|
|
-2, 70,
|
|
-1, 288,
|
|
24, 0,
|
|
44, 0,
|
|
-2, 53,
|
|
-1, 332,
|
|
17, 30,
|
|
-2, 0,
|
|
-1, 354,
|
|
17, 30,
|
|
-2, 0,
|
|
};
|
|
#define YYNPROD 184
|
|
#define YYPRIVATE 57344
|
|
#define YYLAST 4108
|
|
short yyact[] =
|
|
{
|
|
17, 137, 112, 66, 155, 228, 199, 24, 276, 124,
|
|
185, 105, 42, 53, 253, 110, 100, 138, 243, 103,
|
|
104, 307, 214, 102, 100, 249, 100, 100, 100, 42,
|
|
62, 121, 122, 123, 82, 11, 223, 83, 313, 9,
|
|
42, 50, 253, 79, 80, 110, 10, 252, 232, 42,
|
|
205, 268, 244, 41, 22, 43, 113, 103, 104, 142,
|
|
113, 146, 103, 104, 133, 149, 150, 152, 153, 190,
|
|
41, 233, 43, 163, 234, 100, 148, 23, 315, 277,
|
|
11, 41, 22, 43, 85, 275, 156, 190, 253, 132,
|
|
41, 22, 43, 168, 169, 16, 257, 351, 134, 350,
|
|
100, 182, 109, 111, 349, 23, 112, 100, 100, 100,
|
|
100, 100, 100, 100, 23, 190, 190, 320, 317, 319,
|
|
330, 334, 323, 42, 140, 100, 202, 204, 190, 139,
|
|
107, 108, 109, 111, 277, 210, 112, 211, 86, 190,
|
|
274, 190, 100, 219, 218, 283, 100, 221, 190, 190,
|
|
190, 311, 100, 226, 264, 259, 258, 156, 170, 167,
|
|
158, 230, 190, 100, 41, 216, 43, 157, 188, 130,
|
|
140, 129, 100, 236, 100, 309, 100, 100, 100, 100,
|
|
100, 100, 100, 3, 100, 6, 251, 100, 100, 47,
|
|
7, 6, 154, 128, 48, 127, 7, 126, 125, 120,
|
|
20, 100, 119, 51, 16, 140, 100, 273, 100, 100,
|
|
100, 217, 143, 100, 100, 270, 96, 144, 131, 316,
|
|
4, 346, 360, 363, 114, 1, 116, 117, 118, 49,
|
|
269, 72, 100, 100, 100, 100, 163, 39, 163, 163,
|
|
163, 163, 224, 5, 163, 58, 100, 238, 287, 67,
|
|
222, 291, 61, 60, 292, 100, 100, 293, 248, 81,
|
|
8, 159, 160, 2, 0, 0, 0, 0, 0, 299,
|
|
300, 0, 0, 165, 0, 96, 0, 0, 0, 308,
|
|
0, 0, 100, 0, 0, 100, 100, 100, 0, 100,
|
|
0, 100, 156, 0, 312, 0, 100, 0, 100, 100,
|
|
116, 239, 100, 54, 100, 100, 100, 96, 193, 194,
|
|
195, 196, 197, 198, 332, 163, 0, 0, 0, 333,
|
|
0, 0, 19, 0, 0, 206, 340, 156, 341, 0,
|
|
339, 0, 100, 0, 0, 0, 230, 100, 345, 100,
|
|
0, 0, 96, 100, 100, 0, 96, 337, 115, 354,
|
|
0, 347, 96, 0, 355, 358, 0, 136, 230, 0,
|
|
359, 162, 156, 242, 0, 147, 238, 0, 361, 238,
|
|
238, 238, 96, 238, 96, 238, 96, 96, 96, 96,
|
|
96, 96, 96, 21, 96, 0, 0, 96, 96, 0,
|
|
0, 0, 0, 0, 0, 164, 0, 0, 0, 0,
|
|
0, 96, 0, 0, 0, 0, 260, 0, 96, 96,
|
|
96, 0, 0, 96, 96, 0, 0, 0, 0, 0,
|
|
239, 238, 0, 239, 239, 239, 0, 239, 0, 239,
|
|
0, 0, 96, 278, 279, 280, 165, 136, 165, 165,
|
|
165, 165, 0, 0, 165, 0, 96, 0, 220, 0,
|
|
0, 0, 136, 0, 0, 96, 96, 166, 227, 0,
|
|
0, 256, 74, 0, 0, 0, 0, 15, 0, 0,
|
|
0, 0, 136, 136, 0, 239, 0, 0, 184, 0,
|
|
0, 106, 242, 0, 0, 242, 242, 242, 0, 242,
|
|
0, 242, 0, 0, 0, 0, 96, 0, 96, 96,
|
|
0, 0, 96, 0, 96, 96, 96, 0, 0, 0,
|
|
0, 0, 15, 0, 15, 165, 0, 0, 0, 141,
|
|
0, 0, 145, 0, 0, 0, 272, 0, 151, 0,
|
|
0, 0, 96, 0, 0, 0, 0, 242, 0, 96,
|
|
0, 229, 0, 96, 96, 0, 0, 171, 173, 175,
|
|
176, 177, 178, 179, 180, 181, 183, 0, 164, 0,
|
|
164, 164, 164, 164, 186, 187, 164, 189, 191, 0,
|
|
0, 0, 0, 136, 0, 0, 200, 0, 0, 0,
|
|
0, 0, 200, 200, 0, 0, 0, 0, 207, 208,
|
|
209, 200, 212, 213, 0, 0, 0, 281, 0, 284,
|
|
285, 286, 288, 0, 0, 290, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 231, 235, 0, 106, 289, 0, 0, 0, 0,
|
|
245, 0, 0, 0, 0, 0, 296, 164, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 302, 0, 0,
|
|
356, 136, 254, 0, 255, 140, 0, 0, 18, 310,
|
|
139, 44, 0, 0, 362, 0, 0, 364, 0, 261,
|
|
262, 263, 0, 265, 266, 267, 336, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
42, 28, 0, 0, 0, 0, 0, 335, 189, 0,
|
|
45, 46, 0, 33, 0, 34, 0, 200, 0, 0,
|
|
294, 0, 0, 295, 0, 0, 0, 0, 0, 297,
|
|
0, 0, 0, 37, 298, 301, 0, 0, 303, 304,
|
|
305, 41, 22, 43, 29, 35, 38, 0, 0, 0,
|
|
32, 0, 36, 40, 0, 106, 27, 26, 0, 0,
|
|
25, 0, 0, 30, 31, 23, 0, 0, 0, 75,
|
|
0, 0, 0, 0, 322, 325, 327, 328, 0, 16,
|
|
18, 331, 68, 44, 189, 357, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 338, 0, 0, 0, 0,
|
|
0, 342, 0, 343, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 42, 28, 55, 56, 57, 73, 69, 59,
|
|
70, 0, 45, 46, 71, 33, 0, 34, 63, 64,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 75, 0,
|
|
0, 0, 0, 77, 78, 37, 52, 0, 16, 18,
|
|
0, 68, 44, 41, 22, 43, 29, 35, 38, 0,
|
|
0, 0, 32, 65, 36, 40, 76, 0, 27, 26,
|
|
0, 0, 25, 0, 0, 30, 31, 23, 0, 0,
|
|
0, 42, 28, 55, 56, 57, 73, 69, 59, 70,
|
|
0, 45, 46, 71, 33, 0, 34, 63, 64, 0,
|
|
0, 0, 0, 0, 0, 75, 0, 0, 0, 0,
|
|
0, 0, 77, 78, 37, 16, 18, 0, 68, 44,
|
|
0, 306, 41, 22, 43, 29, 35, 38, 0, 0,
|
|
0, 32, 65, 36, 40, 76, 0, 27, 26, 0,
|
|
0, 25, 0, 0, 30, 31, 23, 0, 42, 28,
|
|
55, 56, 57, 73, 69, 59, 70, 0, 45, 46,
|
|
71, 33, 0, 34, 63, 64, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 75, 0, 0, 0, 0, 77,
|
|
78, 37, 271, 0, 16, 18, 0, 68, 44, 41,
|
|
22, 43, 29, 35, 38, 0, 0, 0, 32, 65,
|
|
36, 40, 76, 0, 27, 26, 0, 0, 25, 0,
|
|
0, 30, 31, 23, 0, 0, 0, 42, 28, 55,
|
|
56, 57, 73, 69, 59, 70, 0, 45, 46, 71,
|
|
33, 0, 34, 63, 64, 0, 0, 0, 0, 0,
|
|
0, 75, 0, 0, 0, 0, 0, 0, 77, 78,
|
|
37, 16, 18, 0, 68, 44, 0, 247, 41, 22,
|
|
43, 29, 35, 38, 0, 0, 0, 32, 65, 36,
|
|
40, 76, 0, 27, 26, 0, 0, 25, 0, 0,
|
|
30, 31, 23, 0, 42, 28, 55, 56, 57, 73,
|
|
69, 59, 70, 0, 45, 46, 71, 33, 0, 34,
|
|
63, 64, 0, 0, 0, 0, 0, 0, 75, 0,
|
|
0, 0, 0, 0, 0, 77, 78, 37, 16, 18,
|
|
0, 68, 44, 0, 246, 41, 22, 43, 29, 35,
|
|
38, 0, 0, 0, 32, 65, 36, 40, 76, 0,
|
|
27, 26, 0, 0, 25, 0, 0, 30, 31, 23,
|
|
0, 42, 28, 55, 56, 57, 73, 69, 59, 70,
|
|
0, 45, 46, 71, 33, 0, 34, 63, 64, 0,
|
|
0, 0, 0, 0, 0, 75, 0, 0, 0, 0,
|
|
0, 0, 77, 78, 37, 16, 18, 0, 68, 44,
|
|
0, 225, 41, 22, 43, 29, 35, 38, 0, 0,
|
|
0, 32, 65, 36, 40, 76, 0, 27, 26, 0,
|
|
0, 25, 0, 0, 30, 31, 23, 0, 42, 28,
|
|
55, 56, 57, 73, 69, 59, 70, 0, 45, 46,
|
|
71, 33, 0, 34, 63, 64, 0, 0, 0, 0,
|
|
0, 0, 75, 0, 0, 0, 0, 0, 0, 77,
|
|
78, 37, 16, 18, 0, 68, 44, 0, 215, 41,
|
|
22, 43, 29, 35, 38, 0, 0, 0, 32, 65,
|
|
36, 40, 76, 0, 27, 26, 0, 0, 25, 0,
|
|
0, 30, 31, 23, 0, 42, 28, 55, 56, 57,
|
|
73, 69, 59, 70, 0, 45, 46, 71, 33, 0,
|
|
34, 63, 64, 0, 0, 0, 0, 0, 0, 75,
|
|
0, 0, 0, 0, 0, 0, 77, 78, 37, 16,
|
|
18, 0, 68, 44, 0, 135, 41, 22, 43, 29,
|
|
35, 38, 0, 0, 0, 32, 65, 36, 40, 76,
|
|
0, 27, 26, 0, 0, 25, 0, 0, 30, 31,
|
|
23, 0, 42, 28, 55, 56, 57, 73, 69, 59,
|
|
70, 0, 45, 46, 71, 33, 0, 34, 63, 64,
|
|
0, 0, 0, 0, 0, 0, 75, 0, 0, 0,
|
|
0, 0, 0, 77, 78, 37, 16, 18, 0, 68,
|
|
44, 0, 0, 41, 22, 43, 29, 35, 38, 0,
|
|
0, 0, 32, 65, 36, 40, 76, 0, 27, 26,
|
|
0, 0, 25, 0, 0, 30, 31, 23, 0, 42,
|
|
28, 55, 56, 57, 73, 69, 59, 70, 0, 45,
|
|
46, 71, 33, 0, 34, 63, 64, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
77, 78, 37, 0, 0, 0, 0, 0, 0, 0,
|
|
41, 22, 43, 29, 35, 38, 0, 0, 0, 32,
|
|
65, 36, 40, 76, 0, 27, 26, 0, 0, 25,
|
|
0, 0, 30, 31, 23, 190, 0, 101, 95, 0,
|
|
0, 329, 0, 0, 0, 0, 0, 0, 93, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 98,
|
|
97, 0, 87, 88, 89, 90, 91, 92, 94, 42,
|
|
28, 0, 0, 0, 0, 0, 0, 0, 0, 45,
|
|
46, 0, 33, 0, 34, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 37, 0, 0, 0, 0, 0, 0, 0,
|
|
41, 22, 43, 29, 35, 38, 0, 84, 0, 32,
|
|
0, 36, 40, 0, 0, 27, 26, 0, 0, 99,
|
|
0, 0, 30, 31, 23, 190, 0, 101, 95, 0,
|
|
0, 326, 0, 0, 0, 0, 0, 0, 93, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 98,
|
|
97, 0, 87, 88, 89, 90, 91, 92, 94, 42,
|
|
28, 0, 0, 0, 0, 0, 0, 0, 0, 45,
|
|
46, 0, 33, 0, 34, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 37, 0, 0, 0, 0, 0, 0, 0,
|
|
41, 22, 43, 29, 35, 38, 0, 84, 0, 32,
|
|
0, 36, 40, 0, 0, 27, 26, 0, 0, 99,
|
|
0, 0, 30, 31, 23, 190, 0, 101, 95, 0,
|
|
0, 324, 0, 0, 0, 0, 0, 0, 93, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 98,
|
|
97, 0, 87, 88, 89, 90, 91, 92, 94, 42,
|
|
28, 0, 0, 0, 0, 0, 0, 0, 0, 45,
|
|
46, 0, 33, 0, 34, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 37, 0, 0, 0, 0, 0, 0, 0,
|
|
41, 22, 43, 29, 35, 38, 0, 84, 0, 32,
|
|
0, 36, 40, 0, 0, 27, 26, 0, 0, 99,
|
|
0, 0, 30, 31, 23, 140, 0, 0, 101, 95,
|
|
139, 0, 0, 0, 0, 0, 0, 0, 0, 93,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
98, 97, 0, 87, 88, 89, 90, 91, 92, 94,
|
|
42, 28, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
45, 46, 0, 33, 0, 34, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 37, 0, 0, 0, 0, 0, 0,
|
|
0, 41, 22, 43, 29, 35, 38, 0, 84, 0,
|
|
32, 0, 36, 40, 0, 0, 27, 26, 0, 0,
|
|
99, 0, 0, 30, 31, 23, 190, 0, 101, 95,
|
|
0, 0, 192, 0, 0, 0, 0, 0, 0, 93,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
98, 97, 0, 87, 88, 89, 90, 91, 92, 94,
|
|
42, 28, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
45, 46, 0, 33, 0, 34, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 37, 0, 0, 0, 0, 0, 0,
|
|
0, 41, 22, 43, 29, 35, 38, 0, 84, 0,
|
|
32, 0, 36, 40, 0, 0, 27, 26, 101, 95,
|
|
99, 0, 353, 30, 31, 23, 0, 0, 0, 93,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
98, 97, 0, 87, 88, 89, 90, 91, 92, 94,
|
|
42, 28, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
45, 46, 0, 33, 0, 34, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 37, 0, 0, 0, 0, 0, 0,
|
|
0, 41, 22, 43, 29, 35, 38, 0, 84, 0,
|
|
32, 0, 36, 40, 0, 0, 27, 26, 101, 95,
|
|
99, 0, 352, 30, 31, 23, 0, 0, 0, 93,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
98, 97, 0, 87, 88, 89, 90, 91, 92, 94,
|
|
42, 28, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
45, 46, 0, 33, 0, 34, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 37, 0, 0, 0, 0, 0, 0,
|
|
0, 41, 22, 43, 29, 35, 38, 0, 84, 0,
|
|
32, 0, 36, 40, 0, 0, 27, 26, 101, 95,
|
|
99, 0, 348, 30, 31, 23, 0, 0, 0, 93,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
98, 97, 0, 87, 88, 89, 90, 91, 92, 94,
|
|
42, 28, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
45, 46, 0, 33, 0, 34, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 37, 0, 0, 0, 0, 0, 0,
|
|
0, 41, 22, 43, 29, 35, 38, 0, 84, 0,
|
|
32, 0, 36, 40, 0, 0, 27, 26, 0, 0,
|
|
99, 0, 0, 30, 31, 23, 101, 95, 344, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 93, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 98, 97,
|
|
0, 87, 88, 89, 90, 91, 92, 94, 42, 28,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 45, 46,
|
|
0, 33, 0, 34, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 37, 0, 0, 0, 0, 0, 0, 0, 41,
|
|
22, 43, 29, 35, 38, 0, 84, 0, 32, 0,
|
|
36, 40, 0, 0, 27, 26, 101, 95, 99, 0,
|
|
321, 30, 31, 23, 0, 0, 0, 93, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 98, 97,
|
|
0, 87, 88, 89, 90, 91, 92, 94, 42, 28,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 45, 46,
|
|
0, 33, 0, 34, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 37, 0, 0, 0, 0, 0, 0, 0, 41,
|
|
22, 43, 29, 35, 38, 0, 84, 0, 32, 0,
|
|
36, 40, 0, 0, 27, 26, 101, 95, 99, 0,
|
|
318, 30, 31, 23, 0, 0, 0, 93, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 98, 97,
|
|
0, 87, 88, 89, 90, 91, 92, 94, 42, 28,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 45, 46,
|
|
0, 33, 0, 34, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 37, 0, 0, 0, 0, 0, 0, 0, 41,
|
|
22, 43, 29, 35, 38, 0, 84, 0, 32, 0,
|
|
36, 40, 0, 0, 27, 26, 101, 95, 99, 0,
|
|
277, 30, 31, 23, 0, 0, 0, 93, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 98, 97,
|
|
0, 87, 88, 89, 90, 91, 92, 94, 42, 28,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 45, 46,
|
|
0, 33, 0, 34, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 37, 0, 0, 0, 0, 0, 0, 0, 41,
|
|
22, 43, 29, 35, 38, 0, 84, 0, 32, 0,
|
|
36, 40, 0, 0, 27, 26, 0, 190, 99, 101,
|
|
95, 30, 31, 23, 0, 0, 0, 0, 0, 0,
|
|
93, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 98, 97, 0, 87, 88, 89, 90, 91, 92,
|
|
94, 42, 28, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 45, 46, 0, 33, 0, 34, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 37, 0, 0, 0, 0, 0,
|
|
0, 0, 41, 22, 43, 29, 35, 38, 0, 84,
|
|
0, 32, 0, 36, 40, 0, 0, 27, 26, 101,
|
|
95, 99, 0, 192, 30, 31, 23, 0, 0, 0,
|
|
93, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 98, 97, 0, 87, 88, 89, 90, 91, 92,
|
|
94, 42, 28, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 45, 46, 0, 33, 0, 34, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 37, 0, 0, 0, 0, 0,
|
|
0, 0, 41, 22, 43, 29, 35, 38, 0, 84,
|
|
0, 32, 0, 36, 40, 0, 0, 27, 26, 101,
|
|
95, 99, 0, 0, 30, 31, 23, 0, 0, 0,
|
|
93, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 98, 97, 0, 87, 88, 89, 90, 91, 92,
|
|
94, 42, 28, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 45, 46, 0, 33, 0, 34, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 37, 0, 0, 0, 0, 0,
|
|
0, 0, 41, 22, 43, 29, 35, 38, 0, 84,
|
|
250, 32, 0, 36, 40, 0, 0, 27, 26, 101,
|
|
95, 99, 0, 0, 30, 31, 23, 0, 0, 0,
|
|
93, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 98, 97, 0, 87, 88, 89, 90, 91, 92,
|
|
94, 42, 28, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 45, 46, 0, 33, 0, 34, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 37, 0, 0, 0, 0, 0,
|
|
0, 0, 41, 22, 43, 29, 35, 38, 0, 84,
|
|
0, 32, 0, 36, 40, 0, 0, 27, 26, 101,
|
|
95, 99, 0, 0, 30, 31, 23, 0, 0, 0,
|
|
93, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 98, 0, 0, 87, 88, 89, 90, 91, 92,
|
|
94, 42, 28, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 45, 46, 0, 33, 0, 34, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 37, 0, 0, 0, 0, 0,
|
|
0, 0, 41, 22, 43, 29, 35, 38, 101, 95,
|
|
0, 32, 0, 36, 40, 0, 0, 27, 26, 93,
|
|
0, 99, 0, 0, 30, 31, 23, 0, 0, 0,
|
|
0, 0, 0, 87, 88, 89, 90, 91, 92, 94,
|
|
42, 28, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
45, 46, 0, 33, 0, 34, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 37, 0, 0, 101, 0, 0, 0,
|
|
0, 41, 22, 43, 29, 35, 38, 240, 0, 0,
|
|
32, 0, 36, 40, 0, 0, 27, 26, 98, 97,
|
|
99, 0, 0, 30, 31, 23, 0, 241, 42, 28,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 45, 46,
|
|
0, 33, 0, 34, 0, 0, 75, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 18, 0, 0,
|
|
44, 37, 0, 0, 0, 0, 0, 0, 0, 41,
|
|
22, 43, 29, 35, 38, 0, 237, 314, 32, 0,
|
|
36, 40, 0, 0, 27, 26, 0, 0, 99, 42,
|
|
28, 30, 31, 23, 73, 0, 0, 0, 0, 45,
|
|
46, 0, 33, 0, 34, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
77, 78, 37, 0, 0, 101, 0, 0, 0, 0,
|
|
41, 22, 43, 29, 35, 38, 240, 0, 0, 32,
|
|
0, 36, 40, 0, 0, 27, 26, 98, 97, 25,
|
|
0, 0, 30, 31, 23, 0, 241, 42, 28, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 45, 46, 0,
|
|
33, 0, 34, 0, 0, 0, 0, 0, 12, 13,
|
|
0, 0, 16, 18, 0, 0, 44, 0, 0, 0,
|
|
37, 0, 0, 0, 0, 0, 0, 0, 41, 22,
|
|
43, 29, 35, 38, 0, 237, 0, 32, 0, 36,
|
|
40, 0, 0, 27, 26, 42, 28, 99, 0, 0,
|
|
30, 31, 23, 0, 14, 45, 46, 0, 33, 0,
|
|
34, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 37, 0,
|
|
0, 101, 0, 0, 0, 0, 41, 22, 43, 29,
|
|
35, 38, 240, 0, 0, 32, 0, 36, 40, 0,
|
|
0, 27, 26, 98, 0, 25, 0, 0, 30, 31,
|
|
23, 0, 241, 42, 28, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 45, 46, 0, 33, 0, 34, 0,
|
|
0, 0, 0, 0, 0, 0, 253, 0, 0, 18,
|
|
0, 0, 44, 0, 0, 0, 37, 0, 0, 0,
|
|
0, 0, 0, 0, 41, 22, 43, 29, 35, 38,
|
|
0, 0, 0, 32, 101, 36, 40, 0, 0, 27,
|
|
26, 42, 28, 99, 0, 240, 30, 31, 23, 0,
|
|
0, 45, 46, 0, 33, 0, 34, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 241, 42, 28, 0, 0,
|
|
0, 0, 0, 0, 37, 0, 45, 46, 0, 33,
|
|
0, 34, 41, 22, 43, 29, 35, 38, 0, 174,
|
|
0, 32, 282, 36, 40, 44, 0, 27, 26, 37,
|
|
0, 25, 0, 0, 30, 31, 23, 41, 22, 43,
|
|
29, 35, 38, 0, 172, 0, 32, 282, 36, 40,
|
|
44, 0, 27, 26, 42, 28, 99, 0, 0, 30,
|
|
31, 23, 0, 0, 45, 46, 0, 33, 0, 34,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 42,
|
|
28, 0, 0, 0, 0, 0, 0, 37, 0, 45,
|
|
46, 0, 33, 0, 34, 41, 22, 43, 29, 35,
|
|
38, 0, 253, 0, 32, 282, 36, 40, 44, 0,
|
|
27, 26, 37, 0, 25, 0, 0, 30, 31, 23,
|
|
41, 22, 43, 29, 35, 38, 0, 0, 0, 32,
|
|
18, 36, 40, 44, 203, 27, 26, 42, 28, 25,
|
|
0, 0, 30, 31, 23, 0, 0, 45, 46, 0,
|
|
33, 0, 34, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 42, 28, 0, 0, 0, 0, 0, 0,
|
|
37, 0, 45, 46, 0, 33, 0, 34, 41, 22,
|
|
43, 29, 35, 38, 0, 0, 0, 32, 18, 36,
|
|
40, 44, 201, 27, 26, 37, 0, 25, 0, 0,
|
|
30, 31, 23, 41, 22, 43, 29, 35, 38, 0,
|
|
174, 0, 32, 18, 36, 40, 44, 0, 27, 26,
|
|
42, 28, 25, 0, 0, 30, 31, 23, 0, 0,
|
|
45, 46, 0, 33, 0, 34, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 42, 28, 0, 0, 0,
|
|
0, 0, 0, 37, 0, 45, 46, 0, 33, 0,
|
|
34, 41, 22, 43, 29, 35, 38, 0, 172, 0,
|
|
32, 18, 36, 40, 44, 0, 27, 26, 37, 0,
|
|
25, 0, 0, 30, 31, 23, 41, 22, 43, 29,
|
|
35, 38, 0, 0, 0, 32, 18, 36, 40, 44,
|
|
0, 27, 26, 42, 28, 25, 0, 0, 30, 31,
|
|
23, 0, 0, 45, 46, 0, 33, 0, 34, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 42, 28,
|
|
0, 0, 0, 0, 0, 0, 37, 0, 45, 46,
|
|
0, 33, 0, 34, 41, 22, 43, 29, 35, 38,
|
|
0, 0, 0, 32, 282, 36, 40, 44, 0, 27,
|
|
26, 37, 0, 25, 0, 0, 30, 31, 23, 41,
|
|
22, 43, 29, 35, 38, 0, 0, 0, 32, 161,
|
|
36, 40, 44, 0, 27, 26, 42, 28, 25, 0,
|
|
0, 30, 31, 23, 0, 0, 45, 46, 0, 33,
|
|
0, 34, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 42, 28, 0, 0, 0, 0, 0, 0, 37,
|
|
0, 45, 46, 0, 33, 0, 34, 41, 22, 43,
|
|
29, 35, 38, 0, 0, 0, 32, 101, 36, 40,
|
|
44, 0, 27, 26, 37, 0, 25, 0, 0, 30,
|
|
31, 23, 41, 22, 43, 29, 35, 38, 0, 0,
|
|
0, 32, 101, 36, 40, 0, 0, 27, 26, 42,
|
|
28, 25, 0, 0, 30, 31, 23, 0, 0, 45,
|
|
46, 0, 33, 0, 34, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 42, 28, 0, 0, 0, 0,
|
|
0, 0, 37, 0, 45, 46, 0, 33, 0, 34,
|
|
41, 22, 43, 29, 35, 38, 0, 0, 0, 32,
|
|
101, 36, 40, 0, 0, 27, 26, 37, 0, 25,
|
|
0, 0, 30, 31, 23, 41, 22, 43, 29, 35,
|
|
38, 0, 0, 0, 32, 0, 36, 40, 0, 0,
|
|
27, 26, 42, 28, 99, 0, 0, 30, 31, 23,
|
|
0, 0, 45, 46, 0, 33, 0, 34, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 37, 0, 0, 0, 0,
|
|
0, 0, 0, 41, 22, 43, 29, 35, 38, 0,
|
|
0, 0, 0, 0, 36, 40, 0, 0, 27, 26,
|
|
0, 0, 99, 0, 0, 30, 31, 23
|
|
};
|
|
short yypact[] =
|
|
{
|
|
181,-1000,-1000,-1000,3290, 179,-1000,-1000, 175,-1000,
|
|
192, 826, 83, 83, -52,2866,-1000, -46,3773,-1000,
|
|
29, 37,-1000,3939,-1000,3914,3939,3939, 189, 186,
|
|
-5, -5, -33, 185, 184,-1000, 182, 180,-1000, 158,
|
|
156,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,3290,
|
|
826,3773,-1000,1297,-1000, 114,3773, 114, 202, 645,
|
|
-1000,1364, 826, 114, 114, 645, 114,-1000, 195,-1000,
|
|
154, 147,3856, -16,2866,-1000, 146,-1000,-1000, 826,
|
|
826, 145,-1000,-1000,3773,3748,3690,3773,3773,3773,
|
|
3773,3773,3773,3773, -16, -85, 29,-1000,-1000,3939,
|
|
-89,3773,3773,-1000,-1000, 151,1865,3939,3939,3939,
|
|
3939,3939,3939,3773,-1000,-1000,-105,-105,-105,3665,
|
|
3607,-1000,-1000, 8,3939,3773,3773,3773,3773,3773,
|
|
3773, -70,-1000,1230, 83,-1000,-1000,-1000, 201, 195,
|
|
-1000,1765,-1000,-1000,1364,1765,-1000, -43,1163,-1000,
|
|
-1000,1765,-1000,-1000,1364,-1000, 201,3164,3773, 34,
|
|
130,3773,3232, -51,-1000, 29, 33,3773,1096,1029,
|
|
-61,2776,-1000,2956,-1000,3035,3997,3997,3997,3997,
|
|
3997,3997,-1000,3997,-1000, -5,2686,2866, 3,3416,
|
|
-1000,3416,-1000, -1, -1,-105,-105,-105,-105, 76,
|
|
2866,-1000, 139,-1000, 138,3939, 29,2596,2596,2596,
|
|
137, 130,2596,2596, 35,-1000, 826,-1000,-1000,-1000,
|
|
-1000,-1000, 962,-1000, 197,-1000,-1000,-1000, 125, 41,
|
|
-1000,2503,3939,3939,3939,3582, 128,3831,3524,3499,
|
|
3831, -16, 29,3831,3773,2503,-1000,-1000, 117,-1000,
|
|
3773,-1000, -16,-1000,2866,2866,3416,-1000,-1000,-1000,
|
|
29,3416,3416, 78,-1000,3416,3416,3416,-1000, 893,
|
|
-78,-1000,-1000,-1000, 160, -16, 141,-1000, 29, 29,
|
|
29,3232,3773, -6,3103,3358,3441,-1000,3997,-1000,
|
|
3232, 58, 141, 141, 32,2866,-1000,2866,2413, 102,
|
|
100,2323, 105,1664,1564,1464,-1000, 107,3773, 195,
|
|
62,-1000, 104, -16,3831,-1000, 83,-1000,-1000,-1000,
|
|
-1000,-1000,3416,-1000,-1000, 4,-1000, 4,3416,-1000,
|
|
3773,2233,3164, 141, -6,-1000,3232, 826,2135, 87,
|
|
82, 80,2045,1955, 195, 62,1364, 757,-1000,-1000,
|
|
-1000,-1000,-1000, 114,3164, 141,-1000,-1000,-1000, 62,
|
|
1364, 141,-1000,1364,-1000
|
|
};
|
|
short yypgo[] =
|
|
{
|
|
0, 263, 462, 361, 11, 262, 6, 261, 200, 322,
|
|
46, 39, 260, 7, 3, 5, 303, 13, 0, 383,
|
|
259, 258, 253, 252, 250, 249, 245, 1, 243, 220,
|
|
30, 242, 8, 461, 17, 4, 138, 84, 237, 231,
|
|
225, 223, 222, 221, 219, 218, 217, 215, 192
|
|
};
|
|
short yyr1[] =
|
|
{
|
|
0, 40, 40, 36, 36, 37, 37, 33, 33, 26,
|
|
26, 24, 24, 41, 22, 42, 22, 43, 22, 20,
|
|
20, 23, 30, 30, 34, 34, 35, 35, 29, 29,
|
|
15, 15, 1, 1, 10, 11, 11, 11, 11, 11,
|
|
11, 11, 44, 11, 12, 12, 6, 6, 3, 3,
|
|
3, 3, 3, 3, 3, 3, 3, 3, 3, 2,
|
|
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
|
|
2, 2, 2, 2, 2, 2, 2, 2, 4, 4,
|
|
5, 5, 7, 7, 7, 39, 39, 28, 28, 28,
|
|
28, 31, 31, 9, 9, 45, 13, 32, 32, 14,
|
|
14, 14, 14, 14, 14, 14, 14, 27, 27, 16,
|
|
16, 16, 46, 47, 16, 16, 16, 16, 16, 16,
|
|
16, 16, 16, 16, 16, 16, 48, 16, 16, 17,
|
|
17, 38, 38, 8, 8, 8, 8, 8, 8, 8,
|
|
8, 8, 8, 8, 8, 8, 8, 8, 8, 8,
|
|
8, 8, 8, 8, 8, 8, 8, 8, 8, 8,
|
|
8, 8, 8, 8, 8, 8, 8, 8, 8, 8,
|
|
8, 8, 8, 18, 18, 18, 18, 21, 21, 21,
|
|
19, 19, 19, 25
|
|
};
|
|
short yyr2[] =
|
|
{
|
|
0, 1, 1, 1, 2, 1, 2, 1, 2, 1,
|
|
2, 1, 2, 0, 12, 0, 10, 0, 8, 1,
|
|
1, 4, 1, 2, 1, 2, 0, 1, 0, 1,
|
|
0, 1, 1, 3, 1, 1, 4, 3, 6, 3,
|
|
4, 4, 0, 9, 1, 3, 1, 3, 3, 5,
|
|
3, 3, 3, 3, 3, 5, 2, 1, 1, 3,
|
|
5, 3, 3, 3, 3, 3, 3, 3, 3, 3,
|
|
3, 3, 5, 4, 3, 2, 1, 1, 3, 3,
|
|
1, 3, 0, 1, 3, 1, 1, 1, 1, 2,
|
|
2, 1, 2, 1, 2, 0, 4, 1, 2, 4,
|
|
4, 4, 2, 5, 2, 1, 1, 1, 2, 2,
|
|
3, 2, 0, 0, 9, 3, 2, 1, 4, 2,
|
|
3, 2, 2, 3, 2, 2, 0, 3, 2, 1,
|
|
2, 1, 1, 3, 3, 3, 3, 3, 3, 2,
|
|
2, 2, 3, 4, 1, 3, 4, 2, 2, 2,
|
|
2, 4, 3, 2, 1, 6, 6, 3, 6, 6,
|
|
1, 8, 8, 6, 4, 1, 6, 6, 8, 8,
|
|
8, 6, 1, 1, 4, 1, 2, 0, 1, 3,
|
|
1, 1, 1, 4
|
|
};
|
|
short yychk[] =
|
|
{
|
|
-1000, -40, -1, 2, -29, -28, 10, 15, -12, -11,
|
|
-10, -30, 8, 9, 54, -2, 12, -18, 13, -9,
|
|
-8, -19, 87, 110, -13, 105, 102, 101, 46, 89,
|
|
108, 109, 95, 58, 60, 90, 97, 78, 91, -38,
|
|
98, 86, 45, 88, 16, 55, 56, 10, 15, -29,
|
|
-30, 11, 10, -17, -16, 47, 48, 49, -26, 52,
|
|
-22, -23, -30, 61, 62, 96, -14, -25, 15, 51,
|
|
53, 57, -39, 50, -2, 2, 99, 76, 77, -30,
|
|
-30, -20, 86, 89, 93, -37, -36, 38, 39, 40,
|
|
41, 42, 43, 24, 44, 14, -8, 36, 35, 105,
|
|
-18, 13, 69, 108, 109, -4, -2, 101, 102, 103,
|
|
16, 104, 107, 19, -8, -9, -8, -8, -8, 13,
|
|
13, -18, -18, -18, 42, 13, 13, 13, 13, 13,
|
|
13, -45, -11, -17, -10, 18, -16, -27, -34, 15,
|
|
10, -2, -27, 10, -46, -2, -27, -16, -17, -27,
|
|
-27, -2, -27, -27, -48, -35, -34, 13, 13, -7,
|
|
-5, 13, -3, -18, -9, -8, -19, 13, -17, -17,
|
|
13, -2, 10, -2, 10, -2, -2, -2, -2, -2,
|
|
-2, -2, -13, -2, -19, 95, -2, -2, 17, -33,
|
|
11, -33, 17, -8, -8, -8, -8, -8, -8, -6,
|
|
-2, 17, -6, 17, -6, 42, -8, -2, -2, -2,
|
|
-6, -13, -2, -2, 92, 18, -30, 10, -35, -27,
|
|
-16, -27, -24, 79, -31, 18, -27, -16, -15, -19,
|
|
-14, -2, 14, 37, 40, -33, -4, 93, -37, -36,
|
|
24, 44, -8, 69, 19, -2, 18, 18, -21, 86,
|
|
94, -18, 44, 10, -2, -2, -33, 20, 17, 17,
|
|
-8, -33, -33, -33, 17, -33, -33, -33, 16, -17,
|
|
-47, 10, -16, 10, 15, 44, -32, 17, -8, -8,
|
|
-8, -3, 13, 17, -3, -3, -3, -13, -3, -19,
|
|
-3, -6, -32, -32, -33, -2, -19, -2, -2, -13,
|
|
-13, -2, -19, -2, -2, -2, 18, 99, -35, 15,
|
|
-19, 10, -4, 44, 94, 20, -44, 86, 17, 17,
|
|
17, 17, -33, 17, 17, -33, 17, -33, -33, 17,
|
|
13, -2, -35, -32, 17, -19, -3, -30, -2, -13,
|
|
-18, -18, -2, -2, 15, -15, -43, -17, 17, 17,
|
|
17, 17, 17, 17, -35, -32, -16, 18, -27, -15,
|
|
-42, -32, -16, -41, -16
|
|
};
|
|
short yydef[] =
|
|
{
|
|
-2, -2, 1, 2, 32, 29, 87, 88, 28, 44,
|
|
35, 0, 0, 0, 0, 34, 22, 172, 0, 76,
|
|
77, 173, 175, 0, 93, 0, 0, 0, 144, 0,
|
|
0, 0, 154, 0, 0, 160, 0, 0, 165, 0,
|
|
0, 180, 181, 182, 95, 131, 132, 89, 90, 33,
|
|
0, 0, 23, 0, 129, 0, 0, 0, 112, 0,
|
|
117, 0, 0, 0, 0, 0, 0, 126, 26, 9,
|
|
0, 0, 82, 0, 105, 106, 0, 85, 86, 0,
|
|
0, 0, 19, 20, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 75, 5, 3, 0,
|
|
172, 0, 0, 149, 150, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 176, 94, 141, 139, 140, 0,
|
|
0, 147, 148, 153, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 45, 0, 37, 39, 130, 109, 107, 26,
|
|
24, 0, 111, 10, 0, 0, 116, 119, 0, 121,
|
|
122, 0, 124, 125, 0, 128, 27, -2, 0, 102,
|
|
83, 0, 80, 172, 57, 58, 104, 0, 0, 0,
|
|
177, 0, 6, 61, 4, 62, -2, -2, -2, -2,
|
|
-2, -2, 69, -2, 71, 74, 0, 59, 0, 0,
|
|
7, 0, 157, 133, 134, 135, 136, 137, 138, 0,
|
|
46, 142, 0, 145, 0, 0, 152, 0, 0, 0,
|
|
0, 93, 0, 0, 0, 36, 0, 25, 108, 110,
|
|
113, 115, 0, 11, 120, 91, 123, 127, 0, 173,
|
|
31, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 56, 0, 0, 0, 40, 41, 0, 178,
|
|
0, 73, 0, 8, 79, 78, 0, 174, 143, 146,
|
|
151, 0, 0, 0, 164, 0, 0, 0, 96, 0,
|
|
0, 12, 118, 92, 26, 0, 21, 97, 99, 100,
|
|
101, 81, 0, 84, 0, 50, 51, 52, -2, 54,
|
|
48, 0, 183, 42, 0, 60, 72, 47, 0, 93,
|
|
93, 0, 0, 0, 0, 0, 38, 0, 0, 26,
|
|
0, 98, 0, 0, 0, 103, 0, 179, 155, 156,
|
|
158, 159, 0, 163, 166, 0, 167, 0, 0, 171,
|
|
0, 0, -2, 17, 0, 55, 49, 0, 0, 93,
|
|
0, 0, 0, 0, 26, 0, 0, 0, 161, 162,
|
|
168, 169, 170, 0, -2, 15, 18, 43, 114, 0,
|
|
0, 13, 16, 0, 14
|
|
};
|
|
short yytok1[] =
|
|
{
|
|
1, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 104, 0, 0,
|
|
13, 17, 103, 101, 11, 102, 0, 16, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 94, 15,
|
|
0, 0, 0, 93, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 19, 0, 20, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 12, 14, 18
|
|
};
|
|
short yytok2[] =
|
|
{
|
|
2, 3, 4, 5, 6, 7, 8, 9, 10, 21,
|
|
22, 23, 24, 25, 26, 27, 28, 29, 30, 31,
|
|
32, 33, 34, 35, 36, 37, 38, 39, 40, 41,
|
|
42, 43, 44, 45, 46, 47, 48, 49, 50, 51,
|
|
52, 53, 54, 55, 56, 57, 58, 59, 60, 61,
|
|
62, 63, 64, 65, 66, 67, 68, 69, 70, 71,
|
|
72, 73, 74, 75, 76, 77, 78, 79, 80, 81,
|
|
82, 83, 84, 85, 86, 87, 88, 89, 90, 91,
|
|
92, 95, 96, 97, 98, 99, 100, 105, 106, 107,
|
|
108, 109, 110, 111
|
|
};
|
|
long yytok3[] =
|
|
{
|
|
0
|
|
};
|
|
#define YYFLAG -1000
|
|
#define YYERROR goto yyerrlab
|
|
#define YYACCEPT return(0)
|
|
#define YYABORT return(1)
|
|
#define yyclearin yychar = -1
|
|
#define yyerrok yyerrflag = 0
|
|
|
|
#ifdef yydebug
|
|
#include "y.debug"
|
|
#else
|
|
#define yydebug 0
|
|
char* yytoknames[1]; /* for debugging */
|
|
char* yystates[1]; /* for debugging */
|
|
#endif
|
|
|
|
/* parser for yacc output */
|
|
|
|
int yynerrs = 0; /* number of errors */
|
|
int yyerrflag = 0; /* error recovery flag */
|
|
|
|
extern int fprint(int, char*, ...);
|
|
extern int sprint(char*, char*, ...);
|
|
|
|
char*
|
|
yytokname(int yyc)
|
|
{
|
|
static char x[10];
|
|
|
|
if(yyc > 0 && yyc <= sizeof(yytoknames)/sizeof(yytoknames[0]))
|
|
if(yytoknames[yyc-1])
|
|
return yytoknames[yyc-1];
|
|
sprintf(x, "<%d>", yyc);
|
|
return x;
|
|
}
|
|
|
|
char*
|
|
yystatname(int yys)
|
|
{
|
|
static char x[10];
|
|
|
|
if(yys >= 0 && yys < sizeof(yystates)/sizeof(yystates[0]))
|
|
if(yystates[yys])
|
|
return yystates[yys];
|
|
sprintf(x, "<%d>\n", yys);
|
|
return x;
|
|
}
|
|
|
|
long
|
|
yylex1(void)
|
|
{
|
|
long yychar;
|
|
long *t3p;
|
|
int c;
|
|
|
|
yychar = yylex();
|
|
if(yychar <= 0) {
|
|
c = yytok1[0];
|
|
goto out;
|
|
}
|
|
if(yychar < sizeof(yytok1)/sizeof(yytok1[0])) {
|
|
c = yytok1[yychar];
|
|
goto out;
|
|
}
|
|
if(yychar >= YYPRIVATE)
|
|
if(yychar < YYPRIVATE+sizeof(yytok2)/sizeof(yytok2[0])) {
|
|
c = yytok2[yychar-YYPRIVATE];
|
|
goto out;
|
|
}
|
|
for(t3p=yytok3;; t3p+=2) {
|
|
c = t3p[0];
|
|
if(c == yychar) {
|
|
c = t3p[1];
|
|
goto out;
|
|
}
|
|
if(c == 0)
|
|
break;
|
|
}
|
|
c = 0;
|
|
|
|
out:
|
|
if(c == 0)
|
|
c = yytok2[1]; /* unknown char */
|
|
if(yydebug >= 3)
|
|
printf("lex %.4X %s\n", yychar, yytokname(c));
|
|
return c;
|
|
}
|
|
|
|
int
|
|
yyparse(void)
|
|
{
|
|
struct
|
|
{
|
|
YYSTYPE yyv;
|
|
int yys;
|
|
} yys[YYMAXDEPTH], *yyp, *yypt;
|
|
short *yyxi;
|
|
int yyj, yym, yystate, yyn, yyg;
|
|
YYSTYPE save1, save2;
|
|
int save3, save4;
|
|
long yychar;
|
|
|
|
save1 = yylval;
|
|
save2 = yyval;
|
|
save3 = yynerrs;
|
|
save4 = yyerrflag;
|
|
|
|
yystate = 0;
|
|
yychar = -1;
|
|
yynerrs = 0;
|
|
yyerrflag = 0;
|
|
yyp = &yys[-1];
|
|
goto yystack;
|
|
|
|
ret0:
|
|
yyn = 0;
|
|
goto ret;
|
|
|
|
ret1:
|
|
yyn = 1;
|
|
goto ret;
|
|
|
|
ret:
|
|
yylval = save1;
|
|
yyval = save2;
|
|
yynerrs = save3;
|
|
yyerrflag = save4;
|
|
return yyn;
|
|
|
|
yystack:
|
|
/* put a state and value onto the stack */
|
|
if(yydebug >= 4)
|
|
printf("char %s in %s", yytokname(yychar), yystatname(yystate));
|
|
|
|
yyp++;
|
|
if(yyp >= &yys[YYMAXDEPTH]) {
|
|
yyerror("yacc stack overflow");
|
|
goto ret1;
|
|
}
|
|
yyp->yys = yystate;
|
|
yyp->yyv = yyval;
|
|
|
|
yynewstate:
|
|
yyn = yypact[yystate];
|
|
if(yyn <= YYFLAG)
|
|
goto yydefault; /* simple state */
|
|
if(yychar < 0)
|
|
yychar = yylex1();
|
|
yyn += yychar;
|
|
if(yyn < 0 || yyn >= YYLAST)
|
|
goto yydefault;
|
|
yyn = yyact[yyn];
|
|
if(yychk[yyn] == yychar) { /* valid shift */
|
|
yychar = -1;
|
|
yyval = yylval;
|
|
yystate = yyn;
|
|
if(yyerrflag > 0)
|
|
yyerrflag--;
|
|
goto yystack;
|
|
}
|
|
|
|
yydefault:
|
|
/* default state action */
|
|
yyn = yydef[yystate];
|
|
if(yyn == -2) {
|
|
if(yychar < 0)
|
|
yychar = yylex1();
|
|
|
|
/* look through exception table */
|
|
for(yyxi=yyexca;; yyxi+=2)
|
|
if(yyxi[0] == -1 && yyxi[1] == yystate)
|
|
break;
|
|
for(yyxi += 2;; yyxi += 2) {
|
|
yyn = yyxi[0];
|
|
if(yyn < 0 || yyn == yychar)
|
|
break;
|
|
}
|
|
yyn = yyxi[1];
|
|
if(yyn < 0)
|
|
goto ret0;
|
|
}
|
|
if(yyn == 0) {
|
|
/* error ... attempt to resume parsing */
|
|
switch(yyerrflag) {
|
|
case 0: /* brand new error */
|
|
yyerror("syntax error");
|
|
if(yydebug >= 1) {
|
|
printf("%s", yystatname(yystate));
|
|
printf("saw %s\n", yytokname(yychar));
|
|
}
|
|
yyerrlab:
|
|
yynerrs++;
|
|
|
|
case 1:
|
|
case 2: /* incompletely recovered error ... try again */
|
|
yyerrflag = 3;
|
|
|
|
/* find a state where "error" is a legal shift action */
|
|
while(yyp >= yys) {
|
|
yyn = yypact[yyp->yys] + YYERRCODE;
|
|
if(yyn >= 0 && yyn < YYLAST) {
|
|
yystate = yyact[yyn]; /* simulate a shift of "error" */
|
|
if(yychk[yystate] == YYERRCODE)
|
|
goto yystack;
|
|
}
|
|
|
|
/* the current yyp has no shift onn "error", pop stack */
|
|
if(yydebug >= 2)
|
|
printf("error recovery pops state %d, uncovers %d\n",
|
|
yyp->yys, (yyp-1)->yys );
|
|
yyp--;
|
|
}
|
|
/* there is no state on the stack with an error shift ... abort */
|
|
goto ret1;
|
|
|
|
case 3: /* no shift yet; clobber input char */
|
|
if(yydebug >= YYEOFCODE)
|
|
printf("error recovery discards %s\n", yytokname(yychar));
|
|
if(yychar == YYEOFCODE)
|
|
goto ret1;
|
|
yychar = -1;
|
|
goto yynewstate; /* try again in the same state */
|
|
}
|
|
}
|
|
|
|
/* reduction by production yyn */
|
|
if(yydebug >= 2)
|
|
printf("reduce %d in:\n\t%s", yyn, yystatname(yystate));
|
|
|
|
yypt = yyp;
|
|
yyp -= yyr2[yyn];
|
|
yyval = (yyp+1)->yyv;
|
|
yym = yyn;
|
|
|
|
/* consult goto table to find next state */
|
|
yyn = yyr1[yyn];
|
|
yyg = yypgo[yyn];
|
|
yyj = yyg + yyp->yys + 1;
|
|
|
|
if(yyj >= YYLAST || yychk[yystate=yyact[yyj]] != -yyn)
|
|
yystate = yyact[yyg];
|
|
switch(yym) {
|
|
|
|
case 1:
|
|
#line 98 "awkgram.y"
|
|
{ if (errorflag==0)
|
|
winner = (Node *)stat3(PROGRAM, beginloc, yypt[-0].yyv.p, endloc); } break;
|
|
case 2:
|
|
#line 100 "awkgram.y"
|
|
{ yyclearin; bracecheck(); ERROR "bailing out" SYNTAX; } break;
|
|
case 13:
|
|
#line 124 "awkgram.y"
|
|
{inloop++;} break;
|
|
case 14:
|
|
#line 125 "awkgram.y"
|
|
{ --inloop; yyval.p = stat4(FOR, yypt[-9].yyv.p, notnull(yypt[-6].yyv.p), yypt[-3].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 15:
|
|
#line 126 "awkgram.y"
|
|
{inloop++;} break;
|
|
case 16:
|
|
#line 127 "awkgram.y"
|
|
{ --inloop; yyval.p = stat4(FOR, yypt[-7].yyv.p, NIL, yypt[-3].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 17:
|
|
#line 128 "awkgram.y"
|
|
{inloop++;} break;
|
|
case 18:
|
|
#line 129 "awkgram.y"
|
|
{ --inloop; yyval.p = stat3(IN, yypt[-5].yyv.p, makearr(yypt[-3].yyv.p), yypt[-0].yyv.p); } break;
|
|
case 19:
|
|
#line 133 "awkgram.y"
|
|
{ setfname(yypt[-0].yyv.cp); } break;
|
|
case 20:
|
|
#line 134 "awkgram.y"
|
|
{ setfname(yypt[-0].yyv.cp); } break;
|
|
case 21:
|
|
#line 138 "awkgram.y"
|
|
{ yyval.p = notnull(yypt[-1].yyv.p); } break;
|
|
case 26:
|
|
#line 150 "awkgram.y"
|
|
{ yyval.i = 0; } break;
|
|
case 28:
|
|
#line 155 "awkgram.y"
|
|
{ yyval.i = 0; } break;
|
|
case 30:
|
|
#line 161 "awkgram.y"
|
|
{ yyval.p = 0; } break;
|
|
case 32:
|
|
#line 166 "awkgram.y"
|
|
{ yyval.p = 0; } break;
|
|
case 33:
|
|
#line 167 "awkgram.y"
|
|
{ yyval.p = yypt[-1].yyv.p; } break;
|
|
case 34:
|
|
#line 171 "awkgram.y"
|
|
{ yyval.p = notnull(yypt[-0].yyv.p); } break;
|
|
case 35:
|
|
#line 175 "awkgram.y"
|
|
{ yyval.p = stat2(PASTAT, yypt[-0].yyv.p, stat2(PRINT, rectonode(), NIL)); } break;
|
|
case 36:
|
|
#line 176 "awkgram.y"
|
|
{ yyval.p = stat2(PASTAT, yypt[-3].yyv.p, yypt[-1].yyv.p); } break;
|
|
case 37:
|
|
#line 177 "awkgram.y"
|
|
{ yyval.p = pa2stat(yypt[-2].yyv.p, yypt[-0].yyv.p, stat2(PRINT, rectonode(), NIL)); } break;
|
|
case 38:
|
|
#line 178 "awkgram.y"
|
|
{ yyval.p = pa2stat(yypt[-5].yyv.p, yypt[-3].yyv.p, yypt[-1].yyv.p); } break;
|
|
case 39:
|
|
#line 179 "awkgram.y"
|
|
{ yyval.p = stat2(PASTAT, NIL, yypt[-1].yyv.p); } break;
|
|
case 40:
|
|
#line 181 "awkgram.y"
|
|
{ beginloc = linkum(beginloc, yypt[-1].yyv.p); yyval.p = 0; } break;
|
|
case 41:
|
|
#line 183 "awkgram.y"
|
|
{ endloc = linkum(endloc, yypt[-1].yyv.p); yyval.p = 0; } break;
|
|
case 42:
|
|
#line 184 "awkgram.y"
|
|
{infunc++;} break;
|
|
case 43:
|
|
#line 185 "awkgram.y"
|
|
{ infunc--; curfname=0; defn((Cell *)yypt[-7].yyv.p, yypt[-5].yyv.p, yypt[-1].yyv.p); yyval.p = 0; } break;
|
|
case 45:
|
|
#line 190 "awkgram.y"
|
|
{ yyval.p = linkum(yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 47:
|
|
#line 195 "awkgram.y"
|
|
{ yyval.p = linkum(yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 48:
|
|
#line 199 "awkgram.y"
|
|
{ yyval.p = op2(yypt[-1].yyv.i, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 49:
|
|
#line 201 "awkgram.y"
|
|
{ yyval.p = op3(CONDEXPR, notnull(yypt[-4].yyv.p), yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 50:
|
|
#line 203 "awkgram.y"
|
|
{ yyval.p = op2(BOR, notnull(yypt[-2].yyv.p), notnull(yypt[-0].yyv.p)); } break;
|
|
case 51:
|
|
#line 205 "awkgram.y"
|
|
{ yyval.p = op2(AND, notnull(yypt[-2].yyv.p), notnull(yypt[-0].yyv.p)); } break;
|
|
case 52:
|
|
#line 206 "awkgram.y"
|
|
{ yyval.p = op3(yypt[-1].yyv.i, NIL, yypt[-2].yyv.p, (Node*)makedfa(yypt[-0].yyv.s, 0)); } break;
|
|
case 53:
|
|
#line 208 "awkgram.y"
|
|
{ if (constnode(yypt[-0].yyv.p))
|
|
yyval.p = op3(yypt[-1].yyv.i, NIL, yypt[-2].yyv.p, (Node*)makedfa(strnode(yypt[-0].yyv.p), 0));
|
|
else
|
|
yyval.p = op3(yypt[-1].yyv.i, (Node *)1, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 54:
|
|
#line 212 "awkgram.y"
|
|
{ yyval.p = op2(INTEST, yypt[-2].yyv.p, makearr(yypt[-0].yyv.p)); } break;
|
|
case 55:
|
|
#line 213 "awkgram.y"
|
|
{ yyval.p = op2(INTEST, yypt[-3].yyv.p, makearr(yypt[-0].yyv.p)); } break;
|
|
case 56:
|
|
#line 214 "awkgram.y"
|
|
{ yyval.p = op2(CAT, yypt[-1].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 59:
|
|
#line 220 "awkgram.y"
|
|
{ yyval.p = op2(yypt[-1].yyv.i, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 60:
|
|
#line 222 "awkgram.y"
|
|
{ yyval.p = op3(CONDEXPR, notnull(yypt[-4].yyv.p), yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 61:
|
|
#line 224 "awkgram.y"
|
|
{ yyval.p = op2(BOR, notnull(yypt[-2].yyv.p), notnull(yypt[-0].yyv.p)); } break;
|
|
case 62:
|
|
#line 226 "awkgram.y"
|
|
{ yyval.p = op2(AND, notnull(yypt[-2].yyv.p), notnull(yypt[-0].yyv.p)); } break;
|
|
case 63:
|
|
#line 227 "awkgram.y"
|
|
{ yyval.p = op2(yypt[-1].yyv.i, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 64:
|
|
#line 228 "awkgram.y"
|
|
{ yyval.p = op2(yypt[-1].yyv.i, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 65:
|
|
#line 229 "awkgram.y"
|
|
{ yyval.p = op2(yypt[-1].yyv.i, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 66:
|
|
#line 230 "awkgram.y"
|
|
{ yyval.p = op2(yypt[-1].yyv.i, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 67:
|
|
#line 231 "awkgram.y"
|
|
{ yyval.p = op2(yypt[-1].yyv.i, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 68:
|
|
#line 232 "awkgram.y"
|
|
{ yyval.p = op2(yypt[-1].yyv.i, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 69:
|
|
#line 233 "awkgram.y"
|
|
{ yyval.p = op3(yypt[-1].yyv.i, NIL, yypt[-2].yyv.p, (Node*)makedfa(yypt[-0].yyv.s, 0)); } break;
|
|
case 70:
|
|
#line 235 "awkgram.y"
|
|
{ if (constnode(yypt[-0].yyv.p))
|
|
yyval.p = op3(yypt[-1].yyv.i, NIL, yypt[-2].yyv.p, (Node*)makedfa(strnode(yypt[-0].yyv.p), 0));
|
|
else
|
|
yyval.p = op3(yypt[-1].yyv.i, (Node *)1, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 71:
|
|
#line 239 "awkgram.y"
|
|
{ yyval.p = op2(INTEST, yypt[-2].yyv.p, makearr(yypt[-0].yyv.p)); } break;
|
|
case 72:
|
|
#line 240 "awkgram.y"
|
|
{ yyval.p = op2(INTEST, yypt[-3].yyv.p, makearr(yypt[-0].yyv.p)); } break;
|
|
case 73:
|
|
#line 241 "awkgram.y"
|
|
{
|
|
if (safe) ERROR "cmd | getline is unsafe" SYNTAX;
|
|
else yyval.p = op3(GETLINE, yypt[-0].yyv.p, (Node*)yypt[-2].yyv.i, yypt[-3].yyv.p); } break;
|
|
case 74:
|
|
#line 244 "awkgram.y"
|
|
{
|
|
if (safe) ERROR "cmd | getline is unsafe" SYNTAX;
|
|
else yyval.p = op3(GETLINE, (Node*)0, (Node*)yypt[-1].yyv.i, yypt[-2].yyv.p); } break;
|
|
case 75:
|
|
#line 247 "awkgram.y"
|
|
{ yyval.p = op2(CAT, yypt[-1].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 78:
|
|
#line 253 "awkgram.y"
|
|
{ yyval.p = linkum(yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 79:
|
|
#line 254 "awkgram.y"
|
|
{ yyval.p = linkum(yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 81:
|
|
#line 259 "awkgram.y"
|
|
{ yyval.p = linkum(yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 82:
|
|
#line 263 "awkgram.y"
|
|
{ yyval.p = rectonode(); } break;
|
|
case 84:
|
|
#line 265 "awkgram.y"
|
|
{ yyval.p = yypt[-1].yyv.p; } break;
|
|
case 93:
|
|
#line 282 "awkgram.y"
|
|
{ yyval.p = op3(MATCH, NIL, rectonode(), (Node*)makedfa(yypt[-0].yyv.s, 0)); } break;
|
|
case 94:
|
|
#line 283 "awkgram.y"
|
|
{ yyval.p = op1(NOT, notnull(yypt[-0].yyv.p)); } break;
|
|
case 95:
|
|
#line 287 "awkgram.y"
|
|
{startreg();} break;
|
|
case 96:
|
|
#line 287 "awkgram.y"
|
|
{ yyval.s = yypt[-1].yyv.s; } break;
|
|
case 99:
|
|
#line 295 "awkgram.y"
|
|
{
|
|
if (safe) ERROR "print | is unsafe" SYNTAX;
|
|
else yyval.p = stat3(yypt[-3].yyv.i, yypt[-2].yyv.p, (Node *) yypt[-1].yyv.i, yypt[-0].yyv.p); } break;
|
|
case 100:
|
|
#line 298 "awkgram.y"
|
|
{
|
|
if (safe) ERROR "print >> is unsafe" SYNTAX;
|
|
else yyval.p = stat3(yypt[-3].yyv.i, yypt[-2].yyv.p, (Node *) yypt[-1].yyv.i, yypt[-0].yyv.p); } break;
|
|
case 101:
|
|
#line 301 "awkgram.y"
|
|
{
|
|
if (safe) ERROR "print > is unsafe" SYNTAX;
|
|
else yyval.p = stat3(yypt[-3].yyv.i, yypt[-2].yyv.p, (Node *) yypt[-1].yyv.i, yypt[-0].yyv.p); } break;
|
|
case 102:
|
|
#line 304 "awkgram.y"
|
|
{ yyval.p = stat3(yypt[-1].yyv.i, yypt[-0].yyv.p, NIL, NIL); } break;
|
|
case 103:
|
|
#line 305 "awkgram.y"
|
|
{ yyval.p = stat2(DELETE, makearr(yypt[-3].yyv.p), yypt[-1].yyv.p); } break;
|
|
case 104:
|
|
#line 306 "awkgram.y"
|
|
{ yyval.p = stat2(DELETE, makearr(yypt[-0].yyv.p), 0); } break;
|
|
case 105:
|
|
#line 307 "awkgram.y"
|
|
{ yyval.p = exptostat(yypt[-0].yyv.p); } break;
|
|
case 106:
|
|
#line 308 "awkgram.y"
|
|
{ yyclearin; ERROR "illegal statement" SYNTAX; } break;
|
|
case 109:
|
|
#line 317 "awkgram.y"
|
|
{ if (!inloop) ERROR "break illegal outside of loops" SYNTAX;
|
|
yyval.p = stat1(BREAK, NIL); } break;
|
|
case 110:
|
|
#line 319 "awkgram.y"
|
|
{ yyval.p = stat1(CLOSE, yypt[-1].yyv.p); } break;
|
|
case 111:
|
|
#line 320 "awkgram.y"
|
|
{ if (!inloop) ERROR "continue illegal outside of loops" SYNTAX;
|
|
yyval.p = stat1(CONTINUE, NIL); } break;
|
|
case 112:
|
|
#line 322 "awkgram.y"
|
|
{inloop++;} break;
|
|
case 113:
|
|
#line 322 "awkgram.y"
|
|
{--inloop;} break;
|
|
case 114:
|
|
#line 323 "awkgram.y"
|
|
{ yyval.p = stat2(DO, yypt[-6].yyv.p, notnull(yypt[-2].yyv.p)); } break;
|
|
case 115:
|
|
#line 324 "awkgram.y"
|
|
{ yyval.p = stat1(EXIT, yypt[-1].yyv.p); } break;
|
|
case 116:
|
|
#line 325 "awkgram.y"
|
|
{ yyval.p = stat1(EXIT, NIL); } break;
|
|
case 118:
|
|
#line 327 "awkgram.y"
|
|
{ yyval.p = stat3(IF, yypt[-3].yyv.p, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 119:
|
|
#line 328 "awkgram.y"
|
|
{ yyval.p = stat3(IF, yypt[-1].yyv.p, yypt[-0].yyv.p, NIL); } break;
|
|
case 120:
|
|
#line 329 "awkgram.y"
|
|
{ yyval.p = yypt[-1].yyv.p; } break;
|
|
case 121:
|
|
#line 330 "awkgram.y"
|
|
{ if (infunc)
|
|
ERROR "next is illegal inside a function" SYNTAX;
|
|
yyval.p = stat1(NEXT, NIL); } break;
|
|
case 122:
|
|
#line 333 "awkgram.y"
|
|
{ if (infunc)
|
|
ERROR "nextfile is illegal inside a function" SYNTAX;
|
|
yyval.p = stat1(NEXTFILE, NIL); } break;
|
|
case 123:
|
|
#line 336 "awkgram.y"
|
|
{ yyval.p = stat1(RETURN, yypt[-1].yyv.p); } break;
|
|
case 124:
|
|
#line 337 "awkgram.y"
|
|
{ yyval.p = stat1(RETURN, NIL); } break;
|
|
case 126:
|
|
#line 339 "awkgram.y"
|
|
{inloop++;} break;
|
|
case 127:
|
|
#line 339 "awkgram.y"
|
|
{ --inloop; yyval.p = stat2(WHILE, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 128:
|
|
#line 340 "awkgram.y"
|
|
{ yyval.p = 0; } break;
|
|
case 130:
|
|
#line 345 "awkgram.y"
|
|
{ yyval.p = linkum(yypt[-1].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 133:
|
|
#line 353 "awkgram.y"
|
|
{ yyval.p = op2(ADD, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 134:
|
|
#line 354 "awkgram.y"
|
|
{ yyval.p = op2(MINUS, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 135:
|
|
#line 355 "awkgram.y"
|
|
{ yyval.p = op2(MULT, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 136:
|
|
#line 356 "awkgram.y"
|
|
{ yyval.p = op2(DIVIDE, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 137:
|
|
#line 357 "awkgram.y"
|
|
{ yyval.p = op2(MOD, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 138:
|
|
#line 358 "awkgram.y"
|
|
{ yyval.p = op2(POWER, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
|
|
case 139:
|
|
#line 359 "awkgram.y"
|
|
{ yyval.p = op1(UMINUS, yypt[-0].yyv.p); } break;
|
|
case 140:
|
|
#line 360 "awkgram.y"
|
|
{ yyval.p = yypt[-0].yyv.p; } break;
|
|
case 141:
|
|
#line 361 "awkgram.y"
|
|
{ yyval.p = op1(NOT, notnull(yypt[-0].yyv.p)); } break;
|
|
case 142:
|
|
#line 362 "awkgram.y"
|
|
{ yyval.p = op2(BLTIN, (Node *) yypt[-2].yyv.i, rectonode()); } break;
|
|
case 143:
|
|
#line 363 "awkgram.y"
|
|
{ yyval.p = op2(BLTIN, (Node *) yypt[-3].yyv.i, yypt[-1].yyv.p); } break;
|
|
case 144:
|
|
#line 364 "awkgram.y"
|
|
{ yyval.p = op2(BLTIN, (Node *) yypt[-0].yyv.i, rectonode()); } break;
|
|
case 145:
|
|
#line 365 "awkgram.y"
|
|
{ yyval.p = op2(CALL, celltonode(yypt[-2].yyv.cp,CVAR), NIL); } break;
|
|
case 146:
|
|
#line 366 "awkgram.y"
|
|
{ yyval.p = op2(CALL, celltonode(yypt[-3].yyv.cp,CVAR), yypt[-1].yyv.p); } break;
|
|
case 147:
|
|
#line 367 "awkgram.y"
|
|
{ yyval.p = op1(PREDECR, yypt[-0].yyv.p); } break;
|
|
case 148:
|
|
#line 368 "awkgram.y"
|
|
{ yyval.p = op1(PREINCR, yypt[-0].yyv.p); } break;
|
|
case 149:
|
|
#line 369 "awkgram.y"
|
|
{ yyval.p = op1(POSTDECR, yypt[-1].yyv.p); } break;
|
|
case 150:
|
|
#line 370 "awkgram.y"
|
|
{ yyval.p = op1(POSTINCR, yypt[-1].yyv.p); } break;
|
|
case 151:
|
|
#line 371 "awkgram.y"
|
|
{ yyval.p = op3(GETLINE, yypt[-2].yyv.p, (Node *)yypt[-1].yyv.i, yypt[-0].yyv.p); } break;
|
|
case 152:
|
|
#line 372 "awkgram.y"
|
|
{ yyval.p = op3(GETLINE, NIL, (Node *)yypt[-1].yyv.i, yypt[-0].yyv.p); } break;
|
|
case 153:
|
|
#line 373 "awkgram.y"
|
|
{ yyval.p = op3(GETLINE, yypt[-0].yyv.p, NIL, NIL); } break;
|
|
case 154:
|
|
#line 374 "awkgram.y"
|
|
{ yyval.p = op3(GETLINE, NIL, NIL, NIL); } break;
|
|
case 155:
|
|
#line 376 "awkgram.y"
|
|
{ yyval.p = op2(INDEX, yypt[-3].yyv.p, yypt[-1].yyv.p); } break;
|
|
case 156:
|
|
#line 378 "awkgram.y"
|
|
{ ERROR "index() doesn't permit regular expressions" SYNTAX;
|
|
yyval.p = op2(INDEX, yypt[-3].yyv.p, (Node*)yypt[-1].yyv.s); } break;
|
|
case 157:
|
|
#line 380 "awkgram.y"
|
|
{ yyval.p = yypt[-1].yyv.p; } break;
|
|
case 158:
|
|
#line 382 "awkgram.y"
|
|
{ yyval.p = op3(MATCHFCN, NIL, yypt[-3].yyv.p, (Node*)makedfa(yypt[-1].yyv.s, 1)); } break;
|
|
case 159:
|
|
#line 384 "awkgram.y"
|
|
{ if (constnode(yypt[-1].yyv.p))
|
|
yyval.p = op3(MATCHFCN, NIL, yypt[-3].yyv.p, (Node*)makedfa(strnode(yypt[-1].yyv.p), 1));
|
|
else
|
|
yyval.p = op3(MATCHFCN, (Node *)1, yypt[-3].yyv.p, yypt[-1].yyv.p); } break;
|
|
case 160:
|
|
#line 388 "awkgram.y"
|
|
{ yyval.p = celltonode(yypt[-0].yyv.cp, CCON); } break;
|
|
case 161:
|
|
#line 390 "awkgram.y"
|
|
{ yyval.p = op4(SPLIT, yypt[-5].yyv.p, makearr(yypt[-3].yyv.p), yypt[-1].yyv.p, (Node*)STRING); } break;
|
|
case 162:
|
|
#line 392 "awkgram.y"
|
|
{ yyval.p = op4(SPLIT, yypt[-5].yyv.p, makearr(yypt[-3].yyv.p), (Node*)makedfa(yypt[-1].yyv.s, 1), (Node *)REGEXPR); } break;
|
|
case 163:
|
|
#line 394 "awkgram.y"
|
|
{ yyval.p = op4(SPLIT, yypt[-3].yyv.p, makearr(yypt[-1].yyv.p), NIL, (Node*)STRING); } break;
|
|
case 164:
|
|
#line 395 "awkgram.y"
|
|
{ yyval.p = op1(yypt[-3].yyv.i, yypt[-1].yyv.p); } break;
|
|
case 165:
|
|
#line 396 "awkgram.y"
|
|
{ yyval.p = celltonode(yypt[-0].yyv.cp, CCON); } break;
|
|
case 166:
|
|
#line 398 "awkgram.y"
|
|
{ yyval.p = op4(yypt[-5].yyv.i, NIL, (Node*)makedfa(yypt[-3].yyv.s, 1), yypt[-1].yyv.p, rectonode()); } break;
|
|
case 167:
|
|
#line 400 "awkgram.y"
|
|
{ if (constnode(yypt[-3].yyv.p))
|
|
yyval.p = op4(yypt[-5].yyv.i, NIL, (Node*)makedfa(strnode(yypt[-3].yyv.p), 1), yypt[-1].yyv.p, rectonode());
|
|
else
|
|
yyval.p = op4(yypt[-5].yyv.i, (Node *)1, yypt[-3].yyv.p, yypt[-1].yyv.p, rectonode()); } break;
|
|
case 168:
|
|
#line 405 "awkgram.y"
|
|
{ yyval.p = op4(yypt[-7].yyv.i, NIL, (Node*)makedfa(yypt[-5].yyv.s, 1), yypt[-3].yyv.p, yypt[-1].yyv.p); } break;
|
|
case 169:
|
|
#line 407 "awkgram.y"
|
|
{ if (constnode(yypt[-5].yyv.p))
|
|
yyval.p = op4(yypt[-7].yyv.i, NIL, (Node*)makedfa(strnode(yypt[-5].yyv.p), 1), yypt[-3].yyv.p, yypt[-1].yyv.p);
|
|
else
|
|
yyval.p = op4(yypt[-7].yyv.i, (Node *)1, yypt[-5].yyv.p, yypt[-3].yyv.p, yypt[-1].yyv.p); } break;
|
|
case 170:
|
|
#line 412 "awkgram.y"
|
|
{ yyval.p = op3(SUBSTR, yypt[-5].yyv.p, yypt[-3].yyv.p, yypt[-1].yyv.p); } break;
|
|
case 171:
|
|
#line 414 "awkgram.y"
|
|
{ yyval.p = op3(SUBSTR, yypt[-3].yyv.p, yypt[-1].yyv.p, NIL); } break;
|
|
case 174:
|
|
#line 420 "awkgram.y"
|
|
{ yyval.p = op2(ARRAY, makearr(yypt[-3].yyv.p), yypt[-1].yyv.p); } break;
|
|
case 175:
|
|
#line 421 "awkgram.y"
|
|
{ yyval.p = op1(INDIRECT, celltonode(yypt[-0].yyv.cp, CVAR)); } break;
|
|
case 176:
|
|
#line 422 "awkgram.y"
|
|
{ yyval.p = op1(INDIRECT, yypt[-0].yyv.p); } break;
|
|
case 177:
|
|
#line 426 "awkgram.y"
|
|
{ arglist = yyval.p = 0; } break;
|
|
case 178:
|
|
#line 427 "awkgram.y"
|
|
{ arglist = yyval.p = celltonode(yypt[-0].yyv.cp,CVAR); } break;
|
|
case 179:
|
|
#line 428 "awkgram.y"
|
|
{
|
|
checkdup(yypt[-2].yyv.p, yypt[-0].yyv.cp);
|
|
arglist = yyval.p = linkum(yypt[-2].yyv.p,celltonode(yypt[-0].yyv.cp,CVAR)); } break;
|
|
case 180:
|
|
#line 434 "awkgram.y"
|
|
{ yyval.p = celltonode(yypt[-0].yyv.cp, CVAR); } break;
|
|
case 181:
|
|
#line 435 "awkgram.y"
|
|
{ yyval.p = op1(ARG, (Node *) yypt[-0].yyv.i); } break;
|
|
case 182:
|
|
#line 436 "awkgram.y"
|
|
{ yyval.p = op1(VARNF, (Node *) yypt[-0].yyv.cp); } break;
|
|
case 183:
|
|
#line 441 "awkgram.y"
|
|
{ yyval.p = notnull(yypt[-1].yyv.p); } break;
|
|
}
|
|
goto yystack; /* stack new state and value */
|
|
}
|