kotovalexarian-likes-github/ruby--ruby
1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00
Code Releases Activity
ruby--ruby/parse.c
matz 35247a52ef 990324 
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_3@409 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
1999-03-24 08:52:35 +00:00

7280 lines
227 KiB
C
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

/* A Bison parser, made from parse.y
by GNU Bison version 1.25.90
*/
#define YYBISON 1 /* Identify Bison output. */
#define kCLASS 257
#define kMODULE 258
#define kDEF 259
#define kUNDEF 260
#define kBEGIN 261
#define kRESCUE 262
#define kENSURE 263
#define kEND 264
#define kIF 265
#define kUNLESS 266
#define kTHEN 267
#define kELSIF 268
#define kELSE 269
#define kCASE 270
#define kWHEN 271
#define kWHILE 272
#define kUNTIL 273
#define kFOR 274
#define kBREAK 275
#define kNEXT 276
#define kREDO 277
#define kRETRY 278
#define kIN 279
#define kDO 280
#define kRETURN 281
#define kYIELD 282
#define kSUPER 283
#define kSELF 284
#define kNIL 285
#define kTRUE 286
#define kFALSE 287
#define kAND 288
#define kOR 289
#define kNOT 290
#define kIF_MOD 291
#define kUNLESS_MOD 292
#define kWHILE_MOD 293
#define kUNTIL_MOD 294
#define kALIAS 295
#define kDEFINED 296
#define klBEGIN 297
#define klEND 298
#define k__LINE__ 299
#define k__FILE__ 300
#define tIDENTIFIER 301
#define tFID 302
#define tGVAR 303
#define tIVAR 304
#define tCONSTANT 305
#define tINTEGER 306
#define tFLOAT 307
#define tSTRING 308
#define tXSTRING 309
#define tREGEXP 310
#define tDSTRING 311
#define tDXSTRING 312
#define tDREGEXP 313
#define tNTH_REF 314
#define tBACK_REF 315
#define tUPLUS 316
#define tUMINUS 317
#define tPOW 318
#define tCMP 319
#define tEQ 320
#define tEQQ 321
#define tNEQ 322
#define tGEQ 323
#define tLEQ 324
#define tANDOP 325
#define tOROP 326
#define tMATCH 327
#define tNMATCH 328
#define tDOT2 329
#define tDOT3 330
#define tAREF 331
#define tASET 332
#define tLSHFT 333
#define tRSHFT 334
#define tCOLON2 335
#define tCOLON3 336
#define tOP_ASGN 337
#define tASSOC 338
#define tLPAREN 339
#define tLBRACK 340
#define tLBRACE 341
#define tSTAR 342
#define tAMPER 343
#define tSYMBEG 344
#define LAST_TOKEN 345
#line 13 "parse.y"
#define YYDEBUG 1
#include "ruby.h"
#include "env.h"
#include "node.h"
#include "st.h"
#include <stdio.h>
#include <string.h>
#include <errno.h>
/* hack for bison */
#ifdef const
# undef const
#endif
#define ID_SCOPE_SHIFT 3
#define ID_SCOPE_MASK 0x07
#define ID_LOCAL 0x01
#define ID_INSTANCE 0x02
#define ID_GLOBAL 0x03
#define ID_ATTRSET 0x04
#define ID_CONST 0x05
#define is_id_notop(id) ((id)>LAST_TOKEN)
#define is_local_id(id) (is_id_notop(id)&&((id)&ID_SCOPE_MASK)==ID_LOCAL)
#define is_global_id(id) (is_id_notop(id)&&((id)&ID_SCOPE_MASK)==ID_GLOBAL)
#define is_instance_id(id) (is_id_notop(id)&&((id)&ID_SCOPE_MASK)==ID_INSTANCE)
#define is_attrset_id(id) (is_id_notop(id)&&((id)&ID_SCOPE_MASK)==ID_ATTRSET)
#define is_const_id(id) (is_id_notop(id)&&((id)&ID_SCOPE_MASK)==ID_CONST)
NODE *ruby_eval_tree_begin = 0;
NODE *ruby_eval_tree = 0;
char *ruby_sourcefile; /* current source file */
int ruby_sourceline; /* current line no. */
static int yylex();
static int yyerror();
static enum lex_state {
EXPR_BEG, /* ignore newline, +/- is a sign. */
EXPR_MID, /* newline significant, +/- is a sign. */
EXPR_END, /* newline significant, +/- is a operator. */
EXPR_ARG, /* newline significant, +/- is a operator. */
EXPR_FNAME, /* ignore newline, +/- is a operator, no reserved words. */
EXPR_DOT, /* immediate after `.', no reserved words. */
EXPR_CLASS, /* immediate after `class', no here document. */
} lex_state;
static int class_nest = 0;
static int in_single = 0;
static ID cur_mid = 0;
static int value_expr();
static NODE *cond();
static NODE *logop();
static NODE *newline_node();
static void fixpos();
static NODE *block_append();
static NODE *list_append();
static NODE *list_concat();
static NODE *arg_add();
static NODE *call_op();
static int in_defined = 0;
static NODE *arg_blk_pass();
static NODE *new_call();
static NODE *new_fcall();
static NODE *gettable();
static NODE *assignable();
static NODE *aryset();
static NODE *attrset();
static void rb_backref_error();
static NODE *match_gen();
static void local_push();
static void local_pop();
static int local_append();
static int local_cnt();
static int local_id();
static ID *local_tbl();
static struct RVarmap *dyna_push();
static void dyna_pop();
static int dyna_in_block();
#define cref_push() NEW_CREF()
static void cref_pop();
static NODE *cur_cref;
static void top_local_init();
static void top_local_setup();
#line 111 "parse.y"
typedef union {
NODE *node;
VALUE val;
ID id;
int num;
struct RVarmap *vars;
} YYSTYPE;
#include <stdio.h>
#ifndef __cplusplus
#ifndef __STDC__
#define const
#endif
#endif
#define YYFINAL 619
#define YYFLAG -32768
#define YYNTBASE 118
#define YYTRANSLATE(x) ((unsigned)(x) <= 345 ? yytranslate[x] : 207)
static const char yytranslate[] = { 0,
2, 2, 2, 2, 2, 2, 2, 2, 2, 116,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 104, 2, 2, 2, 103, 98, 2, 115,
110, 101, 99, 111, 100, 109, 102, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 93, 117, 95,
91, 94, 92, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
112, 2, 113, 97, 2, 114, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 107, 96, 108, 105, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 1, 3, 4, 5, 6,
7, 8, 9, 10, 11, 12, 13, 14, 15, 16,
17, 18, 19, 20, 21, 22, 23, 24, 25, 26,
27, 28, 29, 30, 31, 32, 33, 34, 35, 36,
37, 38, 39, 40, 41, 42, 43, 44, 45, 46,
47, 48, 49, 50, 51, 52, 53, 54, 55, 56,
57, 58, 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, 106
};
#if YYDEBUG != 0
static const short yyprhs[] = { 0,
0, 1, 4, 7, 8, 10, 14, 17, 20, 21,
26, 30, 34, 38, 41, 45, 49, 53, 57, 58,
64, 69, 71, 75, 78, 81, 83, 87, 91, 94,
97, 99, 102, 107, 112, 115, 117, 121, 123, 127,
129, 133, 136, 142, 145, 147, 151, 154, 156, 160,
162, 167, 171, 173, 175, 177, 179, 181, 183, 185,
187, 189, 190, 195, 197, 199, 201, 203, 205, 207,
209, 211, 213, 215, 217, 219, 221, 223, 225, 227,
229, 231, 233, 235, 237, 239, 241, 243, 245, 247,
249, 251, 253, 255, 257, 259, 261, 263, 265, 267,
269, 271, 273, 275, 277, 279, 281, 283, 285, 287,
289, 291, 293, 295, 297, 299, 301, 303, 305, 307,
309, 311, 313, 315, 317, 319, 321, 323, 325, 327,
329, 330, 335, 342, 348, 354, 358, 359, 364, 371,
377, 383, 387, 391, 395, 399, 403, 407, 411, 415,
419, 422, 425, 429, 433, 437, 441, 445, 449, 453,
457, 461, 465, 469, 473, 477, 480, 483, 487, 491,
495, 499, 500, 505, 511, 513, 515, 516, 519, 521,
524, 527, 533, 536, 539, 545, 550, 555, 563, 567,
569, 572, 575, 576, 578, 579, 581, 585, 587, 592,
595, 597, 598, 601, 603, 607, 610, 612, 614, 616,
618, 620, 622, 624, 629, 633, 637, 642, 646, 648,
653, 657, 659, 660, 667, 669, 672, 674, 677, 684,
691, 697, 703, 708, 716, 723, 727, 728, 735, 736,
744, 745, 751, 752, 759, 760, 761, 771, 773, 775,
777, 779, 781, 783, 786, 788, 790, 792, 798, 799,
802, 804, 806, 807, 810, 812, 816, 817, 823, 824,
830, 832, 834, 836, 838, 840, 845, 852, 856, 863,
867, 872, 874, 880, 882, 887, 890, 892, 894, 900,
901, 902, 905, 907, 910, 912, 914, 916, 918, 920,
922, 924, 926, 928, 930, 932, 934, 936, 938, 940,
942, 944, 946, 948, 950, 951, 956, 959, 964, 967,
974, 979, 984, 987, 992, 995, 998, 1000, 1001, 1003,
1007, 1011, 1013, 1017, 1020, 1023, 1026, 1027, 1029, 1034,
1035, 1038, 1041, 1043, 1047, 1051, 1053, 1055, 1057, 1059,
1061, 1063, 1065, 1066, 1068, 1069, 1071, 1072, 1074, 1076,
1078, 1080, 1082
};
static const short yyrhs[] = { -1,
119, 120, 0, 121, 202, 0, 0, 122, 0, 121,
206, 122, 0, 1, 122, 0, 172, 168, 0, 0,
41, 135, 123, 135, 0, 41, 49, 49, 0, 41,
49, 61, 0, 41, 49, 60, 0, 6, 136, 0,
122, 37, 125, 0, 122, 38, 125, 0, 122, 39,
125, 0, 122, 40, 125, 0, 0, 43, 124, 107,
120, 108, 0, 44, 107, 120, 108, 0, 125, 0,
127, 91, 151, 0, 27, 152, 0, 28, 152, 0,
126, 0, 125, 34, 125, 0, 125, 35, 125, 0,
36, 125, 0, 104, 126, 0, 140, 0, 199, 146,
0, 154, 109, 199, 146, 0, 154, 81, 199, 146,
0, 29, 146, 0, 129, 0, 85, 128, 110, 0,
129, 0, 85, 128, 110, 0, 131, 0, 131, 88,
133, 0, 131, 132, 0, 131, 132, 111, 88, 133,
0, 88, 133, 0, 133, 0, 85, 128, 110, 0,
130, 111, 0, 130, 0, 132, 111, 130, 0, 182,
0, 154, 112, 144, 113, 0, 154, 109, 47, 0,
184, 0, 47, 0, 51, 0, 47, 0, 51, 0,
48, 0, 138, 0, 139, 0, 135, 0, 0, 136,
111, 137, 135, 0, 75, 0, 96, 0, 97, 0,
98, 0, 65, 0, 66, 0, 67, 0, 73, 0,
94, 0, 69, 0, 95, 0, 70, 0, 79, 0,
80, 0, 99, 0, 100, 0, 101, 0, 88, 0,
102, 0, 103, 0, 64, 0, 105, 0, 62, 0,
63, 0, 77, 0, 78, 0, 114, 0, 45, 0,
46, 0, 43, 0, 44, 0, 41, 0, 34, 0,
7, 0, 21, 0, 16, 0, 3, 0, 5, 0,
42, 0, 26, 0, 15, 0, 14, 0, 10, 0,
9, 0, 33, 0, 20, 0, 37, 0, 25, 0,
4, 0, 22, 0, 31, 0, 36, 0, 35, 0,
23, 0, 8, 0, 24, 0, 27, 0, 30, 0,
29, 0, 13, 0, 32, 0, 6, 0, 38, 0,
40, 0, 17, 0, 39, 0, 28, 0, 0, 182,
91, 141, 140, 0, 154, 112, 144, 113, 91, 140,
0, 154, 109, 47, 91, 140, 0, 154, 109, 51,
91, 140, 0, 184, 91, 140, 0, 0, 182, 83,
142, 140, 0, 154, 112, 144, 113, 83, 140, 0,
154, 109, 47, 83, 140, 0, 154, 109, 51, 83,
140, 0, 184, 83, 140, 0, 140, 75, 140, 0,
140, 76, 140, 0, 140, 99, 140, 0, 140, 100,
140, 0, 140, 101, 140, 0, 140, 102, 140, 0,
140, 103, 140, 0, 140, 64, 140, 0, 62, 140,
0, 63, 140, 0, 140, 96, 140, 0, 140, 97,
140, 0, 140, 98, 140, 0, 140, 65, 140, 0,
140, 94, 140, 0, 140, 69, 140, 0, 140, 95,
140, 0, 140, 70, 140, 0, 140, 66, 140, 0,
140, 67, 140, 0, 140, 68, 140, 0, 140, 73,
140, 0, 140, 74, 140, 0, 104, 140, 0, 105,
140, 0, 140, 79, 140, 0, 140, 80, 140, 0,
140, 71, 140, 0, 140, 72, 140, 0, 0, 42,
203, 143, 140, 0, 140, 92, 140, 93, 140, 0,
154, 0, 145, 0, 0, 146, 203, 0, 126, 0,
150, 111, 0, 150, 148, 0, 150, 111, 88, 140,
148, 0, 197, 111, 0, 197, 148, 0, 197, 111,
88, 140, 148, 0, 150, 111, 197, 148, 0, 150,
111, 197, 111, 0, 150, 111, 197, 111, 88, 140,
148, 0, 88, 140, 148, 0, 147, 0, 89, 140,
0, 111, 147, 0, 0, 150, 0, 0, 140, 0,
150, 111, 140, 0, 150, 0, 150, 111, 88, 140,
0, 88, 140, 0, 146, 0, 0, 150, 204, 0,
179, 0, 154, 81, 51, 0, 82, 134, 0, 54,
0, 57, 0, 55, 0, 58, 0, 59, 0, 183,
0, 184, 0, 154, 112, 144, 113, 0, 86, 153,
113, 0, 87, 196, 108, 0, 27, 115, 152, 110,
0, 27, 115, 110, 0, 27, 0, 28, 115, 152,
110, 0, 28, 115, 110, 0, 28, 0, 0, 42,
203, 115, 155, 125, 110, 0, 48, 0, 199, 170,
0, 173, 0, 173, 170, 0, 11, 125, 162, 120,
164, 10, 0, 12, 125, 162, 120, 165, 10, 0,
18, 125, 163, 120, 10, 0, 19, 125, 163, 120,
10, 0, 16, 120, 174, 10, 0, 20, 166, 25,
125, 163, 120, 10, 0, 7, 120, 177, 165, 178,
10, 0, 85, 120, 110, 0, 0, 3, 134, 185,
156, 120, 10, 0, 0, 3, 79, 125, 205, 157,
120, 10, 0, 0, 4, 134, 158, 120, 10, 0,
0, 5, 135, 159, 187, 120, 10, 0, 0, 0,
5, 195, 201, 160, 135, 161, 187, 120, 10, 0,
21, 0, 22, 0, 23, 0, 24, 0, 205, 0,
13, 0, 205, 13, 0, 205, 0, 26, 0, 165,
0, 14, 125, 162, 120, 164, 0, 0, 15, 120,
0, 133, 0, 127, 0, 0, 96, 96, 0, 72,
0, 96, 166, 96, 0, 0, 26, 169, 167, 120,
10, 0, 0, 107, 171, 167, 120, 108, 0, 47,
0, 51, 0, 48, 0, 173, 0, 126, 0, 199,
115, 145, 110, 0, 154, 109, 199, 115, 145, 110,
0, 154, 109, 199, 0, 154, 81, 199, 115, 145,
110, 0, 154, 81, 200, 0, 29, 115, 145, 110,
0, 29, 0, 17, 175, 162, 120, 176, 0, 150,
0, 150, 111, 88, 140, 0, 88, 140, 0, 165,
0, 174, 0, 8, 149, 163, 120, 177, 0, 0,
0, 9, 120, 0, 181, 0, 90, 180, 0, 56,
0, 135, 0, 50, 0, 49, 0, 52, 0, 53,
0, 47, 0, 50, 0, 49, 0, 51, 0, 31,
0, 30, 0, 32, 0, 33, 0, 46, 0, 45,
0, 182, 0, 60, 0, 61, 0, 205, 0, 0,
95, 186, 125, 205, 0, 1, 205, 0, 115, 188,
203, 110, 0, 188, 205, 0, 189, 111, 191, 111,
192, 194, 0, 189, 111, 191, 194, 0, 189, 111,
192, 194, 0, 189, 194, 0, 191, 111, 192, 194,
0, 191, 194, 0, 192, 194, 0, 193, 0, 0,
47, 0, 189, 111, 47, 0, 47, 91, 140, 0,
190, 0, 191, 111, 190, 0, 88, 47, 0, 89,
47, 0, 111, 193, 0, 0, 183, 0, 115, 125,
203, 110, 0, 0, 197, 204, 0, 150, 204, 0,
198, 0, 197, 111, 198, 0, 140, 84, 140, 0,
47, 0, 51, 0, 48, 0, 47, 0, 48, 0,
109, 0, 81, 0, 0, 206, 0, 0, 116, 0,
0, 116, 0, 111, 0, 117, 0, 116, 0, 205,
0, 206, 117, 0
};
#endif
#if YYDEBUG != 0
static const short yyrline[] = { 0,
233, 242, 250, 252, 256, 260, 264, 269, 278, 279,
284, 290, 299, 304, 310, 316, 322, 332, 342, 350,
357, 365, 367, 373, 380, 385, 386, 390, 394, 399,
404, 406, 411, 417, 423, 431, 432, 437, 438, 443,
447, 451, 455, 459, 464, 465, 470, 475, 479, 484,
488, 492, 496, 502, 506, 508, 509, 510, 511, 516,
522, 526, 527, 531, 532, 533, 534, 535, 536, 537,
538, 539, 540, 541, 542, 543, 544, 545, 546, 547,
548, 549, 550, 551, 552, 553, 554, 555, 556, 557,
559, 559, 559, 559, 560, 560, 560, 560, 560, 560,
560, 561, 561, 561, 561, 561, 561, 561, 562, 562,
562, 562, 562, 562, 562, 563, 563, 563, 563, 563,
563, 563, 564, 564, 564, 564, 564, 564, 565, 565,
567, 568, 575, 580, 585, 590, 596, 597, 612, 627,
638, 649, 654, 658, 662, 666, 670, 674, 678, 682,
686, 690, 694, 698, 702, 706, 710, 714, 718, 722,
726, 730, 734, 738, 742, 746, 751, 755, 759, 763,
767, 771, 772, 776, 782, 787, 795, 799, 801, 806,
810, 814, 819, 823, 828, 833, 838, 842, 847, 852,
854, 860, 864, 869, 870, 875, 880, 886, 898, 903,
909, 923, 927, 929, 933, 938, 942, 946, 947, 951,
952, 953, 954, 955, 960, 968, 972, 979, 985, 991,
996, 1000, 1004, 1004, 1009, 1013, 1018, 1019, 1028, 1037,
1046, 1054, 1062, 1070, 1078, 1098, 1102, 1112, 1120, 1127,
1135, 1144, 1152, 1160, 1169, 1170, 1177, 1185, 1189, 1193,
1197, 1202, 1203, 1204, 1206, 1207, 1209, 1210, 1219, 1223,
1228, 1229, 1231, 1235, 1239, 1243, 1248, 1253, 1261, 1266,
1273, 1277, 1281, 1285, 1286, 1288, 1293, 1299, 1305, 1311,
1316, 1322, 1330, 1337, 1338, 1343, 1349, 1350, 1352, 1359,
1364, 1368, 1373, 1374, 1378, 1380, 1381, 1382, 1384, 1385,
1387, 1388, 1389, 1390, 1391, 1392, 1393, 1394, 1395, 1396,
1398, 1403, 1404, 1406, 1410, 1414, 1418, 1420, 1425, 1430,
1434, 1438, 1442, 1446, 1450, 1454, 1458, 1462, 1467, 1474,
1482, 1489, 1494, 1499, 1506, 1511, 1515, 1520, 1533, 1551,
1555, 1559, 1567, 1568, 1573, 1578, 1579, 1580, 1582, 1583,
1585, 1586, 1588, 1589, 1591, 1592, 1594, 1595, 1596, 1598,
1599, 1601, 1602
};
#endif
#if YYDEBUG != 0 || defined (YYERROR_VERBOSE)
static const char * const yytname[] = { "$","error","$undefined.","kCLASS",
"kMODULE","kDEF","kUNDEF","kBEGIN","kRESCUE","kENSURE","kEND","kIF","kUNLESS",
"kTHEN","kELSIF","kELSE","kCASE","kWHEN","kWHILE","kUNTIL","kFOR","kBREAK","kNEXT",
"kREDO","kRETRY","kIN","kDO","kRETURN","kYIELD","kSUPER","kSELF","kNIL","kTRUE",
"kFALSE","kAND","kOR","kNOT","kIF_MOD","kUNLESS_MOD","kWHILE_MOD","kUNTIL_MOD",
"kALIAS","kDEFINED","klBEGIN","klEND","k__LINE__","k__FILE__","tIDENTIFIER",
"tFID","tGVAR","tIVAR","tCONSTANT","tINTEGER","tFLOAT","tSTRING","tXSTRING",
"tREGEXP","tDSTRING","tDXSTRING","tDREGEXP","tNTH_REF","tBACK_REF","tUPLUS",
"tUMINUS","tPOW","tCMP","tEQ","tEQQ","tNEQ","tGEQ","tLEQ","tANDOP","tOROP","tMATCH",
"tNMATCH","tDOT2","tDOT3","tAREF","tASET","tLSHFT","tRSHFT","tCOLON2","tCOLON3",
"tOP_ASGN","tASSOC","tLPAREN","tLBRACK","tLBRACE","tSTAR","tAMPER","tSYMBEG",
"'='","'?'","':'","'>'","'<'","'|'","'^'","'&'","'+'","'-'","'*'","'/'","'%'",
"'!'","'~'","LAST_TOKEN","'{'","'}'","'.'","')'","','","'['","']'","'`'","'('",
"'\\n'","';'","program","@1","compstmt","stmts","stmt","@2","@3","expr","command_call",
"mlhs","mlhs_entry","mlhs_basic","mlhs_item","mlhs_head","mlhs_tail","lhs","cname",
"fname","undef_list","@4","op","reswords","arg","@5","@6","@7","aref_args","opt_call_args",
"call_args","block_arg","opt_block_arg","opt_list","args","mrhs","ret_args",
"array","primary","@8","@9","@10","@11","@12","@13","@14","then","do","if_tail",
"opt_else","iter_var","opt_iter_var","iter_do_block","@15","iter_block","@16",
"iterator","method_call","case_body","when_args","cases","rescue","ensure","literal",
"symbol","numeric","variable","var_ref","backref","superclass","@17","f_arglist",
"f_args","f_arg","f_opt","f_optarg","f_rest_arg","f_block_arg","opt_f_block_arg",
"singleton","assoc_list","assocs","assoc","operation","operation2","dot_or_colon",
"opt_terms","opt_nl","trailer","term","terms", NULL
};
#endif
static const short yyr1[] = { 0,
119, 118, 120, 121, 121, 121, 121, 122, 123, 122,
122, 122, 122, 122, 122, 122, 122, 122, 124, 122,
122, 122, 125, 125, 125, 125, 125, 125, 125, 125,
125, 126, 126, 126, 126, 127, 127, 128, 128, 129,
129, 129, 129, 129, 130, 130, 131, 132, 132, 133,
133, 133, 133, 134, 134, 135, 135, 135, 135, 135,
136, 137, 136, 138, 138, 138, 138, 138, 138, 138,
138, 138, 138, 138, 138, 138, 138, 138, 138, 138,
138, 138, 138, 138, 138, 138, 138, 138, 138, 138,
139, 139, 139, 139, 139, 139, 139, 139, 139, 139,
139, 139, 139, 139, 139, 139, 139, 139, 139, 139,
139, 139, 139, 139, 139, 139, 139, 139, 139, 139,
139, 139, 139, 139, 139, 139, 139, 139, 139, 139,
141, 140, 140, 140, 140, 140, 142, 140, 140, 140,
140, 140, 140, 140, 140, 140, 140, 140, 140, 140,
140, 140, 140, 140, 140, 140, 140, 140, 140, 140,
140, 140, 140, 140, 140, 140, 140, 140, 140, 140,
140, 143, 140, 140, 140, 144, 145, 145, 146, 146,
146, 146, 146, 146, 146, 146, 146, 146, 146, 146,
147, 148, 148, 149, 149, 150, 150, 151, 151, 151,
152, 153, 153, 154, 154, 154, 154, 154, 154, 154,
154, 154, 154, 154, 154, 154, 154, 154, 154, 154,
154, 154, 155, 154, 154, 154, 154, 154, 154, 154,
154, 154, 154, 154, 154, 154, 156, 154, 157, 154,
158, 154, 159, 154, 160, 161, 154, 154, 154, 154,
154, 162, 162, 162, 163, 163, 164, 164, 165, 165,
166, 166, 167, 167, 167, 167, 169, 168, 171, 170,
172, 172, 172, 172, 172, 173, 173, 173, 173, 173,
173, 173, 174, 175, 175, 175, 176, 176, 177, 177,
178, 178, 179, 179, 179, 180, 180, 180, 181, 181,
182, 182, 182, 182, 182, 182, 182, 182, 182, 182,
183, 184, 184, 185, 186, 185, 185, 187, 187, 188,
188, 188, 188, 188, 188, 188, 188, 188, 189, 189,
190, 191, 191, 192, 193, 194, 194, 195, 195, 196,
196, 196, 197, 197, 198, 199, 199, 199, 200, 200,
201, 201, 202, 202, 203, 203, 204, 204, 204, 205,
205, 206, 206
};
static const short yyr2[] = { 0,
0, 2, 2, 0, 1, 3, 2, 2, 0, 4,
3, 3, 3, 2, 3, 3, 3, 3, 0, 5,
4, 1, 3, 2, 2, 1, 3, 3, 2, 2,
1, 2, 4, 4, 2, 1, 3, 1, 3, 1,
3, 2, 5, 2, 1, 3, 2, 1, 3, 1,
4, 3, 1, 1, 1, 1, 1, 1, 1, 1,
1, 0, 4, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
0, 4, 6, 5, 5, 3, 0, 4, 6, 5,
5, 3, 3, 3, 3, 3, 3, 3, 3, 3,
2, 2, 3, 3, 3, 3, 3, 3, 3, 3,
3, 3, 3, 3, 3, 2, 2, 3, 3, 3,
3, 0, 4, 5, 1, 1, 0, 2, 1, 2,
2, 5, 2, 2, 5, 4, 4, 7, 3, 1,
2, 2, 0, 1, 0, 1, 3, 1, 4, 2,
1, 0, 2, 1, 3, 2, 1, 1, 1, 1,
1, 1, 1, 4, 3, 3, 4, 3, 1, 4,
3, 1, 0, 6, 1, 2, 1, 2, 6, 6,
5, 5, 4, 7, 6, 3, 0, 6, 0, 7,
0, 5, 0, 6, 0, 0, 9, 1, 1, 1,
1, 1, 1, 2, 1, 1, 1, 5, 0, 2,
1, 1, 0, 2, 1, 3, 0, 5, 0, 5,
1, 1, 1, 1, 1, 4, 6, 3, 6, 3,
4, 1, 5, 1, 4, 2, 1, 1, 5, 0,
0, 2, 1, 2, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 0, 4, 2, 4, 2, 6,
4, 4, 2, 4, 2, 2, 1, 0, 1, 3,
3, 1, 3, 2, 2, 2, 0, 1, 4, 0,
2, 2, 1, 3, 3, 1, 1, 1, 1, 1,
1, 1, 0, 1, 0, 1, 0, 1, 1, 1,
1, 1, 2
};
static const short yydefact[] = { 1,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 248, 249, 250, 251, 219, 222, 282,
306, 305, 307, 308, 0, 0, 355, 19, 0, 310,
309, 346, 348, 303, 302, 347, 299, 300, 207, 209,
295, 208, 210, 211, 312, 313, 0, 0, 0, 0,
202, 340, 0, 0, 0, 0, 2, 353, 5, 22,
26, 0, 36, 0, 40, 45, 31, 175, 0, 227,
204, 293, 311, 212, 213, 0, 7, 54, 55, 0,
0, 241, 100, 112, 101, 125, 97, 118, 107, 106,
123, 105, 104, 99, 128, 109, 98, 113, 117, 119,
111, 103, 120, 130, 122, 121, 114, 124, 108, 96,
116, 115, 110, 126, 129, 127, 95, 102, 93, 94,
91, 92, 56, 58, 57, 86, 87, 84, 68, 69,
70, 73, 75, 71, 64, 88, 89, 76, 77, 81,
72, 74, 65, 66, 67, 78, 79, 80, 82, 83,
85, 90, 0, 243, 59, 60, 311, 338, 0, 121,
114, 124, 108, 91, 92, 56, 57, 61, 14, 290,
301, 225, 304, 0, 26, 227, 0, 0, 0, 0,
219, 222, 282, 355, 262, 261, 0, 0, 50, 53,
0, 0, 0, 0, 0, 0, 179, 196, 201, 190,
193, 24, 175, 311, 213, 193, 343, 0, 25, 177,
35, 29, 0, 9, 356, 172, 0, 0, 151, 175,
152, 206, 0, 0, 0, 36, 196, 357, 0, 357,
0, 357, 44, 298, 297, 296, 294, 30, 166, 167,
361, 360, 3, 362, 354, 0, 0, 0, 0, 0,
0, 0, 47, 0, 0, 48, 42, 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, 177, 267, 8, 269, 228,
137, 131, 0, 0, 177, 32, 226, 0, 0, 315,
237, 314, 0, 355, 328, 352, 351, 245, 62, 195,
259, 253, 0, 252, 0, 0, 0, 256, 0, 255,
0, 0, 0, 0, 177, 0, 193, 191, 218, 0,
0, 180, 181, 0, 177, 183, 184, 221, 0, 0,
355, 11, 13, 12, 0, 223, 0, 0, 0, 0,
0, 236, 37, 359, 358, 203, 215, 342, 216, 359,
341, 363, 6, 15, 16, 17, 18, 27, 28, 0,
198, 23, 0, 41, 0, 150, 156, 161, 162, 163,
158, 160, 170, 171, 164, 165, 143, 144, 168, 169,
0, 157, 159, 153, 154, 155, 145, 146, 147, 148,
149, 349, 350, 205, 0, 280, 346, 348, 347, 278,
0, 176, 263, 263, 0, 0, 142, 136, 0, 239,
317, 0, 0, 0, 0, 329, 0, 0, 328, 0,
0, 337, 332, 337, 337, 327, 0, 0, 0, 194,
0, 291, 259, 254, 259, 0, 284, 0, 233, 0,
0, 0, 52, 347, 278, 0, 0, 0, 189, 217,
345, 0, 197, 192, 193, 346, 0, 0, 0, 344,
220, 281, 178, 10, 0, 173, 0, 21, 37, 197,
200, 0, 46, 0, 49, 0, 177, 34, 0, 0,
0, 0, 177, 33, 214, 265, 0, 0, 0, 138,
132, 276, 0, 0, 0, 242, 339, 0, 334, 335,
355, 0, 319, 0, 323, 0, 325, 0, 326, 246,
63, 0, 0, 260, 0, 0, 0, 0, 257, 0,
286, 0, 0, 231, 232, 51, 0, 193, 187, 186,
214, 193, 0, 20, 0, 43, 174, 0, 140, 134,
141, 135, 0, 0, 0, 264, 0, 0, 0, 0,
316, 238, 331, 0, 244, 330, 337, 337, 336, 0,
333, 337, 328, 290, 292, 235, 0, 229, 230, 0,
259, 0, 182, 0, 185, 224, 199, 279, 277, 139,
133, 266, 268, 270, 240, 318, 0, 321, 322, 324,
0, 289, 0, 285, 287, 288, 283, 234, 193, 337,
0, 259, 188, 320, 247, 258, 0, 0, 0
};
static const short yydefgoto[] = { 617,
1, 224, 58, 59, 345, 217, 60, 61, 62, 225,
63, 64, 65, 257, 66, 81, 154, 169, 438, 155,
156, 67, 416, 415, 347, 411, 412, 341, 200, 333,
439, 201, 372, 202, 229, 220, 475, 423, 503, 303,
305, 437, 573, 313, 319, 528, 529, 188, 498, 288,
413, 290, 414, 69, 176, 317, 448, 607, 311, 526,
71, 237, 72, 204, 74, 205, 301, 422, 430, 431,
432, 433, 434, 435, 569, 515, 159, 231, 206, 207,
191, 406, 308, 243, 216, 356, 314, 245
};
static const short yypact[] = {-32768,
1542, 4807, 38, 69, 3109, 4513, 2043, 4897, 4897, 2515,
4897, 4897, 5975,-32768,-32768,-32768,-32768, 3574, 3664, 3754,
-32768,-32768,-32768,-32768, 4897, 4410, -48,-32768, -23,-32768,
-32768, 1716, 1926,-32768,-32768, 1821,-32768,-32768,-32768,-32768,
-32768,-32768,-32768,-32768,-32768,-32768, 5707, 5707, 69, 2606,
5707, 5707, 6239, 4307, 5797, 5707,-32768, 123, 348, 336,
108, 82,-32768, 43, 6063,-32768, 6278, 78, 157, 40,
-32768,-32768, 83,-32768, 199, 3214, 348,-32768,-32768, 4897,
41,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,
-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,
-32768,-32768,-32768,-32768,-32768, 90, 105, 142, 182,-32768,
-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,
191, 206, 226,-32768, 230,-32768,-32768,-32768,-32768,-32768,
-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,
-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,
-32768,-32768, 4897,-32768,-32768,-32768,-32768,-32768, 240,-32768,
-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768, 85, 122,
3304, 3394, 3484, 48,-32768, 109, 48, 186, 52, 52,
106, 110, 126, -48,-32768, 141, 96, 194, 117, 146,
63, 2714, 5707, 5707, 5707, 4617,-32768, 690,-32768,-32768,
166,-32768, 147, 193, 195, 208,-32768, 4712,-32768, 4987,
-32768,-32768, 62,-32768,-32768, 202, 150, 2822, 286, 162,
286,-32768, 2606, 250, 252, 255, 6278, -13, 278, -13,
265, 104,-32768,-32768,-32768,-32768,-32768,-32768, 286, 286,
-32768,-32768,-32768,-32768, 3004, 4897, 4897, 4897, 4897, 4897,
4897, 5347,-32768, 2606, 6239,-32768, 282, 5707, 5707, 5707,
5707, 5707, 5707, 5707, 5707, 5707, 5707, 5707, 5707, 5707,
5707, 5707, 5707, 5707, 5707, 5707, 5707, 5707, 5707, 5707,
5707, 5707, 5707, 308, 310, 4987,-32768,-32768,-32768,-32768,
-32768,-32768, 5707, 5707, 4987,-32768,-32768, 11, 123,-32768,
-32768,-32768, 2913, 35, 3,-32768,-32768,-32768,-32768, 5707,
379,-32768, 2151, 382, 2333, 5437, 386,-32768, 2913,-32768,
2913, 202, 308, 316, 4987, 4897, 1569, 6278,-32768, 288,
5707, 5077,-32768, 321, 4987, 5167,-32768,-32768, 289, 290,
-48,-32768,-32768,-32768, 4513,-32768, 5707, 2822, 295, 321,
297,-32768, 294, 5707,-32768,-32768,-32768,-32768,-32768, 5707,
-32768,-32768, 348, 336, 336, 336, 336,-32768,-32768, 5707,
299,-32768, 301,-32768, 6151, 286, 1062, 1062, 1062, 1062,
539, 539, 1304, 993, 1062, 1062, 1252, 1252, -6, -6,
6238, 539, 539, 229, 229, 133, 99, 99, 286, 286,
286, 3844, 3934, 4024, 4114,-32768, 205,-32768, 253, 4204,
300,-32768, 5, 5, 5707, 5707, 6278, 6278, 307,-32768,
-32768, 4897, 2913, 408, 313, 333, 380, 383, 20, 2913,
123, 315,-32768, 320, 325,-32768, 4513, 4513, 8, 326,
2424, 423, 368,-32768, 379, 5707, 328, 27,-32768, 432,
434, 331, -5,-32768, 332, 335, 52, 361,-32768,-32768,
6278, 5707, 690,-32768, 341, 260, 344, 5707, 690,-32768,
-32768,-32768,-32768,-32768, 4897, 6278, 350,-32768, 279, 6278,
6278, 5527,-32768, 6239,-32768, 5707, 4987,-32768, 5707, 5707,
5707, 5707, 4987,-32768, 222,-32768, 5887, 2913, 2822, 6278,
6278,-32768, 2913, 11, 449,-32768,-32768, 5707,-32768,-32768,
-48, 450,-32768, 24,-32768, 26,-32768, 372,-32768,-32768,
-32768, 2043, 5707,-32768, 2913, 452, 4897, 453,-32768, 456,
6278, 5617, 2242,-32768,-32768, 180, 2913, 1569, 5257,-32768,
263, 1569, 46,-32768, 5707,-32768, 6278, 357, 6278, 6278,
6278, 6278, 358, 5707, 5707,-32768, 373, 460, 363, 462,
-32768,-32768, 6278, 365,-32768, 333, 362, 325,-32768, 333,
-32768, 325, 3, 122,-32768,-32768, 48,-32768,-32768, 5707,
118, 466,-32768, 5707,-32768,-32768, 6278,-32768,-32768, 6278,
6278,-32768,-32768,-32768,-32768,-32768, 26,-32768,-32768,-32768,
2913,-32768, 2151, 6278,-32768,-32768,-32768,-32768, 1569, 325,
469, 368,-32768,-32768,-32768,-32768, 481, 482,-32768
};
static const short yypgoto[] = {-32768,
-32768, 549,-32768, 30,-32768,-32768, 19, 1282, -9, -149,
-12, -52,-32768,-32768, 7, 39, -3,-32768,-32768,-32768,
-32768, 929,-32768,-32768,-32768, -235, -189, -4, -279, -201,
-32768, -15,-32768, 22,-32768, -1,-32768,-32768,-32768,-32768,
-32768,-32768,-32768, -175, -158, -128, -278, -7, 87,-32768,
-32768, -29,-32768,-32768, 174, -69,-32768,-32768, -61,-32768,
-32768,-32768,-32768, 498, 509, 581,-32768,-32768, -58, 88,
-32768, -468, 2, -451, -276, -379,-32768,-32768, -26, -301,
130,-32768,-32768,-32768, -159, -111, -19,-32768
};
#define YYLAST 6381
static const short yytable[] = { 68,
68, 315, 168, 185, 337, 68, 68, 68, 68, 68,
68, 187, 256, 199, 199, 211, 203, 203, 203, 186,
340, 321, 214, 68, 322, 232, 174, 177, 436, 179,
180, 77, 442, 318, 470, 228, 230, 226, 244, 312,
209, 299, 82, 212, 250, 251, 297, 571, 68, 426,
236, 187, 464, 203, 517, 519, 464, 258, 470, 233,
312, 302, 568, 187, 572, -274, 426, 215, 250, 251,
566, 296, 570, 351, 203, -346, 496, 318, 68, 250,
251, 250, 251, 218, 78, 250, 251, 222, 79, 456,
427, 428, 279, 280, 281, 282, 283, 354, 298, 467,
497, -346, 355, -346, 373, 419, -346, 427, 428, -346,
342, 427, 428, 427, 428, 78, 80, 429, 358, 79,
361, 343, 344, 241, 242, 459, 241, 242, 571, 310,
76, 76, 441, -275, 316, 300, 76, 76, 76, 76,
76, 76, 241, 242, 425, 610, 289, 76, 76, 76,
215, 68, 436, 253, 76, 586, 241, 242, 284, 320,
320, 297, 258, 241, 242, 291, 530, 241, 242, 289,
-306, 304, 252, 292, 70, 70, 323, 295, 464, 76,
70, 473, 287, 70, 76, -305, 285, 598, 599, 286,
68, 199, 600, -50, 203, 309, 258, -311, -306, 281,
282, 283, 316, 199, 324, 76, 203, 325, 203, 76,
226, 271, 272, -305, 360, 289, 68, 330, 326, 355,
196, 68, -307, 70, 208, -311, -213, 284, -311, 339,
614, 279, 280, 281, 282, 283, 371, 470, 241, 242,
210, 226, 323, 68, 68, 68, 68, 68, 68, 68,
-307, -45, 68, 187, -213, 334, 348, -213, 335, 464,
-214, 374, -308, 540, 364, 365, 366, 367, 368, 369,
350, -310, 533, 335, 363, 291, 332, 293, 420, 421,
522, 293, 76, 292, 203, 294, -309, 489, -214, 294,
-308, -214, 258, 203, 440, 490, 436, 548, 537, -310,
447, 68, 605, 553, 554, 465, -301, 271, 272, -53,
-304, 68, 555, 68, -309, -52, 346, 68, 336, 68,
306, 76, 485, 203, 68, 76, 278, 279, 280, 281,
282, 283, -51, 203, -301, 491, 583, 76, -304, 76,
585, 474, 489, 492, 457, 554, 68, 76, 307, 258,
490, 564, 76, 555, 402, 403, 407, 408, 404, 352,
409, 353, 453, 408, -38, 70, 454, 466, 408, 250,
251, 409, 359, 187, 76, 76, 76, 76, 76, 76,
76, 527, 441, 76, 246, 247, 248, 249, -39, -46,
357, 70, 375, 441, 444, 449, 70, 460, 471, 472,
488, 603, 478, 203, -46, 494, 479, 613, 203, 482,
483, 513, 495, 405, 410, 76, 502, 506, 70, 320,
68, 68, 507, 508, 76, 514, 509, 70, 68, 510,
516, 525, 76, 520, 521, 518, 523, 320, 532, 68,
504, 534, 76, 535, 76, 487, 493, 536, 76, 194,
76, 539, 452, 455, 76, 76, 541, 544, 562, 565,
428, 576, 578, 410, 76, 579, 588, 589, 592, 593,
594, 595, 597, 68, 596, 608, 70, 76, 615, 455,
618, 619, 187, 616, 561, 203, 70, 185, 70, 557,
546, 203, 70, 543, 70, 187, 68, 68, 73, 73,
499, 68, 157, 186, 73, 73, 73, 73, 73, 73,
189, 606, 602, 158, 601, 567, 511, 0, 0, 0,
68, 70, 73, 68, 0, 68, 0, 0, 0, 0,
0, 68, 0, 0, 76, 68, 0, 0, 0, 76,
0, 0, 0, 0, 0, 577, 0, 73, 0, 57,
189, 76, 76, 0, 0, 170, 0, 0, 178, 76,
0, 0, 189, 0, 0, 0, 0, 0, 0, 0,
76, 0, 0, 0, 0, 0, 0, 73, 0, 0,
0, 75, 75, 0, 0, 0, 0, 75, 75, 75,
75, 75, 75, 190, 0, 0, 70, 0, 0, 68,
0, 68, 258, 70, 76, 75, 0, 0, 0, 0,
0, 0, 0, 0, 70, 0, 76, 271, 272, 0,
0, 0, 76, 0, 0, 0, 0, 76, 76, 0,
75, 0, 76, 190, 276, 277, 278, 279, 280, 281,
282, 283, 0, 0, 0, 190, 0, 0, 0, 0,
73, 76, 0, 0, 76, 0, 76, 0, 0, 0,
75, 0, 76, 0, 0, 0, 76, 0, 0, 0,
0, 70, 70, 0, 0, 0, 70, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 73,
0, 0, 0, 0, 0, 70, 0, 0, 70, 0,
0, 0, 0, 0, 0, 0, 70, 0, 0, 0,
70, 0, 0, 0, 0, 73, 0, 0, 0, 0,
73, 0, 0, 0, 0, 0, 0, 0, 0, 0,
76, 0, 76, 75, 0, 0, 0, 0, 0, 0,
0, 0, 73, 73, 73, 73, 73, 73, 73, 0,
0, 73, 189, 258, 259, 260, 261, 262, 263, 264,
265, 266, 267, 268, 269, 270, 349, 0, 271, 272,
0, 0, 75, 331, 70, 0, 70, 0, 0, 0,
0, 273, 0, 274, 275, 276, 277, 278, 279, 280,
281, 282, 283, 0, 0, 0, 0, 0, 75, 0,
73, 0, 0, 75, 0, 0, 0, 0, 0, 0,
73, 0, 73, 0, 0, 0, 73, 0, 73, 0,
0, 0, 0, 73, 0, 75, 75, 75, 75, 75,
75, 75, 0, 0, 75, 190, 0, 0, 0, 0,
0, 0, 0, 0, 0, 73, 0, 0, 0, 0,
0, 424, 0, 0, 0, 0, 0, 0, 0, 0,
0, 443, 0, 445, 0, 0, 0, 450, 0, 451,
0, 0, 189, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 75, 0, 0, 0, 0, 0, 0,
0, 0, 0, 75, 0, 75, 477, 0, 0, 75,
0, 75, 0, 0, 0, 0, 75, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 73,
73, 0, 0, 0, 0, 0, 0, 73, 75, 0,
0, 0, 0, 0, 0, 0, 0, 0, 73, 0,
0, 0, 0, 0, 0, 0, 198, 198, 198, 0,
0, 0, 0, 0, 0, 190, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 505, 73, 0, 0, 219, 221, 0, 512, 227,
198, 189, 0, 239, 240, 0, 0, 0, 0, 524,
0, 0, 0, 0, 189, 73, 73, 0, 0, 0,
73, 0, 75, 75, 198, 0, 0, 0, 0, 0,
75, 0, 0, 0, 0, 0, 0, 0, 0, 73,
0, 75, 73, 0, 73, 0, 0, 0, 0, 0,
73, 0, 0, 0, 73, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 558, 559, 0, 0,
0, 560, 0, 0, 0, 75, 258, 259, 260, 261,
262, 263, 264, 265, 190, 267, 268, 0, 0, 0,
574, 271, 272, 575, 0, 0, 0, 190, 75, 75,
0, 581, 0, 75, 0, 582, 274, 275, 276, 277,
278, 279, 280, 281, 282, 283, 0, 0, 73, 0,
73, 0, 75, 0, 0, 75, 0, 75, 0, 0,
0, 0, 0, 75, 0, 0, 0, 75, 0, 0,
0, 327, 328, 239, 198, 258,-32768,-32768,-32768,-32768,
263, 264, 0, 0,-32768,-32768, 198, 0, 198, 0,
271, 272, 0, 0, 0, 0, 0, 0, 0, 611,
0, 612, 0, 0, 0, 274, 275, 276, 277, 278,
279, 280, 281, 282, 283, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
227, 75, 0, 75, 0, 0, 376, 377, 378, 379,
380, 381, 382, 383, 384, 385, 386, 387, 388, 389,
390, 391, 392, 393, 394, 395, 396, 397, 398, 399,
400, 401, 0, 0, 198, 0, 0, 0, 0, 0,
0, 417, 418, 198, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 227, 0,
0, 0, 0, 0, 227, 0, 0, 0, 0, 0,
0, 0, 0, 198, 0, 0, 0, 0, 0, 461,
463, 0, 0, 198, 469, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 476, 0, 0, 0, 0,
0, 0, 480, 0, 0, 0, 0, 0, 469, 175,
175, 0, 175, 175, 0, 0, 0, 0, 481, 197,
197, 197, 0, 0, 0, 0, 175, 0, 0, 0,
0, 0, 0, 0, 0, 258, 259, 260, 261, 262,
263, 264, 265, 266, 267, 268,-32768,-32768, 0, 0,
271, 272, 0, 198, 0, 0, 238, 0, 198, 0,
0, 0, 0, 500, 501, 274, 275, 276, 277, 278,
279, 280, 281, 282, 283, 0, 0, 197, 0, 0,
0, 175, 0, 0, 0, 0, 0, 258, 259, 260,
261, 262, 263, 264, 531, 0, 267, 268, 0, 0,
0, 0, 271, 272, 0, 0, 0, 0, 0, 0,
538, 0, 0, 0, 0, 0, 542, 274, 275, 276,
277, 278, 279, 280, 281, 282, 283, 0, 0, 0,
480, 0, 0, 0, 547, 198, 0, 549, 550, 551,
552, 198, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 175, 0, 563, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 480, 0, 0, 0, 0, 0, 0, 0, 0,
480, 0, 0, 0, 0, 0, 0, 469, 0, 0,
0, 0, 0, 587, 0, 0, 0, 197, 0, 0,
0, 0, 590, 591, 0, 0, 0, 0, 0, 197,
0, 197, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 604, 0,
0, 0, 609, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 175, 175, 175,
175, 175, 175, 0, 0, 0, 0, 0, 0, 0,
0, -4, 2, 0, 3, 4, 5, 6, 7, 0,
0, 0, 8, 9, 0, 0, 0, 10, 0, 11,
12, 13, 14, 15, 16, 17, 0, 197, 18, 19,
20, 21, 22, 23, 24, 0, 197, 25, 0, 0,
0, 0, 26, 27, 28, 29, 30, 31, 32, 33,
34, 35, 36, 37, 38, 39, 40, 41, 42, 43,
44, 45, 46, 47, 48, 0, 197, 175, 0, 0,
0, 0, 0, 0, 0, 0, 197, 0, 0, 0,
0, 0, 0, 49, 0, 0, 50, 51, 52, 53,
0, 54, 258, 259, 260, 261, 262, 263, 264, 265,
266, 267, 268, 269, 270, 55, 56, 271, 272, 0,
0, 0, 0, 0, 0, 0, 0, -4, -4, 0,
273, 0, 274, 275, 276, 277, 278, 279, 280, 281,
282, 283, 0, 0, 0, 0, 0, 0, 0, 458,
0, 0, 0, 0, 0, 0, 197, 0, 0, 0,
0, 197, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 175, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, -301, 0, 0, 0, 0,
0, 0, 0, -301, -301, -301, 0, 0, 0, -301,
-301, 0, -301, 0, 0, 0, 0, 0, 0, 0,
0, -271, 0, 0, 0, 0, 0, 0, 0, -301,
-301, 0, -301, -301, -301, -301, 175, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 197, 0,
0, 0, 0, 0, 197, 0, 0, 0, 0, -301,
-301, -301, -301, -301, -301, -301, -301, -301, -301, -301,
-301, -301, 0, 0, -301, -301, -301, 0, -301, 0,
0, 0, 0, 0, 0, 0, -301, -301, 175, -301,
-301, -301, -301, -301, -301, -301, -301, -301, -301, 0,
-304, 0, 0, -301, -301, -301, -301, -301, -304, -304,
-304, -301, -301, 0, -304, -304, 0, -304, 0, 0,
0, 0, 0, 0, 0, 0, -272, 0, 0, 0,
0, 0, 0, 0, -304, -304, 0, -304, -304, -304,
-304, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, -304, -304, -304, -304, -304, -304,
-304, -304, -304, -304, -304, -304, -304, 0, 0, -304,
-304, -304, 0, -304, 0, 0, 0, 0, 0, 0,
0, -304, -304, 0, -304, -304, -304, -304, -304, -304,
-304, -304, -304, -304, 0, -225, 0, 0, -304, -304,
-304, -304, -304, -225, -225, -225, -304, -304, 0, -225,
-225, 0, -225, 0, 0, 0, 0, 0, 0, 0,
0, -273, 0, 0, 0, 0, 0, 0, 0, -225,
-225, 0, -225, -225, -225, -225, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, -225,
-225, -225, -225, -225, -225, -225, -225, -225, -225, -225,
-225, -225, 0, 0, -225, -225, -225, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, -225, 0, -225,
-225, -225, -225, -225, -225, -225, -225, -225, -225, 0,
0, 0, 0, -225, -225, -225, 0, -225, 0, 0,
0, -225, -225, 2, 0, 3, 4, 5, 6, 7,
-4, -4, -4, 8, 9, 0, 0, -4, 10, 0,
11, 12, 13, 14, 15, 16, 17, 0, 0, 18,
19, 20, 21, 22, 23, 24, 0, 0, 25, 0,
0, 0, 0, 26, 27, 28, 29, 30, 31, 32,
33, 34, 35, 36, 37, 38, 39, 40, 41, 42,
43, 44, 45, 46, 47, 48, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 49, 0, 0, 50, 51, 52,
53, 0, 54, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 55, 56, 0, 0,
0, 2, 0, 3, 4, 5, 6, 7, -4, -4,
-4, 8, 9, 0, -4, -4, 10, 0, 11, 12,
13, 14, 15, 16, 17, 0, 0, 18, 19, 20,
21, 22, 23, 24, 0, 0, 25, 0, 0, 0,
0, 26, 27, 28, 29, 30, 31, 32, 33, 34,
35, 36, 37, 38, 39, 40, 41, 42, 43, 44,
45, 46, 47, 48, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 49, 0, 0, 50, 51, 52, 53, 0,
54, 0, 2, 0, 3, 4, 5, 6, 7, 0,
0, -4, 8, 9, 55, 56, -4, 10, -4, 11,
12, 13, 14, 15, 16, 17, -4, -4, 18, 19,
20, 21, 22, 23, 24, 0, 0, 25, 0, 0,
0, 0, 26, 27, 28, 29, 30, 31, 32, 33,
34, 35, 36, 37, 38, 39, 40, 41, 42, 43,
44, 45, 46, 47, 48, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 49, 0, 0, 50, 51, 52, 53,
0, 54, 0, 2, 0, 3, 4, 5, 6, 7,
0, 0, -4, 8, 9, 55, 56, -4, 10, 0,
11, 12, 13, 14, 15, 16, 17, -4, -4, 18,
19, 20, 21, 22, 23, 24, 0, 0, 25, 0,
0, 0, 0, 26, 27, 28, 29, 30, 31, 32,
33, 34, 35, 36, 37, 38, 39, 40, 41, 42,
43, 44, 45, 46, 47, 48, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 49, 0, 0, 50, 51, 52,
53, 0, 54, 0, 2, 0, 3, 4, 5, 6,
7, 0, -4, -4, 8, 9, 55, 56, 0, 10,
0, 11, 12, 13, 14, 15, 16, 17, -4, -4,
18, 19, 20, 21, 22, 23, 24, 0, 0, 25,
0, 0, 0, 0, 26, 27, 28, 29, 30, 31,
32, 33, 34, 35, 36, 37, 38, 39, 40, 41,
42, 43, 44, 45, 46, 47, 48, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 49, 0, 0, 50, 51,
52, 53, 0, 54, 0, 2, 0, 3, 4, 5,
6, 7, 0, 0, 0, 8, 9, 55, 56, 0,
10, -4, 11, 12, 13, 14, 15, 16, 17, -4,
-4, 18, 19, 20, 21, 22, 23, 24, 0, 0,
25, 0, 0, 0, 0, 26, 27, 28, 29, 30,
31, 32, 33, 34, 35, 36, 37, 38, 39, 40,
41, 42, 43, 44, 45, 46, 47, 48, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 49, 0, 0, 50,
51, 52, 53, 0, 54, 0, 2, 0, 3, 4,
5, 6, 7, 0, 0, 0, 8, 9, 55, 56,
0, 10, 0, 11, 12, 13, 14, 15, 16, 17,
-4, -4, 18, 19, 20, 21, 22, 23, 24, 0,
0, 25, 0, 0, 0, 0, 26, 27, 28, 29,
30, 31, 32, 33, 34, 35, 36, 37, 38, 39,
40, 41, 42, 43, 44, 45, 46, 47, 48, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 49, 0, 0,
223, 51, 52, 53, 0, 54, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 55,
56, 0, 0, 0, 2, -4, 3, 4, 5, 6,
7, -4, -4, 0, 8, 9, 0, 0, 0, 10,
0, 11, 12, 13, 14, 15, 16, 17, 0, 0,
18, 19, 20, 21, 22, 23, 24, 0, 0, 25,
0, 0, 0, 0, 26, 27, 28, 29, 30, 31,
32, 33, 34, 35, 36, 37, 38, 39, 40, 41,
42, 43, 44, 45, 46, 47, 48, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 49, 0, 0, 50, 51,
52, 53, 0, 54, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 55, 56, 0,
0, 0, 2, -4, 3, 4, 5, 6, 7, -4,
-4, 0, 8, 9, 0, 0, 0, 10, 0, 11,
12, 13, 14, 15, 16, 17, 0, 0, 18, 19,
20, 21, 22, 23, 24, 0, 0, 25, 0, 0,
0, 0, 26, 27, 28, 29, 30, 31, 32, 33,
34, 35, 36, 37, 38, 39, 40, 41, 42, 43,
44, 45, 46, 47, 48, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 49, 0, 0, 50, 51, 52, 53,
0, 54, 0, 2, 0, 3, 4, 5, 6, 7,
0, 0, -4, 8, 9, 55, 56, 0, 10, -4,
11, 12, 13, 14, 15, 16, 17, -4, -4, 18,
19, 20, 21, 22, 23, 24, 0, 0, 25, 0,
0, 0, 0, 26, 27, 28, 29, 30, 31, 32,
33, 34, 35, 36, 37, 38, 39, 40, 41, 42,
43, 44, 45, 46, 47, 48, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 49, 0, 0, 50, 51, 52,
53, 0, 54, 0, 0, 0, 3, 4, 5, 6,
7, 0, 0, 0, 8, 9, 55, 56, 0, 10,
0, 11, 12, 13, 14, 15, 16, 17, -4, -4,
18, 19, 20, 21, 22, 23, 24, 0, 0, 25,
0, 0, 0, 0, 26, 27, 28, 29, 30, 31,
32, 33, 34, 35, 36, 37, 38, 39, 40, 41,
42, 43, 44, 45, 46, 47, 48, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 49, 0, 0, 50, 51,
52, 53, 0, 54, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 55, 56, 0,
0, 83, 84, 85, 86, 87, 88, 89, 90, 0,
362, 91, 92, 93, 94, 95, 0, 0, 96, 97,
98, 99, 100, 101, 102, 103, 104, 105, 106, 107,
108, 109, 110, 111, 112, 113, 114, 115, 116, 117,
118, 119, 120, 121, 122, 123, 124, 34, 35, 125,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
126, 127, 128, 129, 130, 131, 0, 132, 133, 0,
0, 134, 0, 135, 0, 136, 137, 138, 139, 0,
0, 0, 0, 0, 0, 0, 140, 0, 0, 0,
0, 0, 141, 142, 143, 144, 145, 146, 147, 148,
149, 150, 0, 151, 0, 0, 3, 4, 5, 0,
7, 0, 152, 153, 8, 9, 0, 0, 0, 10,
0, 11, 12, 13, 14, 15, 16, 17, 0, 0,
181, 182, 20, 21, 22, 23, 24, 0, 0, 0,
0, 0, 0, 0, 0, 27, 0, 0, 30, 31,
171, 172, 34, 35, 173, 37, 38, 39, 40, 41,
42, 43, 44, 45, 46, 47, 48, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 49, 0, 0, 192, 51,
52, 193, 194, 54, 0, 0, -346, -346, -346, 0,
-346, 0, 0, 0, -346, -346, 0, 195, 56, -346,
289, -346, -346, -346, -346, -346, -346, -346, 295, 0,
-346, -346, -346, -346, -346, -346, -346, 0, 0, 0,
0, 0, 0, 0, 0, -346, 0, 0, -346, -346,
-346, -346, -346, -346, -346, -346, -346, -346, -346, -346,
-346, -346, -346, -346, -346, -346, -346, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, -346, 0, 0, -346, -346,
-346, -346, -346, -346, 0, 0, -348, -348, -348, 0,
-348, 0, 0, 0, -348, -348, 0, -346, -346, -348,
-346, -348, -348, -348, -348, -348, -348, -348, -346, 0,
-348, -348, -348, -348, -348, -348, -348, 0, 0, 0,
0, 0, 0, 0, 0, -348, 0, 0, -348, -348,
-348, -348, -348, -348, -348, -348, -348, -348, -348, -348,
-348, -348, -348, -348, -348, -348, -348, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, -348, 0, 0, -348, -348,
-348, -348, -348, -348, 0, 0, -347, -347, -347, 0,
-347, 0, 0, 0, -347, -347, 0, -348, -348, -347,
-348, -347, -347, -347, -347, -347, -347, -347, -348, 0,
-347, -347, -347, -347, -347, -347, -347, 0, 0, 0,
0, 0, 0, 0, 0, -347, 0, 0, -347, -347,
-347, -347, -347, -347, -347, -347, -347, -347, -347, -347,
-347, -347, -347, -347, -347, -347, -347, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, -347, 0, 0, -347, -347,
-347, -347, -347, -347, 0, 0, 3, 4, 5, 0,
7, 0, 0, 0, 8, 9, 0, -347, -347, 10,
-347, 11, 12, 13, 14, 15, 16, 17, -347, 0,
181, 182, 20, 21, 22, 23, 24, 0, 0, 0,
0, 0, 0, 0, 0, 27, 0, 0, 30, 31,
171, 172, 34, 35, 173, 37, 38, 39, 40, 41,
42, 43, 44, 45, 46, 47, 48, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 49, 0, 0, 192, 51,
52, 193, 194, 54, 0, 0, 3, 4, 5, 0,
7, 0, 0, 0, 8, 9, 0, 195, 56, 10,
0, 11, 12, 13, 14, 15, 16, 17, 196, 0,
181, 182, 20, 21, 22, 23, 24, 0, 0, 0,
0, 0, 0, 0, 0, 27, 0, 0, 30, 31,
171, 172, 34, 35, 173, 37, 38, 39, 40, 41,
42, 43, 44, 45, 46, 47, 48, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 49, 0, 0, 192, 51,
52, 193, 194, 54, 0, 0, 3, 4, 5, 0,
7, 0, 0, 0, 8, 9, 0, 195, 56, 10,
0, 11, 12, 13, 14, 15, 16, 17, 208, 0,
181, 182, 20, 21, 22, 23, 24, 0, 0, 0,
0, 0, 0, 0, 0, 27, 0, 0, 30, 31,
171, 172, 34, 35, 173, 37, 38, 39, 40, 41,
42, 43, 44, 45, 46, 47, 48, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 49, 0, 0, 192, 51,
52, 193, 194, 54, 0, 0, -346, -346, -346, 0,
-346, 0, 0, 0, -346, -346, 0, 195, 56, -346,
0, -346, -346, -346, -346, -346, -346, -346, 210, 0,
-346, -346, -346, -346, -346, -346, -346, 0, 0, 0,
0, 0, 0, 0, 0, -346, 0, 0, -346, -346,
-346, -346, -346, -346, -346, -346, -346, -346, -346, -346,
-346, -346, -346, -346, -346, -346, -346, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, -346, 0, 0, -346, -346,
-346, -346, -346, -346, 0, 0, -348, -348, -348, 0,
-348, 0, 0, 0, -348, -348, 0, -346, -346, -348,
0, -348, -348, -348, -348, -348, -348, -348, -346, 0,
-348, -348, -348, -348, -348, -348, -348, 0, 0, 0,
0, 0, 0, 0, 0, -348, 0, 0, -348, -348,
-348, -348, -348, -348, -348, -348, -348, -348, -348, -348,
-348, -348, -348, -348, -348, -348, -348, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, -348, 0, 0, -348, -348,
-348, -348, -348, -348, 0, 0, -347, -347, -347, 0,
-347, 0, 0, 0, -347, -347, 0, -348, -348, -347,
0, -347, -347, -347, -347, -347, -347, -347, -348, 0,
-347, -347, -347, -347, -347, -347, -347, 0, 0, 0,
0, 0, 0, 0, 0, -347, 0, 0, -347, -347,
-347, -347, -347, -347, -347, -347, -347, -347, -347, -347,
-347, -347, -347, -347, -347, -347, -347, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, -347, 0, 0, -347, -347,
-347, -347, -347, -347, 0, 0, 3, 4, 5, 0,
7, 0, 0, 0, 8, 9, 0, -347, -347, 10,
0, 11, 12, 13, 14, 15, 16, 17, -347, 0,
181, 182, 20, 21, 22, 23, 24, 0, 0, 0,
0, 0, 0, 0, 0, 27, 0, 0, 30, 31,
171, 172, 34, 35, 173, 37, 38, 39, 40, 41,
42, 43, 44, 45, 46, 47, 48, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 49, 0, 0, 192, 51,
52, 193, 194, 54, 0, 0, 3, 4, 5, 0,
7, 0, 0, 0, 8, 9, 0, 195, 56, 10,
0, 11, 12, 13, 14, 15, 16, 17, 487, 0,
181, 182, 20, 21, 22, 23, 24, 0, 0, 0,
0, 0, 0, 0, 0, 27, 0, 0, 30, 31,
171, 172, 34, 35, 173, 37, 38, 39, 40, 41,
42, 43, 44, 45, 46, 47, 48, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 49, 0, 0, 192, 51,
52, 193, 194, 54, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 195, 56, 83,
84, 85, 86, 87, 88, 89, 90, 0, 493, 91,
92, 93, 94, 95, 0, 0, 96, 97, 98, 99,
100, 101, 102, 103, 104, 105, 160, 161, 162, 163,
110, 111, 112, 113, 114, 115, 116, 117, 118, 119,
120, 164, 165, 166, 124, 234, 235, 167, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 126, 127,
128, 129, 130, 131, 0, 132, 133, 0, 0, 134,
0, 135, 0, 136, 137, 138, 139, 0, 0, 0,
0, 0, 0, 0, 140, 0, 0, 0, 0, 0,
141, 142, 143, 144, 145, 146, 147, 148, 149, 150,
0, 151, 83, 84, 85, 86, 87, 88, 89, 90,
152, 0, 91, 92, 93, 94, 95, 0, 0, 96,
97, 98, 99, 100, 101, 102, 103, 104, 105, 160,
161, 162, 163, 110, 111, 112, 113, 114, 115, 116,
117, 118, 119, 120, 164, 165, 166, 124, 213, 0,
167, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 126, 127, 128, 129, 130, 131, 0, 132, 133,
0, 0, 134, 0, 135, 0, 136, 137, 138, 139,
0, 0, 0, 0, 0, 0, 0, 140, 0, 0,
0, 0, 0, 141, 142, 143, 144, 145, 146, 147,
148, 149, 150, 0, 151, 83, 84, 85, 86, 87,
88, 89, 90, 152, 0, 91, 92, 93, 94, 95,
0, 0, 96, 97, 98, 99, 100, 101, 102, 103,
104, 105, 160, 161, 162, 163, 110, 111, 112, 113,
114, 115, 116, 117, 118, 119, 120, 164, 165, 166,
124, 0, 0, 167, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 126, 127, 128, 129, 130, 131,
0, 132, 133, 0, 0, 134, 0, 135, 0, 136,
137, 138, 139, 0, 0, 0, 0, 0, 0, 0,
140, 0, 0, 0, 0, 0, 141, 142, 143, 144,
145, 146, 147, 148, 149, 150, 0, 151, 0, 3,
4, 5, 0, 7, 0, 0, 152, 8, 9, 0,
0, 0, 10, 0, 11, 12, 13, 14, 15, 16,
17, 0, 0, 181, 182, 20, 21, 22, 23, 24,
0, 0, 0, 0, 0, 0, 0, 0, 27, 0,
0, 30, 31, 171, 172, 34, 35, 173, 37, 38,
39, 40, 41, 42, 43, 44, 45, 46, 47, 48,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 49, 0,
0, 192, 51, 52, 193, 194, 54, 0, 0, 0,
0, 0, 0, 0, 3, 4, 5, 0, 7, 0,
195, 56, 8, 9, 0, 0, 329, 10, 0, 11,
12, 13, 14, 15, 16, 17, 0, 0, 181, 182,
20, 21, 22, 23, 24, 0, 0, 0, 0, 0,
0, 0, 0, 27, 0, 0, 30, 31, 171, 172,
34, 35, 173, 37, 38, 39, 40, 41, 42, 43,
44, 45, 46, 47, 48, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 49, 0, 0, 192, 51, 52, 193,
194, 54, 0, 0, 0, 0, 0, 0, 0, 3,
4, 5, 6, 7, 0, 195, 56, 8, 9, 0,
0, 338, 10, 0, 11, 12, 13, 14, 15, 16,
17, 0, 0, 18, 19, 20, 21, 22, 23, 24,
0, 0, 25, 0, 0, 0, 0, 26, 27, 28,
29, 30, 31, 32, 33, 34, 35, 36, 37, 38,
39, 40, 41, 42, 43, 44, 45, 46, 47, 48,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 49, 0,
0, 50, 51, 52, 53, 0, 54, 0, 0, 3,
4, 5, 0, 7, 0, 0, 0, 8, 9, 0,
55, 56, 10, 0, 11, 12, 13, 14, 15, 16,
17, 0, 0, 18, 19, 20, 21, 22, 23, 24,
0, 0, 25, 0, 0, 0, 0, 0, 27, 0,
0, 30, 31, 171, 172, 34, 35, 173, 37, 38,
39, 40, 41, 42, 43, 44, 45, 46, 47, 48,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 49, 0,
0, 50, 51, 52, 53, 0, 54, 0, 0, 3,
4, 5, 0, 7, 0, 0, 0, 8, 9, 0,
55, 56, 10, 0, 11, 12, 13, 14, 15, 16,
17, 0, 0, 181, 182, 20, 21, 22, 23, 24,
0, 0, 0, 0, 0, 0, 0, 0, 27, 0,
0, 30, 31, 171, 172, 34, 35, 173, 37, 38,
39, 40, 41, 42, 43, 44, 45, 46, 47, 48,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 49, 0,
0, 192, 51, 52, 193, 194, 54, 0, 0, 3,
4, 5, 0, 7, 0, 0, 0, 8, 9, 0,
195, 56, 10, 0, 11, 12, 13, 14, 15, 16,
17, 0, 0, 181, 182, 183, 21, 22, 23, 24,
0, 0, 0, 0, 0, 0, 0, 0, 27, 0,
0, 30, 31, 171, 172, 34, 35, 173, 37, 38,
39, 40, 41, 42, 43, 44, 45, 46, 47, 48,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 49, 0,
0, 192, 51, 52, 462, 194, 54, 0, 0, 3,
4, 5, 0, 7, 0, 0, 0, 8, 9, 0,
195, 56, 10, 0, 11, 12, 13, 14, 15, 16,
17, 0, 0, 181, 182, 183, 21, 22, 23, 24,
0, 0, 0, 0, 0, 0, 0, 0, 27, 0,
0, 30, 31, 171, 172, 34, 35, 173, 37, 38,
39, 40, 41, 42, 43, 44, 45, 46, 47, 48,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 49, 0,
0, 192, 51, 52, 468, 194, 54, 0, 0, 3,
4, 5, 0, 7, 0, 0, 0, 8, 9, 0,
195, 56, 10, 0, 11, 12, 13, 14, 15, 16,
17, 0, 0, 181, 182, 183, 21, 22, 23, 24,
0, 0, 0, 0, 0, 0, 0, 0, 27, 0,
0, 30, 31, 171, 172, 34, 35, 173, 37, 38,
39, 40, 41, 42, 43, 44, 45, 46, 47, 48,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 49, 0,
0, 192, 51, 52, 584, 194, 54, 0, 0, 3,
4, 5, 0, 7, 0, 0, 0, 8, 9, 0,
195, 56, 10, 0, 11, 12, 13, 14, 15, 16,
17, 0, 0, 181, 182, 183, 21, 22, 23, 24,
0, 0, 0, 0, 0, 0, 0, 0, 27, 0,
0, 30, 31, 171, 172, 34, 35, 173, 37, 38,
39, 40, 41, 42, 43, 44, 45, 46, 47, 48,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 49, 0,
0, 192, 51, 52, 370, 0, 54, 0, 0, 3,
4, 5, 0, 7, 0, 0, 0, 8, 9, 0,
195, 56, 10, 0, 11, 12, 13, 14, 15, 16,
17, 0, 0, 181, 182, 183, 21, 22, 23, 24,
0, 0, 0, 0, 0, 0, 0, 0, 27, 0,
0, 30, 31, 171, 172, 34, 35, 173, 37, 38,
39, 40, 41, 42, 43, 44, 45, 46, 47, 48,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 49, 0,
0, 192, 51, 52, 446, 0, 54, 0, 0, 3,
4, 5, 0, 7, 0, 0, 0, 8, 9, 0,
195, 56, 10, 0, 11, 12, 13, 14, 15, 16,
17, 0, 0, 181, 182, 183, 21, 22, 23, 24,
0, 0, 0, 0, 0, 0, 0, 0, 27, 0,
0, 30, 31, 171, 172, 34, 35, 173, 37, 38,
39, 40, 41, 42, 43, 44, 45, 46, 47, 48,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 49, 0,
0, 192, 51, 52, 545, 0, 54, 0, 0, 3,
4, 5, 0, 7, 0, 0, 0, 8, 9, 0,
195, 56, 10, 0, 11, 12, 13, 14, 15, 16,
17, 0, 0, 181, 182, 183, 21, 22, 23, 24,
0, 0, 0, 0, 0, 0, 0, 0, 27, 0,
0, 30, 31, 171, 172, 34, 35, 173, 37, 38,
39, 40, 41, 42, 43, 44, 45, 46, 47, 48,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 49, 0,
0, 192, 51, 52, 580, 0, 54, 0, 0, 3,
4, 5, 0, 7, 0, 0, 0, 8, 9, 0,
195, 56, 10, 0, 11, 12, 13, 14, 15, 16,
17, 0, 0, 181, 182, 183, 21, 22, 23, 24,
0, 0, 0, 0, 0, 0, 0, 0, 27, 0,
0, 30, 31, 171, 172, 34, 35, 173, 37, 38,
39, 40, 41, 42, 43, 44, 45, 46, 47, 48,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 49, 0,
0, 192, 51, 52, 0, 0, 54, 0, 0, 3,
4, 5, 0, 7, 0, 0, 0, 8, 9, 0,
195, 56, 10, 0, 11, 12, 13, 14, 15, 16,
17, 0, 0, 181, 182, 20, 21, 22, 23, 24,
0, 0, 0, 0, 0, 0, 0, 0, 27, 0,
0, 30, 31, 171, 172, 34, 35, 173, 37, 38,
39, 40, 41, 42, 43, 44, 45, 46, 47, 48,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 49, 0,
0, 192, 51, 52, 0, 0, 54, 0, 0, 3,
4, 5, 0, 7, 0, 0, 0, 8, 9, 0,
195, 56, 10, 0, 11, 12, 13, 14, 15, 16,
17, 0, 0, 181, 182, 183, 21, 22, 23, 24,
0, 0, 0, 0, 0, 0, 0, 0, 184, 0,
0, 30, 31, 171, 172, 34, 35, 173, 37, 38,
39, 40, 41, 42, 43, 44, 45, 46, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 49, 0,
0, 50, 51, 52, 53, 0, 54, 3, 4, 5,
0, 7, 556, 0, 0, 8, 9, 0, 0, 0,
10, 0, 11, 12, 13, 14, 15, 16, 17, 0,
0, 181, 182, 183, 21, 22, 23, 24, 0, 0,
0, 0, 0, 0, 0, 0, 184, 0, 0, 30,
31, 171, 172, 34, 35, 173, 37, 38, 39, 40,
41, 42, 43, 44, 45, 46, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 49, 0, 0, 50,
51, 52, 53, 0, 54, 3, 4, 5, 0, 7,
0, 0, 0, 8, 9, 0, 0, 0, 10, 0,
11, 12, 13, 14, 15, 16, 17, 0, 0, 181,
182, 183, 21, 22, 23, 24, 0, 0, 0, 0,
0, 0, 0, 0, 184, 0, 0, 30, 31, 171,
172, 34, 35, 173, 37, 38, 39, 40, 41, 42,
43, 44, 45, 46, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 49, 0, 0, 254, 51, 52,
255, 0, 54, 3, 4, 5, 0, 7, 0, 0,
0, 8, 9, 0, 0, 0, 10, 0, 11, 12,
13, 14, 15, 16, 17, 0, 0, 181, 182, 183,
21, 22, 23, 24, 0, 0, 0, 0, 0, 0,
0, 0, 184, 0, 0, 30, 31, 171, 172, 34,
35, 173, 37, 38, 39, 40, 41, 42, 43, 44,
45, 46, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 49, 0, 0, 254, 51, 52, 484, 0,
54, 3, 4, 5, 0, 7, 0, 0, 0, 8,
9, 0, 0, 0, 10, 0, 11, 12, 13, 14,
15, 16, 17, 0, 0, 181, 182, 183, 21, 22,
23, 24, 0, 0, 0, 0, 0, 0, 0, 0,
184, 0, 0, 30, 31, 171, 172, 34, 35, 173,
37, 38, 39, 40, 41, 42, 43, 44, 45, 46,
0, 258, 259, 260, 261, 262, 263, 264, 265, 266,
267, 268, 269, 270, 0, 0, 271, 272, 0, 0,
49, 0, 0, 192, 51, 52, 0, 0, 54, 273,
486, 274, 275, 276, 277, 278, 279, 280, 281, 282,
283, 258, 259, 260, 261, 262, 263, 264, 265, 266,
267, 268, 269, 270, 0, 0, 271, 272, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 273,
0, 274, 275, 276, 277, 278, 279, 280, 281, 282,
283
};
static const short yycheck[] = { 1,
2, 177, 6, 13, 206, 7, 8, 9, 10, 11,
12, 13, 65, 18, 19, 20, 18, 19, 20, 13,
210, 180, 26, 25, 184, 52, 8, 9, 305, 11,
12, 2, 311, 26, 336, 51, 52, 50, 58, 13,
19, 1, 4, 25, 34, 35, 76, 516, 50, 47,
54, 53, 332, 55, 434, 435, 336, 64, 360, 53,
13, 81, 514, 65, 516, 26, 47, 116, 34, 35,
47, 76, 47, 223, 76, 81, 72, 26, 80, 34,
35, 34, 35, 107, 47, 34, 35, 49, 51, 325,
88, 89, 99, 100, 101, 102, 103, 111, 80, 335,
96, 107, 116, 109, 254, 295, 112, 88, 89, 115,
49, 88, 89, 88, 89, 47, 79, 115, 230, 51,
232, 60, 61, 116, 117, 327, 116, 117, 597, 8,
1, 2, 15, 26, 17, 95, 7, 8, 9, 10,
11, 12, 116, 117, 304, 597, 107, 18, 19, 20,
116, 153, 429, 111, 25, 110, 116, 117, 81, 179,
180, 191, 64, 116, 117, 83, 445, 116, 117, 107,
81, 153, 91, 91, 1, 2, 81, 115, 458, 50,
7, 341, 26, 10, 55, 81, 109, 567, 568, 112,
192, 196, 572, 111, 196, 111, 64, 81, 109, 101,
102, 103, 17, 208, 109, 76, 208, 112, 210, 80,
223, 79, 80, 109, 111, 107, 218, 196, 25, 116,
115, 223, 81, 50, 115, 109, 81, 81, 112, 208,
610, 99, 100, 101, 102, 103, 252, 539, 116, 117,
115, 254, 81, 245, 246, 247, 248, 249, 250, 251,
109, 111, 254, 255, 109, 109, 107, 112, 112, 539,
81, 255, 81, 465, 246, 247, 248, 249, 250, 251,
109, 81, 448, 112, 245, 83, 111, 83, 298, 299,
439, 83, 153, 91, 286, 91, 81, 83, 109, 91,
109, 112, 64, 295, 310, 91, 573, 487, 457, 109,
316, 303, 581, 493, 83, 332, 81, 79, 80, 111,
81, 313, 91, 315, 109, 111, 115, 319, 111, 321,
81, 192, 375, 325, 326, 196, 98, 99, 100, 101,
102, 103, 111, 335, 109, 83, 538, 208, 109, 210,
542, 345, 83, 91, 326, 83, 348, 218, 109, 64,
91, 511, 223, 91, 47, 48, 47, 48, 51, 110,
51, 110, 47, 48, 110, 192, 51, 47, 48, 34,
35, 51, 108, 375, 245, 246, 247, 248, 249, 250,
251, 14, 15, 254, 37, 38, 39, 40, 110, 111,
113, 218, 111, 15, 13, 10, 223, 110, 110, 110,
405, 577, 108, 405, 111, 410, 110, 609, 410, 111,
110, 431, 113, 284, 285, 286, 110, 10, 245, 439,
422, 423, 110, 91, 295, 111, 47, 254, 430, 47,
111, 9, 303, 437, 438, 111, 111, 457, 111, 441,
422, 10, 313, 10, 315, 115, 115, 113, 319, 89,
321, 111, 323, 324, 325, 326, 113, 108, 10, 10,
89, 10, 10, 334, 335, 10, 110, 110, 96, 10,
108, 10, 111, 475, 110, 10, 303, 348, 10, 350,
0, 0, 484, 612, 504, 487, 313, 497, 315, 497,
484, 493, 319, 475, 321, 497, 498, 499, 1, 2,
414, 503, 5, 497, 7, 8, 9, 10, 11, 12,
13, 581, 574, 5, 573, 514, 429, -1, -1, -1,
522, 348, 25, 525, -1, 527, -1, -1, -1, -1,
-1, 533, -1, -1, 405, 537, -1, -1, -1, 410,
-1, -1, -1, -1, -1, 527, -1, 50, -1, 1,
53, 422, 423, -1, -1, 7, -1, -1, 10, 430,
-1, -1, 65, -1, -1, -1, -1, -1, -1, -1,
441, -1, -1, -1, -1, -1, -1, 80, -1, -1,
-1, 1, 2, -1, -1, -1, -1, 7, 8, 9,
10, 11, 12, 13, -1, -1, 423, -1, -1, 601,
-1, 603, 64, 430, 475, 25, -1, -1, -1, -1,
-1, -1, -1, -1, 441, -1, 487, 79, 80, -1,
-1, -1, 493, -1, -1, -1, -1, 498, 499, -1,
50, -1, 503, 53, 96, 97, 98, 99, 100, 101,
102, 103, -1, -1, -1, 65, -1, -1, -1, -1,
153, 522, -1, -1, 525, -1, 527, -1, -1, -1,
80, -1, 533, -1, -1, -1, 537, -1, -1, -1,
-1, 498, 499, -1, -1, -1, 503, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, 192,
-1, -1, -1, -1, -1, 522, -1, -1, 525, -1,
-1, -1, -1, -1, -1, -1, 533, -1, -1, -1,
537, -1, -1, -1, -1, 218, -1, -1, -1, -1,
223, -1, -1, -1, -1, -1, -1, -1, -1, -1,
601, -1, 603, 153, -1, -1, -1, -1, -1, -1,
-1, -1, 245, 246, 247, 248, 249, 250, 251, -1,
-1, 254, 255, 64, 65, 66, 67, 68, 69, 70,
71, 72, 73, 74, 75, 76, 218, -1, 79, 80,
-1, -1, 192, 84, 601, -1, 603, -1, -1, -1,
-1, 92, -1, 94, 95, 96, 97, 98, 99, 100,
101, 102, 103, -1, -1, -1, -1, -1, 218, -1,
303, -1, -1, 223, -1, -1, -1, -1, -1, -1,
313, -1, 315, -1, -1, -1, 319, -1, 321, -1,
-1, -1, -1, 326, -1, 245, 246, 247, 248, 249,
250, 251, -1, -1, 254, 255, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 348, -1, -1, -1, -1,
-1, 303, -1, -1, -1, -1, -1, -1, -1, -1,
-1, 313, -1, 315, -1, -1, -1, 319, -1, 321,
-1, -1, 375, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, 303, -1, -1, -1, -1, -1, -1,
-1, -1, -1, 313, -1, 315, 348, -1, -1, 319,
-1, 321, -1, -1, -1, -1, 326, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, 422,
423, -1, -1, -1, -1, -1, -1, 430, 348, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 441, -1,
-1, -1, -1, -1, -1, -1, 18, 19, 20, -1,
-1, -1, -1, -1, -1, 375, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, 423, 475, -1, -1, 47, 48, -1, 430, 51,
52, 484, -1, 55, 56, -1, -1, -1, -1, 441,
-1, -1, -1, -1, 497, 498, 499, -1, -1, -1,
503, -1, 422, 423, 76, -1, -1, -1, -1, -1,
430, -1, -1, -1, -1, -1, -1, -1, -1, 522,
-1, 441, 525, -1, 527, -1, -1, -1, -1, -1,
533, -1, -1, -1, 537, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 498, 499, -1, -1,
-1, 503, -1, -1, -1, 475, 64, 65, 66, 67,
68, 69, 70, 71, 484, 73, 74, -1, -1, -1,
522, 79, 80, 525, -1, -1, -1, 497, 498, 499,
-1, 533, -1, 503, -1, 537, 94, 95, 96, 97,
98, 99, 100, 101, 102, 103, -1, -1, 601, -1,
603, -1, 522, -1, -1, 525, -1, 527, -1, -1,
-1, -1, -1, 533, -1, -1, -1, 537, -1, -1,
-1, 193, 194, 195, 196, 64, 65, 66, 67, 68,
69, 70, -1, -1, 73, 74, 208, -1, 210, -1,
79, 80, -1, -1, -1, -1, -1, -1, -1, 601,
-1, 603, -1, -1, -1, 94, 95, 96, 97, 98,
99, 100, 101, 102, 103, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
252, 601, -1, 603, -1, -1, 258, 259, 260, 261,
262, 263, 264, 265, 266, 267, 268, 269, 270, 271,
272, 273, 274, 275, 276, 277, 278, 279, 280, 281,
282, 283, -1, -1, 286, -1, -1, -1, -1, -1,
-1, 293, 294, 295, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 310, -1,
-1, -1, -1, -1, 316, -1, -1, -1, -1, -1,
-1, -1, -1, 325, -1, -1, -1, -1, -1, 331,
332, -1, -1, 335, 336, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 347, -1, -1, -1, -1,
-1, -1, 354, -1, -1, -1, -1, -1, 360, 8,
9, -1, 11, 12, -1, -1, -1, -1, 370, 18,
19, 20, -1, -1, -1, -1, 25, -1, -1, -1,
-1, -1, -1, -1, -1, 64, 65, 66, 67, 68,
69, 70, 71, 72, 73, 74, 75, 76, -1, -1,
79, 80, -1, 405, -1, -1, 55, -1, 410, -1,
-1, -1, -1, 415, 416, 94, 95, 96, 97, 98,
99, 100, 101, 102, 103, -1, -1, 76, -1, -1,
-1, 80, -1, -1, -1, -1, -1, 64, 65, 66,
67, 68, 69, 70, 446, -1, 73, 74, -1, -1,
-1, -1, 79, 80, -1, -1, -1, -1, -1, -1,
462, -1, -1, -1, -1, -1, 468, 94, 95, 96,
97, 98, 99, 100, 101, 102, 103, -1, -1, -1,
482, -1, -1, -1, 486, 487, -1, 489, 490, 491,
492, 493, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 153, -1, 508, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, 523, -1, -1, -1, -1, -1, -1, -1, -1,
532, -1, -1, -1, -1, -1, -1, 539, -1, -1,
-1, -1, -1, 545, -1, -1, -1, 196, -1, -1,
-1, -1, 554, 555, -1, -1, -1, -1, -1, 208,
-1, 210, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 580, -1,
-1, -1, 584, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 246, 247, 248,
249, 250, 251, -1, -1, -1, -1, -1, -1, -1,
-1, 0, 1, -1, 3, 4, 5, 6, 7, -1,
-1, -1, 11, 12, -1, -1, -1, 16, -1, 18,
19, 20, 21, 22, 23, 24, -1, 286, 27, 28,
29, 30, 31, 32, 33, -1, 295, 36, -1, -1,
-1, -1, 41, 42, 43, 44, 45, 46, 47, 48,
49, 50, 51, 52, 53, 54, 55, 56, 57, 58,
59, 60, 61, 62, 63, -1, 325, 326, -1, -1,
-1, -1, -1, -1, -1, -1, 335, -1, -1, -1,
-1, -1, -1, 82, -1, -1, 85, 86, 87, 88,
-1, 90, 64, 65, 66, 67, 68, 69, 70, 71,
72, 73, 74, 75, 76, 104, 105, 79, 80, -1,
-1, -1, -1, -1, -1, -1, -1, 116, 117, -1,
92, -1, 94, 95, 96, 97, 98, 99, 100, 101,
102, 103, -1, -1, -1, -1, -1, -1, -1, 111,
-1, -1, -1, -1, -1, -1, 405, -1, -1, -1,
-1, 410, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, 422, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 0, -1, -1, -1, -1,
-1, -1, -1, 8, 9, 10, -1, -1, -1, 14,
15, -1, 17, -1, -1, -1, -1, -1, -1, -1,
-1, 26, -1, -1, -1, -1, -1, -1, -1, 34,
35, -1, 37, 38, 39, 40, 475, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 487, -1,
-1, -1, -1, -1, 493, -1, -1, -1, -1, 64,
65, 66, 67, 68, 69, 70, 71, 72, 73, 74,
75, 76, -1, -1, 79, 80, 81, -1, 83, -1,
-1, -1, -1, -1, -1, -1, 91, 92, 527, 94,
95, 96, 97, 98, 99, 100, 101, 102, 103, -1,
0, -1, -1, 108, 109, 110, 111, 112, 8, 9,
10, 116, 117, -1, 14, 15, -1, 17, -1, -1,
-1, -1, -1, -1, -1, -1, 26, -1, -1, -1,
-1, -1, -1, -1, 34, 35, -1, 37, 38, 39,
40, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 64, 65, 66, 67, 68, 69,
70, 71, 72, 73, 74, 75, 76, -1, -1, 79,
80, 81, -1, 83, -1, -1, -1, -1, -1, -1,
-1, 91, 92, -1, 94, 95, 96, 97, 98, 99,
100, 101, 102, 103, -1, 0, -1, -1, 108, 109,
110, 111, 112, 8, 9, 10, 116, 117, -1, 14,
15, -1, 17, -1, -1, -1, -1, -1, -1, -1,
-1, 26, -1, -1, -1, -1, -1, -1, -1, 34,
35, -1, 37, 38, 39, 40, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, 64,
65, 66, 67, 68, 69, 70, 71, 72, 73, 74,
75, 76, -1, -1, 79, 80, 81, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 92, -1, 94,
95, 96, 97, 98, 99, 100, 101, 102, 103, -1,
-1, -1, -1, 108, 109, 110, -1, 112, -1, -1,
-1, 116, 117, 1, -1, 3, 4, 5, 6, 7,
8, 9, 10, 11, 12, -1, -1, 15, 16, -1,
18, 19, 20, 21, 22, 23, 24, -1, -1, 27,
28, 29, 30, 31, 32, 33, -1, -1, 36, -1,
-1, -1, -1, 41, 42, 43, 44, 45, 46, 47,
48, 49, 50, 51, 52, 53, 54, 55, 56, 57,
58, 59, 60, 61, 62, 63, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 82, -1, -1, 85, 86, 87,
88, -1, 90, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 104, 105, -1, -1,
-1, 1, -1, 3, 4, 5, 6, 7, 116, 117,
10, 11, 12, -1, 14, 15, 16, -1, 18, 19,
20, 21, 22, 23, 24, -1, -1, 27, 28, 29,
30, 31, 32, 33, -1, -1, 36, -1, -1, -1,
-1, 41, 42, 43, 44, 45, 46, 47, 48, 49,
50, 51, 52, 53, 54, 55, 56, 57, 58, 59,
60, 61, 62, 63, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 82, -1, -1, 85, 86, 87, 88, -1,
90, -1, 1, -1, 3, 4, 5, 6, 7, -1,
-1, 10, 11, 12, 104, 105, 15, 16, 17, 18,
19, 20, 21, 22, 23, 24, 116, 117, 27, 28,
29, 30, 31, 32, 33, -1, -1, 36, -1, -1,
-1, -1, 41, 42, 43, 44, 45, 46, 47, 48,
49, 50, 51, 52, 53, 54, 55, 56, 57, 58,
59, 60, 61, 62, 63, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, 82, -1, -1, 85, 86, 87, 88,
-1, 90, -1, 1, -1, 3, 4, 5, 6, 7,
-1, -1, 10, 11, 12, 104, 105, 15, 16, -1,
18, 19, 20, 21, 22, 23, 24, 116, 117, 27,
28, 29, 30, 31, 32, 33, -1, -1, 36, -1,
-1, -1, -1, 41, 42, 43, 44, 45, 46, 47,
48, 49, 50, 51, 52, 53, 54, 55, 56, 57,
58, 59, 60, 61, 62, 63, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 82, -1, -1, 85, 86, 87,
88, -1, 90, -1, 1, -1, 3, 4, 5, 6,
7, -1, 9, 10, 11, 12, 104, 105, -1, 16,
-1, 18, 19, 20, 21, 22, 23, 24, 116, 117,
27, 28, 29, 30, 31, 32, 33, -1, -1, 36,
-1, -1, -1, -1, 41, 42, 43, 44, 45, 46,
47, 48, 49, 50, 51, 52, 53, 54, 55, 56,
57, 58, 59, 60, 61, 62, 63, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 82, -1, -1, 85, 86,
87, 88, -1, 90, -1, 1, -1, 3, 4, 5,
6, 7, -1, -1, -1, 11, 12, 104, 105, -1,
16, 17, 18, 19, 20, 21, 22, 23, 24, 116,
117, 27, 28, 29, 30, 31, 32, 33, -1, -1,
36, -1, -1, -1, -1, 41, 42, 43, 44, 45,
46, 47, 48, 49, 50, 51, 52, 53, 54, 55,
56, 57, 58, 59, 60, 61, 62, 63, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 82, -1, -1, 85,
86, 87, 88, -1, 90, -1, 1, -1, 3, 4,
5, 6, 7, -1, -1, -1, 11, 12, 104, 105,
-1, 16, -1, 18, 19, 20, 21, 22, 23, 24,
116, 117, 27, 28, 29, 30, 31, 32, 33, -1,
-1, 36, -1, -1, -1, -1, 41, 42, 43, 44,
45, 46, 47, 48, 49, 50, 51, 52, 53, 54,
55, 56, 57, 58, 59, 60, 61, 62, 63, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 82, -1, -1,
85, 86, 87, 88, -1, 90, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, 104,
105, -1, -1, -1, 1, 110, 3, 4, 5, 6,
7, 116, 117, -1, 11, 12, -1, -1, -1, 16,
-1, 18, 19, 20, 21, 22, 23, 24, -1, -1,
27, 28, 29, 30, 31, 32, 33, -1, -1, 36,
-1, -1, -1, -1, 41, 42, 43, 44, 45, 46,
47, 48, 49, 50, 51, 52, 53, 54, 55, 56,
57, 58, 59, 60, 61, 62, 63, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 82, -1, -1, 85, 86,
87, 88, -1, 90, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 104, 105, -1,
-1, -1, 1, 110, 3, 4, 5, 6, 7, 116,
117, -1, 11, 12, -1, -1, -1, 16, -1, 18,
19, 20, 21, 22, 23, 24, -1, -1, 27, 28,
29, 30, 31, 32, 33, -1, -1, 36, -1, -1,
-1, -1, 41, 42, 43, 44, 45, 46, 47, 48,
49, 50, 51, 52, 53, 54, 55, 56, 57, 58,
59, 60, 61, 62, 63, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, 82, -1, -1, 85, 86, 87, 88,
-1, 90, -1, 1, -1, 3, 4, 5, 6, 7,
-1, -1, 10, 11, 12, 104, 105, -1, 16, 108,
18, 19, 20, 21, 22, 23, 24, 116, 117, 27,
28, 29, 30, 31, 32, 33, -1, -1, 36, -1,
-1, -1, -1, 41, 42, 43, 44, 45, 46, 47,
48, 49, 50, 51, 52, 53, 54, 55, 56, 57,
58, 59, 60, 61, 62, 63, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 82, -1, -1, 85, 86, 87,
88, -1, 90, -1, -1, -1, 3, 4, 5, 6,
7, -1, -1, -1, 11, 12, 104, 105, -1, 16,
-1, 18, 19, 20, 21, 22, 23, 24, 116, 117,
27, 28, 29, 30, 31, 32, 33, -1, -1, 36,
-1, -1, -1, -1, 41, 42, 43, 44, 45, 46,
47, 48, 49, 50, 51, 52, 53, 54, 55, 56,
57, 58, 59, 60, 61, 62, 63, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 82, -1, -1, 85, 86,
87, 88, -1, 90, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 104, 105, -1,
-1, 3, 4, 5, 6, 7, 8, 9, 10, -1,
117, 13, 14, 15, 16, 17, -1, -1, 20, 21,
22, 23, 24, 25, 26, 27, 28, 29, 30, 31,
32, 33, 34, 35, 36, 37, 38, 39, 40, 41,
42, 43, 44, 45, 46, 47, 48, 49, 50, 51,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
62, 63, 64, 65, 66, 67, -1, 69, 70, -1,
-1, 73, -1, 75, -1, 77, 78, 79, 80, -1,
-1, -1, -1, -1, -1, -1, 88, -1, -1, -1,
-1, -1, 94, 95, 96, 97, 98, 99, 100, 101,
102, 103, -1, 105, -1, -1, 3, 4, 5, -1,
7, -1, 114, 115, 11, 12, -1, -1, -1, 16,
-1, 18, 19, 20, 21, 22, 23, 24, -1, -1,
27, 28, 29, 30, 31, 32, 33, -1, -1, -1,
-1, -1, -1, -1, -1, 42, -1, -1, 45, 46,
47, 48, 49, 50, 51, 52, 53, 54, 55, 56,
57, 58, 59, 60, 61, 62, 63, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 82, -1, -1, 85, 86,
87, 88, 89, 90, -1, -1, 3, 4, 5, -1,
7, -1, -1, -1, 11, 12, -1, 104, 105, 16,
107, 18, 19, 20, 21, 22, 23, 24, 115, -1,
27, 28, 29, 30, 31, 32, 33, -1, -1, -1,
-1, -1, -1, -1, -1, 42, -1, -1, 45, 46,
47, 48, 49, 50, 51, 52, 53, 54, 55, 56,
57, 58, 59, 60, 61, 62, 63, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 82, -1, -1, 85, 86,
87, 88, 89, 90, -1, -1, 3, 4, 5, -1,
7, -1, -1, -1, 11, 12, -1, 104, 105, 16,
107, 18, 19, 20, 21, 22, 23, 24, 115, -1,
27, 28, 29, 30, 31, 32, 33, -1, -1, -1,
-1, -1, -1, -1, -1, 42, -1, -1, 45, 46,
47, 48, 49, 50, 51, 52, 53, 54, 55, 56,
57, 58, 59, 60, 61, 62, 63, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 82, -1, -1, 85, 86,
87, 88, 89, 90, -1, -1, 3, 4, 5, -1,
7, -1, -1, -1, 11, 12, -1, 104, 105, 16,
107, 18, 19, 20, 21, 22, 23, 24, 115, -1,
27, 28, 29, 30, 31, 32, 33, -1, -1, -1,
-1, -1, -1, -1, -1, 42, -1, -1, 45, 46,
47, 48, 49, 50, 51, 52, 53, 54, 55, 56,
57, 58, 59, 60, 61, 62, 63, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 82, -1, -1, 85, 86,
87, 88, 89, 90, -1, -1, 3, 4, 5, -1,
7, -1, -1, -1, 11, 12, -1, 104, 105, 16,
107, 18, 19, 20, 21, 22, 23, 24, 115, -1,
27, 28, 29, 30, 31, 32, 33, -1, -1, -1,
-1, -1, -1, -1, -1, 42, -1, -1, 45, 46,
47, 48, 49, 50, 51, 52, 53, 54, 55, 56,
57, 58, 59, 60, 61, 62, 63, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 82, -1, -1, 85, 86,
87, 88, 89, 90, -1, -1, 3, 4, 5, -1,
7, -1, -1, -1, 11, 12, -1, 104, 105, 16,
-1, 18, 19, 20, 21, 22, 23, 24, 115, -1,
27, 28, 29, 30, 31, 32, 33, -1, -1, -1,
-1, -1, -1, -1, -1, 42, -1, -1, 45, 46,
47, 48, 49, 50, 51, 52, 53, 54, 55, 56,
57, 58, 59, 60, 61, 62, 63, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 82, -1, -1, 85, 86,
87, 88, 89, 90, -1, -1, 3, 4, 5, -1,
7, -1, -1, -1, 11, 12, -1, 104, 105, 16,
-1, 18, 19, 20, 21, 22, 23, 24, 115, -1,
27, 28, 29, 30, 31, 32, 33, -1, -1, -1,
-1, -1, -1, -1, -1, 42, -1, -1, 45, 46,
47, 48, 49, 50, 51, 52, 53, 54, 55, 56,
57, 58, 59, 60, 61, 62, 63, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 82, -1, -1, 85, 86,
87, 88, 89, 90, -1, -1, 3, 4, 5, -1,
7, -1, -1, -1, 11, 12, -1, 104, 105, 16,
-1, 18, 19, 20, 21, 22, 23, 24, 115, -1,
27, 28, 29, 30, 31, 32, 33, -1, -1, -1,
-1, -1, -1, -1, -1, 42, -1, -1, 45, 46,
47, 48, 49, 50, 51, 52, 53, 54, 55, 56,
57, 58, 59, 60, 61, 62, 63, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 82, -1, -1, 85, 86,
87, 88, 89, 90, -1, -1, 3, 4, 5, -1,
7, -1, -1, -1, 11, 12, -1, 104, 105, 16,
-1, 18, 19, 20, 21, 22, 23, 24, 115, -1,
27, 28, 29, 30, 31, 32, 33, -1, -1, -1,
-1, -1, -1, -1, -1, 42, -1, -1, 45, 46,
47, 48, 49, 50, 51, 52, 53, 54, 55, 56,
57, 58, 59, 60, 61, 62, 63, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 82, -1, -1, 85, 86,
87, 88, 89, 90, -1, -1, 3, 4, 5, -1,
7, -1, -1, -1, 11, 12, -1, 104, 105, 16,
-1, 18, 19, 20, 21, 22, 23, 24, 115, -1,
27, 28, 29, 30, 31, 32, 33, -1, -1, -1,
-1, -1, -1, -1, -1, 42, -1, -1, 45, 46,
47, 48, 49, 50, 51, 52, 53, 54, 55, 56,
57, 58, 59, 60, 61, 62, 63, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 82, -1, -1, 85, 86,
87, 88, 89, 90, -1, -1, 3, 4, 5, -1,
7, -1, -1, -1, 11, 12, -1, 104, 105, 16,
-1, 18, 19, 20, 21, 22, 23, 24, 115, -1,
27, 28, 29, 30, 31, 32, 33, -1, -1, -1,
-1, -1, -1, -1, -1, 42, -1, -1, 45, 46,
47, 48, 49, 50, 51, 52, 53, 54, 55, 56,
57, 58, 59, 60, 61, 62, 63, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 82, -1, -1, 85, 86,
87, 88, 89, 90, -1, -1, 3, 4, 5, -1,
7, -1, -1, -1, 11, 12, -1, 104, 105, 16,
-1, 18, 19, 20, 21, 22, 23, 24, 115, -1,
27, 28, 29, 30, 31, 32, 33, -1, -1, -1,
-1, -1, -1, -1, -1, 42, -1, -1, 45, 46,
47, 48, 49, 50, 51, 52, 53, 54, 55, 56,
57, 58, 59, 60, 61, 62, 63, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 82, -1, -1, 85, 86,
87, 88, 89, 90, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 104, 105, 3,
4, 5, 6, 7, 8, 9, 10, -1, 115, 13,
14, 15, 16, 17, -1, -1, 20, 21, 22, 23,
24, 25, 26, 27, 28, 29, 30, 31, 32, 33,
34, 35, 36, 37, 38, 39, 40, 41, 42, 43,
44, 45, 46, 47, 48, 49, 50, 51, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 62, 63,
64, 65, 66, 67, -1, 69, 70, -1, -1, 73,
-1, 75, -1, 77, 78, 79, 80, -1, -1, -1,
-1, -1, -1, -1, 88, -1, -1, -1, -1, -1,
94, 95, 96, 97, 98, 99, 100, 101, 102, 103,
-1, 105, 3, 4, 5, 6, 7, 8, 9, 10,
114, -1, 13, 14, 15, 16, 17, -1, -1, 20,
21, 22, 23, 24, 25, 26, 27, 28, 29, 30,
31, 32, 33, 34, 35, 36, 37, 38, 39, 40,
41, 42, 43, 44, 45, 46, 47, 48, 49, -1,
51, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, 62, 63, 64, 65, 66, 67, -1, 69, 70,
-1, -1, 73, -1, 75, -1, 77, 78, 79, 80,
-1, -1, -1, -1, -1, -1, -1, 88, -1, -1,
-1, -1, -1, 94, 95, 96, 97, 98, 99, 100,
101, 102, 103, -1, 105, 3, 4, 5, 6, 7,
8, 9, 10, 114, -1, 13, 14, 15, 16, 17,
-1, -1, 20, 21, 22, 23, 24, 25, 26, 27,
28, 29, 30, 31, 32, 33, 34, 35, 36, 37,
38, 39, 40, 41, 42, 43, 44, 45, 46, 47,
48, -1, -1, 51, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 62, 63, 64, 65, 66, 67,
-1, 69, 70, -1, -1, 73, -1, 75, -1, 77,
78, 79, 80, -1, -1, -1, -1, -1, -1, -1,
88, -1, -1, -1, -1, -1, 94, 95, 96, 97,
98, 99, 100, 101, 102, 103, -1, 105, -1, 3,
4, 5, -1, 7, -1, -1, 114, 11, 12, -1,
-1, -1, 16, -1, 18, 19, 20, 21, 22, 23,
24, -1, -1, 27, 28, 29, 30, 31, 32, 33,
-1, -1, -1, -1, -1, -1, -1, -1, 42, -1,
-1, 45, 46, 47, 48, 49, 50, 51, 52, 53,
54, 55, 56, 57, 58, 59, 60, 61, 62, 63,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 82, -1,
-1, 85, 86, 87, 88, 89, 90, -1, -1, -1,
-1, -1, -1, -1, 3, 4, 5, -1, 7, -1,
104, 105, 11, 12, -1, -1, 110, 16, -1, 18,
19, 20, 21, 22, 23, 24, -1, -1, 27, 28,
29, 30, 31, 32, 33, -1, -1, -1, -1, -1,
-1, -1, -1, 42, -1, -1, 45, 46, 47, 48,
49, 50, 51, 52, 53, 54, 55, 56, 57, 58,
59, 60, 61, 62, 63, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, 82, -1, -1, 85, 86, 87, 88,
89, 90, -1, -1, -1, -1, -1, -1, -1, 3,
4, 5, 6, 7, -1, 104, 105, 11, 12, -1,
-1, 110, 16, -1, 18, 19, 20, 21, 22, 23,
24, -1, -1, 27, 28, 29, 30, 31, 32, 33,
-1, -1, 36, -1, -1, -1, -1, 41, 42, 43,
44, 45, 46, 47, 48, 49, 50, 51, 52, 53,
54, 55, 56, 57, 58, 59, 60, 61, 62, 63,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 82, -1,
-1, 85, 86, 87, 88, -1, 90, -1, -1, 3,
4, 5, -1, 7, -1, -1, -1, 11, 12, -1,
104, 105, 16, -1, 18, 19, 20, 21, 22, 23,
24, -1, -1, 27, 28, 29, 30, 31, 32, 33,
-1, -1, 36, -1, -1, -1, -1, -1, 42, -1,
-1, 45, 46, 47, 48, 49, 50, 51, 52, 53,
54, 55, 56, 57, 58, 59, 60, 61, 62, 63,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 82, -1,
-1, 85, 86, 87, 88, -1, 90, -1, -1, 3,
4, 5, -1, 7, -1, -1, -1, 11, 12, -1,
104, 105, 16, -1, 18, 19, 20, 21, 22, 23,
24, -1, -1, 27, 28, 29, 30, 31, 32, 33,
-1, -1, -1, -1, -1, -1, -1, -1, 42, -1,
-1, 45, 46, 47, 48, 49, 50, 51, 52, 53,
54, 55, 56, 57, 58, 59, 60, 61, 62, 63,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 82, -1,
-1, 85, 86, 87, 88, 89, 90, -1, -1, 3,
4, 5, -1, 7, -1, -1, -1, 11, 12, -1,
104, 105, 16, -1, 18, 19, 20, 21, 22, 23,
24, -1, -1, 27, 28, 29, 30, 31, 32, 33,
-1, -1, -1, -1, -1, -1, -1, -1, 42, -1,
-1, 45, 46, 47, 48, 49, 50, 51, 52, 53,
54, 55, 56, 57, 58, 59, 60, 61, 62, 63,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 82, -1,
-1, 85, 86, 87, 88, 89, 90, -1, -1, 3,
4, 5, -1, 7, -1, -1, -1, 11, 12, -1,
104, 105, 16, -1, 18, 19, 20, 21, 22, 23,
24, -1, -1, 27, 28, 29, 30, 31, 32, 33,
-1, -1, -1, -1, -1, -1, -1, -1, 42, -1,
-1, 45, 46, 47, 48, 49, 50, 51, 52, 53,
54, 55, 56, 57, 58, 59, 60, 61, 62, 63,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 82, -1,
-1, 85, 86, 87, 88, 89, 90, -1, -1, 3,
4, 5, -1, 7, -1, -1, -1, 11, 12, -1,
104, 105, 16, -1, 18, 19, 20, 21, 22, 23,
24, -1, -1, 27, 28, 29, 30, 31, 32, 33,
-1, -1, -1, -1, -1, -1, -1, -1, 42, -1,
-1, 45, 46, 47, 48, 49, 50, 51, 52, 53,
54, 55, 56, 57, 58, 59, 60, 61, 62, 63,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 82, -1,
-1, 85, 86, 87, 88, 89, 90, -1, -1, 3,
4, 5, -1, 7, -1, -1, -1, 11, 12, -1,
104, 105, 16, -1, 18, 19, 20, 21, 22, 23,
24, -1, -1, 27, 28, 29, 30, 31, 32, 33,
-1, -1, -1, -1, -1, -1, -1, -1, 42, -1,
-1, 45, 46, 47, 48, 49, 50, 51, 52, 53,
54, 55, 56, 57, 58, 59, 60, 61, 62, 63,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 82, -1,
-1, 85, 86, 87, 88, -1, 90, -1, -1, 3,
4, 5, -1, 7, -1, -1, -1, 11, 12, -1,
104, 105, 16, -1, 18, 19, 20, 21, 22, 23,
24, -1, -1, 27, 28, 29, 30, 31, 32, 33,
-1, -1, -1, -1, -1, -1, -1, -1, 42, -1,
-1, 45, 46, 47, 48, 49, 50, 51, 52, 53,
54, 55, 56, 57, 58, 59, 60, 61, 62, 63,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 82, -1,
-1, 85, 86, 87, 88, -1, 90, -1, -1, 3,
4, 5, -1, 7, -1, -1, -1, 11, 12, -1,
104, 105, 16, -1, 18, 19, 20, 21, 22, 23,
24, -1, -1, 27, 28, 29, 30, 31, 32, 33,
-1, -1, -1, -1, -1, -1, -1, -1, 42, -1,
-1, 45, 46, 47, 48, 49, 50, 51, 52, 53,
54, 55, 56, 57, 58, 59, 60, 61, 62, 63,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 82, -1,
-1, 85, 86, 87, 88, -1, 90, -1, -1, 3,
4, 5, -1, 7, -1, -1, -1, 11, 12, -1,
104, 105, 16, -1, 18, 19, 20, 21, 22, 23,
24, -1, -1, 27, 28, 29, 30, 31, 32, 33,
-1, -1, -1, -1, -1, -1, -1, -1, 42, -1,
-1, 45, 46, 47, 48, 49, 50, 51, 52, 53,
54, 55, 56, 57, 58, 59, 60, 61, 62, 63,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 82, -1,
-1, 85, 86, 87, 88, -1, 90, -1, -1, 3,
4, 5, -1, 7, -1, -1, -1, 11, 12, -1,
104, 105, 16, -1, 18, 19, 20, 21, 22, 23,
24, -1, -1, 27, 28, 29, 30, 31, 32, 33,
-1, -1, -1, -1, -1, -1, -1, -1, 42, -1,
-1, 45, 46, 47, 48, 49, 50, 51, 52, 53,
54, 55, 56, 57, 58, 59, 60, 61, 62, 63,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 82, -1,
-1, 85, 86, 87, -1, -1, 90, -1, -1, 3,
4, 5, -1, 7, -1, -1, -1, 11, 12, -1,
104, 105, 16, -1, 18, 19, 20, 21, 22, 23,
24, -1, -1, 27, 28, 29, 30, 31, 32, 33,
-1, -1, -1, -1, -1, -1, -1, -1, 42, -1,
-1, 45, 46, 47, 48, 49, 50, 51, 52, 53,
54, 55, 56, 57, 58, 59, 60, 61, 62, 63,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 82, -1,
-1, 85, 86, 87, -1, -1, 90, -1, -1, 3,
4, 5, -1, 7, -1, -1, -1, 11, 12, -1,
104, 105, 16, -1, 18, 19, 20, 21, 22, 23,
24, -1, -1, 27, 28, 29, 30, 31, 32, 33,
-1, -1, -1, -1, -1, -1, -1, -1, 42, -1,
-1, 45, 46, 47, 48, 49, 50, 51, 52, 53,
54, 55, 56, 57, 58, 59, 60, 61, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 82, -1,
-1, 85, 86, 87, 88, -1, 90, 3, 4, 5,
-1, 7, 96, -1, -1, 11, 12, -1, -1, -1,
16, -1, 18, 19, 20, 21, 22, 23, 24, -1,
-1, 27, 28, 29, 30, 31, 32, 33, -1, -1,
-1, -1, -1, -1, -1, -1, 42, -1, -1, 45,
46, 47, 48, 49, 50, 51, 52, 53, 54, 55,
56, 57, 58, 59, 60, 61, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 82, -1, -1, 85,
86, 87, 88, -1, 90, 3, 4, 5, -1, 7,
-1, -1, -1, 11, 12, -1, -1, -1, 16, -1,
18, 19, 20, 21, 22, 23, 24, -1, -1, 27,
28, 29, 30, 31, 32, 33, -1, -1, -1, -1,
-1, -1, -1, -1, 42, -1, -1, 45, 46, 47,
48, 49, 50, 51, 52, 53, 54, 55, 56, 57,
58, 59, 60, 61, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 82, -1, -1, 85, 86, 87,
88, -1, 90, 3, 4, 5, -1, 7, -1, -1,
-1, 11, 12, -1, -1, -1, 16, -1, 18, 19,
20, 21, 22, 23, 24, -1, -1, 27, 28, 29,
30, 31, 32, 33, -1, -1, -1, -1, -1, -1,
-1, -1, 42, -1, -1, 45, 46, 47, 48, 49,
50, 51, 52, 53, 54, 55, 56, 57, 58, 59,
60, 61, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 82, -1, -1, 85, 86, 87, 88, -1,
90, 3, 4, 5, -1, 7, -1, -1, -1, 11,
12, -1, -1, -1, 16, -1, 18, 19, 20, 21,
22, 23, 24, -1, -1, 27, 28, 29, 30, 31,
32, 33, -1, -1, -1, -1, -1, -1, -1, -1,
42, -1, -1, 45, 46, 47, 48, 49, 50, 51,
52, 53, 54, 55, 56, 57, 58, 59, 60, 61,
-1, 64, 65, 66, 67, 68, 69, 70, 71, 72,
73, 74, 75, 76, -1, -1, 79, 80, -1, -1,
82, -1, -1, 85, 86, 87, -1, -1, 90, 92,
93, 94, 95, 96, 97, 98, 99, 100, 101, 102,
103, 64, 65, 66, 67, 68, 69, 70, 71, 72,
73, 74, 75, 76, -1, -1, 79, 80, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, 92,
-1, 94, 95, 96, 97, 98, 99, 100, 101, 102,
103
};
/* -*-C-*- Note some compilers choke on comments on `#line' lines. */
#line 3 "/usr/share/misc/bison.simple"
/* This file comes from bison-1.25.90. */
/* Skeleton output parser for bison,
Copyright (C) 1984, 1989, 1990 Free Software Foundation, Inc.
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2, or (at your option)
any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
/* As a special exception, when this file is copied by Bison into a
Bison output file, you may use that output file without restriction.
This special exception was added by the Free Software Foundation
in version 1.24 of Bison. */
/* This is the parser code that is written into each bison parser
when the %semantic_parser declaration is not specified in the grammar.
It was written by Richard Stallman by simplifying the hairy parser
used when %semantic_parser is specified. */
#ifndef YYSTACK_USE_ALLOCA
#ifdef alloca
#define YYSTACK_USE_ALLOCA
#else /* alloca not defined */
#ifdef __GNUC__
#define YYSTACK_USE_ALLOCA
#define alloca __builtin_alloca
#else /* not GNU C. */
#if (!defined (__STDC__) && defined (sparc)) || defined (__sparc__) || defined (__sparc) || defined (__sgi) || (defined (__sun) && defined (__i386))
#define YYSTACK_USE_ALLOCA
#include <alloca.h>
#else /* not sparc */
/* We think this test detects Watcom and Microsoft C. */
/* This used to test MSDOS, but that is a bad idea
since that symbol is in the user namespace. */
#if (defined (_MSDOS) || defined (_MSDOS_)) && !defined (__TURBOC__)
#if 0 /* No need for malloc.h, which pollutes the namespace;
instead, just don't use alloca. */
#include <malloc.h>
#endif
#else /* not MSDOS, or __TURBOC__ */
#if defined(_AIX)
/* I don't know what this was needed for, but it pollutes the namespace.
So I turned it off. rms, 2 May 1997. */
/* #include <malloc.h> */
#pragma alloca
#define YYSTACK_USE_ALLOCA
#else /* not MSDOS, or __TURBOC__, or _AIX */
#if 0
#ifdef __hpux /* haible@ilog.fr says this works for HPUX 9.05 and up,
and on HPUX 10. Eventually we can turn this on. */
#define YYSTACK_USE_ALLOCA
#define alloca __builtin_alloca
#endif /* __hpux */
#endif
#endif /* not _AIX */
#endif /* not MSDOS, or __TURBOC__ */
#endif /* not sparc */
#endif /* not GNU C */
#endif /* alloca not defined */
#endif /* YYSTACK_USE_ALLOCA not defined */
#ifdef YYSTACK_USE_ALLOCA
#define YYSTACK_ALLOC alloca
#else
#define YYSTACK_ALLOC malloc
#endif
/* Note: there must be only one dollar sign in this file.
It is replaced by the list of actions, each action
as one case of the switch. */
#define yyerrok (yyerrstatus = 0)
#define yyclearin (yychar = YYEMPTY)
#define YYEMPTY -2
#define YYEOF 0
#define YYACCEPT goto yyacceptlab
#define YYABORT goto yyabortlab
#define YYERROR goto yyerrlab1
/* Like YYERROR except do call yyerror.
This remains here temporarily to ease the
transition to the new meaning of YYERROR, for GCC.
Once GCC version 2 has supplanted version 1, this can go. */
#define YYFAIL goto yyerrlab
#define YYRECOVERING() (!!yyerrstatus)
#define YYBACKUP(token, value) \
do \
if (yychar == YYEMPTY && yylen == 1) \
{ yychar = (token), yylval = (value); \
yychar1 = YYTRANSLATE (yychar); \
YYPOPSTACK; \
goto yybackup; \
} \
else \
{ yyerror ("syntax error: cannot back up"); YYERROR; } \
while (0)
#define YYTERROR 1
#define YYERRCODE 256
#ifndef YYPURE
#define YYLEX yylex()
#endif
#ifdef YYPURE
#ifdef YYLSP_NEEDED
#ifdef YYLEX_PARAM
#define YYLEX yylex(&yylval, &yylloc, YYLEX_PARAM)
#else
#define YYLEX yylex(&yylval, &yylloc)
#endif
#else /* not YYLSP_NEEDED */
#ifdef YYLEX_PARAM
#define YYLEX yylex(&yylval, YYLEX_PARAM)
#else
#define YYLEX yylex(&yylval)
#endif
#endif /* not YYLSP_NEEDED */
#endif
/* If nonreentrant, generate the variables here */
#ifndef YYPURE
int yychar; /* the lookahead symbol */
YYSTYPE yylval; /* the semantic value of the */
/* lookahead symbol */
#ifdef YYLSP_NEEDED
YYLTYPE yylloc; /* location data for the lookahead */
/* symbol */
#endif
int yynerrs; /* number of parse errors so far */
#endif /* not YYPURE */
#if YYDEBUG != 0
int yydebug; /* nonzero means print parse trace */
/* Since this is uninitialized, it does not stop multiple parsers
from coexisting. */
#endif
/* YYINITDEPTH indicates the initial size of the parser's stacks */
#ifndef YYINITDEPTH
#define YYINITDEPTH 200
#endif
/* YYMAXDEPTH is the maximum size the stacks can grow to
(effective only if the built-in stack extension method is used). */
#if YYMAXDEPTH == 0
#undef YYMAXDEPTH
#endif
#ifndef YYMAXDEPTH
#define YYMAXDEPTH 10000
#endif
/* Define __yy_memcpy. Note that the size argument
should be passed with type unsigned int, because that is what the non-GCC
definitions require. With GCC, __builtin_memcpy takes an arg
of type size_t, but it can handle unsigned int. */
#if __GNUC__ > 1 /* GNU C and GNU C++ define this. */
#define __yy_memcpy(TO,FROM,COUNT) __builtin_memcpy(TO,FROM,COUNT)
#else /* not GNU C or C++ */
#ifndef __cplusplus
/* This is the most reliable way to avoid incompatibilities
in available built-in functions on various systems. */
static void
__yy_memcpy (to, from, count)
char *to;
char *from;
unsigned int count;
{
register char *f = from;
register char *t = to;
register int i = count;
while (i-- > 0)
*t++ = *f++;
}
#else /* __cplusplus */
/* This is the most reliable way to avoid incompatibilities
in available built-in functions on various systems. */
static void
__yy_memcpy (char *to, char *from, unsigned int count)
{
register char *t = to;
register char *f = from;
register int i = count;
while (i-- > 0)
*t++ = *f++;
}
#endif
#endif
#line 216 "/usr/share/misc/bison.simple"
/* The user can define YYPARSE_PARAM as the name of an argument to be passed
into yyparse. The argument should have type void *.
It should actually point to an object.
Grammar actions can access the variable by casting it
to the proper pointer type. */
#ifdef YYPARSE_PARAM
#ifdef __cplusplus
#define YYPARSE_PARAM_ARG void *YYPARSE_PARAM
#define YYPARSE_PARAM_DECL
#else /* not __cplusplus */
#define YYPARSE_PARAM_ARG YYPARSE_PARAM
#define YYPARSE_PARAM_DECL void *YYPARSE_PARAM;
#endif /* not __cplusplus */
#else /* not YYPARSE_PARAM */
#define YYPARSE_PARAM_ARG
#define YYPARSE_PARAM_DECL
#endif /* not YYPARSE_PARAM */
/* Prevent warning if -Wstrict-prototypes. */
#ifdef __GNUC__
#ifdef YYPARSE_PARAM
int yyparse (void *);
#else
int yyparse (void);
#endif
#endif
int
yyparse(YYPARSE_PARAM_ARG)
YYPARSE_PARAM_DECL
{
register int yystate;
register int yyn;
register short *yyssp;
register YYSTYPE *yyvsp;
int yyerrstatus; /* number of tokens to shift before error messages enabled */
int yychar1 = 0; /* lookahead token as an internal (translated) token number */
short yyssa[YYINITDEPTH]; /* the state stack */
YYSTYPE yyvsa[YYINITDEPTH]; /* the semantic value stack */
short *yyss = yyssa; /* refer to the stacks thru separate pointers */
YYSTYPE *yyvs = yyvsa; /* to allow yyoverflow to reallocate them elsewhere */
#ifdef YYLSP_NEEDED
YYLTYPE yylsa[YYINITDEPTH]; /* the location stack */
YYLTYPE *yyls = yylsa;
YYLTYPE *yylsp;
#define YYPOPSTACK (yyvsp--, yyssp--, yylsp--)
#else
#define YYPOPSTACK (yyvsp--, yyssp--)
#endif
int yystacksize = YYINITDEPTH;
int yyfree_stacks = 0;
#ifdef YYPURE
int yychar;
YYSTYPE yylval;
int yynerrs;
#ifdef YYLSP_NEEDED
YYLTYPE yylloc;
#endif
#endif
YYSTYPE yyval; /* the variable used to return */
/* semantic values from the action */
/* routines */
int yylen;
#if YYDEBUG != 0
if (yydebug)
fprintf(stderr, "Starting parse\n");
#endif
yystate = 0;
yyerrstatus = 0;
yynerrs = 0;
yychar = YYEMPTY; /* Cause a token to be read. */
/* Initialize stack pointers.
Waste one element of value and location stack
so that they stay on the same level as the state stack.
The wasted elements are never initialized. */
yyssp = yyss - 1;
yyvsp = yyvs;
#ifdef YYLSP_NEEDED
yylsp = yyls;
#endif
/* Push a new state, which is found in yystate . */
/* In all cases, when you get here, the value and location stacks
have just been pushed. so pushing a state here evens the stacks. */
yynewstate:
*++yyssp = yystate;
if (yyssp >= yyss + yystacksize - 1)
{
/* Give user a chance to reallocate the stack */
/* Use copies of these so that the &'s don't force the real ones into memory. */
YYSTYPE *yyvs1 = yyvs;
short *yyss1 = yyss;
#ifdef YYLSP_NEEDED
YYLTYPE *yyls1 = yyls;
#endif
/* Get the current used size of the three stacks, in elements. */
int size = yyssp - yyss + 1;
#ifdef yyoverflow
/* Each stack pointer address is followed by the size of
the data in use in that stack, in bytes. */
#ifdef YYLSP_NEEDED
/* This used to be a conditional around just the two extra args,
but that might be undefined if yyoverflow is a macro. */
yyoverflow("parser stack overflow",
&yyss1, size * sizeof (*yyssp),
&yyvs1, size * sizeof (*yyvsp),
&yyls1, size * sizeof (*yylsp),
&yystacksize);
#else
yyoverflow("parser stack overflow",
&yyss1, size * sizeof (*yyssp),
&yyvs1, size * sizeof (*yyvsp),
&yystacksize);
#endif
yyss = yyss1; yyvs = yyvs1;
#ifdef YYLSP_NEEDED
yyls = yyls1;
#endif
#else /* no yyoverflow */
/* Extend the stack our own way. */
if (yystacksize >= YYMAXDEPTH)
{
yyerror("parser stack overflow");
if (yyfree_stacks)
{
free (yyss);
free (yyvs);
#ifdef YYLSP_NEEDED
free (yyls);
#endif
}
return 2;
}
yystacksize *= 2;
if (yystacksize > YYMAXDEPTH)
yystacksize = YYMAXDEPTH;
#ifndef YYSTACK_USE_ALLOCA
yyfree_stacks = 1;
#endif
yyss = (short *) YYSTACK_ALLOC (yystacksize * sizeof (*yyssp));
__yy_memcpy ((char *)yyss, (char *)yyss1,
size * (unsigned int) sizeof (*yyssp));
yyvs = (YYSTYPE *) YYSTACK_ALLOC (yystacksize * sizeof (*yyvsp));
__yy_memcpy ((char *)yyvs, (char *)yyvs1,
size * (unsigned int) sizeof (*yyvsp));
#ifdef YYLSP_NEEDED
yyls = (YYLTYPE *) YYSTACK_ALLOC (yystacksize * sizeof (*yylsp));
__yy_memcpy ((char *)yyls, (char *)yyls1,
size * (unsigned int) sizeof (*yylsp));
#endif
#endif /* no yyoverflow */
yyssp = yyss + size - 1;
yyvsp = yyvs + size - 1;
#ifdef YYLSP_NEEDED
yylsp = yyls + size - 1;
#endif
#if YYDEBUG != 0
if (yydebug)
fprintf(stderr, "Stack size increased to %d\n", yystacksize);
#endif
if (yyssp >= yyss + yystacksize - 1)
YYABORT;
}
#if YYDEBUG != 0
if (yydebug)
fprintf(stderr, "Entering state %d\n", yystate);
#endif
goto yybackup;
yybackup:
/* Do appropriate processing given the current state. */
/* Read a lookahead token if we need one and don't already have one. */
/* yyresume: */
/* First try to decide what to do without reference to lookahead token. */
yyn = yypact[yystate];
if (yyn == YYFLAG)
goto yydefault;
/* Not known => get a lookahead token if don't already have one. */
/* yychar is either YYEMPTY or YYEOF
or a valid token in external form. */
if (yychar == YYEMPTY)
{
#if YYDEBUG != 0
if (yydebug)
fprintf(stderr, "Reading a token: ");
#endif
yychar = YYLEX;
}
/* Convert token to internal form (in yychar1) for indexing tables with */
if (yychar <= 0) /* This means end of input. */
{
yychar1 = 0;
yychar = YYEOF; /* Don't call YYLEX any more */
#if YYDEBUG != 0
if (yydebug)
fprintf(stderr, "Now at end of input.\n");
#endif
}
else
{
yychar1 = YYTRANSLATE(yychar);
#if YYDEBUG != 0
if (yydebug)
{
fprintf (stderr, "Next token is %d (%s", yychar, yytname[yychar1]);
/* Give the individual parser a way to print the precise meaning
of a token, for further debugging info. */
#ifdef YYPRINT
YYPRINT (stderr, yychar, yylval);
#endif
fprintf (stderr, ")\n");
}
#endif
}
yyn += yychar1;
if (yyn < 0 || yyn > YYLAST || yycheck[yyn] != yychar1)
goto yydefault;
yyn = yytable[yyn];
/* yyn is what to do for this token type in this state.
Negative => reduce, -yyn is rule number.
Positive => shift, yyn is new state.
New state is final state => don't bother to shift,
just return success.
0, or most negative number => error. */
if (yyn < 0)
{
if (yyn == YYFLAG)
goto yyerrlab;
yyn = -yyn;
goto yyreduce;
}
else if (yyn == 0)
goto yyerrlab;
if (yyn == YYFINAL)
YYACCEPT;
/* Shift the lookahead token. */
#if YYDEBUG != 0
if (yydebug)
fprintf(stderr, "Shifting token %d (%s), ", yychar, yytname[yychar1]);
#endif
/* Discard the token being shifted unless it is eof. */
if (yychar != YYEOF)
yychar = YYEMPTY;
*++yyvsp = yylval;
#ifdef YYLSP_NEEDED
*++yylsp = yylloc;
#endif
/* count tokens shifted since error; after three, turn off error status. */
if (yyerrstatus) yyerrstatus--;
yystate = yyn;
goto yynewstate;
/* Do the default action for the current state. */
yydefault:
yyn = yydefact[yystate];
if (yyn == 0)
goto yyerrlab;
/* Do a reduction. yyn is the number of a rule to reduce with. */
yyreduce:
yylen = yyr2[yyn];
if (yylen > 0)
yyval = yyvsp[1-yylen]; /* implement default value of the action */
#if YYDEBUG != 0
if (yydebug)
{
int i;
fprintf (stderr, "Reducing via rule %d (line %d), ",
yyn, yyrline[yyn]);
/* Print the symbols being reduced, and their result. */
for (i = yyprhs[yyn]; yyrhs[i] > 0; i++)
fprintf (stderr, "%s ", yytname[yyrhs[i]]);
fprintf (stderr, " -> %s\n", yytname[yyr1[yyn]]);
}
#endif
switch (yyn) {
case 1:
#line 233 "parse.y"
{
yyval.vars = ruby_dyna_vars;
lex_state = EXPR_BEG;
top_local_init();
NEW_CREF0(); /* initialize constant c-ref */
if ((VALUE)ruby_class == rb_cObject) class_nest = 0;
else class_nest = 1;
;
break;}
case 2:
#line 242 "parse.y"
{
ruby_eval_tree = block_append(ruby_eval_tree, yyvsp[0].node);
top_local_setup();
cur_cref = 0;
class_nest = 0;
ruby_dyna_vars = yyvsp[-1].vars;
;
break;}
case 4:
#line 253 "parse.y"
{
yyval.node = 0;
;
break;}
case 5:
#line 257 "parse.y"
{
yyval.node = newline_node(yyvsp[0].node);
;
break;}
case 6:
#line 261 "parse.y"
{
yyval.node = block_append(yyvsp[-2].node, newline_node(yyvsp[0].node));
;
break;}
case 7:
#line 265 "parse.y"
{
yyval.node = yyvsp[0].node;
;
break;}
case 8:
#line 270 "parse.y"
{
if (yyvsp[-1].node && nd_type(yyvsp[-1].node) == NODE_BLOCK_PASS) {
rb_compile_error("both block arg and actual block given");
}
yyvsp[0].node->nd_iter = yyvsp[-1].node;
yyval.node = yyvsp[0].node;
fixpos(yyval.node, yyvsp[0].node);
;
break;}
case 9:
#line 278 "parse.y"
{lex_state = EXPR_FNAME;;
break;}
case 10:
#line 279 "parse.y"
{
if (cur_mid || in_single)
yyerror("alias within method");
yyval.node = NEW_ALIAS(yyvsp[-2].id, yyvsp[0].id);
;
break;}
case 11:
#line 285 "parse.y"
{
if (cur_mid || in_single)
yyerror("alias within method");
yyval.node = NEW_VALIAS(yyvsp[-1].id, yyvsp[0].id);
;
break;}
case 12:
#line 291 "parse.y"
{
char buf[3];
if (cur_mid || in_single)
yyerror("alias within method");
sprintf(buf, "$%c", yyvsp[0].node->nd_nth);
yyval.node = NEW_VALIAS(yyvsp[-1].id, rb_intern(buf));
;
break;}
case 13:
#line 300 "parse.y"
{
yyerror("can't make alias for the number variables");
yyval.node = 0;
;
break;}
case 14:
#line 305 "parse.y"
{
if (cur_mid || in_single)
yyerror("undef within method");
yyval.node = yyvsp[0].node;
;
break;}
case 15:
#line 311 "parse.y"
{
value_expr(yyvsp[0].node);
yyval.node = NEW_IF(cond(yyvsp[0].node), yyvsp[-2].node, 0);
fixpos(yyval.node, yyvsp[0].node);
;
break;}
case 16:
#line 317 "parse.y"
{
value_expr(yyvsp[0].node);
yyval.node = NEW_UNLESS(cond(yyvsp[0].node), yyvsp[-2].node, 0);
fixpos(yyval.node, yyvsp[0].node);
;
break;}
case 17:
#line 323 "parse.y"
{
value_expr(yyvsp[0].node);
if (nd_type(yyvsp[-2].node) == NODE_BEGIN) {
yyval.node = NEW_WHILE(cond(yyvsp[0].node), yyvsp[-2].node->nd_body, 0);
}
else {
yyval.node = NEW_WHILE(cond(yyvsp[0].node), yyvsp[-2].node, 1);
}
;
break;}
case 18:
#line 333 "parse.y"
{
value_expr(yyvsp[0].node);
if (nd_type(yyvsp[-2].node) == NODE_BEGIN) {
yyval.node = NEW_UNTIL(cond(yyvsp[0].node), yyvsp[-2].node->nd_body, 0);
}
else {
yyval.node = NEW_UNTIL(cond(yyvsp[0].node), yyvsp[-2].node, 1);
}
;
break;}
case 19:
#line 343 "parse.y"
{
if (cur_mid || in_single) {
yyerror("BEGIN in method");
}
local_push();
;
break;}
case 20:
#line 351 "parse.y"
{
ruby_eval_tree_begin = block_append(ruby_eval_tree_begin,
NEW_PREEXE(yyvsp[-1].node));
local_pop();
yyval.node = 0;
;
break;}
case 21:
#line 358 "parse.y"
{
if (cur_mid || in_single) {
yyerror("END in method; use at_exit");
}
yyval.node = NEW_ITER(0, NEW_POSTEXE(), yyvsp[-1].node);
;
break;}
case 23:
#line 368 "parse.y"
{
value_expr(yyvsp[0].node);
yyvsp[-2].node->nd_value = yyvsp[0].node;
yyval.node = yyvsp[-2].node;
;
break;}
case 24:
#line 374 "parse.y"
{
value_expr(yyvsp[0].node);
if (!cur_mid && !in_single)
yyerror("return appeared outside of method");
yyval.node = NEW_RETURN(yyvsp[0].node);
;
break;}
case 25:
#line 381 "parse.y"
{
value_expr(yyvsp[0].node);
yyval.node = NEW_YIELD(yyvsp[0].node);
;
break;}
case 27:
#line 387 "parse.y"
{
yyval.node = logop(NODE_AND, yyvsp[-2].node, yyvsp[0].node);
;
break;}
case 28:
#line 391 "parse.y"
{
yyval.node = logop(NODE_OR, yyvsp[-2].node, yyvsp[0].node);
;
break;}
case 29:
#line 395 "parse.y"
{
value_expr(yyvsp[0].node);
yyval.node = NEW_NOT(cond(yyvsp[0].node));
;
break;}
case 30:
#line 400 "parse.y"
{
value_expr(yyvsp[0].node);
yyval.node = NEW_NOT(cond(yyvsp[0].node));
;
break;}
case 32:
#line 407 "parse.y"
{
yyval.node = new_fcall(yyvsp[-1].id, yyvsp[0].node);
fixpos(yyval.node, yyvsp[0].node);
;
break;}
case 33:
#line 412 "parse.y"
{
value_expr(yyvsp[-3].node);
yyval.node = new_call(yyvsp[-3].node, yyvsp[-1].id, yyvsp[0].node);
fixpos(yyval.node, yyvsp[-3].node);
;
break;}
case 34:
#line 418 "parse.y"
{
value_expr(yyvsp[-3].node);
yyval.node = new_call(yyvsp[-3].node, yyvsp[-1].id, yyvsp[0].node);
fixpos(yyval.node, yyvsp[-3].node);
;
break;}
case 35:
#line 424 "parse.y"
{
if (!cur_mid && !in_single && !in_defined)
yyerror("super called outside of method");
yyval.node = NEW_SUPER(yyvsp[0].node);
fixpos(yyval.node, yyvsp[0].node);
;
break;}
case 37:
#line 433 "parse.y"
{
yyval.node = yyvsp[-1].node;
;
break;}
case 39:
#line 439 "parse.y"
{
yyval.node = NEW_MASGN(NEW_LIST(yyvsp[-1].node), 0);
;
break;}
case 40:
#line 444 "parse.y"
{
yyval.node = NEW_MASGN(NEW_LIST(yyvsp[0].node), 0);
;
break;}
case 41:
#line 448 "parse.y"
{
yyval.node = NEW_MASGN(NEW_LIST(yyvsp[-2].node), yyvsp[0].node);
;
break;}
case 42:
#line 452 "parse.y"
{
yyval.node = NEW_MASGN(list_concat(NEW_LIST(yyvsp[-1].node),yyvsp[0].node), 0);
;
break;}
case 43:
#line 456 "parse.y"
{
yyval.node = NEW_MASGN(list_concat(NEW_LIST(yyvsp[-4].node),yyvsp[-3].node),yyvsp[0].node);
;
break;}
case 44:
#line 460 "parse.y"
{
yyval.node = NEW_MASGN(0, yyvsp[0].node);
;
break;}
case 46:
#line 466 "parse.y"
{
yyval.node = yyvsp[-1].node;
;
break;}
case 47:
#line 471 "parse.y"
{
yyval.node = yyvsp[-1].node;
;
break;}
case 48:
#line 476 "parse.y"
{
yyval.node = NEW_LIST(yyvsp[0].node);
;
break;}
case 49:
#line 480 "parse.y"
{
yyval.node = list_append(yyvsp[-2].node, yyvsp[0].node);
;
break;}
case 50:
#line 485 "parse.y"
{
yyval.node = assignable(yyvsp[0].id, 0);
;
break;}
case 51:
#line 489 "parse.y"
{
yyval.node = aryset(yyvsp[-3].node, yyvsp[-1].node, 0);
;
break;}
case 52:
#line 493 "parse.y"
{
yyval.node = attrset(yyvsp[-2].node, yyvsp[0].id, 0);
;
break;}
case 53:
#line 497 "parse.y"
{
rb_backref_error(yyvsp[0].node);
yyval.node = 0;
;
break;}
case 54:
#line 503 "parse.y"
{
yyerror("class/module name must be CONSTANT");
;
break;}
case 59:
#line 512 "parse.y"
{
lex_state = EXPR_END;
yyval.id = yyvsp[0].id;
;
break;}
case 60:
#line 517 "parse.y"
{
lex_state = EXPR_END;
yyval.id = yyvsp[0].id;
;
break;}
case 61:
#line 523 "parse.y"
{
yyval.node = NEW_UNDEF(yyvsp[0].id);
;
break;}
case 62:
#line 526 "parse.y"
{lex_state = EXPR_FNAME;;
break;}
case 63:
#line 527 "parse.y"
{
yyval.node = block_append(yyvsp[-3].node, NEW_UNDEF(yyvsp[0].id));
;
break;}
case 64:
#line 531 "parse.y"
{ yyval.id = tDOT2; ;
break;}
case 65:
#line 532 "parse.y"
{ yyval.id = '|'; ;
break;}
case 66:
#line 533 "parse.y"
{ yyval.id = '^'; ;
break;}
case 67:
#line 534 "parse.y"
{ yyval.id = '&'; ;
break;}
case 68:
#line 535 "parse.y"
{ yyval.id = tCMP; ;
break;}
case 69:
#line 536 "parse.y"
{ yyval.id = tEQ; ;
break;}
case 70:
#line 537 "parse.y"
{ yyval.id = tEQQ; ;
break;}
case 71:
#line 538 "parse.y"
{ yyval.id = tMATCH; ;
break;}
case 72:
#line 539 "parse.y"
{ yyval.id = '>'; ;
break;}
case 73:
#line 540 "parse.y"
{ yyval.id = tGEQ; ;
break;}
case 74:
#line 541 "parse.y"
{ yyval.id = '<'; ;
break;}
case 75:
#line 542 "parse.y"
{ yyval.id = tLEQ; ;
break;}
case 76:
#line 543 "parse.y"
{ yyval.id = tLSHFT; ;
break;}
case 77:
#line 544 "parse.y"
{ yyval.id = tRSHFT; ;
break;}
case 78:
#line 545 "parse.y"
{ yyval.id = '+'; ;
break;}
case 79:
#line 546 "parse.y"
{ yyval.id = '-'; ;
break;}
case 80:
#line 547 "parse.y"
{ yyval.id = '*'; ;
break;}
case 81:
#line 548 "parse.y"
{ yyval.id = '*'; ;
break;}
case 82:
#line 549 "parse.y"
{ yyval.id = '/'; ;
break;}
case 83:
#line 550 "parse.y"
{ yyval.id = '%'; ;
break;}
case 84:
#line 551 "parse.y"
{ yyval.id = tPOW; ;
break;}
case 85:
#line 552 "parse.y"
{ yyval.id = '~'; ;
break;}
case 86:
#line 553 "parse.y"
{ yyval.id = tUPLUS; ;
break;}
case 87:
#line 554 "parse.y"
{ yyval.id = tUMINUS; ;
break;}
case 88:
#line 555 "parse.y"
{ yyval.id = tAREF; ;
break;}
case 89:
#line 556 "parse.y"
{ yyval.id = tASET; ;
break;}
case 90:
#line 557 "parse.y"
{ yyval.id = '`'; ;
break;}
case 131:
#line 567 "parse.y"
{yyval.node = assignable(yyvsp[-1].id, 0);;
break;}
case 132:
#line 568 "parse.y"
{
yyval.node = yyvsp[-1].node;
if (yyval.node) {
yyval.node->nd_value = yyvsp[0].node;
fixpos(yyval.node, yyvsp[0].node);
}
;
break;}
case 133:
#line 576 "parse.y"
{
yyval.node = aryset(yyvsp[-5].node, yyvsp[-3].node, yyvsp[0].node);
fixpos(yyval.node, yyvsp[-5].node);
;
break;}
case 134:
#line 581 "parse.y"
{
yyval.node = attrset(yyvsp[-4].node, yyvsp[-2].id, yyvsp[0].node);
fixpos(yyval.node, yyvsp[0].node);
;
break;}
case 135:
#line 586 "parse.y"
{
yyval.node = attrset(yyvsp[-4].node, yyvsp[-2].id, yyvsp[0].node);
fixpos(yyval.node, yyvsp[0].node);
;
break;}
case 136:
#line 591 "parse.y"
{
value_expr(yyvsp[0].node);
rb_backref_error(yyvsp[-2].node);
yyval.node = 0;
;
break;}
case 137:
#line 596 "parse.y"
{yyval.node = assignable(yyvsp[-1].id, 0);;
break;}
case 138:
#line 597 "parse.y"
{
if (yyvsp[-2].id == tOROP) {
yyvsp[-1].node->nd_value = yyvsp[0].node;
yyval.node = NEW_OP_ASGN_OR(gettable(yyvsp[-3].id), yyvsp[-1].node);
}
else if (yyvsp[-2].id == tANDOP) {
yyvsp[-1].node->nd_value = yyvsp[0].node;
yyval.node = NEW_OP_ASGN_AND(gettable(yyvsp[-3].id), yyvsp[-1].node);
}
else {
yyval.node = yyvsp[-1].node;
yyval.node->nd_value = call_op(gettable(yyvsp[-3].id), yyvsp[-2].id, 1, yyvsp[0].node);
}
fixpos(yyval.node, yyvsp[0].node);
;
break;}
case 139:
#line 613 "parse.y"
{
NODE *args = NEW_LIST(yyvsp[0].node);
list_append(yyvsp[-3].node, NEW_NIL());
list_concat(args, yyvsp[-3].node);
if (yyvsp[-1].id == tOROP) {
yyvsp[-1].id = 0;
}
else if (yyvsp[-1].id == tANDOP) {
yyvsp[-1].id = 1;
}
yyval.node = NEW_OP_ASGN1(yyvsp[-5].node, yyvsp[-1].id, args);
fixpos(yyval.node, yyvsp[-5].node);
;
break;}
case 140:
#line 628 "parse.y"
{
if (yyvsp[-1].id == tOROP) {
yyvsp[-1].id = 0;
}
else if (yyvsp[-1].id == tANDOP) {
yyvsp[-1].id = 1;
}
yyval.node = NEW_OP_ASGN2(yyvsp[-4].node, yyvsp[-2].id, yyvsp[-1].id, yyvsp[0].node);
fixpos(yyval.node, yyvsp[-4].node);
;
break;}
case 141:
#line 639 "parse.y"
{
if (yyvsp[-1].id == tOROP) {
yyvsp[-1].id = 0;
}
else if (yyvsp[-1].id == tANDOP) {
yyvsp[-1].id = 1;
}
yyval.node = NEW_OP_ASGN2(yyvsp[-4].node, yyvsp[-2].id, yyvsp[-1].id, yyvsp[0].node);
fixpos(yyval.node, yyvsp[-4].node);
;
break;}
case 142:
#line 650 "parse.y"
{
rb_backref_error(yyvsp[-2].node);
yyval.node = 0;
;
break;}
case 143:
#line 655 "parse.y"
{
yyval.node = NEW_DOT2(yyvsp[-2].node, yyvsp[0].node);
;
break;}
case 144:
#line 659 "parse.y"
{
yyval.node = NEW_DOT3(yyvsp[-2].node, yyvsp[0].node);
;
break;}
case 145:
#line 663 "parse.y"
{
yyval.node = call_op(yyvsp[-2].node, '+', 1, yyvsp[0].node);
;
break;}
case 146:
#line 667 "parse.y"
{
yyval.node = call_op(yyvsp[-2].node, '-', 1, yyvsp[0].node);
;
break;}
case 147:
#line 671 "parse.y"
{
yyval.node = call_op(yyvsp[-2].node, '*', 1, yyvsp[0].node);
;
break;}
case 148:
#line 675 "parse.y"
{
yyval.node = call_op(yyvsp[-2].node, '/', 1, yyvsp[0].node);
;
break;}
case 149:
#line 679 "parse.y"
{
yyval.node = call_op(yyvsp[-2].node, '%', 1, yyvsp[0].node);
;
break;}
case 150:
#line 683 "parse.y"
{
yyval.node = call_op(yyvsp[-2].node, tPOW, 1, yyvsp[0].node);
;
break;}
case 151:
#line 687 "parse.y"
{
yyval.node = call_op(yyvsp[0].node, tUPLUS, 0);
;
break;}
case 152:
#line 691 "parse.y"
{
yyval.node = call_op(yyvsp[0].node, tUMINUS, 0);
;
break;}
case 153:
#line 695 "parse.y"
{
yyval.node = call_op(yyvsp[-2].node, '|', 1, yyvsp[0].node);
;
break;}
case 154:
#line 699 "parse.y"
{
yyval.node = call_op(yyvsp[-2].node, '^', 1, yyvsp[0].node);
;
break;}
case 155:
#line 703 "parse.y"
{
yyval.node = call_op(yyvsp[-2].node, '&', 1, yyvsp[0].node);
;
break;}
case 156:
#line 707 "parse.y"
{
yyval.node = call_op(yyvsp[-2].node, tCMP, 1, yyvsp[0].node);
;
break;}
case 157:
#line 711 "parse.y"
{
yyval.node = call_op(yyvsp[-2].node, '>', 1, yyvsp[0].node);
;
break;}
case 158:
#line 715 "parse.y"
{
yyval.node = call_op(yyvsp[-2].node, tGEQ, 1, yyvsp[0].node);
;
break;}
case 159:
#line 719 "parse.y"
{
yyval.node = call_op(yyvsp[-2].node, '<', 1, yyvsp[0].node);
;
break;}
case 160:
#line 723 "parse.y"
{
yyval.node = call_op(yyvsp[-2].node, tLEQ, 1, yyvsp[0].node);
;
break;}
case 161:
#line 727 "parse.y"
{
yyval.node = call_op(yyvsp[-2].node, tEQ, 1, yyvsp[0].node);
;
break;}
case 162:
#line 731 "parse.y"
{
yyval.node = call_op(yyvsp[-2].node, tEQQ, 1, yyvsp[0].node);
;
break;}
case 163:
#line 735 "parse.y"
{
yyval.node = NEW_NOT(call_op(yyvsp[-2].node, tEQ, 1, yyvsp[0].node));
;
break;}
case 164:
#line 739 "parse.y"
{
yyval.node = match_gen(yyvsp[-2].node, yyvsp[0].node);
;
break;}
case 165:
#line 743 "parse.y"
{
yyval.node = NEW_NOT(match_gen(yyvsp[-2].node, yyvsp[0].node));
;
break;}
case 166:
#line 747 "parse.y"
{
value_expr(yyvsp[0].node);
yyval.node = NEW_NOT(cond(yyvsp[0].node));
;
break;}
case 167:
#line 752 "parse.y"
{
yyval.node = call_op(yyvsp[0].node, '~', 0);
;
break;}
case 168:
#line 756 "parse.y"
{
yyval.node = call_op(yyvsp[-2].node, tLSHFT, 1, yyvsp[0].node);
;
break;}
case 169:
#line 760 "parse.y"
{
yyval.node = call_op(yyvsp[-2].node, tRSHFT, 1, yyvsp[0].node);
;
break;}
case 170:
#line 764 "parse.y"
{
yyval.node = logop(NODE_AND, yyvsp[-2].node, yyvsp[0].node);
;
break;}
case 171:
#line 768 "parse.y"
{
yyval.node = logop(NODE_OR, yyvsp[-2].node, yyvsp[0].node);
;
break;}
case 172:
#line 771 "parse.y"
{in_defined = 1;;
break;}
case 173:
#line 772 "parse.y"
{
in_defined = 0;
yyval.node = NEW_DEFINED(yyvsp[0].node);
;
break;}
case 174:
#line 777 "parse.y"
{
value_expr(yyvsp[-4].node);
yyval.node = NEW_IF(cond(yyvsp[-4].node), yyvsp[-2].node, yyvsp[0].node);
fixpos(yyval.node, yyvsp[-4].node);
;
break;}
case 175:
#line 783 "parse.y"
{
yyval.node = yyvsp[0].node;
;
break;}
case 176:
#line 788 "parse.y"
{
if (yyvsp[0].node && nd_type(yyvsp[0].node) == NODE_BLOCK_PASS) {
rb_compile_error("block argument should not be given");
}
yyval.node = yyvsp[0].node;
;
break;}
case 177:
#line 796 "parse.y"
{
yyval.node = 0;
;
break;}
case 179:
#line 802 "parse.y"
{
value_expr(yyvsp[0].node);
yyval.node = NEW_LIST(yyvsp[0].node);
;
break;}
case 180:
#line 807 "parse.y"
{
yyval.node = yyvsp[-1].node;
;
break;}
case 181:
#line 811 "parse.y"
{
yyval.node = arg_blk_pass(yyvsp[-1].node, yyvsp[0].node);
;
break;}
case 182:
#line 815 "parse.y"
{
yyval.node = arg_add(yyvsp[-4].node, yyvsp[-1].node);
yyval.node = arg_blk_pass(yyval.node, yyvsp[0].node);
;
break;}
case 183:
#line 820 "parse.y"
{
yyval.node = NEW_LIST(NEW_HASH(yyvsp[-1].node));
;
break;}
case 184:
#line 824 "parse.y"
{
yyval.node = NEW_LIST(NEW_HASH(yyvsp[-1].node));
yyval.node = arg_blk_pass(yyval.node, yyvsp[0].node);
;
break;}
case 185:
#line 829 "parse.y"
{
yyval.node = arg_add(NEW_LIST(NEW_HASH(yyvsp[-4].node)), yyvsp[-1].node);
yyval.node = arg_blk_pass(yyval.node, yyvsp[0].node);
;
break;}
case 186:
#line 834 "parse.y"
{
yyval.node = list_append(yyvsp[-3].node, NEW_HASH(yyvsp[-1].node));
yyval.node = arg_blk_pass(yyval.node, yyvsp[0].node);
;
break;}
case 187:
#line 839 "parse.y"
{
yyval.node = list_append(yyvsp[-3].node, NEW_HASH(yyvsp[-1].node));
;
break;}
case 188:
#line 843 "parse.y"
{
yyval.node = arg_add(list_append(yyvsp[-6].node, NEW_HASH(yyvsp[-4].node)), yyvsp[-1].node);
yyval.node = arg_blk_pass(yyval.node, yyvsp[0].node);
;
break;}
case 189:
#line 848 "parse.y"
{
value_expr(yyvsp[-1].node);
yyval.node = arg_blk_pass(NEW_RESTARGS(yyvsp[-1].node), yyvsp[0].node);
;
break;}
case 191:
#line 855 "parse.y"
{
value_expr(yyvsp[0].node);
yyval.node = NEW_BLOCK_PASS(yyvsp[0].node);
;
break;}
case 192:
#line 861 "parse.y"
{
yyval.node = yyvsp[0].node;
;
break;}
case 193:
#line 865 "parse.y"
{
yyval.node = 0;
;
break;}
case 195:
#line 871 "parse.y"
{
yyval.node = 0;
;
break;}
case 196:
#line 876 "parse.y"
{
value_expr(yyvsp[0].node);
yyval.node = NEW_LIST(yyvsp[0].node);
;
break;}
case 197:
#line 881 "parse.y"
{
value_expr(yyvsp[0].node);
yyval.node = list_append(yyvsp[-2].node, yyvsp[0].node);
;
break;}
case 198:
#line 887 "parse.y"
{
if (yyvsp[0].node &&
nd_type(yyvsp[0].node) == NODE_ARRAY &&
yyvsp[0].node->nd_next == 0)
{
yyval.node = yyvsp[0].node->nd_head;
}
else {
yyval.node = yyvsp[0].node;
}
;
break;}
case 199:
#line 899 "parse.y"
{
value_expr(yyvsp[0].node);
yyval.node = arg_add(yyvsp[-3].node, yyvsp[0].node);
;
break;}
case 200:
#line 904 "parse.y"
{
value_expr(yyvsp[0].node);
yyval.node = yyvsp[0].node;
;
break;}
case 201:
#line 910 "parse.y"
{
yyval.node = yyvsp[0].node;
if (yyvsp[0].node) {
if (nd_type(yyvsp[0].node) == NODE_ARRAY &&
yyvsp[0].node->nd_next == 0) {
yyval.node = yyvsp[0].node->nd_head;
}
else if (nd_type(yyvsp[0].node) == NODE_BLOCK_PASS) {
rb_compile_error("block argument should not be given");
}
}
;
break;}
case 202:
#line 924 "parse.y"
{
yyval.node = 0;
;
break;}
case 204:
#line 930 "parse.y"
{
yyval.node = NEW_LIT(yyvsp[0].val);
;
break;}
case 205:
#line 934 "parse.y"
{
value_expr(yyvsp[-2].node);
yyval.node = NEW_COLON2(yyvsp[-2].node, yyvsp[0].id);
;
break;}
case 206:
#line 939 "parse.y"
{
yyval.node = NEW_COLON3(yyvsp[0].id);
;
break;}
case 207:
#line 943 "parse.y"
{
yyval.node = NEW_STR(yyvsp[0].val);
;
break;}
case 209:
#line 948 "parse.y"
{
yyval.node = NEW_XSTR(yyvsp[0].val);
;
break;}
case 214:
#line 956 "parse.y"
{
value_expr(yyvsp[-3].node);
yyval.node = NEW_CALL(yyvsp[-3].node, tAREF, yyvsp[-1].node);
;
break;}
case 215:
#line 961 "parse.y"
{
if (yyvsp[-1].node == 0)
yyval.node = NEW_ZARRAY(); /* zero length array*/
else {
yyval.node = yyvsp[-1].node;
}
;
break;}
case 216:
#line 969 "parse.y"
{
yyval.node = NEW_HASH(yyvsp[-1].node);
;
break;}
case 217:
#line 973 "parse.y"
{
if (!cur_mid && !in_single)
yyerror("return appeared outside of method");
value_expr(yyvsp[-1].node);
yyval.node = NEW_RETURN(yyvsp[-1].node);
;
break;}
case 218:
#line 980 "parse.y"
{
if (!cur_mid && !in_single)
yyerror("return appeared outside of method");
yyval.node = NEW_RETURN(0);
;
break;}
case 219:
#line 986 "parse.y"
{
if (!cur_mid && !in_single)
yyerror("return appeared outside of method");
yyval.node = NEW_RETURN(0);
;
break;}
case 220:
#line 992 "parse.y"
{
value_expr(yyvsp[-1].node);
yyval.node = NEW_YIELD(yyvsp[-1].node);
;
break;}
case 221:
#line 997 "parse.y"
{
yyval.node = NEW_YIELD(0);
;
break;}
case 222:
#line 1001 "parse.y"
{
yyval.node = NEW_YIELD(0);
;
break;}
case 223:
#line 1004 "parse.y"
{in_defined = 1;;
break;}
case 224:
#line 1005 "parse.y"
{
in_defined = 0;
yyval.node = NEW_DEFINED(yyvsp[-1].node);
;
break;}
case 225:
#line 1010 "parse.y"
{
yyval.node = NEW_VCALL(yyvsp[0].id);
;
break;}
case 226:
#line 1014 "parse.y"
{
yyvsp[0].node->nd_iter = NEW_FCALL(yyvsp[-1].id, 0);
yyval.node = yyvsp[0].node;
;
break;}
case 228:
#line 1020 "parse.y"
{
if (yyvsp[-1].node && nd_type(yyvsp[-1].node) == NODE_BLOCK_PASS) {
rb_compile_error("both block arg and actual block given");
}
yyvsp[0].node->nd_iter = yyvsp[-1].node;
yyval.node = yyvsp[0].node;
fixpos(yyval.node, yyvsp[-1].node);
;
break;}
case 229:
#line 1032 "parse.y"
{
value_expr(yyvsp[-4].node);
yyval.node = NEW_IF(cond(yyvsp[-4].node), yyvsp[-2].node, yyvsp[-1].node);
fixpos(yyval.node, yyvsp[-4].node);
;
break;}
case 230:
#line 1041 "parse.y"
{
value_expr(yyvsp[-4].node);
yyval.node = NEW_UNLESS(cond(yyvsp[-4].node), yyvsp[-2].node, yyvsp[-1].node);
fixpos(yyval.node, yyvsp[-4].node);
;
break;}
case 231:
#line 1049 "parse.y"
{
value_expr(yyvsp[-3].node);
yyval.node = NEW_WHILE(cond(yyvsp[-3].node), yyvsp[-1].node, 1);
fixpos(yyval.node, yyvsp[-3].node);
;
break;}
case 232:
#line 1057 "parse.y"
{
value_expr(yyvsp[-3].node);
yyval.node = NEW_UNTIL(cond(yyvsp[-3].node), yyvsp[-1].node, 1);
fixpos(yyval.node, yyvsp[-3].node);
;
break;}
case 233:
#line 1065 "parse.y"
{
value_expr(yyvsp[-2].node);
yyval.node = NEW_CASE(yyvsp[-2].node, yyvsp[-1].node);
fixpos(yyval.node, yyvsp[-2].node);
;
break;}
case 234:
#line 1073 "parse.y"
{
value_expr(yyvsp[-5].node);
yyval.node = NEW_FOR(yyvsp[-5].node, yyvsp[-3].node, yyvsp[-1].node);
fixpos(yyval.node, yyvsp[-5].node);
;
break;}
case 235:
#line 1084 "parse.y"
{
if (!yyvsp[-3].node && !yyvsp[-2].node && !yyvsp[-1].node)
yyval.node = NEW_BEGIN(yyvsp[-4].node);
else {
if (yyvsp[-3].node) yyvsp[-4].node = NEW_RESCUE(yyvsp[-4].node, yyvsp[-3].node, yyvsp[-2].node);
else if (yyvsp[-2].node) {
rb_warn("else without rescue is useless");
yyvsp[-4].node = block_append(yyvsp[-4].node, yyvsp[-2].node);
}
if (yyvsp[-1].node) yyvsp[-4].node = NEW_ENSURE(yyvsp[-4].node, yyvsp[-1].node);
yyval.node = yyvsp[-4].node;
}
fixpos(yyval.node, yyvsp[-4].node);
;
break;}
case 236:
#line 1099 "parse.y"
{
yyval.node = yyvsp[-1].node;
;
break;}
case 237:
#line 1103 "parse.y"
{
if (cur_mid || in_single)
yyerror("class definition in method body");
class_nest++;
cref_push();
local_push();
;
break;}
case 238:
#line 1113 "parse.y"
{
yyval.node = NEW_CLASS(yyvsp[-4].id, yyvsp[-1].node, yyvsp[-3].node);
fixpos(yyval.node, yyvsp[-3].node);
local_pop();
cref_pop();
class_nest--;
;
break;}
case 239:
#line 1121 "parse.y"
{
class_nest++;
cref_push();
local_push();
;
break;}
case 240:
#line 1128 "parse.y"
{
yyval.node = NEW_SCLASS(yyvsp[-4].node, yyvsp[-1].node);
fixpos(yyval.node, yyvsp[-4].node);
local_pop();
cref_pop();
class_nest--;
;
break;}
case 241:
#line 1136 "parse.y"
{
if (cur_mid || in_single)
yyerror("module definition in method body");
class_nest++;
cref_push();
local_push();
;
break;}
case 242:
#line 1145 "parse.y"
{
yyval.node = NEW_MODULE(yyvsp[-3].id, yyvsp[-1].node);
fixpos(yyval.node, yyvsp[-1].node);
local_pop();
cref_pop();
class_nest--;
;
break;}
case 243:
#line 1153 "parse.y"
{
if (cur_mid || in_single)
yyerror("nested method definition");
cur_mid = yyvsp[0].id;
local_push();
;
break;}
case 244:
#line 1162 "parse.y"
{
/* NOEX_PRIVATE for toplevel */
yyval.node = NEW_DEFN(yyvsp[-4].id, yyvsp[-2].node, yyvsp[-1].node, class_nest?0:1);
fixpos(yyval.node, yyvsp[-2].node);
local_pop();
cur_mid = 0;
;
break;}
case 245:
#line 1169 "parse.y"
{lex_state = EXPR_FNAME;;
break;}
case 246:
#line 1170 "parse.y"
{
value_expr(yyvsp[-3].node);
in_single++;
local_push();
lex_state = EXPR_END; /* force for args */
;
break;}
case 247:
#line 1179 "parse.y"
{
yyval.node = NEW_DEFS(yyvsp[-7].node, yyvsp[-4].id, yyvsp[-2].node, yyvsp[-1].node);
fixpos(yyval.node, yyvsp[-7].node);
local_pop();
in_single--;
;
break;}
case 248:
#line 1186 "parse.y"
{
yyval.node = NEW_BREAK();
;
break;}
case 249:
#line 1190 "parse.y"
{
yyval.node = NEW_NEXT();
;
break;}
case 250:
#line 1194 "parse.y"
{
yyval.node = NEW_REDO();
;
break;}
case 251:
#line 1198 "parse.y"
{
yyval.node = NEW_RETRY();
;
break;}
case 258:
#line 1213 "parse.y"
{
value_expr(yyvsp[-3].node);
yyval.node = NEW_IF(cond(yyvsp[-3].node), yyvsp[-1].node, yyvsp[0].node);
fixpos(yyval.node, yyvsp[-3].node);
;
break;}
case 259:
#line 1220 "parse.y"
{
yyval.node = 0;
;
break;}
case 260:
#line 1224 "parse.y"
{
yyval.node = yyvsp[0].node;
;
break;}
case 263:
#line 1232 "parse.y"
{
yyval.node = 0;
;
break;}
case 264:
#line 1236 "parse.y"
{
yyval.node = 0;
;
break;}
case 265:
#line 1240 "parse.y"
{
yyval.node = 0;
;
break;}
case 266:
#line 1244 "parse.y"
{
yyval.node = yyvsp[-1].node;
;
break;}
case 267:
#line 1249 "parse.y"
{
yyval.vars = dyna_push();
;
break;}
case 268:
#line 1255 "parse.y"
{
yyval.node = NEW_ITER(yyvsp[-2].node, 0, yyvsp[-1].node);
fixpos(yyval.node, yyvsp[-2].node?yyvsp[-2].node:yyvsp[-1].node);
dyna_pop(yyvsp[-3].vars);
;
break;}
case 269:
#line 1262 "parse.y"
{
yyval.vars = dyna_push();
;
break;}
case 270:
#line 1267 "parse.y"
{
yyval.node = NEW_ITER(yyvsp[-2].node, 0, yyvsp[-1].node);
fixpos(yyval.node, yyvsp[-2].node?yyvsp[-2].node:yyvsp[-1].node);
dyna_pop(yyvsp[-3].vars);
;
break;}
case 271:
#line 1274 "parse.y"
{
yyval.node = NEW_VCALL(yyvsp[0].id);
;
break;}
case 272:
#line 1278 "parse.y"
{
yyval.node = NEW_VCALL(yyvsp[0].id);
;
break;}
case 273:
#line 1282 "parse.y"
{
yyval.node = NEW_VCALL(yyvsp[0].id);
;
break;}
case 276:
#line 1289 "parse.y"
{
yyval.node = new_fcall(yyvsp[-3].id, yyvsp[-1].node);
fixpos(yyval.node, yyvsp[-1].node);
;
break;}
case 277:
#line 1294 "parse.y"
{
value_expr(yyvsp[-5].node);
yyval.node = new_call(yyvsp[-5].node, yyvsp[-3].id, yyvsp[-1].node);
fixpos(yyval.node, yyvsp[-5].node);
;
break;}
case 278:
#line 1300 "parse.y"
{
value_expr(yyvsp[-2].node);
yyval.node = new_call(yyvsp[-2].node, yyvsp[0].id, 0);
fixpos(yyval.node, yyvsp[-2].node);
;
break;}
case 279:
#line 1306 "parse.y"
{
value_expr(yyvsp[-5].node);
yyval.node = new_call(yyvsp[-5].node, yyvsp[-3].id, yyvsp[-1].node);
fixpos(yyval.node, yyvsp[-5].node);
;
break;}
case 280:
#line 1312 "parse.y"
{
value_expr(yyvsp[-2].node);
yyval.node = new_call(yyvsp[-2].node, yyvsp[0].id, 0);
;
break;}
case 281:
#line 1317 "parse.y"
{
if (!cur_mid && !in_single && !in_defined)
yyerror("super called outside of method");
yyval.node = NEW_SUPER(yyvsp[-1].node);
;
break;}
case 282:
#line 1323 "parse.y"
{
if (!cur_mid && !in_single && !in_defined)
yyerror("super called outside of method");
yyval.node = NEW_ZSUPER();
;
break;}
case 283:
#line 1333 "parse.y"
{
yyval.node = NEW_WHEN(yyvsp[-3].node, yyvsp[-1].node, yyvsp[0].node);
;
break;}
case 285:
#line 1339 "parse.y"
{
value_expr(yyvsp[0].node);
yyval.node = list_append(yyvsp[-3].node, NEW_WHEN(yyvsp[0].node, 0, 0));
;
break;}
case 286:
#line 1344 "parse.y"
{
value_expr(yyvsp[0].node);
yyval.node = NEW_LIST(NEW_WHEN(yyvsp[0].node, 0, 0));
;
break;}
case 289:
#line 1355 "parse.y"
{
yyval.node = NEW_RESBODY(yyvsp[-3].node, yyvsp[-1].node, yyvsp[0].node);
fixpos(yyval.node, yyvsp[-3].node?yyvsp[-3].node:yyvsp[-1].node);
;
break;}
case 290:
#line 1360 "parse.y"
{
yyval.node = 0;
;
break;}
case 291:
#line 1365 "parse.y"
{
yyval.node = 0;
;
break;}
case 292:
#line 1369 "parse.y"
{
yyval.node = yyvsp[0].node;
;
break;}
case 294:
#line 1375 "parse.y"
{
yyval.val = INT2FIX(yyvsp[0].id);
;
break;}
case 305:
#line 1391 "parse.y"
{yyval.id = kNIL;;
break;}
case 306:
#line 1392 "parse.y"
{yyval.id = kSELF;;
break;}
case 307:
#line 1393 "parse.y"
{yyval.id = kTRUE;;
break;}
case 308:
#line 1394 "parse.y"
{yyval.id = kFALSE;;
break;}
case 309:
#line 1395 "parse.y"
{yyval.id = k__FILE__;;
break;}
case 310:
#line 1396 "parse.y"
{yyval.id = k__LINE__;;
break;}
case 311:
#line 1399 "parse.y"
{
yyval.node = gettable(yyvsp[0].id);
;
break;}
case 314:
#line 1407 "parse.y"
{
yyval.node = 0;
;
break;}
case 315:
#line 1411 "parse.y"
{
lex_state = EXPR_BEG;
;
break;}
case 316:
#line 1415 "parse.y"
{
yyval.node = yyvsp[-1].node;
;
break;}
case 317:
#line 1418 "parse.y"
{yyerrok; yyval.node = 0;;
break;}
case 318:
#line 1421 "parse.y"
{
yyval.node = yyvsp[-2].node;
lex_state = EXPR_BEG;
;
break;}
case 319:
#line 1426 "parse.y"
{
yyval.node = yyvsp[-1].node;
;
break;}
case 320:
#line 1431 "parse.y"
{
yyval.node = block_append(NEW_ARGS(yyvsp[-5].num, yyvsp[-3].node, yyvsp[-1].id), yyvsp[0].node);
;
break;}
case 321:
#line 1435 "parse.y"
{
yyval.node = block_append(NEW_ARGS(yyvsp[-3].num, yyvsp[-1].node, -1), yyvsp[0].node);
;
break;}
case 322:
#line 1439 "parse.y"
{
yyval.node = block_append(NEW_ARGS(yyvsp[-3].num, 0, yyvsp[-1].id), yyvsp[0].node);
;
break;}
case 323:
#line 1443 "parse.y"
{
yyval.node = block_append(NEW_ARGS(yyvsp[-1].num, 0, -1), yyvsp[0].node);
;
break;}
case 324:
#line 1447 "parse.y"
{
yyval.node = block_append(NEW_ARGS(0, yyvsp[-3].node, yyvsp[-1].id), yyvsp[0].node);
;
break;}
case 325:
#line 1451 "parse.y"
{
yyval.node = block_append(NEW_ARGS(0, yyvsp[-1].node, -1), yyvsp[0].node);
;
break;}
case 326:
#line 1455 "parse.y"
{
yyval.node = block_append(NEW_ARGS(0, 0, yyvsp[-1].id), yyvsp[0].node);
;
break;}
case 327:
#line 1459 "parse.y"
{
yyval.node = block_append(NEW_ARGS(0, 0, -1), yyvsp[0].node);
;
break;}
case 328:
#line 1463 "parse.y"
{
yyval.node = NEW_ARGS(0, 0, -1);
;
break;}
case 329:
#line 1468 "parse.y"
{
if (!is_local_id(yyvsp[0].id))
yyerror("formal argument must be local variable");
local_cnt(yyvsp[0].id);
yyval.num = 1;
;
break;}
case 330:
#line 1475 "parse.y"
{
if (!is_local_id(yyvsp[0].id))
yyerror("formal argument must be local variable");
local_cnt(yyvsp[0].id);
yyval.num += 1;
;
break;}
case 331:
#line 1483 "parse.y"
{
if (!is_local_id(yyvsp[-2].id))
yyerror("formal argument must be local variable");
yyval.node = assignable(yyvsp[-2].id, yyvsp[0].node);
;
break;}
case 332:
#line 1490 "parse.y"
{
yyval.node = NEW_BLOCK(yyvsp[0].node);
yyval.node->nd_end = yyval.node;
;
break;}
case 333:
#line 1495 "parse.y"
{
yyval.node = block_append(yyvsp[-2].node, yyvsp[0].node);
;
break;}
case 334:
#line 1500 "parse.y"
{
if (!is_local_id(yyvsp[0].id))
yyerror("rest argument must be local variable");
yyval.id = local_cnt(yyvsp[0].id);
;
break;}
case 335:
#line 1507 "parse.y"
{
yyval.node = NEW_BLOCK_ARG(yyvsp[0].id);
;
break;}
case 336:
#line 1512 "parse.y"
{
yyval.node = yyvsp[0].node;
;
break;}
case 337:
#line 1516 "parse.y"
{
yyval.node = 0;
;
break;}
case 338:
#line 1521 "parse.y"
{
if (nd_type(yyvsp[0].node) == NODE_SELF) {
yyval.node = NEW_SELF();
}
else if (nd_type(yyvsp[0].node) == NODE_NIL) {
yyerror("Can't define single method for nil.");
yyval.node = 0;
}
else {
yyval.node = yyvsp[0].node;
}
;
break;}
case 339:
#line 1534 "parse.y"
{
switch (nd_type(yyvsp[-2].node)) {
case NODE_STR:
case NODE_DSTR:
case NODE_XSTR:
case NODE_DXSTR:
case NODE_DREGX:
case NODE_LIT:
case NODE_ARRAY:
case NODE_ZARRAY:
yyerror("can't define single method for literals.");
default:
break;
}
yyval.node = yyvsp[-2].node;
;
break;}
case 340:
#line 1552 "parse.y"
{
yyval.node = 0;
;
break;}
case 341:
#line 1556 "parse.y"
{
yyval.node = yyvsp[-1].node;
;
break;}
case 342:
#line 1560 "parse.y"
{
if (yyvsp[-1].node->nd_alen%2 != 0) {
yyerror("odd number list for Hash");
}
yyval.node = yyvsp[-1].node;
;
break;}
case 344:
#line 1569 "parse.y"
{
yyval.node = list_concat(yyvsp[-2].node, yyvsp[0].node);
;
break;}
case 345:
#line 1574 "parse.y"
{
yyval.node = list_append(NEW_LIST(yyvsp[-2].node), yyvsp[0].node);
;
break;}
case 360:
#line 1598 "parse.y"
{yyerrok;;
break;}
case 363:
#line 1602 "parse.y"
{yyerrok;;
break;}
}
/* the action file gets copied in in place of this dollarsign */
#line 542 "/usr/share/misc/bison.simple"
yyvsp -= yylen;
yyssp -= yylen;
#ifdef YYLSP_NEEDED
yylsp -= yylen;
#endif
#if YYDEBUG != 0
if (yydebug)
{
short *ssp1 = yyss - 1;
fprintf (stderr, "state stack now");
while (ssp1 != yyssp)
fprintf (stderr, " %d", *++ssp1);
fprintf (stderr, "\n");
}
#endif
*++yyvsp = yyval;
#ifdef YYLSP_NEEDED
yylsp++;
if (yylen == 0)
{
yylsp->first_line = yylloc.first_line;
yylsp->first_column = yylloc.first_column;
yylsp->last_line = (yylsp-1)->last_line;
yylsp->last_column = (yylsp-1)->last_column;
yylsp->text = 0;
}
else
{
yylsp->last_line = (yylsp+yylen-1)->last_line;
yylsp->last_column = (yylsp+yylen-1)->last_column;
}
#endif
/* Now "shift" the result of the reduction.
Determine what state that goes to,
based on the state we popped back to
and the rule number reduced by. */
yyn = yyr1[yyn];
yystate = yypgoto[yyn - YYNTBASE] + *yyssp;
if (yystate >= 0 && yystate <= YYLAST && yycheck[yystate] == *yyssp)
yystate = yytable[yystate];
else
yystate = yydefgoto[yyn - YYNTBASE];
goto yynewstate;
yyerrlab: /* here on detecting error */
if (! yyerrstatus)
/* If not already recovering from an error, report this error. */
{
++yynerrs;
#ifdef YYERROR_VERBOSE
yyn = yypact[yystate];
if (yyn > YYFLAG && yyn < YYLAST)
{
int size = 0;
char *msg;
int x, count;
count = 0;
/* Start X at -yyn if nec to avoid negative indexes in yycheck. */
for (x = (yyn < 0 ? -yyn : 0);
x < (sizeof(yytname) / sizeof(char *)); x++)
if (yycheck[x + yyn] == x)
size += strlen(yytname[x]) + 15, count++;
msg = (char *) malloc(size + 15);
if (msg != 0)
{
strcpy(msg, "parse error");
if (count < 5)
{
count = 0;
for (x = (yyn < 0 ? -yyn : 0);
x < (sizeof(yytname) / sizeof(char *)); x++)
if (yycheck[x + yyn] == x)
{
strcat(msg, count == 0 ? ", expecting `" : " or `");
strcat(msg, yytname[x]);
strcat(msg, "'");
count++;
}
}
yyerror(msg);
free(msg);
}
else
yyerror ("parse error; also virtual memory exceeded");
}
else
#endif /* YYERROR_VERBOSE */
yyerror("parse error");
}
goto yyerrlab1;
yyerrlab1: /* here on error raised explicitly by an action */
if (yyerrstatus == 3)
{
/* if just tried and failed to reuse lookahead token after an error, discard it. */
/* return failure if at end of input */
if (yychar == YYEOF)
YYABORT;
#if YYDEBUG != 0
if (yydebug)
fprintf(stderr, "Discarding token %d (%s).\n", yychar, yytname[yychar1]);
#endif
yychar = YYEMPTY;
}
/* Else will try to reuse lookahead token
after shifting the error token. */
yyerrstatus = 3; /* Each real token shifted decrements this */
goto yyerrhandle;
yyerrdefault: /* current state does not do anything special for the error token. */
#if 0
/* This is wrong; only states that explicitly want error tokens
should shift them. */
yyn = yydefact[yystate]; /* If its default is to accept any token, ok. Otherwise pop it.*/
if (yyn) goto yydefault;
#endif
yyerrpop: /* pop the current state because it cannot handle the error token */
if (yyssp == yyss) YYABORT;
yyvsp--;
yystate = *--yyssp;
#ifdef YYLSP_NEEDED
yylsp--;
#endif
#if YYDEBUG != 0
if (yydebug)
{
short *ssp1 = yyss - 1;
fprintf (stderr, "Error: state stack now");
while (ssp1 != yyssp)
fprintf (stderr, " %d", *++ssp1);
fprintf (stderr, "\n");
}
#endif
yyerrhandle:
yyn = yypact[yystate];
if (yyn == YYFLAG)
goto yyerrdefault;
yyn += YYTERROR;
if (yyn < 0 || yyn > YYLAST || yycheck[yyn] != YYTERROR)
goto yyerrdefault;
yyn = yytable[yyn];
if (yyn < 0)
{
if (yyn == YYFLAG)
goto yyerrpop;
yyn = -yyn;
goto yyreduce;
}
else if (yyn == 0)
goto yyerrpop;
if (yyn == YYFINAL)
YYACCEPT;
#if YYDEBUG != 0
if (yydebug)
fprintf(stderr, "Shifting error token, ");
#endif
*++yyvsp = yylval;
#ifdef YYLSP_NEEDED
*++yylsp = yylloc;
#endif
yystate = yyn;
goto yynewstate;
yyacceptlab:
/* YYACCEPT comes here. */
if (yyfree_stacks)
{
free (yyss);
free (yyvs);
#ifdef YYLSP_NEEDED
free (yyls);
#endif
}
return 0;
yyabortlab:
/* YYABORT comes here. */
if (yyfree_stacks)
{
free (yyss);
free (yyvs);
#ifdef YYLSP_NEEDED
free (yyls);
#endif
}
return 1;
}
#line 1603 "parse.y"
#include <ctype.h>
#include <sys/types.h>
#include "regex.h"
#include "util.h"
#define is_identchar(c) ((c)!=-1&&(ISALNUM(c) || (c) == '_' || ismbchar(c)))
static char *tokenbuf = NULL;
static int tokidx, toksiz = 0;
#ifndef strdup
char *strdup();
#endif
static NODE *rb_str_extend();
#define LEAVE_BS 1
static VALUE (*lex_gets)(); /* gets function */
static VALUE lex_input; /* non-nil if File */
static VALUE lex_lastline; /* gc protect */
static char *lex_pbeg;
static char *lex_p;
static char *lex_pend;
static int
yyerror(msg)
char *msg;
{
char *p, *pe, *buf;
int len, i;
rb_compile_error("%s", msg);
p = lex_p;
while (lex_pbeg <= p) {
if (*p == '\n') break;
p--;
}
p++;
pe = lex_p;
while (pe < lex_pend) {
if (*pe == '\n') break;
pe++;
}
len = pe - p;
if (len > 4) {
buf = ALLOCA_N(char, len+2);
MEMCPY(buf, p, char, len);
buf[len] = '\0';
rb_compile_error_append("%s", buf);
i = lex_p - p;
p = buf; pe = p + len;
while (p < pe) {
if (*p != '\t') *p = ' ';
p++;
}
buf[i] = '^';
buf[i+1] = '\0';
rb_compile_error_append("%s", buf);
}
return 0;
}
static int heredoc_end;
int ruby_in_compile = 0;
int ruby__end__seen;
static NODE*
yycompile(f)
char *f;
{
int n;
ruby__end__seen = 0;
ruby_eval_tree = 0;
heredoc_end = 0;
ruby_sourcefile = f;
ruby_in_compile = 1;
n = yyparse();
ruby_in_compile = 0;
if (n == 0) return ruby_eval_tree;
return 0;
}
static int lex_gets_ptr;
static VALUE
lex_get_str(s)
VALUE s;
{
char *beg, *end, *pend;
beg = RSTRING(s)->ptr;
if (lex_gets_ptr) {
if (RSTRING(s)->len == lex_gets_ptr) return Qnil;
beg += lex_gets_ptr;
}
pend = RSTRING(s)->ptr + RSTRING(s)->len;
end = beg;
while (end < pend) {
if (*end++ == '\n') break;
}
lex_gets_ptr = end - RSTRING(s)->ptr;
return rb_str_new(beg, end - beg);
}
NODE*
rb_compile_string(f, s)
const char *f;
VALUE s;
{
lex_gets = lex_get_str;
lex_gets_ptr = 0;
lex_input = s;
lex_pbeg = lex_p = lex_pend = 0;
if (!ruby_sourcefile || strcmp(f, ruby_sourcefile)) /* not in eval() */
ruby_sourceline = 0;
else if (ruby_frame) /* in eval() */
cur_mid = ruby_frame->last_func;
return yycompile(f);
}
NODE*
rb_compile_cstr(f, s, len)
const char *f, *s;
int len;
{
return rb_compile_string(f, rb_str_new(s, len));
}
NODE*
rb_compile_file(f, file, start)
const char *f;
VALUE file;
int start;
{
lex_gets = rb_io_gets;
lex_input = file;
lex_pbeg = lex_p = lex_pend = 0;
ruby_sourceline = start - 1;
return yycompile(strdup(f));
}
static void
normalize_newline(line)
VALUE line;
{
if (RSTRING(line)->len >= 2 &&
RSTRING(line)->ptr[RSTRING(line)->len-1] == '\n' &&
RSTRING(line)->ptr[RSTRING(line)->len-2] == '\r')
{
RSTRING(line)->ptr[RSTRING(line)->len-2] = '\n';
RSTRING(line)->len--;
}
#ifdef __MACOS__
else if (RSTRING(line)->ptr[RSTRING(line)->len-1] == '\r')
RSTRING(line)->ptr[RSTRING(line)->len-1] = '\n';
#endif
}
static int
nextc()
{
int c;
if (lex_p == lex_pend) {
if (lex_input) {
VALUE v = (*lex_gets)(lex_input);
if (NIL_P(v)) return -1;
if (heredoc_end > 0) {
ruby_sourceline = heredoc_end;
heredoc_end = 0;
}
normalize_newline(v);
ruby_sourceline++;
lex_pbeg = lex_p = RSTRING(v)->ptr;
lex_pend = lex_p + RSTRING(v)->len;
if (strncmp(lex_pbeg, "__END__", 7) == 0 && lex_pbeg[7] == '\n') {
ruby__end__seen = 1;
lex_lastline = 0;
return -1;
}
lex_lastline = v;
}
else {
lex_lastline = 0;
return -1;
}
}
c = (unsigned char)*lex_p++;
return c;
}
static void
pushback(c)
int c;
{
if (c == -1) return;
lex_p--;
}
#define tokfix() (tokenbuf[tokidx]='\0')
#define tok() tokenbuf
#define toklen() tokidx
#define toklast() (tokidx>0?tokenbuf[tokidx-1]:0)
static char*
newtok()
{
tokidx = 0;
if (!tokenbuf) {
toksiz = 60;
tokenbuf = ALLOC_N(char, 60);
}
if (toksiz > 4096) {
toksiz = 60;
REALLOC_N(tokenbuf, char, 60);
}
return tokenbuf;
}
static void
tokadd(c)
char c;
{
tokenbuf[tokidx++] = c;
if (tokidx >= toksiz) {
toksiz *= 2;
REALLOC_N(tokenbuf, char, toksiz);
}
}
static int
read_escape()
{
int c;
switch (c = nextc()) {
case '\\': /* Backslash */
return c;
case 'n': /* newline */
return '\n';
case 't': /* horizontal tab */
return '\t';
case 'r': /* carriage-return */
return '\r';
case 'f': /* form-feed */
return '\f';
case 'v': /* vertical tab */
return '\13';
case 'a': /* alarm(bell) */
return '\007';
case 'e': /* escape */
return 033;
case '0': case '1': case '2': case '3': /* octal constant */
case '4': case '5': case '6': case '7':
{
char buf[3];
int i;
pushback(c);
for (i=0; i<3; i++) {
c = nextc();
if (c == -1) goto eof;
if (c < '0' || '7' < c) {
pushback(c);
break;
}
buf[i] = c;
}
c = scan_oct(buf, i, &i);
}
return c;
case 'x': /* hex constant */
{
char buf[2];
int i;
for (i=0; i<2; i++) {
buf[i] = nextc();
if (buf[i] == -1) goto eof;
if (!ISXDIGIT(buf[i])) {
pushback(buf[i]);
break;
}
}
c = scan_hex(buf, i, &i);
}
return c;
case 'b': /* backspace */
return '\b';
case 's': /* space */
return ' ';
case 'M':
if ((c = nextc()) != '-') {
yyerror("Invalid escape character syntax");
pushback(c);
return '\0';
}
if ((c = nextc()) == '\\') {
return read_escape() | 0x80;
}
else if (c == -1) goto eof;
else {
return ((c & 0xff) | 0x80);
}
case 'C':
if ((c = nextc()) != '-') {
yyerror("Invalid escape character syntax");
pushback(c);
return '\0';
}
case 'c':
if ((c = nextc())== '\\') {
c = read_escape();
}
else if (c == '?')
return 0177;
else if (c == -1) goto eof;
return c & 0x9f;
eof:
case -1:
yyerror("Invalid escape character syntax");
return '\0';
default:
return c;
}
}
static int
parse_regx(term, paren)
int term;
{
register int c;
char kcode = 0;
int once = 0;
int nest = 0;
int options = 0;
int in_brack = 0;
int re_start = ruby_sourceline;
NODE *list = 0;
newtok();
while ((c = nextc()) != -1) {
if ((!in_brack && c == term) || nest > 0) {
goto regx_end;
}
switch (c) {
case '[':
in_brack = 1;
break;
case ']':
in_brack = 0;
break;
case '#':
list = rb_str_extend(list, term);
if (list == (NODE*)-1) return 0;
continue;
case '\\':
switch (c = nextc()) {
case -1:
ruby_sourceline = re_start;
rb_compile_error("unterminated regexp meets end of file");
return 0;
case '\n':
break;
case '\\':
case '^':
case 's':
tokadd('\\');
tokadd(c);
break;
case '1': case '2': case '3':
case '4': case '5': case '6':
case '7': case '8': case '9':
case '0': case 'x':
tokadd('\\');
tokadd(c);
break;
case 'b':
if (!in_brack) {
tokadd('\\');
tokadd('b');
break;
}
/* fall through */
default:
if (paren) {
if (c == paren) nest++;
if (c == term) nest--;
}
if (c == term) {
tokadd(c);
}
else {
int c1;
pushback(c);
c1 = read_escape();
if (c1 != c) {
tokadd(c1);
}
else {
tokadd('\\');
tokadd(c);
}
}
}
continue;
case -1:
rb_compile_error("unterminated regexp");
return 0;
default:
if (ismbchar(c)) {
int i, len = mbclen(c)-1;
for (i = 0; i < len; i++) {
tokadd(c);
c = nextc();
}
}
break;
regx_end:
for (;;) {
switch (c = nextc()) {
case 'i':
options |= RE_OPTION_IGNORECASE;
break;
case 'x':
options |= RE_OPTION_EXTENDED;
break;
case 'o':
once = 1;
break;
case 'n':
kcode = 4;
break;
case 'e':
kcode = 8;
break;
case 's':
kcode = 12;
break;
case 'u':
kcode = 16;
break;
default:
pushback(c);
goto end_options;
}
}
end_options:
tokfix();
lex_state = EXPR_END;
if (list) {
nd_set_line(list, re_start-1);
if (toklen() > 0) {
VALUE ss = rb_str_new(tok(), toklen());
list_append(list, NEW_STR(ss));
}
nd_set_type(list, once?NODE_DREGX_ONCE:NODE_DREGX);
list->nd_cflag = options | kcode;
yylval.node = list;
return tDREGEXP;
}
else {
yylval.val = rb_reg_new(tok(), toklen(), options | kcode);
return tREGEXP;
}
}
tokadd(c);
}
rb_compile_error("unterminated regexp");
return 0;
}
static int parse_qstring _((int,int));
static int
parse_string(func, term, paren)
int func, term, paren;
{
int c;
NODE *list = 0;
int strstart;
int nest = 0;
if (func == '\'') {
return parse_qstring(term, paren);
}
if (func == 0) { /* read 1 line for heredoc */
/* -1 for chomp */
yylval.val = rb_str_new(lex_pbeg, lex_pend - lex_pbeg - 1);
lex_p = lex_pend;
return tSTRING;
}
strstart = ruby_sourceline;
newtok();
while ((c = nextc()) != term || nest > 0) {
if (c == -1) {
unterm_str:
ruby_sourceline = strstart;
rb_compile_error("unterminated string meets end of file");
return 0;
}
if (ismbchar(c)) {
int i, len = mbclen(c)-1;
for (i = 0; i < len; i++) {
tokadd(c);
c = nextc();
}
}
else if (c == '#') {
list = rb_str_extend(list, term);
if (list == (NODE*)-1) goto unterm_str;
continue;
}
else if (c == '\\') {
c = nextc();
if (c == term) {
tokadd(c);
}
else {
pushback(c);
if (func != '"') tokadd('\\');
tokadd(read_escape());
}
continue;
}
if (paren) {
if (c == paren) nest++;
if (c == term) {
nest--;
if (nest == 0) break;
}
}
tokadd(c);
}
tokfix();
lex_state = EXPR_END;
if (list) {
nd_set_line(list, strstart-1);
if (toklen() > 0) {
VALUE ss = rb_str_new(tok(), toklen());
list_append(list, NEW_STR(ss));
}
yylval.node = list;
if (func == '`') {
nd_set_type(list, NODE_DXSTR);
return tDXSTRING;
}
else {
return tDSTRING;
}
}
else {
yylval.val = rb_str_new(tok(), toklen());
return (func == '`') ? tXSTRING : tSTRING;
}
}
static int
parse_qstring(term, paren)
int term, paren;
{
int strstart;
int c;
int nest = 0;
strstart = ruby_sourceline;
newtok();
while ((c = nextc()) != term || nest > 0) {
if (c == -1) {
ruby_sourceline = strstart;
rb_compile_error("unterminated string meets end of file");
return 0;
}
if (ismbchar(c)) {
int i, len = mbclen(c)-1;
for (i = 0; i < len; i++) {
tokadd(c);
c = nextc();
}
}
else if (c == '\\') {
c = nextc();
switch (c) {
case '\\':
c = '\\';
break;
case '\'':
if (term == '\'') {
c = '\'';
break;
}
/* fall through */
default:
tokadd('\\');
}
}
if (paren) {
if (c == paren) nest++;
if (c == term) {
nest--;
if (nest == 0) break;
}
}
tokadd(c);
}
tokfix();
yylval.val = rb_str_new(tok(), toklen());
lex_state = EXPR_END;
return tSTRING;
}
static int
parse_quotedword(term, paren)
int term, paren;
{
if (parse_qstring(term, paren) == 0) return 0;
yylval.node = NEW_CALL(NEW_STR(yylval.val), rb_intern("split"), 0);
return tDSTRING;
}
char *strdup();
static int
here_document(term, indent)
char term;
int indent;
{
int c;
char *eos, *p;
int len;
VALUE str;
volatile VALUE line = 0;
VALUE lastline_save;
int offset_save;
NODE *list = 0;
int linesave = ruby_sourceline;
newtok();
switch (term) {
case '\'':
case '"':
case '`':
while ((c = nextc()) != term) {
tokadd(c);
}
if (term == '\'') term = 0;
break;
default:
c = term;
term = '"';
if (!is_identchar(c)) {
rb_warn("Use of bare << to mean <<\"\" is deprecated");
break;
}
while (is_identchar(c)) {
tokadd(c);
c = nextc();
}
pushback(c);
break;
}
tokfix();
lastline_save = lex_lastline;
offset_save = lex_p - lex_pbeg;
eos = strdup(tok());
len = strlen(eos);
str = rb_str_new(0,0);
for (;;) {
lex_lastline = line = (*lex_gets)(lex_input);
if (NIL_P(line)) {
error:
ruby_sourceline = linesave;
rb_compile_error("can't find string \"%s\" anywhere before EOF", eos);
free(eos);
return 0;
}
normalize_newline(line);
ruby_sourceline++;
p = RSTRING(line)->ptr;
if (indent) {
while (*p && (*p == ' ' || *p == '\t')) {
p++;
}
}
if (strncmp(eos, p, len) == 0 && p[len] == '\n') {
break;
}
lex_pbeg = lex_p = RSTRING(line)->ptr;
lex_pend = lex_p + RSTRING(line)->len;
#if 0
if (indent) {
while (*lex_p && *lex_p == '\t') {
lex_p++;
}
}
#endif
retry:
switch (parse_string(term, '\n', '\n')) {
case tSTRING:
case tXSTRING:
rb_str_cat(yylval.val, "\n", 1);
if (!list) {
rb_str_cat(str, RSTRING(yylval.val)->ptr, RSTRING(yylval.val)->len);
}
else {
list_append(list, NEW_STR(yylval.val));
}
break;
case tDSTRING:
case tDXSTRING:
list_append(yylval.node, NEW_STR(rb_str_new2("\n")));
nd_set_type(yylval.node, NODE_STR);
if (!list) list = NEW_DSTR(str);
yylval.node = NEW_LIST(yylval.node);
yylval.node->nd_next = yylval.node->nd_head->nd_next;
list_concat(list, yylval.node);
break;
case 0:
goto error;
}
if (lex_p != lex_pend) {
goto retry;
}
}
free(eos);
lex_lastline = lastline_save;
lex_pbeg = RSTRING(lex_lastline)->ptr;
lex_pend = lex_pbeg + RSTRING(lex_lastline)->len;
lex_p = lex_pbeg + offset_save;
lex_state = EXPR_END;
heredoc_end = ruby_sourceline;
ruby_sourceline = linesave;
if (list) {
nd_set_line(list, linesave);
yylval.node = list;
}
switch (term) {
case '\0':
case '\'':
case '"':
if (list) return tDSTRING;
yylval.val = str;
return tSTRING;
case '`':
if (list) return tDXSTRING;
return tXSTRING;
}
return 0;
}
#include "lex.c"
static void
arg_ambiguous()
{
rb_warning("ambiguous first argument; make sure");
}
#ifndef strtod
double strtod ();
#endif
static int
yylex()
{
register int c;
int space_seen = 0;
struct kwtable *kw;
retry:
switch (c = nextc()) {
case '\0': /* NUL */
case '\004': /* ^D */
case '\032': /* ^Z */
case -1: /* end of script. */
return 0;
/* white spaces */
case ' ': case '\t': case '\f': case '\r':
case '\13': /* '\v' */
space_seen = 1;
goto retry;
case '#': /* it's a comment */
while ((c = nextc()) != '\n') {
if (c == -1)
return 0;
}
/* fall through */
case '\n':
switch (lex_state) {
case EXPR_BEG:
case EXPR_FNAME:
case EXPR_DOT:
goto retry;
default:
break;
}
lex_state = EXPR_BEG;
return '\n';
case '*':
if ((c = nextc()) == '*') {
lex_state = EXPR_BEG;
if (nextc() == '=') {
yylval.id = tPOW;
return tOP_ASGN;
}
pushback(c);
return tPOW;
}
if (c == '=') {
yylval.id = '*';
lex_state = EXPR_BEG;
return tOP_ASGN;
}
pushback(c);
if (lex_state == EXPR_ARG && space_seen && !ISSPACE(c)){
arg_ambiguous();
lex_state = EXPR_BEG;
return tSTAR;
}
if (lex_state == EXPR_BEG || lex_state == EXPR_MID) {
lex_state = EXPR_BEG;
return tSTAR;
}
lex_state = EXPR_BEG;
return '*';
case '!':
lex_state = EXPR_BEG;
if ((c = nextc()) == '=') {
return tNEQ;
}
if (c == '~') {
return tNMATCH;
}
pushback(c);
return '!';
case '=':
if (lex_p == lex_pbeg + 1) {
/* skip embedded rd document */
if (strncmp(lex_p, "begin", 5) == 0 && ISSPACE(lex_p[5])) {
for (;;) {
lex_p = lex_pend;
c = nextc();
if (c == -1) {
rb_compile_error("embedded document meets end of file");
return 0;
}
if (c != '=') continue;
if (strncmp(lex_p, "end", 3) == 0 && ISSPACE(lex_p[3])) {
break;
}
}
lex_p = lex_pend;
goto retry;
}
}
lex_state = EXPR_BEG;
if ((c = nextc()) == '=') {
if ((c = nextc()) == '=') {
return tEQQ;
}
pushback(c);
return tEQ;
}
if (c == '~') {
return tMATCH;
}
else if (c == '>') {
return tASSOC;
}
pushback(c);
return '=';
case '<':
c = nextc();
if (c == '<' &&
lex_state != EXPR_END && lex_state != EXPR_CLASS &&
(lex_state != EXPR_ARG || space_seen)) {
int c2 = nextc();
int indent = 0;
if (c2 == '-') {
indent = 1;
c2 = nextc();
}
if (!ISSPACE(c2) && (strchr("\"'`", c2) || is_identchar(c2))) {
return here_document(c2, indent);
}
pushback(c2);
}
lex_state = EXPR_BEG;
if (c == '=') {
if ((c = nextc()) == '>') {
return tCMP;
}
pushback(c);
return tLEQ;
}
if (c == '<') {
if (nextc() == '=') {
yylval.id = tLSHFT;
return tOP_ASGN;
}
pushback(c);
return tLSHFT;
}
pushback(c);
return '<';
case '>':
lex_state = EXPR_BEG;
if ((c = nextc()) == '=') {
return tGEQ;
}
if (c == '>') {
if ((c = nextc()) == '=') {
yylval.id = tRSHFT;
return tOP_ASGN;
}
pushback(c);
return tRSHFT;
}
pushback(c);
return '>';
case '"':
return parse_string(c,c,c);
case '`':
if (lex_state == EXPR_FNAME) return c;
return parse_string(c,c,c);
case '\'':
return parse_qstring(c,0);
case '?':
if (lex_state == EXPR_END) {
lex_state = EXPR_BEG;
return '?';
}
c = nextc();
if (lex_state == EXPR_ARG && ISSPACE(c)){
pushback(c);
arg_ambiguous();
lex_state = EXPR_BEG;
return '?';
}
if (c == '\\') {
c = read_escape();
}
c &= 0xff;
yylval.val = INT2FIX(c);
lex_state = EXPR_END;
return tINTEGER;
case '&':
if ((c = nextc()) == '&') {
lex_state = EXPR_BEG;
if ((c = nextc()) == '=') {
yylval.id = tANDOP;
return tOP_ASGN;
}
pushback(c);
return tANDOP;
}
else if (c == '=') {
yylval.id = '&';
lex_state = EXPR_BEG;
return tOP_ASGN;
}
pushback(c);
if (lex_state == EXPR_ARG && space_seen && !ISSPACE(c)){
arg_ambiguous();
lex_state = EXPR_BEG;
return tAMPER;
}
if (lex_state == EXPR_BEG || lex_state == EXPR_MID) {
lex_state = EXPR_BEG;
return tAMPER;
}
lex_state = EXPR_BEG;
return '&';
case '|':
lex_state = EXPR_BEG;
if ((c = nextc()) == '|') {
if ((c = nextc()) == '=') {
yylval.id = tOROP;
return tOP_ASGN;
}
pushback(c);
return tOROP;
}
else if (c == '=') {
yylval.id = '|';
return tOP_ASGN;
}
pushback(c);
return '|';
case '+':
c = nextc();
if (lex_state == EXPR_FNAME) {
if (c == '@') {
return tUPLUS;
}
pushback(c);
return '+';
}
if (c == '=') {
lex_state = EXPR_BEG;
yylval.id = '+';
return tOP_ASGN;
}
if (lex_state == EXPR_BEG || lex_state == EXPR_MID ||
(lex_state == EXPR_ARG && space_seen && !ISSPACE(c))) {
if (ISDIGIT(c)) {
goto start_num;
}
if (lex_state == EXPR_ARG) arg_ambiguous();
pushback(c);
lex_state = EXPR_BEG;
return tUPLUS;
}
lex_state = EXPR_BEG;
pushback(c);
return '+';
case '-':
c = nextc();
if (lex_state == EXPR_FNAME) {
if (c == '@') {
return tUMINUS;
}
pushback(c);
return '-';
}
if (c == '=') {
lex_state = EXPR_BEG;
yylval.id = '-';
return tOP_ASGN;
}
if (lex_state == EXPR_BEG || lex_state == EXPR_MID ||
(lex_state == EXPR_ARG && space_seen && !ISSPACE(c))) {
if (ISDIGIT(c)) {
pushback(c);
c = '-';
goto start_num;
}
if (lex_state == EXPR_ARG) arg_ambiguous();
lex_state = EXPR_BEG;
pushback(c);
return tUMINUS;
}
lex_state = EXPR_BEG;
pushback(c);
return '-';
case '.':
lex_state = EXPR_BEG;
if ((c = nextc()) == '.') {
if ((c = nextc()) == '.') {
return tDOT3;
}
pushback(c);
return tDOT2;
}
pushback(c);
if (!ISDIGIT(c)) {
lex_state = EXPR_DOT;
return '.';
}
c = '.';
/* fall through */
start_num:
case '0': case '1': case '2': case '3': case '4':
case '5': case '6': case '7': case '8': case '9':
{
int is_float, seen_point, seen_e;
is_float = seen_point = seen_e = 0;
lex_state = EXPR_END;
newtok();
if (c == '-' || c == '+') {
tokadd(c);
c = nextc();
}
if (c == '0') {
c = nextc();
if (c == 'x' || c == 'X') {
/* hexadecimal */
c = nextc();
if (!ISXDIGIT(c)) {
yyerror("hexadecimal number without hex-digits");
}
do {
if (c == '_') continue;
if (!ISXDIGIT(c)) break;
tokadd(c);
} while (c = nextc());
pushback(c);
tokfix();
yylval.val = rb_str2inum(tok(), 16);
return tINTEGER;
}
if (c == 'b' || c == 'B') {
/* binary */
c = nextc();
if (c != '0' && c != '1') {
yyerror("numeric constant with no digits");
}
do {
if (c == '_') continue;
if (c != '0'&& c != '1') break;
tokadd(c);
} while (c = nextc());
pushback(c);
tokfix();
yylval.val = rb_str2inum(tok(), 2);
return tINTEGER;
}
if (c >= '0' && c <= '7' || c == '_') {
/* octal */
do {
if (c == '_') continue;
if (c < '0' || c > '7') break;
tokadd(c);
} while (c = nextc());
pushback(c);
tokfix();
yylval.val = rb_str2inum(tok(), 8);
return tINTEGER;
}
if (c > '7' && c <= '9') {
yyerror("Illegal octal digit");
}
else if (c == '.') {
tokadd('0');
}
else {
pushback(c);
yylval.val = INT2FIX(0);
return tINTEGER;
}
}
for (;;) {
switch (c) {
case '0': case '1': case '2': case '3': case '4':
case '5': case '6': case '7': case '8': case '9':
tokadd(c);
break;
case '.':
if (seen_point || seen_e) {
goto decode_num;
}
else {
int c0 = nextc();
if (!ISDIGIT(c0)) {
pushback(c0);
goto decode_num;
}
c = c0;
}
tokadd('.');
tokadd(c);
is_float++;
seen_point++;
break;
case 'e':
case 'E':
if (seen_e) {
goto decode_num;
}
tokadd(c);
seen_e++;
is_float++;
if ((c = nextc()) == '-' || c == '+')
tokadd(c);
else
continue;
break;
case '_': /* `_' in decimal just ignored */
break;
default:
goto decode_num;
}
c = nextc();
}
decode_num:
pushback(c);
tokfix();
if (is_float) {
double d = strtod(tok(), 0);
if (errno == ERANGE) {
rb_warn("Float %s out of range", tok());
errno = 0;
}
yylval.val = rb_float_new(d);
return tFLOAT;
}
yylval.val = rb_str2inum(tok(), 10);
return tINTEGER;
}
case ']':
case '}':
case ')':
lex_state = EXPR_END;
return c;
case ':':
c = nextc();
if (c == ':') {
if (lex_state == EXPR_BEG) {
lex_state = EXPR_BEG;
return tCOLON3;
}
if (lex_state == EXPR_ARG && space_seen) {
arg_ambiguous();
lex_state = EXPR_BEG;
return tCOLON3;
}
lex_state = EXPR_DOT;
return tCOLON2;
}
pushback(c);
if (lex_state == EXPR_END || ISSPACE(c)) {
lex_state = EXPR_BEG;
return ':';
}
lex_state = EXPR_FNAME;
return tSYMBEG;
case '/':
if (lex_state == EXPR_BEG || lex_state == EXPR_MID) {
return parse_regx('/', '/');
}
if ((c = nextc()) == '=') {
lex_state = EXPR_BEG;
yylval.id = '/';
return tOP_ASGN;
}
if (lex_state == EXPR_ARG) {
if (space_seen && !ISSPACE(c)) {
pushback(c);
arg_ambiguous();
return parse_regx('/', '/');
}
}
lex_state = EXPR_BEG;
pushback(c);
return '/';
case '^':
lex_state = EXPR_BEG;
if (nextc() == '=') {
yylval.id = '^';
return tOP_ASGN;
}
pushback(c);
return c;
case ',':
case ';':
lex_state = EXPR_BEG;
return c;
case '~':
if (lex_state == EXPR_FNAME) {
if ((c = nextc()) != '@') {
pushback(c);
}
}
lex_state = EXPR_BEG;
return '~';
case '(':
if (lex_state == EXPR_BEG || lex_state == EXPR_MID) {
c = tLPAREN;
lex_state = EXPR_BEG;
}
else {
lex_state = EXPR_BEG;
}
return c;
case '[':
if (lex_state == EXPR_FNAME) {
if ((c = nextc()) == ']') {
if ((c = nextc()) == '=') {
return tASET;
}
pushback(c);
return tAREF;
}
pushback(c);
return '[';
}
else if (lex_state == EXPR_BEG || lex_state == EXPR_MID) {
c = tLBRACK;
}
else if (lex_state == EXPR_ARG && space_seen) {
arg_ambiguous();
c = tLBRACK;
}
lex_state = EXPR_BEG;
return c;
case '{':
if (lex_state != EXPR_END && lex_state != EXPR_ARG)
c = tLBRACE;
lex_state = EXPR_BEG;
return c;
case '\\':
c = nextc();
if (c == '\n') {
space_seen = 1;
goto retry; /* skip \\n */
}
pushback(c);
return '\\';
case '%':
if (lex_state == EXPR_BEG || lex_state == EXPR_MID) {
int term;
int paren;
c = nextc();
quotation:
if (!ISALNUM(c)) {
term = c;
c = 'Q';
}
else {
term = nextc();
}
if (c == -1 || term == -1) {
rb_compile_error("unterminated quoted string meets end of file");
return 0;
}
paren = 0;
if (term == '(') term = ')';
else if (term == '[') term = ']';
else if (term == '{') term = '}';
else if (term == '<') term = '>';
switch (c) {
case 'Q':
return parse_string('"', term, paren);
case 'q':
return parse_qstring(term, paren);
case 'w':
return parse_quotedword(term, paren);
case 'x':
return parse_string('`', term, paren);
case 'r':
return parse_regx(term, paren);
default:
yyerror("unknown type of %string");
return 0;
}
}
if ((c = nextc()) == '=') {
yylval.id = '%';
return tOP_ASGN;
}
if (lex_state == EXPR_ARG) {
if (space_seen && !ISSPACE(c)) {
arg_ambiguous();
goto quotation;
}
}
lex_state = EXPR_BEG;
pushback(c);
return '%';
case '$':
lex_state = EXPR_END;
newtok();
c = nextc();
switch (c) {
case '~': /* $~: match-data */
/* fall through */
case '_': /* $_: last read line string */
local_cnt(c);
/* fall through */
case '*': /* $*: argv */
case '$': /* $$: pid */
case '?': /* $?: last status */
case '!': /* $!: error string */
case '@': /* $@: error position */
case '/': /* $/: input record separator */
case '\\': /* $\: output record separator */
case ';': /* $;: field separator */
case ',': /* $,: output field separator */
case '.': /* $.: last read line number */
case '=': /* $=: ignorecase */
case ':': /* $:: load path */
case '<': /* $<: reading filename */
case '>': /* $>: default output handle */
case '\"': /* $": already loaded files */
tokadd('$');
tokadd(c);
tokfix();
yylval.id = rb_intern(tok());
return tGVAR;
case '-':
tokadd('$');
tokadd(c);
c = nextc();
tokadd(c);
tokfix();
yylval.id = rb_intern(tok());
return tGVAR;
case '&': /* $&: last match */
case '`': /* $`: string before last match */
case '\'': /* $': string after last match */
case '+': /* $+: string matches last paren. */
yylval.node = NEW_BACK_REF(c);
return tBACK_REF;
case '1': case '2': case '3':
case '4': case '5': case '6':
case '7': case '8': case '9':
while (ISDIGIT(c)) {
tokadd(c);
c = nextc();
}
pushback(c);
tokfix();
yylval.node = NEW_NTH_REF(atoi(tok()));
return tNTH_REF;
default:
if (!is_identchar(c)) {
pushback(c);
return '$';
}
case '0':
tokadd('$');
}
break;
case '@':
c = nextc();
if (!is_identchar(c)) {
pushback(c);
return '@';
}
newtok();
tokadd('@');
break;
default:
if (c != '_' && !ISALPHA(c) && !ismbchar(c)) {
rb_compile_error("Invalid char '%c' in expression", c);
goto retry;
}
newtok();
break;
}
while (is_identchar(c)) {
tokadd(c);
if (ismbchar(c)) {
int i, len = mbclen(c)-1;
tokadd(c);
for (i = 0; i < len; i++) {
c = nextc();
tokadd(c);
}
}
c = nextc();
}
if ((c == '!' || c == '?') && is_identchar(tok()[0])) {
tokadd(c);
if (c == '!') {
c = nextc();
if (c == '=') {
rb_warn("identifier! immediately followed by `='");
}
pushback(c);
}
}
else {
pushback(c);
}
tokfix();
{
int result;
switch (tok()[0]) {
case '$':
lex_state = EXPR_END;
result = tGVAR;
break;
case '@':
lex_state = EXPR_END;
result = tIVAR;
break;
default:
if (lex_state != EXPR_DOT) {
/* See if it is a reserved word. */
kw = rb_reserved_word(tok(), toklen());
if (kw) {
enum lex_state state = lex_state;
if (lex_state == EXPR_FNAME) {
yylval.id = rb_intern(kw->name);
}
lex_state = kw->state;
return kw->id[state != EXPR_BEG];
}
}
if (ISUPPER(tok()[0])) {
result = tCONSTANT;
}
else if (toklast() == '!' || toklast() == '?') {
result = tFID;
} else {
result = tIDENTIFIER;
if (lex_state == EXPR_FNAME) {
lex_state = EXPR_END;
if ((c = nextc()) == '=') {
tokadd(c);
}
else {
pushback(c);
}
}
}
if (lex_state == EXPR_BEG ||
lex_state == EXPR_DOT ||
lex_state == EXPR_ARG){
lex_state = EXPR_ARG;
}
else {
lex_state = EXPR_END;
}
}
tokfix();
yylval.id = rb_intern(tok());
return result;
}
}
static NODE*
rb_str_extend(list, term)
NODE *list;
char term;
{
int c;
int brace = -1;
VALUE ss;
NODE *node;
int nest;
c = nextc();
switch (c) {
case '$':
case '@':
case '{':
break;
default:
tokadd('#');
pushback(c);
return list;
}
ss = rb_str_new(tok(), toklen());
if (list == 0) {
list = NEW_DSTR(ss);
}
else if (toklen() > 0) {
list_append(list, NEW_STR(ss));
}
newtok();
switch (c) {
case '$':
tokadd('$');
c = nextc();
if (c == -1) return (NODE*)-1;
switch (c) {
case '1': case '2': case '3':
case '4': case '5': case '6':
case '7': case '8': case '9':
while (ISDIGIT(c)) {
tokadd(c);
c = nextc();
}
pushback(c);
goto fetch_id;
case '&': case '+':
case '_': case '~':
case '*': case '$': case '?':
case '!': case '@': case ',':
case '.': case '=': case ':':
case '<': case '>': case '\\':
refetch:
tokadd(c);
goto fetch_id;
default:
if (c == term) {
list_append(list, NEW_STR(rb_str_new2("#$")));
pushback(c);
newtok();
return list;
}
switch (c) {
case '\"':
case '/':
case '\'':
case '`':
goto refetch;
}
if (!is_identchar(c)) {
yyerror("bad global variable in string");
newtok();
return list;
}
}
/* through */
case '@':
tokadd(c);
c = nextc();
while (is_identchar(c)) {
tokadd(c);
if (ismbchar(c)) {
int i, len = mbclen(c)-1;
tokadd(c);
for (i = 0; i < len; i++) {
c = nextc();
tokadd(c);
}
}
c = nextc();
}
pushback(c);
break;
case '{':
if (c == '{') brace = '}';
nest = 0;
do {
loop_again:
c = nextc();
switch (c) {
case -1:
if (nest > 0) {
yyerror("bad substitution in string");
newtok();
return list;
}
return (NODE*)-1;
case '}':
if (c == brace) {
if (nest == 0) break;
nest--;
}
tokadd(c);
goto loop_again;
case '\\':
c = read_escape();
tokadd(c);
goto loop_again;
case '{':
if (brace != -1) nest++;
case '\"':
case '/':
case '`':
if (c == term) {
pushback(c);
list_append(list, NEW_STR(rb_str_new2("#")));
rb_warning("bad substitution in string");
tokfix();
list_append(list, NEW_STR(rb_str_new(tok(), toklen())));
newtok();
return list;
}
default:
tokadd(c);
break;
}
} while (c != brace);
}
fetch_id:
tokfix();
node = NEW_EVSTR(tok(),toklen());
list_append(list, node);
newtok();
return list;
}
NODE*
rb_node_newnode(type, a0, a1, a2)
enum node_type type;
NODE *a0, *a1, *a2;
{
NODE *n = (NODE*)rb_newobj();
n->flags |= T_NODE;
nd_set_type(n, type);
nd_set_line(n, ruby_sourceline);
n->nd_file = ruby_sourcefile;
n->u1.node = a0;
n->u2.node = a1;
n->u3.node = a2;
return n;
}
static enum node_type
nodetype(node) /* for debug */
NODE *node;
{
return (enum node_type)nd_type(node);
}
static int
nodeline(node)
NODE *node;
{
return nd_line(node);
}
static NODE*
newline_node(node)
NODE *node;
{
NODE *nl = 0;
if (node) {
nl = NEW_NEWLINE(node);
fixpos(nl, node);
nl->nd_nth = nd_line(node);
}
return nl;
}
static void
fixpos(node, orig)
NODE *node, *orig;
{
if (!node) return;
if (!orig) return;
node->nd_file = orig->nd_file;
nd_set_line(node, nd_line(orig));
}
static NODE*
block_append(head, tail)
NODE *head, *tail;
{
NODE *end;
if (tail == 0) return head;
if (head == 0) return tail;
if (nd_type(head) != NODE_BLOCK) {
end = NEW_BLOCK(head);
end->nd_end = end;
fixpos(end, head);
head = end;
}
else {
end = head->nd_end;
}
if (RTEST(ruby_verbose)) {
NODE *nd = end->nd_head;
newline:
switch (nd_type(nd)) {
case NODE_RETURN:
case NODE_BREAK:
case NODE_NEXT:
case NODE_REDO:
case NODE_RETRY:
rb_warning("statement not reached");
break;
case NODE_NEWLINE:
nd = nd->nd_next;
goto newline;
default:
break;
}
}
if (nd_type(tail) != NODE_BLOCK) {
tail = NEW_BLOCK(tail);
tail->nd_end = tail;
}
end->nd_next = tail;
head->nd_end = tail->nd_end;
return head;
}
static NODE*
list_append(head, tail)
NODE *head, *tail;
{
NODE *last;
if (head == 0) return NEW_LIST(tail);
last = head;
while (last->nd_next) {
last = last->nd_next;
}
last->nd_next = NEW_LIST(tail);
head->nd_alen += 1;
return head;
}
static NODE*
list_concat(head, tail)
NODE *head, *tail;
{
NODE *last;
last = head;
while (last->nd_next) {
last = last->nd_next;
}
last->nd_next = tail;
head->nd_alen += tail->nd_alen;
return head;
}
static NODE *
call_op(recv, id, narg, arg1)
NODE *recv;
ID id;
int narg;
NODE *arg1;
{
value_expr(recv);
if (narg == 1) {
value_expr(arg1);
}
return NEW_CALL(recv, id, narg==1?NEW_LIST(arg1):0);
}
static NODE*
match_gen(node1, node2)
NODE *node1;
NODE *node2;
{
local_cnt('~');
switch (nd_type(node1)) {
case NODE_DREGX:
case NODE_DREGX_ONCE:
return NEW_MATCH2(node1, node2);
case NODE_LIT:
if (TYPE(node1->nd_lit) == T_REGEXP) {
return NEW_MATCH2(node1, node2);
}
}
switch (nd_type(node2)) {
case NODE_DREGX:
case NODE_DREGX_ONCE:
return NEW_MATCH3(node2, node1);
case NODE_LIT:
if (TYPE(node2->nd_lit) == T_REGEXP) {
return NEW_MATCH3(node2, node1);
}
}
return NEW_CALL(node1, tMATCH, NEW_LIST(node2));
}
static NODE*
gettable(id)
ID id;
{
if (id == kSELF) {
return NEW_SELF();
}
else if (id == kNIL) {
return NEW_NIL();
}
else if (id == kTRUE) {
return NEW_TRUE();
}
else if (id == kFALSE) {
return NEW_FALSE();
}
else if (id == k__FILE__) {
return NEW_STR(rb_str_new2(ruby_sourcefile));
}
else if (id == k__LINE__) {
return NEW_LIT(INT2FIX(ruby_sourceline));
}
else if (is_local_id(id)) {
if (dyna_in_block() && rb_dvar_defined(id)) return NEW_DVAR(id);
if (local_id(id)) return NEW_LVAR(id);
/* method call without arguments */
return NEW_VCALL(id);
}
else if (is_global_id(id)) {
return NEW_GVAR(id);
}
else if (is_instance_id(id)) {
return NEW_IVAR(id);
}
else if (is_const_id(id)) {
return NEW_CVAR(id);
}
rb_bug("invalid id for gettable");
return 0;
}
static NODE*
assignable(id, val)
ID id;
NODE *val;
{
NODE *lhs = 0;
value_expr(val);
if (id == kSELF) {
yyerror("Can't change the value of self");
}
else if (id == kNIL) {
yyerror("Can't assign to nil");
}
else if (id == kTRUE) {
yyerror("Can't assign to true");
}
else if (id == kFALSE) {
yyerror("Can't assign to false");
}
else if (id == k__FILE__) {
yyerror("Can't assign to __FILE__");
}
else if (id == k__LINE__) {
yyerror("Can't assign to __LINE__");
}
else if (is_local_id(id)) {
if (rb_dvar_defined(id)) {
lhs = NEW_DASGN(id, val);
}
else if (local_id(id) || !dyna_in_block()) {
lhs = NEW_LASGN(id, val);
}
else{
rb_dvar_push(id, 0);
lhs = NEW_DASGN_PUSH(id, val);
}
}
else if (is_global_id(id)) {
lhs = NEW_GASGN(id, val);
}
else if (is_instance_id(id)) {
lhs = NEW_IASGN(id, val);
}
else if (is_const_id(id)) {
if (cur_mid || in_single)
yyerror("dynamic constant assignment");
lhs = NEW_CASGN(id, val);
}
else {
rb_bug("bad id for variable");
}
return lhs;
}
static NODE *
arg_add(node1, node2)
NODE *node1;
NODE *node2;
{
return NEW_ARGSCAT(node1, node2);
}
static NODE *
aryset(recv, idx, val)
NODE *recv, *idx, *val;
{
value_expr(recv);
value_expr(val);
if (idx) {
if (nd_type(idx) == NODE_ARRAY) {
idx = list_append(idx, val);
}
else {
idx = arg_add(idx, val);
}
}
else {
idx = val;
}
return NEW_CALL(recv, tASET, idx);
}
ID
rb_id_attrset(id)
ID id;
{
id &= ~ID_SCOPE_MASK;
id |= ID_ATTRSET;
return id;
}
static NODE *
attrset(recv, id, val)
NODE *recv, *val;
ID id;
{
value_expr(recv);
value_expr(val);
return NEW_CALL(recv, rb_id_attrset(id), NEW_LIST(val));
}
static void
rb_backref_error(node)
NODE *node;
{
switch (nd_type(node)) {
case NODE_NTH_REF:
rb_compile_error("Can't set variable $%d", node->nd_nth);
break;
case NODE_BACK_REF:
rb_compile_error("Can't set variable $%c", node->nd_nth);
break;
}
}
static int
value_expr(node)
NODE *node;
{
if (node == 0) return Qtrue;
switch (nd_type(node)) {
case NODE_RETURN:
case NODE_BREAK:
case NODE_NEXT:
case NODE_REDO:
case NODE_RETRY:
case NODE_WHILE:
case NODE_UNTIL:
case NODE_CLASS:
case NODE_MODULE:
case NODE_DEFN:
case NODE_DEFS:
yyerror("void value expression");
return Qfalse;
break;
case NODE_BLOCK:
while (node->nd_next) {
node = node->nd_next;
}
return value_expr(node->nd_head);
case NODE_IF:
return value_expr(node->nd_body) && value_expr(node->nd_else);
case NODE_NEWLINE:
return value_expr(node->nd_next);
default:
return Qtrue;
}
}
static NODE *cond2();
static int
assign_in_cond(node)
NODE *node;
{
switch (nd_type(node)) {
case NODE_MASGN:
yyerror("multiple assignment in conditional");
return 1;
case NODE_LASGN:
case NODE_DASGN:
case NODE_GASGN:
case NODE_IASGN:
case NODE_CASGN:
break;
case NODE_NEWLINE:
default:
return 0;
}
switch (nd_type(node->nd_value)) {
case NODE_LIT:
case NODE_STR:
case NODE_DSTR:
case NODE_XSTR:
case NODE_DXSTR:
case NODE_EVSTR:
case NODE_DREGX:
case NODE_NIL:
case NODE_TRUE:
case NODE_FALSE:
/* reports always */
rb_warn("found = in conditional, should be ==");
return 1;
default:
break;
}
if (assign_in_cond(node->nd_value) == 0) {
rb_warning("assignment in condition");
}
return 1;
}
static NODE*
cond0(node)
NODE *node;
{
enum node_type type = nd_type(node);
assign_in_cond(node);
switch (type) {
case NODE_DREGX:
case NODE_DREGX_ONCE:
local_cnt('_');
local_cnt('~');
return NEW_MATCH2(node, NEW_GVAR(rb_intern("$_")));
case NODE_DOT2:
case NODE_DOT3:
node->nd_beg = cond2(node->nd_beg);
node->nd_end = cond2(node->nd_end);
if (type == NODE_DOT2) nd_set_type(node,NODE_FLIP2);
else if (type == NODE_DOT3) nd_set_type(node, NODE_FLIP3);
node->nd_cnt = local_append(0);
return node;
case NODE_LIT:
if (TYPE(node->nd_lit) == T_REGEXP) {
local_cnt('_');
local_cnt('~');
return NEW_MATCH(node);
}
if (TYPE(node->nd_lit) == T_STRING) {
local_cnt('_');
local_cnt('~');
return NEW_MATCH(rb_reg_new(RSTRING(node)->ptr,RSTRING(node)->len,0));
}
default:
return node;
}
}
static NODE*
cond(node)
NODE *node;
{
if (node == 0) return 0;
if (nd_type(node) == NODE_NEWLINE){
node->nd_next = cond0(node->nd_next);
return node;
}
return cond0(node);
}
static NODE*
cond2(node)
NODE *node;
{
enum node_type type;
node = cond(node);
type = nd_type(node);
if (type == NODE_NEWLINE) node = node->nd_next;
if (type == NODE_LIT && FIXNUM_P(node->nd_lit)) {
return call_op(node,tEQ,1,NEW_GVAR(rb_intern("$.")));
}
return node;
}
static NODE*
logop(type, left, right)
enum node_type type;
NODE *left, *right;
{
value_expr(left);
return rb_node_newnode(type, cond(left), cond(right), 0);
}
static NODE *
arg_blk_pass(node1, node2)
NODE *node1;
NODE *node2;
{
if (node2) {
node2->nd_head = node1;
return node2;
}
return node1;
}
static NODE*
new_call(r,m,a)
NODE *r;
ID m;
NODE *a;
{
if (a && nd_type(a) == NODE_BLOCK_PASS) {
a->nd_iter = NEW_CALL(r,m,a->nd_head);
return a;
}
return NEW_CALL(r,m,a);
}
static NODE*
new_fcall(m,a)
ID m;
NODE *a;
{
if (a && nd_type(a) == NODE_BLOCK_PASS) {
a->nd_iter = NEW_FCALL(m,a->nd_head);
return a;
}
return NEW_FCALL(m,a);
}
static struct local_vars {
ID *tbl;
int nofree;
int cnt;
int dlev;
struct local_vars *prev;
} *lvtbl;
static void
local_push()
{
struct local_vars *local;
local = ALLOC(struct local_vars);
local->prev = lvtbl;
local->nofree = 0;
local->cnt = 0;
local->tbl = 0;
local->dlev = 0;
lvtbl = local;
}
static void
local_pop()
{
struct local_vars *local = lvtbl->prev;
if (lvtbl->tbl) {
if (!lvtbl->nofree) free(lvtbl->tbl);
else lvtbl->tbl[0] = lvtbl->cnt;
}
free(lvtbl);
lvtbl = local;
}
static ID*
local_tbl()
{
lvtbl->nofree = 1;
return lvtbl->tbl;
}
static int
local_append(id)
ID id;
{
if (lvtbl->tbl == 0) {
lvtbl->tbl = ALLOC_N(ID, 4);
lvtbl->tbl[0] = 0;
lvtbl->tbl[1] = '_';
lvtbl->tbl[2] = '~';
lvtbl->cnt = 2;
if (id == '_') return 0;
if (id == '~') return 1;
}
else {
REALLOC_N(lvtbl->tbl, ID, lvtbl->cnt+2);
}
lvtbl->tbl[lvtbl->cnt+1] = id;
return lvtbl->cnt++;
}
static int
local_cnt(id)
ID id;
{
int cnt, max;
if (id == 0) return lvtbl->cnt;
for (cnt=1, max=lvtbl->cnt+1; cnt<max ;cnt++) {
if (lvtbl->tbl[cnt] == id) return cnt-1;
}
return local_append(id);
}
static int
local_id(id)
ID id;
{
int i, max;
if (lvtbl == 0) return Qfalse;
for (i=3, max=lvtbl->cnt+1; i<max; i++) {
if (lvtbl->tbl[i] == id) return Qtrue;
}
return Qfalse;
}
static void
top_local_init()
{
local_push();
lvtbl->cnt = ruby_scope->local_tbl?ruby_scope->local_tbl[0]:0;
if (lvtbl->cnt > 0) {
lvtbl->tbl = ALLOC_N(ID, lvtbl->cnt+3);
MEMCPY(lvtbl->tbl, ruby_scope->local_tbl, ID, lvtbl->cnt+1);
}
else {
lvtbl->tbl = 0;
}
if (ruby_dyna_vars)
lvtbl->dlev = 1;
else
lvtbl->dlev = 0;
}
static void
top_local_setup()
{
int len = lvtbl->cnt;
int i;
if (len > 0) {
i = lvtbl->tbl[0];
if (i < len) {
if (i == 0 || ruby_scope->flag == SCOPE_ALLOCA) {
VALUE *vars = ALLOC_N(VALUE, len+1);
if (ruby_scope->local_vars) {
*vars++ = ruby_scope->local_vars[-1];
MEMCPY(vars, ruby_scope->local_vars, VALUE, i);
rb_mem_clear(vars+i, len-i);
}
else {
*vars++ = 0;
rb_mem_clear(vars, len);
}
ruby_scope->local_vars = vars;
ruby_scope->flag |= SCOPE_MALLOC;
}
else {
VALUE *vars = ruby_scope->local_vars-1;
REALLOC_N(vars, VALUE, len+1);
ruby_scope->local_vars = vars+1;
rb_mem_clear(ruby_scope->local_vars+i, len-i);
}
if (ruby_scope->local_tbl && ruby_scope->local_vars[-1] == 0) {
free(ruby_scope->local_tbl);
}
ruby_scope->local_vars[-1] = 0;
ruby_scope->local_tbl = local_tbl();
}
}
local_pop();
}
static struct RVarmap*
dyna_push()
{
lvtbl->dlev++;
return ruby_dyna_vars;
}
static void
dyna_pop(vars)
struct RVarmap* vars;
{
lvtbl->dlev--;
ruby_dyna_vars = vars;
}
static int
dyna_in_block()
{
return (lvtbl->dlev > 0);
}
static void
cref_pop()
{
cur_cref = cur_cref->nd_next;
}
void
rb_parser_append_print()
{
ruby_eval_tree =
block_append(ruby_eval_tree,
NEW_FCALL(rb_intern("print"),
NEW_ARRAY(NEW_GVAR(rb_intern("$_")))));
}
void
rb_parser_while_loop(chop, split)
int chop, split;
{
if (split) {
ruby_eval_tree =
block_append(NEW_GASGN(rb_intern("$F"),
NEW_CALL(NEW_GVAR(rb_intern("$_")),
rb_intern("split"), 0)),
ruby_eval_tree);
}
if (chop) {
ruby_eval_tree =
block_append(NEW_CALL(NEW_GVAR(rb_intern("$_")),
rb_intern("chop!"), 0), ruby_eval_tree);
}
ruby_eval_tree = NEW_OPT_N(ruby_eval_tree);
}
static struct {
ID token;
char *name;
} op_tbl[] = {
tDOT2, "..",
'+', "+",
'-', "-",
'+', "+(binary)",
'-', "-(binary)",
'*', "*",
'/', "/",
'%', "%",
tPOW, "**",
tUPLUS, "+@",
tUMINUS, "-@",
tUPLUS, "+(unary)",
tUMINUS, "-(unary)",
'|', "|",
'^', "^",
'&', "&",
tCMP, "<=>",
'>', ">",
tGEQ, ">=",
'<', "<",
tLEQ, "<=",
tEQ, "==",
tEQQ, "===",
tNEQ, "!=",
tMATCH, "=~",
tNMATCH, "!~",
'!', "!",
'~', "~",
'!', "!(unary)",
'~', "~(unary)",
'!', "!@",
'~', "~@",
tAREF, "[]",
tASET, "[]=",
tLSHFT, "<<",
tRSHFT, ">>",
tCOLON2, "::",
tCOLON3, "::",
'`', "`",
0, 0,
};
static st_table *sym_tbl;
static st_table *sym_rev_tbl;
void
Init_sym()
{
sym_tbl = st_init_strtable_with_size(200);
sym_rev_tbl = st_init_numtable_with_size(200);
rb_global_variable((VALUE*)&cur_cref);
rb_global_variable((VALUE*)&lex_lastline);
}
ID
rb_intern(name)
const char *name;
{
static ID last_id = LAST_TOKEN;
int id;
int last;
if (st_lookup(sym_tbl, name, &id))
return id;
id = 0;
switch (name[0]) {
case '$':
id |= ID_GLOBAL;
break;
case '@':
id |= ID_INSTANCE;
break;
default:
if (name[0] != '_' && !ISALPHA(name[0]) && !ismbchar(name[0])) {
/* operator */
int i;
for (i=0; op_tbl[i].token; i++) {
if (*op_tbl[i].name == *name &&
strcmp(op_tbl[i].name, name) == 0) {
id = op_tbl[i].token;
goto id_regist;
}
}
}
last = strlen(name)-1;
if (name[last] == '=') {
/* attribute assignment */
char *buf = ALLOCA_N(char,last+1);
strncpy(buf, name, last);
buf[last] = '\0';
id = rb_intern(buf);
if (id > LAST_TOKEN) {
id = rb_id_attrset(id);
goto id_regist;
}
id |= ID_ATTRSET;
}
else if (ISUPPER(name[0])) {
id = ID_CONST;
}
else {
id = ID_LOCAL;
}
break;
}
id |= ++last_id << ID_SCOPE_SHIFT;
id_regist:
name = strdup(name);
st_add_direct(sym_tbl, name, id);
st_add_direct(sym_rev_tbl, id, name);
return id;
}
char *
rb_id2name(id)
ID id;
{
char *name;
if (id < LAST_TOKEN) {
int i = 0;
for (i=0; op_tbl[i].token; i++) {
if (op_tbl[i].token == id)
return op_tbl[i].name;
}
}
if (st_lookup(sym_rev_tbl, id, &name))
return name;
if (is_attrset_id(id)) {
char *res;
ID id2;
id2 = (id & ~ID_SCOPE_MASK) | ID_LOCAL;
res = rb_id2name(id2);
if (res) {
char *buf = ALLOCA_N(char, strlen(res)+2);
strcpy(buf, res);
strcat(buf, "=");
rb_intern(buf);
return rb_id2name(id);
}
}
return 0;
}
int
rb_is_const_id(id)
ID id;
{
if (is_const_id(id)) return Qtrue;
return Qfalse;
}
int
rb_is_instance_id(id)
ID id;
{
if (is_instance_id(id)) return Qtrue;
return Qfalse;
}
static void
special_local_set(c, val)
char c;
VALUE val;
{
int cnt;
top_local_init();
cnt = local_cnt(c);
top_local_setup();
ruby_scope->local_vars[cnt] = val;
}
VALUE
rb_backref_get()
{
if (ruby_scope->local_vars) {
return ruby_scope->local_vars[1];
}
return Qnil;
}
void
rb_backref_set(val)
VALUE val;
{
if (ruby_scope->local_vars) {
ruby_scope->local_vars[1] = val;
}
else {
special_local_set('~', val);
}
}
VALUE
rb_lastline_get()
{
if (ruby_scope->local_vars) {
return ruby_scope->local_vars[0];
}
return Qnil;
}
void
rb_lastline_set(val)
VALUE val;
{
if (ruby_scope->local_vars) {
ruby_scope->local_vars[0] = val;
}
else {
special_local_set('_', val);
}
}
View git blame Copy permalink