case 1: funcend(yyYpv
[1], yyYpv
[4], lineof(yyYpv
[5])); break;
case 2: yyval
= funcbody(funchdr(tree5(T_PROG
, lineof(yyYpv
[1]), yyYpv
[2], fixlist(yyYpv
[4]), NIL
))); break;
yyPerror("Malformed program statement", PPROG
);
* Should make a program statement
* with "input" and "output" here.
yyval
= funcbody(funchdr(tree5(T_PROG
, lineof(yyYpv
[1]), NIL
, NIL
, NIL
)));
yyval
= tree2(lineof(yyYpv
[1]), fixstlist(yyYpv
[2]));
brerror(yyYpv
[1], "begin");
constend(), typeend(), varend(), trfree();
yyPerror("Malformed declaration", PDECL
);
case 9: constend(); break;
case 10: typeend(); break;
case 11: varend(); break;
case 12: label(fixlist(yyYpv
[2]), lineof(yyYpv
[1])); break;
case 13: yyval
= newlist(yyYpv
[1] == NIL
? NIL
: *hash(yyYpv
[1], 1)); break;
case 14: yyval
= addlist(yyYpv
[1], yyYpv
[3] == NIL
? NIL
: *hash(yyYpv
[3], 1)); break;
case 15: constbeg(yyYpv
[1]), const(lineof(yyYpv
[3]), yyYpv
[2], yyYpv
[4]); break;
case 16: const(lineof(yyYpv
[3]), yyYpv
[2], yyYpv
[4]); break;
yyPerror("Malformed const declaration", PDECL
);
case 18: goto Cerror
; break;
case 19: typebeg(yyYpv
[1]), type(lineof(yyYpv
[3]), yyYpv
[2], yyYpv
[4]); break;
case 20: type(lineof(yyYpv
[3]), yyYpv
[2], yyYpv
[4]); break;
yyPerror("Malformed type declaration", PDECL
);
case 22: goto Terror
; break;
case 23: varbeg(yyYpv
[1]), var(lineof(yyYpv
[3]), fixlist(yyYpv
[2]), yyYpv
[4]); break;
case 24: var(lineof(yyYpv
[3]), fixlist(yyYpv
[2]), yyYpv
[4]); break;
yyPerror("Malformed var declaration", PDECL
);
case 26: goto Verror
; break;
case 28: trfree(); break;
case 29: funcfwd(yyYpv
[1]); break;
case 30: funcend(yyYpv
[1], yyYpv
[4], lineof(yyYpv
[5])); break;
case 31: funcbody(yyYpv
[1]); break;
case 32: yyval
= funchdr(tree5(yyYpv
[1], lineof(yyYpv
[5]), yyYpv
[2], yyYpv
[3], yyYpv
[4])); break;
case 33: yyval
= T_PDEC
; break;
case 34: yyval
= T_FDEC
; break;
case 35: yyval
= fixlist(yyYpv
[2]); break;
case 36: yyval
= NIL
; break;
case 37: yyval
= tree3(T_PVAL
, fixlist(yyYpv
[1]), yyYpv
[3]); break;
case 38: yyval
= tree3(T_PVAR
, fixlist(yyYpv
[2]), yyYpv
[4]); break;
case 39: yyval
= tree3(T_PFUNC
, fixlist(yyYpv
[2]), yyYpv
[4]); break;
case 40: yyval
= tree2(T_PPROC
, fixlist(yyYpv
[2])); break;
case 41: yyval
= yyYpv
[2]; break;
case 42: yyval
= NIL
; break;
case 43: yyval
= newlist(yyYpv
[1]); break;
case 44: yyval
= addlist(yyYpv
[1], yyYpv
[3]); break;
case 45: yyval
= tree2(T_CSTRNG
, yyYpv
[1]); break;
case 47: yyval
= tree2(T_PLUSC
, yyYpv
[2]); break;
case 48: yyval
= tree2(T_MINUSC
, yyYpv
[2]); break;
case 49: yyval
= tree2(T_ID
, yyYpv
[1]); break;
case 50: yyval
= tree2(T_CINT
, yyYpv
[1]); break;
case 51: yyval
= tree2(T_CBINT
, yyYpv
[1]); break;
case 52: yyval
= tree2(T_CFINT
, yyYpv
[1]); break;
case 53: yyval
= newlist(yyYpv
[1]); break;
case 54: yyval
= addlist(yyYpv
[1], yyYpv
[3]); break;
case 56: yyval
= tree3(T_TYPTR
, lineof(yyYpv
[1]), tree2(T_ID
, yyYpv
[2])); break;
case 58: yyval
= tree3(T_TYPACK
, lineof(yyYpv
[1]), yyYpv
[2]); break;
case 60: yyval
= tree3(T_TYSCAL
, lineof(yyYpv
[1]), fixlist(yyYpv
[2])); break;
case 61: yyval
= tree4(T_TYRANG
, lineof(yyYpv
[2]), yyYpv
[1], yyYpv
[3]); break;
case 62: yyval
= tree4(T_TYARY
, lineof(yyYpv
[1]), fixlist(yyYpv
[3]), yyYpv
[6]); break;
case 63: yyval
= tree3(T_TYFILE
, lineof(yyYpv
[1]), yyYpv
[3]); break;
case 64: yyval
= tree3(T_TYSET
, lineof(yyYpv
[1]), yyYpv
[3]); break;
yyval
= tree3(T_TYREC
, lineof(yyYpv
[1]), yyYpv
[2]);
brerror(yyYpv
[1], "record");
case 66: yyval
= newlist(yyYpv
[1]); break;
case 67: yyval
= addlist(yyYpv
[1], yyYpv
[3]); break;
case 68: yyval
= tree4(T_LISTPP
, lineof(NIL
), fixlist(yyYpv
[1]), yyYpv
[2]); break;
case 69: yyval
= newlist(yyYpv
[1]); break;
case 70: yyval
= addlist(yyYpv
[1], yyYpv
[3]); break;
case 71: yyPerror("Malformed record declaration", PDECL
); break;
case 72: yyval
= NIL
; break;
case 73: yyval
= tree4(T_FIELD
, lineof(yyYpv
[2]), fixlist(yyYpv
[1]), yyYpv
[3]); break;
case 74: yyval
= NIL
; break;
case 75: yyval
= tree5(T_TYVARPT
, lineof(yyYpv
[1]), NIL
, yyYpv
[2], fixlist(yyYpv
[4])); break;
case 76: yyval
= tree5(T_TYVARPT
, lineof(yyYpv
[1]), yyYpv
[2], yyYpv
[4], fixlist(yyYpv
[6])); break;
case 77: yyval
= newlist(yyYpv
[1]); break;
case 78: yyval
= addlist(yyYpv
[1], yyYpv
[3]); break;
case 79: yyPerror("Malformed record declaration", PDECL
); break;
case 80: yyval
= NIL
; break;
case 81: yyval
= tree5(T_TYVARNT
, lineof(yyYpv
[2]), fixlist(yyYpv
[1]), yyYpv
[4]); break;
case 82: yyval
= tree5(T_TYVARNT
, lineof(yyYpv
[2]), fixlist(yyYpv
[1]), NIL
); break;
case 83: yyval
= newlist(yyYpv
[1]); break;
if ((p
= yyYpv
[1]) != NIL
&& (q
= p
[1])[0] == T_IFX
) {
yyval
= addlist(yyYpv
[1], yyYpv
[2]);
case 85: if ((q
= yyYpv
[1]) != NIL
&& (p
= q
[1]) != NIL
&& p
[0] == T_IF
) {
if (yyshifts
>= 2 && yychar
== YELSE
) {
yerror("Deleted ';' before keyword else");
case 86: yyval
= newlist(yyYpv
[1]); break;
case 87: yyval
= addlist(yyYpv
[1], yyYpv
[3]); break;
yyPerror("Malformed statement in case", PSTAT
);
case 89: goto Kerror
; break;
case 90: yyval
= tree4(T_CSTAT
, lineof(yyYpv
[2]), fixlist(yyYpv
[1]), yyYpv
[3]); break;
case 91: yyval
= tree4(T_CSTAT
, lineof(yyYpv
[1]), NIL
, yyYpv
[2]); break;
case 92: yyval
= NIL
; break;
case 93: yyval
= NIL
; break;
case 94: yyval
= tree4(T_LABEL
, lineof(yyYpv
[2]), yyYpv
[1] == NIL
? NIL
: *hash(yyYpv
[1], 1), yyYpv
[3]); break;
case 95: yyval
= tree4(T_PCALL
, lineof(yyline
), yyYpv
[1], NIL
); break;
case 96: yyval
= tree4(T_PCALL
, lineof(yyYpv
[2]), yyYpv
[1], fixlist(yyYpv
[3])); break;
case 97: goto NSerror
; break;
yyval
= tree3(T_BLOCK
, lineof(yyYpv
[1]), fixstlist(yyYpv
[2]));
brerror(yyYpv
[1], "begin");
yyval
= tree4(T_CASE
, lineof(yyYpv
[1]), yyYpv
[2], fixlist(yyYpv
[4]));
brerror(yyYpv
[1], "case");
case 101: yyval
= tree4(T_WITH
, lineof(yyYpv
[1]), fixlist(yyYpv
[2]), yyYpv
[4]); break;
case 102: yyval
= tree4(T_WHILE
, lineof(yyYpv
[1]), yyYpv
[2], yyYpv
[4]); break;
case 103: yyval
= tree4(T_REPEAT
, lineof(yyYpv
[3]), fixstlist(yyYpv
[2]), yyYpv
[4]); break;
case 104: yyval
= tree5(T_FORU
, lineof(yyYpv
[1]), yyYpv
[2], yyYpv
[4], yyYpv
[6]); break;
case 105: yyval
= tree5(T_FORD
, lineof(yyYpv
[1]), yyYpv
[2], yyYpv
[4], yyYpv
[6]); break;
case 106: yyval
= tree3(T_GOTO
, lineof(yyYpv
[1]), *hash(yyYpv
[2], 1)); break;
case 107: yyval
= tree5(T_IF
, lineof(yyYpv
[1]), yyYpv
[2], yyYpv
[4], NIL
); break;
case 108: yyval
= tree5(T_IFEL
, lineof(yyYpv
[1]), yyYpv
[2], yyYpv
[4], yyYpv
[6]); break;
case 109: yyval
= tree5(T_IFEL
, lineof(yyYpv
[1]), yyYpv
[2], yyYpv
[4], NIL
); break;
case 110: yyval
= tree3(T_ASRT
, lineof(yyYpv
[1]), yyYpv
[2]); break;
yyPerror("Malformed statement", PSTAT
);
case 112: yyval
= tree4(T_ASGN
, lineof(yyYpv
[2]), yyYpv
[1], yyYpv
[4]); break;
yyPerror("Missing/malformed expression", PEXPR
);
case 114: yyval
= tree4(yyYpv
[2], yyYpv
[1][1] == SAWCON
? yyYpv
[3][1] : yyYpv
[1][1], yyYpv
[1], yyYpv
[3]); break;
case 115: yyval
= tree3(T_PLUS
, yyYpv
[2][1], yyYpv
[2]); break;
case 116: yyval
= tree3(T_MINUS
, yyYpv
[2][1], yyYpv
[2]); break;
case 117: yyval
= tree4(yyYpv
[2], yyYpv
[1][1] == SAWCON
? yyYpv
[3][1] : yyYpv
[1][1], yyYpv
[1], yyYpv
[3]); break;
case 118: yyval
= tree4(yyYpv
[2], yyYpv
[1][1] == SAWCON
? yyYpv
[3][1] : yyYpv
[1][1], yyYpv
[1], yyYpv
[3]); break;
case 119: yyval
= tree2(T_NIL
, NOCON
); break;
case 120: yyval
= tree3(T_STRNG
, SAWCON
, yyYpv
[1]); break;
case 121: yyval
= tree3(T_INT
, NOCON
, yyYpv
[1]); break;
case 122: yyval
= tree3(T_BINT
, NOCON
, yyYpv
[1]); break;
case 123: yyval
= tree3(T_FINT
, NOCON
, yyYpv
[1]); break;
case 125: goto NEerror
; break;
case 126: yyval
= tree3(T_FCALL
, yyYpv
[1], fixlist(yyYpv
[3])); break;
case 127: yyval
= yyYpv
[2]; break;
case 128: yyval
= tree3(T_NOT
, NOCON
, yyYpv
[2]); break;
case 129: yyval
= tree3(T_CSET
, SAWCON
, fixlist(yyYpv
[2])); break;
case 130: yyval
= tree3(T_CSET
, SAWCON
, NIL
); break;
case 131: yyval
= newlist(yyYpv
[1]); break;
case 132: yyval
= addlist(yyYpv
[1], yyYpv
[3]); break;
case 134: yyval
= tree3(T_RANG
, yyYpv
[1], yyYpv
[3]); break;
yyval
= setupvar(yyYpv
[1], NIL
);
case 136: yyYpv
[1][3] = fixlist(yyYpv
[1][3]); break;
case 137: yyval
= setupvar(yyYpv
[1], tree2(T_ARY
, fixlist(yyYpv
[3]))); break;
case 138: yyYpv
[1][3] = addlist(yyYpv
[1][3], tree2(T_ARY
, fixlist(yyYpv
[3]))); break;
case 139: yyval
= setupvar(yyYpv
[1], tree3(T_FIELD
, yyYpv
[3], NIL
)); break;
case 140: yyYpv
[1][3] = addlist(yyYpv
[1][3], tree3(T_FIELD
, yyYpv
[3], NIL
)); break;
case 141: yyval
= setupvar(yyYpv
[1], tree1(T_PTR
)); break;
case 142: yyYpv
[1][3] = addlist(yyYpv
[1][3], tree1(T_PTR
)); break;
case 144: yyval
= tree4(T_WEXP
, yyYpv
[1], yyYpv
[3], NIL
); break;
case 145: yyval
= tree4(T_WEXP
, yyYpv
[1], yyYpv
[3], yyYpv
[5]); break;
case 146: yyval
= tree4(T_WEXP
, yyYpv
[1], NIL
, yyYpv
[2]); break;
case 147: yyval
= tree4(T_WEXP
, yyYpv
[1], yyYpv
[3], yyYpv
[4]); break;
case 148: yyval
= OCT
; break;
case 149: yyval
= HEX
; break;
case 150: yyval
= newlist(yyYpv
[1]); break;
case 151: yyval
= addlist(yyYpv
[1], yyYpv
[3]); break;
case 152: yyval
= newlist(yyYpv
[1]); break;
case 153: yyval
= addlist(yyYpv
[1], yyYpv
[3]); break;
case 154: yyval
= T_EQ
; break;
case 155: yyval
= T_LT
; break;
case 156: yyval
= T_GT
; break;
case 157: yyval
= T_NE
; break;
case 158: yyval
= T_LE
; break;
case 159: yyval
= T_GE
; break;
case 160: yyval
= T_IN
; break;
case 161: yyval
= T_ADD
; break;
case 162: yyval
= T_SUB
; break;
case 163: yyval
= T_OR
; break;
case 164: yyval
= T_OR
; break;
case 165: yyval
= T_MULT
; break;
case 166: yyval
= T_DIVD
; break;
case 167: yyval
= T_DIV
; break;
case 168: yyval
= T_MOD
; break;
case 169: yyval
= T_AND
; break;
case 170: yyval
= T_AND
; break;
case 171: yyval
= newlist(yyYpv
[1]); break;
case 172: yyval
= addlist(yyYpv
[1], yyYpv
[3]); break;
case 173: yyval
= newlist(yyYpv
[1]); break;
case 174: yyval
= addlist(yyYpv
[1], yyYpv
[3]); break;
yyval
= tree3(T_TYID
, lineof(yyline
), yyYpv
[1]);
int yyact
[] {0,-286,8195,4096,0,16384,4096,12295,-256,8198
,-273,8197,4096,-256,8201,-259,12315,-261,8207,-271
,12315,-277,8206,-285,12315,-293,8208,-295,8209,4096
,-40,8210,4096,12291,-259,8213,-271,8218,-285,8217
,4096,12293,12294,12296,-256,8220,-259,12297,-261,12297
,-271,12297,-273,8219,-277,12297,-285,12297,-293,12297
,-295,12297,4096,-256,8222,-259,12298,-261,12298,-271
,12298,-273,8221,-277,12298,-285,12298,-293,12298,-295
,12298,4096,-256,8224,-259,12299,-261,12299,-271,12299
,-273,8225,-277,12299,-285,12299,-293,12299,-295,12299
,4096,-276,8227,4096,-256,8229,-273,8228,4096,-256
,8231,-273,8230,4096,-256,8233,-273,8225,4096,-273
,8225,4096,-46,8235,4096,12316,-256,8252,-259,8243
,-260,8244,-267,12381,-269,8248,-272,8249,-273,8241
,-274,8250,-276,8239,-288,8247,-296,8246,-297,8245
,-301,8251,-59,12381,4096,-270,8258,12319,-273,8260
,4096,12321,12322,-61,8261,4096,12306,-61,8262,4096
,12310,-44,8264,-58,8263,4096,12314,12461,-59,8265
,-44,8266,4096,12301,-61,8267,4096,12305,-61,8268
,4096,12309,-44,8264,-58,8269,4096,12313,-41,8270
,-44,8264,4096,12289,-267,8271,-59,8272,4096,12371
,-256,8252,-259,8243,-260,8244,-267,12381,-269,8248
,-272,8249,-273,8241,-274,8250,-276,8239,-288,8247
,-294,12381,-296,8246,-297,8245,-301,8251,-59,12381
,4096,-58,8274,4096,-40,8275,12383,-256,8276,-266
,12470,-267,12470,-294,12470,-46,12468,-40,12470,-59
,12470,-58,12423,-94,12467,-91,12466,4096,12386,-256
,8279,-273,8288,-276,8284,-279,8291,-280,8286,-284
,8282,-290,8283,-298,8285,-43,8280,-45,8281,-40
,8290,-91,8292,4096,-273,8295,4096,-273,8295,4096
,-276,8299,4096,12399,-58,8302,4096,-46,8304,-94
,8305,-91,8303,12424,-91,8306,4096,-46,8307,4096
,-94,8308,4096,-59,8309,4096,-256,8201,-259,12315
,-261,8207,-271,12315,-277,8206,-285,12315,-293,8208
,-295,8209,4096,-40,8312,12324,-273,8322,-276,8319
,-280,8321,-290,8314,-298,8320,-43,8316,-45,8317
,4096,-258,8331,-268,8332,-273,8335,-276,8319,-280
,8321,-283,8327,-287,8334,-289,8333,-290,8314,-298
,8320,-43,8316,-45,8317,-40,8329,-94,8325,4096
,-273,8337,4096,12300,-276,8338,4096,-59,8342,4096
,12292,12373,12372,-256,8279,-273,8288,-276,8284,-279
,8291,-280,8286,-284,8282,-290,8283,-298,8285,-43
,8280,-45,8281,-40,8290,-91,8292,4096,12385,-267
,8347,-59,8272,4096,-257,8364,-262,8362,-275,8355
,-278,8363,-281,8348,-282,8358,-60,8353,-61,8352
,-62,8354,-43,8356,-45,8357,-124,8359,-42,8360
,-47,8361,-38,8365,4096,12401,12407,12408,12409,12410
,12411,12412,-256,8368,-257,12423,-262,12423,-263,12423
,-264,12423,-265,12423,-266,12423,-267,12423,-275,12423
,-278,12423,-281,12423,-282,12423,-291,12423,-292,12423
,-294,12423,-299,12423,-300,12423,-60,12423,-61,12423
,-62,12423,-43,12423,-45,12423,-124,12423,-42,12423
,-47,12423,-38,12423,-46,12468,-40,12471,-41,12423
,-59,12423,-44,12423,-58,12423,-94,12467,-91,12466
,-93,12423,4096,-40,8369,4096,-256,8279,-273,8288
,-276,8284,-279,8291,-280,8286,-284,8282,-290,8283
,-298,8285,-43,8280,-45,8281,-40,8290,-91,8292
,-93,8373,4096,-263,8376,-44,8377,4096,12459,-46
,12468,-94,12467,-91,12466,12423,-257,8364,-262,8362
,-263,8378,-275,8355,-278,8363,-282,8358,-60,8353
,-61,8352,-62,8354,-43,8356,-45,8357,-124,8359
,-42,8360,-47,8361,-38,8365,4096,-294,8379,-59
,8272,4096,-265,8380,-292,8381,4096,12394,-257,8364
,-262,8362,-275,8355,-278,8363,-282,8358,-291,8382
,-60,8353,-61,8352,-62,8354,-43,8356,-45,8357
,-124,8359,-42,8360,-47,8361,-38,8365,4096,-257
,8364,-262,8362,-275,8355,-278,8363,-282,8358,-60
,8353,-61,8352,-62,8354,-43,8356,-45,8357,-124
,8359,-42,8360,-47,8361,-38,8365,12398,-61,8383
,4096,-256,8279,-273,8288,-276,8284,-279,8291,-280
,8286,-284,8282,-290,8283,-298,8285,-43,8280,-45
,8281,-40,8290,-91,8292,4096,-273,8387,4096,12430
,12429,12317,-259,8213,-271,8218,-285,8217,4096,-58
,8392,12330,-271,8397,-273,8225,-285,8398,-295,8396
,4096,-59,8399,4096,12333,12334,-273,8322,-276,8319
,-280,8321,-298,8320,4096,12337,12338,12339,12340,12463
,-59,8402,4096,12343,-273,8403,4096,12345,-258,8331
,-268,8332,-287,8334,-289,8333,4096,12347,-264,8406
,4096,-91,8407,4096,-281,8408,4096,-281,8409,4096
,-273,8225,12360,-264,12463,12464,-59,8414,4096,12462
,12302,-59,8415,4096,-59,8416,4096,-59,8417,4096
,12290,12382,-41,8418,-44,8419,4096,12440,-257,8364
,-262,8362,-275,8355,-278,8363,-282,8358,-299,8422
,-300,8423,-60,8353,-61,8352,-62,8354,-43,8356
,-45,8357,-124,8359,-42,8360,-47,8361,-38,8365
,-58,8420,12431,12387,-256,8426,-267,12380,-273,8322
,-276,8319,-280,8321,-290,8314,-298,8320,-302,8428
,-43,8316,-45,8317,-59,12380,4096,12442,-61,8434
,-62,8433,12443,-61,8435,12444,12448,12449,12450,12451
,12452,12453,12454,12455,12456,12457,12458,-257,8364,-262
,8362,-278,8363,-42,8360,-47,8361,-38,8365,12403
,-257,8364,-262,8362,-278,8363,-42,8360,-47,8361
,-38,8365,12404,12413,-257,8364,-262,8362,-275,8355
,-278,8363,-282,8358,-60,8353,-61,8352,-62,8354
,-43,8356,-45,8357,-124,8359,-42,8360,-47,8361
,-38,8365,-41,8437,4096,12416,-44,8439,-93,8438
,4096,12418,12419,-257,8364,-262,8362,-264,8440,-275
,8355,-278,8363,-282,8358,-60,8353,-61,8352,-62
,8354,-43,8356,-45,8357,-124,8359,-42,8360,-47
,8361,-38,8365,12421,-273,8295,4096,-44,8450,-93
,8449,4096,-257,8364,-262,8362,-275,8355,-278,8363
,-282,8358,-60,8353,-61,8352,-62,8354,-43,8356
,-45,8357,-124,8359,-42,8360,-47,8361,-38,8365
,12438,12428,12469,-44,8450,-93,8451,4096,12427,-59
,8452,4096,-59,8453,4096,-41,8455,-59,8456,4096
,12331,-44,8264,-58,8457,4096,12304,12335,12336,12308
,12344,12346,-41,8461,-44,8264,4096,-273,8335,-276
,8319,-280,8321,-290,8314,-298,8320,-43,8316,-45
,8317,-40,8329,4096,-273,8335,-276,8319,-280,8321
,-290,8314,-298,8320,-43,8316,-45,8317,-40,8329
,4096,-267,8467,4096,-256,8470,-260,8471,-267,12362
,-41,12362,-59,8469,4096,12357,-44,8264,-58,8472
,4096,12312,12303,12307,12311,12384,-256,8279,-273,8288
,-276,8284,-279,8291,-280,8286,-284,8282,-290,8283
,-298,8285,-43,8280,-45,8281,-40,8290,-91,8292
,4096,12434,12436,12437,-256,8476,-267,8477,-59,8475
,4096,12374,12376,-44,8478,-58,8479,4096,12341,-257
,8364,-262,8362,-275,4096,-278,8363,-282,8358,-60
,4096,-61,4096,-62,4096,-43,8356,-45,8357,-124
,8359,-42,8360,-47,8361,-38,8365,12402,-257,8364
,-262,8362,-278,8363,-42,8360,-47,8361,-38,8365
,12405,12406,12445,12446,12447,-41,8481,-44,8419,4096
,12415,12417,-256,8279,-273,8288,-276,8284,-279,8291
,-280,8286,-284,8282,-290,8283,-298,8285,-43,8280
,-45,8281,-40,8290,-91,8292,4096,12389,12460,12390
,-257,8364,-262,8362,-275,8355,-278,8363,-282,8358
,-60,8353,-61,8352,-62,8354,-43,8356,-45,8357
,-124,8359,-42,8360,-47,8361,-38,8365,12391,-257
,8364,-262,8362,-263,8484,-275,8355,-278,8363,-282
,8358,-60,8353,-61,8352,-62,8354,-43,8356,-45
,8357,-124,8359,-42,8360,-47,8361,-38,8365,4096
,-257,8364,-262,8362,-263,8485,-275,8355,-278,8363
,-282,8358,-60,8353,-61,8352,-62,8354,-43,8356
,-45,8357,-124,8359,-42,8360,-47,8361,-38,8365
,4096,-266,8486,12395,-257,8364,-262,8362,-275,8355
,-278,8363,-282,8358,-60,8353,-61,8352,-62,8354
,-43,8356,-45,8357,-124,8359,-42,8360,-47,8361
,-38,8365,12400,12426,12425,12318,12320,12329,12323,-271
,8397,-273,8225,-285,8398,-295,8396,4096,-44,8264
,-58,8490,4096,-44,8264,-58,8491,4096,-44,8264
,12328,12348,12349,-44,8493,-93,8492,4096,12354,12351
,12352,12353,12356,-273,8225,12360,12359,-273,8496,4096
,12441,-257,8364,-262,8362,-275,8355,-278,8363,-282
,8358,-299,8422,-300,8423,-60,8353,-61,8352,-62
,8354,-43,8356,-45,8357,-124,8359,-42,8360,-47
,8361,-38,8365,-58,8498,12432,-273,8322,-276,8319
,-280,8321,-290,8314,-298,8320,-302,8428,-43,8316
,-45,8317,12380,12377,12388,12379,12414,12420,-257,8364
,-262,8362,-275,8355,-278,8363,-282,8358,-60,8353
,-61,8352,-62,8354,-43,8356,-45,8357,-124,8359
,-42,8360,-47,8361,-38,8365,12422,-256,8252,-259
,8243,-260,8244,-266,12381,-267,12381,-269,8248,-272
,8249,-273,8241,-274,8250,-276,8239,-288,8247,-294
,12381,-296,8246,-297,8245,-301,8251,-59,12381,4096
,-257,8364,-262,8362,-275,8355,-278,8363,-282,8358
,-60,8353,-61,8352,-62,8354,-43,8356,-45,8357
,-124,8359,-42,8360,-47,8361,-38,8365,12439,12332
,12325,-281,8508,4096,12358,-281,8510,4096,-58,8511
,12464,12361,12435,12375,12342,12378,12392,12393,12396,12326
,12327,12355,-273,8322,-276,8319,-280,8321,-290,8314
,-298,8320,-43,8316,-45,8317,12368,-273,8518,4096
,-257,8364,-262,8362,-275,8355,-278,8363,-282,8358
,-60,8353,-61,8352,-62,8354,-43,8356,-45,8357
,-124,8359,-42,8360,-47,8361,-38,8365,12433,12350
,-256,8520,-267,12363,-41,12363,-59,8519,4096,12365
,-44,8478,-58,8521,4096,-281,8522,4096,12464,-273
,8322,-276,8319,-280,8321,-290,8314,-298,8320,-43
,8316,-45,8317,12368,12367,-40,8524,4096,12366,-273
,8225,-41,8527,12360,-256,8520,-267,12364,-41,12364
,-59,8519,4096,-41,8528,4096,12370,12369,-1};
int yypact
[] {0,1,4,7,8,13,30,33,34,41
,42,43,44,63,82,101,104,109,114,119
,122,125,126,155,7,158,161,162,163,166
,167,170,171,176,177,178,183,184,187,188
,191,192,197,198,203,204,209,210,241,244
,247,268,126,269,294,269,126,297,300,269
,269,303,304,307,314,317,320,323,326,343
,346,361,361,390,393,394,346,361,361,397
,400,401,402,210,403,428,429,434,465,269
,269,466,467,468,469,470,471,472,543,269
,269,546,573,578,579,586,617,622,627,628
,659,688,691,716,719,691,716,720,721,722
,729,732,741,744,745,746,746,755,756,757
,758,759,760,763,764,767,768,777,119,778
,781,784,787,790,793,796,799,800,801,804
,807,810,811,812,817,818,853,854,269,269
,269,877,878,883,886,887,888,889,890,891
,892,893,894,895,896,897,910,923,403,924
,955,956,961,962,963,210,994,210,269,269
,269,210,269,997,1002,1031,1032,1033,1038,1039
,1042,361,1045,1050,1051,119,119,119,1056,1057
,1058,1059,1060,1061,1062,346,1067,361,1084,1101
,1104,1115,1116,1121,1122,1123,1124,1125,1126,269
,1151,1152,1153,1154,1161,1162,1163,210,1168,1169
,1198,1211,1212,1213,1214,1215,1220,1221,1222,269
,1247,1248,1249,1250,1279,1310,1341,1344,1373,269
,1374,1375,1376,1377,1378,1379,361,1388,1393,1398
,1401,1402,1403,1408,1409,1410,1411,1412,1413,1416
,1417,361,1420,1421,1456,1473,1474,346,210,1475
,1476,1477,1478,210,210,1507,1540,1569,1570,361
,361,1571,1084,1574,1575,1578,1581,269,1582,1583
,1584,1585,1586,1587,1588,1589,1590,361,1591,1592
,1607,1610,1639,1640,1649,1650,1655,1658,1659,1674
,1675,1592,1678,1679,1684,1693,1696,1697,-1};
int yyr1
[] {0,1,2,2,5,3,3,3,8,8
,8,8,9,13,13,10,10,10,10,11
,11,11,11,12,12,12,12,4,4,16
,16,18,17,19,19,20,20,23,23,23
,23,21,21,22,22,14,14,14,14,24
,24,24,24,26,26,15,15,15,15,27
,27,27,28,28,28,28,30,30,31,32
,32,32,34,34,33,33,33,35,35,35
,36,36,36,7,7,38,39,39,39,39
,40,40,40,37,37,37,37,37,37,37
,37,37,37,37,37,37,37,37,37,37
,37,37,43,44,44,44,44,44,44,44
,44,44,44,44,44,44,44,44,44,44
,44,51,51,52,52,46,46,53,53,53
,53,53,53,59,59,59,59,59,60,60
,55,55,42,42,47,47,47,47,47,47
,47,48,48,48,48,49,49,49,49,49
,49,45,45,6,6,25,29,61,54,58
int yyr2
[] {0,5,6,2,3,2,2,0,1,1
,1,1,3,1,3,5,5,2,2,5
,5,2,2,5,5,2,2,0,2,3
,5,1,5,1,1,3,0,3,4,4
,2,2,0,1,3,1,1,2,2,1
,1,1,1,1,3,1,2,1,2,1
,3,3,6,3,3,3,1,3,2,1
,3,2,0,3,0,4,6,1,3,2
,0,5,4,1,2,2,1,3,1,2
,3,2,0,0,3,1,4,2,1,3
,5,4,4,4,6,6,2,4,6,5
,2,1,4,1,3,2,2,3,3,1
,1,1,1,1,1,2,4,3,2,3
,2,1,3,1,3,1,1,4,4,3
,3,2,2,1,3,5,2,4,1,1
,1,3,1,3,1,1,1,2,2,2
,1,1,1,1,1,1,1,1,1,1
,1,1,3,1,3,1,1,1,1,1
int yygo
[] {0,-1,1,-1,2,23,67,-1,4,67
,118,-1,7,118,198,-1,19,13,31,17
,40,18,42,120,203,137,213,204,266,205
,267,206,268,264,203,-1,221,51,85,55
,105,-1,44,-1,8,-1,10,-1,11,-1
,12,-1,13,-1,34,69,121,75,147,156
,237,214,270,283,237,286,309,318,237,327
,237,330,237,-1,138,71,144,76,148,77
,149,200,262,216,273,265,297,280,305,298
,314,299,315,316,321,-1,131,-1,20,-1
,22,-1,23,-1,24,-1,119,-1,199,-1
,201,264,296,-1,202,124,208,125,209,-1
,123,-1,126,156,235,283,235,-1,324,215
,272,217,274,301,317,-1,132,135,212,-1
,134,279,303,319,325,-1,136,-1,271,332
,334,-1,218,-1,219,-1,276,277,302,-1
,220,330,333,-1,322,327,331,-1,323,46
,81,82,151,184,249,186,251,190,255,236
,288,287,310,292,311,293,312,294,313,-1
,45,-1,46,-1,232,283,308,-1,233,-1
,48,177,244,-1,152,56,106,-1,50,52
,86,54,104,58,108,59,109,88,174,89
,175,98,178,99,179,100,183,111,193,114
,193,157,238,158,239,159,240,187,252,188
,253,189,254,191,256,228,282,247,183,248
,291,258,295,306,320,-1,154,-1,101,21
,61,46,61,51,61,53,102,55,61,56
,61,82,61,184,61,185,250,186,61,190
,61,236,61,287,61,292,61,293,61,294
,61,-1,95,-1,157,-1,158,-1,159,-1
,97,-1,180,247,290,-1,182,-1,62,-1
,63,114,196,-1,192,-1,64,115,197,-1
,194,-1,65,227,281,-1,153,282,307,-1
int yypgo
[] {0,1,3,5,9,13,17,37,43,45
,47,49,51,53,55,75,97,99,101,103
,105,107,109,111,115,121,123,129,137,141
,147,149,153,155,157,161,165,169,191,193
,195,199,201,205,209,257,259,293,295,297
,299,301,303,307,309,311,315,317,321,323
case 175: return (identis(var
, CONST
)); break;
case 177: return (identis(var
, VAR
)); break;
case 178: return (identis(var
, ARRAY
)); break;
case 179: return (identis(var
, PTRFILE
)); break;
case 180: return (identis(var
, RECORD
)); break;
case 181: return (identis(var
, FIELD
)); break;
case 182: return (identis(var
, PROC
)); break;
case 183: return (identis(var
, FUNC
)); break;
return (identis(var
, VAR
));
return (identis(var
, TYPE
));