diff options
Diffstat (limited to 'parse.c')
| -rw-r--r-- | parse.c | 7428 |
1 files changed, 0 insertions, 7428 deletions
diff --git a/parse.c b/parse.c deleted file mode 100644 index 56b85fc384..0000000000 --- a/parse.c +++ /dev/null @@ -1,7428 +0,0 @@ - -/* 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 <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 int compile_for_eval = 0; -static ID cur_mid = 0; - -static NODE *cond(); -static NODE *logop(); - -static NODE *newline_node(); -static void fixpos(); - -static int value_expr(); -static void void_expr(); -static void void_stmts(); - -static NODE *block_append(); -static NODE *list_append(); -static NODE *list_concat(); -static NODE *arg_concat(); -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 *node_assign(); - -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 115 "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 644 -#define YYFLAG -32768 -#define YYNTBASE 118 - -#define YYTRANSLATE(x) ((unsigned)(x) <= 345 ? yytranslate[x] : 210) - -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, 9, 11, 15, 18, 20, 21, - 26, 30, 34, 38, 41, 45, 49, 53, 57, 58, - 64, 69, 73, 75, 79, 82, 85, 87, 91, 95, - 98, 101, 103, 106, 111, 116, 119, 121, 125, 127, - 131, 133, 137, 140, 146, 149, 151, 155, 158, 160, - 164, 166, 171, 175, 177, 179, 184, 188, 190, 192, - 194, 196, 198, 200, 202, 204, 206, 207, 212, 214, - 216, 218, 220, 222, 224, 226, 228, 230, 232, 234, - 236, 238, 240, 242, 244, 246, 248, 250, 252, 254, - 256, 258, 260, 262, 264, 266, 268, 270, 272, 274, - 276, 278, 280, 282, 284, 286, 288, 290, 292, 294, - 296, 298, 300, 302, 304, 306, 308, 310, 312, 314, - 316, 318, 320, 322, 324, 326, 328, 330, 332, 334, - 336, 338, 340, 342, 344, 346, 350, 351, 356, 363, - 369, 375, 379, 383, 387, 391, 395, 399, 403, 407, - 411, 414, 417, 421, 425, 429, 433, 437, 441, 445, - 449, 453, 457, 461, 465, 469, 472, 475, 479, 483, - 487, 491, 492, 497, 503, 505, 507, 509, 512, 514, - 517, 520, 526, 529, 532, 538, 543, 548, 556, 560, - 562, 565, 568, 570, 572, 574, 576, 580, 582, 587, - 590, 592, 594, 597, 599, 603, 606, 608, 610, 612, - 614, 616, 618, 620, 625, 629, 633, 638, 642, 644, - 649, 653, 655, 656, 663, 665, 668, 670, 673, 680, - 687, 693, 699, 704, 712, 719, 723, 724, 731, 732, - 740, 741, 747, 748, 755, 756, 757, 767, 769, 771, - 773, 775, 777, 779, 782, 784, 786, 788, 794, 796, - 799, 801, 803, 805, 808, 810, 814, 815, 821, 822, - 828, 830, 832, 834, 836, 838, 841, 846, 853, 857, - 864, 868, 873, 875, 877, 879, 885, 887, 892, 895, - 897, 899, 905, 907, 909, 912, 914, 917, 919, 921, - 923, 925, 927, 929, 931, 933, 935, 937, 939, 941, - 943, 945, 947, 949, 951, 953, 955, 957, 958, 963, - 966, 971, 974, 981, 986, 991, 994, 999, 1002, 1005, - 1007, 1008, 1010, 1014, 1018, 1020, 1024, 1027, 1030, 1033, - 1035, 1037, 1042, 1044, 1047, 1050, 1052, 1056, 1060, 1062, - 1064, 1066, 1068, 1070, 1072, 1074, 1075, 1077, 1078, 1080, - 1081, 1083, 1085, 1087, 1089, 1091, 1094 -}; - -static const short yyrhs[] = { -1, - 119, 120, 0, 121, 204, 0, 209, 0, 122, 0, - 121, 208, 122, 0, 1, 122, 0, 173, 0, 0, - 41, 136, 123, 136, 0, 41, 49, 49, 0, 41, - 49, 61, 0, 41, 49, 60, 0, 6, 137, 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, 134, 91, - 175, 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, - 141, 0, 201, 146, 0, 154, 109, 201, 146, 0, - 154, 81, 201, 146, 0, 29, 146, 0, 129, 0, - 85, 128, 110, 0, 129, 0, 85, 128, 110, 0, - 131, 0, 131, 88, 134, 0, 131, 132, 0, 131, - 132, 111, 88, 134, 0, 88, 133, 0, 133, 0, - 85, 128, 110, 0, 130, 111, 0, 130, 0, 132, - 111, 130, 0, 184, 0, 154, 112, 144, 113, 0, - 154, 109, 47, 0, 186, 0, 184, 0, 154, 112, - 144, 113, 0, 154, 109, 47, 0, 186, 0, 47, - 0, 51, 0, 47, 0, 51, 0, 48, 0, 139, - 0, 140, 0, 136, 0, 0, 137, 111, 138, 136, - 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, 134, 91, 141, 0, 0, - 184, 83, 142, 141, 0, 154, 112, 144, 113, 83, - 141, 0, 154, 109, 47, 83, 141, 0, 154, 109, - 51, 83, 141, 0, 186, 83, 141, 0, 141, 75, - 141, 0, 141, 76, 141, 0, 141, 99, 141, 0, - 141, 100, 141, 0, 141, 101, 141, 0, 141, 102, - 141, 0, 141, 103, 141, 0, 141, 64, 141, 0, - 62, 141, 0, 63, 141, 0, 141, 96, 141, 0, - 141, 97, 141, 0, 141, 98, 141, 0, 141, 65, - 141, 0, 141, 94, 141, 0, 141, 69, 141, 0, - 141, 95, 141, 0, 141, 70, 141, 0, 141, 66, - 141, 0, 141, 67, 141, 0, 141, 68, 141, 0, - 141, 73, 141, 0, 141, 74, 141, 0, 104, 141, - 0, 105, 141, 0, 141, 79, 141, 0, 141, 80, - 141, 0, 141, 71, 141, 0, 141, 72, 141, 0, - 0, 42, 205, 143, 141, 0, 141, 92, 141, 93, - 141, 0, 154, 0, 145, 0, 209, 0, 146, 205, - 0, 126, 0, 150, 111, 0, 150, 148, 0, 150, - 111, 88, 141, 148, 0, 199, 111, 0, 199, 148, - 0, 199, 111, 88, 141, 148, 0, 150, 111, 199, - 148, 0, 150, 111, 199, 111, 0, 150, 111, 199, - 111, 88, 141, 148, 0, 88, 141, 148, 0, 147, - 0, 89, 141, 0, 111, 147, 0, 209, 0, 150, - 0, 209, 0, 141, 0, 150, 111, 141, 0, 150, - 0, 150, 111, 88, 141, 0, 88, 141, 0, 146, - 0, 209, 0, 150, 206, 0, 181, 0, 154, 81, - 51, 0, 82, 135, 0, 54, 0, 57, 0, 55, - 0, 58, 0, 59, 0, 185, 0, 186, 0, 154, - 112, 144, 113, 0, 86, 153, 113, 0, 87, 198, - 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, 205, 115, 155, 125, - 110, 0, 48, 0, 201, 170, 0, 174, 0, 174, - 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, - 176, 10, 0, 20, 166, 25, 125, 163, 120, 10, - 0, 7, 120, 179, 165, 180, 10, 0, 85, 120, - 110, 0, 0, 3, 135, 187, 156, 120, 10, 0, - 0, 3, 79, 125, 207, 157, 120, 10, 0, 0, - 4, 135, 158, 120, 10, 0, 0, 5, 136, 159, - 189, 120, 10, 0, 0, 0, 5, 197, 203, 160, - 136, 161, 189, 120, 10, 0, 21, 0, 22, 0, - 23, 0, 24, 0, 207, 0, 13, 0, 207, 13, - 0, 207, 0, 26, 0, 165, 0, 14, 125, 162, - 120, 164, 0, 209, 0, 15, 120, 0, 134, 0, - 127, 0, 209, 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, 174, 0, 126, 0, 172, 168, 0, - 201, 115, 145, 110, 0, 154, 109, 201, 115, 145, - 110, 0, 154, 109, 201, 0, 154, 81, 201, 115, - 145, 110, 0, 154, 81, 202, 0, 29, 115, 145, - 110, 0, 29, 0, 173, 0, 126, 0, 17, 177, - 162, 120, 178, 0, 150, 0, 150, 111, 88, 141, - 0, 88, 141, 0, 165, 0, 176, 0, 8, 149, - 163, 120, 179, 0, 209, 0, 209, 0, 9, 120, - 0, 183, 0, 90, 182, 0, 56, 0, 136, 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, 184, 0, - 60, 0, 61, 0, 207, 0, 0, 95, 188, 125, - 207, 0, 1, 207, 0, 115, 190, 205, 110, 0, - 190, 207, 0, 191, 111, 193, 111, 194, 196, 0, - 191, 111, 193, 196, 0, 191, 111, 194, 196, 0, - 191, 196, 0, 193, 111, 194, 196, 0, 193, 196, - 0, 194, 196, 0, 195, 0, 0, 47, 0, 191, - 111, 47, 0, 47, 91, 141, 0, 192, 0, 193, - 111, 192, 0, 88, 47, 0, 89, 47, 0, 111, - 195, 0, 209, 0, 185, 0, 115, 125, 205, 110, - 0, 209, 0, 199, 206, 0, 150, 206, 0, 200, - 0, 199, 111, 200, 0, 141, 84, 141, 0, 47, - 0, 51, 0, 48, 0, 47, 0, 48, 0, 109, - 0, 81, 0, 0, 208, 0, 0, 116, 0, 0, - 116, 0, 111, 0, 117, 0, 116, 0, 207, 0, - 208, 117, 0, 0 -}; - -#endif - -#if YYDEBUG != 0 -static const short yyrline[] = { 0, - 237, 246, 265, 271, 272, 276, 280, 285, 286, 287, - 292, 298, 307, 312, 318, 324, 330, 340, 350, 357, - 364, 372, 377, 379, 385, 392, 397, 398, 402, 406, - 411, 416, 418, 423, 429, 435, 443, 444, 449, 450, - 455, 459, 463, 467, 471, 476, 477, 482, 487, 491, - 496, 500, 504, 508, 514, 518, 522, 526, 532, 536, - 538, 539, 540, 541, 546, 552, 556, 557, 561, 562, - 563, 564, 565, 566, 567, 568, 569, 570, 571, 572, - 573, 574, 575, 576, 577, 578, 579, 580, 581, 582, - 583, 584, 585, 586, 587, 589, 589, 589, 589, 590, - 590, 590, 590, 590, 590, 590, 591, 591, 591, 591, - 591, 591, 591, 592, 592, 592, 592, 592, 592, 592, - 593, 593, 593, 593, 593, 593, 593, 594, 594, 594, - 594, 594, 594, 595, 595, 597, 602, 603, 618, 633, - 644, 655, 660, 664, 668, 672, 676, 680, 684, 688, - 692, 696, 700, 704, 708, 712, 716, 720, 724, 728, - 732, 736, 740, 744, 748, 752, 757, 761, 765, 769, - 773, 777, 778, 782, 788, 793, 801, 802, 804, 809, - 813, 817, 822, 826, 831, 836, 841, 845, 850, 855, - 857, 863, 867, 869, 870, 872, 877, 883, 895, 900, - 906, 920, 921, 923, 927, 932, 936, 940, 941, 945, - 946, 947, 948, 949, 954, 962, 966, 973, 979, 985, - 990, 994, 998, 998, 1003, 1007, 1012, 1013, 1022, 1031, - 1040, 1048, 1056, 1064, 1072, 1092, 1096, 1106, 1114, 1121, - 1129, 1138, 1146, 1154, 1163, 1164, 1171, 1179, 1183, 1187, - 1191, 1196, 1197, 1198, 1200, 1201, 1203, 1204, 1213, 1214, - 1219, 1220, 1222, 1223, 1227, 1231, 1236, 1241, 1249, 1254, - 1261, 1265, 1269, 1273, 1274, 1276, 1286, 1291, 1297, 1303, - 1309, 1314, 1321, 1330, 1331, 1333, 1340, 1341, 1346, 1352, - 1353, 1355, 1362, 1364, 1365, 1370, 1371, 1375, 1377, 1378, - 1379, 1381, 1382, 1384, 1385, 1386, 1387, 1388, 1389, 1390, - 1391, 1392, 1393, 1395, 1400, 1401, 1403, 1407, 1411, 1415, - 1417, 1422, 1427, 1431, 1435, 1439, 1443, 1447, 1451, 1455, - 1459, 1464, 1471, 1479, 1486, 1491, 1496, 1503, 1508, 1512, - 1514, 1527, 1545, 1546, 1550, 1558, 1559, 1564, 1569, 1570, - 1571, 1573, 1574, 1576, 1577, 1579, 1580, 1582, 1583, 1585, - 1586, 1587, 1589, 1590, 1592, 1593, 1595 -}; -#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","mlhs_node", -"lhs","cname","fname","undef_list","@4","op","reswords","arg","@5","@6","aref_args", -"opt_call_args","call_args","block_arg","opt_block_arg","opt_list","args","mrhs", -"ret_args","array","primary","@7","@8","@9","@10","@11","@12","@13","then","do", -"if_tail","opt_else","block_var","opt_block_var","do_block","@14","brace_block", -"@15","generic_call","block_call","method_call","stmt_rhs","case_body","when_args", -"cases","rescue","ensure","literal","symbol","numeric","variable","var_ref", -"backref","superclass","@16","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","none", 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, 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, 134, 134, 135, 135, - 136, 136, 136, 136, 136, 137, 138, 137, 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, 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, 140, - 140, 140, 140, 140, 140, 141, 142, 141, 141, 141, - 141, 141, 141, 141, 141, 141, 141, 141, 141, 141, - 141, 141, 141, 141, 141, 141, 141, 141, 141, 141, - 141, 141, 141, 141, 141, 141, 141, 141, 141, 141, - 141, 143, 141, 141, 141, 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, 174, 174, 174, 174, - 174, 174, 174, 175, 175, 176, 177, 177, 177, 178, - 178, 179, 179, 180, 180, 181, 181, 181, 182, 182, - 182, 183, 183, 184, 184, 184, 184, 184, 184, 184, - 184, 184, 184, 185, 186, 186, 187, 188, 187, 187, - 189, 189, 190, 190, 190, 190, 190, 190, 190, 190, - 190, 191, 191, 192, 193, 193, 194, 195, 196, 196, - 197, 197, 198, 198, 198, 199, 199, 200, 201, 201, - 201, 202, 202, 203, 203, 204, 204, 205, 205, 206, - 206, 206, 207, 207, 208, 208, 209 -}; - -static const short yyr2[] = { 0, - 0, 2, 2, 1, 1, 3, 2, 1, 0, 4, - 3, 3, 3, 2, 3, 3, 3, 3, 0, 5, - 4, 3, 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, 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, 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, 1, 2, 1, 2, - 2, 5, 2, 2, 5, 4, 4, 7, 3, 1, - 2, 2, 1, 1, 1, 1, 3, 1, 4, 2, - 1, 1, 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, 1, 2, - 1, 1, 1, 2, 1, 3, 0, 5, 0, 5, - 1, 1, 1, 1, 1, 2, 4, 6, 3, 6, - 3, 4, 1, 1, 1, 5, 1, 4, 2, 1, - 1, 5, 1, 1, 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, 1, - 1, 4, 1, 2, 2, 1, 3, 3, 1, 1, - 1, 1, 1, 1, 1, 0, 1, 0, 1, 0, - 1, 1, 1, 1, 1, 2, 0 -}; - -static const short yydefact[] = { 1, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 248, 249, 250, 251, 219, 222, 283, - 309, 308, 310, 311, 0, 0, 358, 19, 0, 313, - 312, 349, 351, 306, 305, 350, 302, 303, 207, 209, - 298, 208, 210, 211, 315, 316, 0, 0, 0, 0, - 367, 367, 0, 0, 0, 0, 2, 356, 5, 23, - 27, 0, 37, 0, 41, 46, 0, 32, 175, 0, - 8, 227, 204, 296, 314, 212, 213, 0, 4, 7, - 59, 60, 0, 0, 241, 105, 117, 106, 130, 102, - 123, 112, 111, 128, 110, 109, 104, 133, 114, 103, - 118, 122, 124, 116, 108, 125, 135, 127, 126, 119, - 129, 113, 101, 121, 120, 115, 131, 134, 132, 100, - 107, 98, 99, 96, 97, 61, 63, 62, 91, 92, - 89, 73, 74, 75, 78, 80, 76, 69, 93, 94, - 81, 82, 86, 77, 79, 70, 71, 72, 83, 84, - 85, 87, 88, 90, 95, 0, 243, 64, 65, 314, - 341, 0, 126, 119, 129, 113, 96, 97, 61, 62, - 66, 14, 367, 304, 225, 307, 0, 27, 0, 227, - 0, 0, 0, 0, 219, 222, 283, 358, 262, 261, - 0, 0, 314, 213, 0, 0, 0, 0, 0, 0, - 179, 196, 201, 190, 367, 25, 175, 314, 213, 367, - 346, 0, 26, 367, 36, 30, 0, 9, 359, 172, - 0, 0, 151, 175, 152, 206, 0, 0, 0, 37, - 196, 360, 0, 202, 360, 0, 360, 343, 45, 0, - 51, 54, 301, 300, 299, 297, 31, 166, 167, 364, - 363, 3, 365, 357, 0, 0, 0, 0, 0, 0, - 0, 48, 0, 0, 49, 43, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 367, 267, 276, 269, 228, - 137, 0, 367, 33, 226, 0, 0, 318, 237, 317, - 0, 358, 331, 355, 354, 245, 67, 367, 367, 293, - 253, 0, 252, 0, 0, 0, 0, 256, 0, 255, - 0, 0, 0, 0, 367, 0, 367, 191, 218, 0, - 0, 180, 181, 193, 0, 367, 183, 184, 221, 0, - 0, 358, 177, 11, 13, 12, 0, 223, 0, 0, - 0, 0, 0, 236, 38, 362, 361, 203, 215, 345, - 216, 362, 344, 0, 367, 366, 6, 15, 16, 17, - 18, 28, 29, 0, 198, 24, 0, 42, 0, 55, - 58, 0, 285, 136, 284, 22, 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, 352, 353, 205, 0, 281, 349, 351, 350, - 279, 0, 176, 367, 367, 0, 142, 0, 239, 320, - 0, 0, 0, 0, 332, 0, 0, 331, 0, 0, - 367, 335, 367, 367, 330, 0, 0, 0, 194, 195, - 0, 367, 259, 367, 254, 367, 0, 287, 0, 233, - 0, 0, 0, 349, 350, 279, 0, 0, 0, 189, - 217, 348, 0, 197, 192, 367, 349, 0, 0, 0, - 347, 220, 282, 178, 10, 0, 173, 0, 21, 38, - 197, 53, 0, 200, 0, 47, 0, 367, 0, 50, - 0, 367, 35, 0, 0, 367, 34, 214, 265, 0, - 0, 263, 0, 138, 277, 0, 0, 0, 242, 342, - 0, 337, 338, 358, 0, 322, 0, 326, 340, 0, - 328, 0, 329, 246, 68, 0, 0, 260, 0, 0, - 294, 0, 0, 257, 0, 289, 0, 0, 231, 232, - 214, 0, 367, 187, 186, 214, 367, 0, 20, 52, - 0, 349, 0, 44, 174, 0, 140, 141, 0, 0, - 264, 0, 0, 0, 0, 319, 238, 334, 0, 244, - 333, 367, 367, 339, 0, 336, 367, 331, 367, 295, - 235, 0, 229, 230, 0, 367, 0, 182, 0, 185, - 224, 199, 56, 280, 278, 139, 266, 268, 270, 240, - 321, 0, 324, 325, 327, 0, 292, 0, 288, 290, - 291, 286, 234, 367, 367, 0, 367, 188, 323, 247, - 258, 0, 0, 0 -}; - -static const short yydefgoto[] = { 642, - 1, 228, 58, 59, 357, 221, 60, 61, 62, 229, - 63, 64, 65, 266, 66, 179, 84, 157, 172, 457, - 158, 159, 68, 436, 359, 432, 433, 352, 204, 343, - 458, 205, 386, 206, 233, 224, 496, 442, 526, 311, - 313, 456, 598, 322, 329, 553, 554, 192, 521, 298, - 434, 300, 435, 70, 71, 180, 396, 327, 469, 632, - 319, 550, 73, 246, 74, 208, 76, 209, 309, 441, - 449, 450, 451, 452, 453, 454, 594, 538, 162, 236, - 210, 211, 195, 427, 316, 252, 220, 368, 323, 254, - 79 -}; - -static const short yypact[] = {-32768, - 1852, 5056, 27, 236, 3358, 4762, 2292, 5146, 5146, 2764, - 5146, 5146, 6314,-32768,-32768,-32768,-32768, 3823, 3913, 4003, --32768,-32768,-32768,-32768, 5146, 4659, -52,-32768, -36,-32768, --32768, 1965, 2175,-32768,-32768, 2070,-32768,-32768,-32768,-32768, --32768,-32768,-32768,-32768,-32768,-32768, 5956, 5956, 236, 2855, - 5956, 5956, 6578, 4556, 6046, 5956,-32768, 87, 395, 266, - 54, -5,-32768, -56, 6402,-32768, 36, 1278, 96, 159, --32768, 62,-32768,-32768, 99,-32768, 109, 3463,-32768, 395, --32768,-32768, 5146, 51,-32768,-32768,-32768,-32768,-32768,-32768, --32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768, --32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768, 106, 107, - 168, 209,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768, --32768,-32768,-32768, 238, 242, 262,-32768, 267,-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, 5146,-32768,-32768,-32768,-32768, --32768, 268,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768, --32768, 82, 193, 3553, 3643, 3733, 55,-32768, 118, 115, - 55, 197, 57, 57, 110, 121, 126, -52,-32768,-32768, - 151, 226, 15, 19, -34, 2963, 5956, 5956, 5956, 4866, --32768, 775,-32768,-32768, 123,-32768, 152, 4, 29, 165, --32768, 4961,-32768, 5236,-32768,-32768, 318,-32768,-32768, 137, - 160, 3071, 218, 156, 218,-32768, 2855, 178, 182, 199, - 1278, -41, 212,-32768, -41, 244, 67,-32768,-32768, 166, - 204, 208,-32768,-32768,-32768,-32768,-32768, 218, 218,-32768, --32768,-32768,-32768, 3253, 5146, 5146, 5146, 5146, 5146, 5146, - 5596,-32768, 2855, 6578,-32768, 235, 6136, 5956, 5956, 5956, - 5956, 5956, 5956, 5956, 5956, 5956, 5956, 5956, 5956, 5956, - 5956, 5956, 5956, 5956, 5956, 5956, 5956, 5956, 5956, 5956, - 5956, 5956, 5956, 309, 333, 5236,-32768,-32768,-32768,-32768, --32768, 5956, 5236,-32768,-32768, 59, 87,-32768,-32768,-32768, - 3162, 31, 20,-32768,-32768,-32768,-32768, 5956, 349,-32768, --32768, 2400, 359, 5956, 2582, 5686, 365,-32768, 3162,-32768, - 3162, 137, 309, 355, 5236, 5146, 678, 1278,-32768, 275, - 5956, 5326,-32768,-32768, 362, 5236, 5416,-32768,-32768, 284, - 297, -52,-32768,-32768,-32768,-32768, 4762,-32768, 5956, 3071, - 306, 362, 308,-32768, 310, 5956,-32768,-32768,-32768,-32768, --32768, 5956,-32768, 364, 5236,-32768, 395, 266, 266, 266, - 266,-32768,-32768, 5956, 311,-32768, 316,-32768, 217, 204, - 208, 6490, 54, 1278,-32768,-32768, 218, 1716, 1716, 1716, - 1716, 290, 290, 6576, 987, 1716, 1716, 1471, 1471, 143, - 143, 1196, 290, 290, 475, 475, 389, -3, -3, 218, - 218, 218, 4093, 4183, 4273, 4363,-32768, 216,-32768, 336, - 4453, 314,-32768, 0, 0, 5956, 1278, 326,-32768,-32768, - 5146, 3162, 418, 328, 348, 396, 398, 92, 3162, 87, - 331,-32768, 335, 339,-32768, 4762, 4762, 12, 345,-32768, - 2673, 438,-32768, 119,-32768, 349, 5956, 346, 24,-32768, - 448, 449, 347, 25,-32768, 352, 358, 57, 372,-32768, --32768, 1278, 5956, 775,-32768, 368, 34, 360, 5956, 775, --32768,-32768,-32768,-32768,-32768, 5146, 1278, 385,-32768, 272, - 1278, -2, 381, 1278, 5776,-32768, 369, 5236, 6578,-32768, - 5956, 5236,-32768, 5956, 5956, 5236,-32768, 231,-32768, 6226, - 3162,-32768, 3071, 1278,-32768, 3162, 59, 486,-32768,-32768, - 5956,-32768,-32768, -52, 487,-32768, 139,-32768,-32768, 142, --32768, 410,-32768,-32768,-32768, 2292, 5956,-32768, 3162, 492, --32768, 5146, 493,-32768, 494, 1278, 5866, 2491,-32768,-32768, - 26, 3162, 678, 5506,-32768, 40, 678, 69,-32768, 227, - 5956, 28, 392,-32768, 1278, 402, 1278, 1278, 403, 5956, --32768, 412, 504, 409, 508,-32768,-32768, 1278, 411,-32768, - 348, 408, 339,-32768, 348,-32768, 339, 20, 193,-32768, --32768, 55,-32768,-32768, 5956, 101, 514,-32768, 5956,-32768, --32768, 1278, 227,-32768,-32768, 1278,-32768,-32768,-32768,-32768, --32768, 142,-32768,-32768,-32768, 3162,-32768, 2400, 1278,-32768, --32768,-32768,-32768, 678, 339, 517, 119,-32768,-32768,-32768, --32768, 528, 529,-32768 -}; - -static const short yypgoto[] = {-32768, --32768, 588,-32768, 30,-32768,-32768, 14, 1502, -11, -179, - -15, -61,-32768,-32768, 477, 598, 65, 8,-32768,-32768, --32768,-32768, 1123,-32768,-32768, -290, -201, 23, -314, -205, --32768, -22,-32768, 17,-32768, 141,-32768,-32768,-32768,-32768, --32768,-32768,-32768, -178, -172, -106, -303, 16, 97,-32768, --32768, -31,-32768,-32768, 270, 684,-32768, -72,-32768,-32768, - -64,-32768,-32768,-32768,-32768, 473, 535, 631,-32768,-32768, - -57, 94,-32768, -464, 6, -477, -286, -395,-32768,-32768, - -37, -326, -1,-32768,-32768,-32768, -168, 103, -27,-32768, - 1157 -}; - - -#define YYLAST 6679 - - -static const short yytable[] = { 78, - 78, 189, 325, 265, 348, 78, 78, 78, 78, 78, - 78, 331, 351, 171, 237, 462, 78, 78, 78, 332, - 491, 177, 181, 78, 183, 184, 455, 485, 232, 235, - 253, 80, 485, 218, 230, 213, 321, 328, 216, -55, - 203, 203, 215, -58, 477, 491, 305, 363, 78, -57, - -56, 307, -57, 78, 262, 488, 310, 541, 543, 593, - 268, 245, 597, 219, 259, 260, 445, 321, 85, 366, - 222, 519, 299, 81, 367, 596, 78, 82, -349, -275, - 303, 78, 328, 387, 503, 261, 301, -274, 259, 260, - 259, 260, 259, 260, -55, 520, 306, 291, 292, 293, - 304, 438, 259, 260, -349, 83, -349, 446, 447, -349, - -55, 302, -349, 226, -58, 461, 514, 326, -57, -58, - -57, -56, 580, -57, -57, -51, 267, 250, 251, -54, - -56, 480, 552, 461, 448, -53, -52, -57, 445, 250, - 251, 69, 69, 444, 635, 308, 219, 69, 69, 69, - 69, 69, 69, 191, 78, 330, 330, 596, 207, 207, - 207, 455, 555, 305, 485, 69, 250, 251, 299, 312, - 250, 251, 250, 251, 250, 251, 294, 372, 611, 446, - 447, 301, 367, 494, 297, 591, -309, -308, 595, -55, - 69, 302, 317, 240, 78, 207, 623, 624, 78, -58, - 318, 625, 250, 251, 295, 240, 268, 296, 324, -51, - 78, 230, 78, 326, -309, -308, 340, 573, 207, -54, - 78, 299, 203, 69, 200, 78, 446, 447, 350, 446, - 447, 333, 294, 342, 203, 212, 333, 491, 385, 639, - 214, 289, 290, 291, 292, 293, 333, 230, -310, 485, - 336, 358, 78, 78, 78, 78, 78, 78, 78, 334, - 345, 78, 335, 346, 362, 78, 360, 346, 378, 379, - 380, 381, 382, 383, 374, 347, -310, 375, 439, 440, - 565, 268, 81, 377, -314, 546, 82, 364, -213, -311, - 558, 365, 426, 431, 78, 459, 69, 333, 514, 259, - 260, 78, 630, 468, 486, 562, -57, -214, -39, 78, - 576, 455, -314, 580, 579, -314, -213, -311, -313, -213, - 78, -56, -312, 78, 369, 507, -53, 78, 508, 78, - 510, 473, 476, 78, 78, -214, 69, 370, -214, 373, - 207, -52, -304, 431, 78, 392, -313, -307, 314, 478, - -312, 371, 207, 268, 207, 423, 424, 608, 78, 425, - 476, 610, 69, 461, 495, 589, 354, 69, 281, 282, - -304, 465, 476, 78, 470, -307, 315, 355, 356, 428, - 429, -40, -47, 430, 481, 286, 287, 288, 289, 290, - 291, 292, 293, 492, 69, 69, 69, 69, 69, 69, - 69, 474, 429, 69, 389, 475, 493, 207, 487, 429, - 502, 429, 430, 499, 475, 572, 429, 500, 515, 475, - -47, 505, 536, 628, 78, 506, 518, 529, 638, 78, - 330, 255, 256, 257, 258, 525, 207, 530, 531, 78, - 78, 537, 532, 207, 533, 540, 549, 78, 513, 542, - 330, 69, 268, 517, 527, 547, 557, 559, 560, 78, - 198, 512, 69, 544, 545, 69, 516, 281, 282, 69, - 561, 69, 566, 75, 75, 207, 69, 160, 564, 75, - 75, 75, 75, 75, 75, 193, 207, 289, 290, 291, - 292, 293, 569, 570, 78, 587, 590, 75, 447, 586, - 69, 601, 603, 604, 613, 476, 78, 617, 189, 568, - 78, 614, 615, 618, 78, 207, 619, 620, 622, 78, - 621, 78, 75, 633, 78, 241, 640, 643, 644, 239, - 641, 523, 240, 631, 627, 582, 395, 241, 268, 161, - 626, 534, 592, 0, 78, 0, 0, 78, 0, 0, - 78, 0, 0, 281, 282, 75, 78, 0, 0, 0, - 78, 0, 0, 0, 0, 602, 207, 0, 0, 0, - 0, 207, 288, 289, 290, 291, 292, 293, 0, 0, - 0, 69, 69, 0, 0, 0, 0, 0, 57, 69, - 0, 0, 0, 0, 173, 0, 0, 182, 67, 67, - 0, 69, 0, 0, 67, 0, 0, 67, 0, 0, - 190, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 78, 0, 78, 0, 75, 0, - 0, 77, 77, 0, 0, 0, 69, 77, 77, 77, - 77, 77, 77, 194, 0, 0, 0, 67, 207, 389, - 0, 0, 207, 0, 0, 77, 207, 0, 0, 0, - 191, 69, 0, 69, 0, 0, 69, 0, 75, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 77, 0, 0, 242, 72, 72, 69, 0, 0, 69, - 72, 0, 69, 72, 75, 242, 0, 0, 69, 75, - 0, 0, 69, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 77, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 75, 75, 75, 75, - 75, 75, 75, 72, 0, 75, 390, 0, 0, 0, - 0, 268, 269, 270, 271, 272, 273, 274, 275, 276, - 277, 278, 279, 280, 0, 0, 281, 282, 0, 0, - 0, 0, 0, 0, 0, 0, 69, 0, 69, 283, - 0, 284, 285, 286, 287, 288, 289, 290, 291, 292, - 293, 0, 0, 75, 0, 0, 77, 0, 479, 0, - 0, 0, 0, 67, 75, 0, 0, 75, 0, 0, - 0, 75, 0, 75, 0, 0, 0, 0, 75, 361, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, - 0, 0, 0, 0, 67, 0, 77, 0, 0, 0, - 0, 0, 75, 0, 0, 0, 0, 0, 268, 269, - 270, 271, 272, 273, 274, 275, 276, 277, 278, 279, - 280, 67, 77, 281, 282, 0, 0, 77, 341, 0, - 67, 388, 0, 0, 241, 0, 283, 0, 284, 285, - 286, 287, 288, 289, 290, 291, 292, 293, 0, 72, - 0, 0, 0, 0, 77, 77, 77, 77, 77, 77, - 77, 0, 0, 77, 391, 0, 0, 0, 443, 0, - 0, 0, 0, 0, 0, 72, 0, 0, 67, 464, - 72, 0, 466, 75, 75, 0, 471, 0, 472, 67, - 0, 75, 67, 0, 0, 0, 67, 0, 67, 0, - 0, 0, 0, 75, 0, 0, 0, 72, 0, 0, - 0, 77, 0, 0, 0, 0, 72, 498, 0, 0, - 72, 0, 77, 0, 0, 77, 0, 67, 0, 77, - 0, 77, 0, 0, 0, 0, 77, 0, 75, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 390, 0, 0, 0, 0, 0, 0, 0, 0, - 77, 0, 193, 75, 72, 75, 0, 0, 75, 0, - 0, 0, 0, 0, 0, 72, 0, 0, 72, 0, - 0, 0, 72, 0, 72, 0, 0, 0, 75, 0, - 0, 75, 242, 0, 75, 0, 0, 0, 0, 528, - 75, 0, 0, 0, 75, 0, 535, 0, 0, 67, - 0, 0, 0, 72, 0, 0, 67, 0, 548, 0, - 268, 269, 270, 271, 272, 273, 274, 275, 67, 277, - 278, 0, 0, 0, 0, 281, 282, 0, 0, 0, - 0, 77, 77, 0, 0, 0, 0, 0, 0, 77, - 284, 285, 286, 287, 288, 289, 290, 291, 292, 293, - 0, 77, 0, 0, 0, 0, 0, 0, 75, 0, - 75, 0, 0, 0, 0, 0, 574, 0, 583, 0, - 584, 0, 0, 585, 0, 0, 0, 190, 67, 0, - 67, 0, 0, 67, 0, 72, 77, 0, 0, 0, - 0, 0, 72, 599, 0, 0, 600, 0, 0, 391, - 202, 202, 202, 67, 72, 606, 67, 0, 0, 607, - 194, 77, 0, 77, 0, 67, 77, 0, 0, 67, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 223, - 225, 0, 0, 231, 202, 0, 77, 248, 249, 77, - 0, 0, 77, 0, 0, 0, 0, 0, 77, 0, - 0, 0, 77, 0, 0, 0, 0, 0, 0, 0, - 202, 0, 0, 0, 72, 0, 72, 234, 238, 72, - 0, 0, 0, 636, 0, 637, 0, 0, 0, 0, - 0, 0, 0, 67, 0, 67, 0, 0, 0, 72, - 0, 0, 72, 0, 0, 0, 0, 0, 0, 0, - 0, 72, 0, 0, 0, 72, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 77, 0, 77, 268, - 269, 270, 271, 272, 273, 274, 275, 276, 277, 278, - 279, 280, 0, 0, 281, 282, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 283, 511, 284, - 285, 286, 287, 288, 289, 290, 291, 292, 293, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 72, - 0, 72, 0, 0, 0, 0, 0, 0, 0, 337, - 338, 248, 202, 0, 0, 0, 0, 0, 0, 320, - 0, 0, 0, 0, 202, 0, 202, 0, 0, 0, - 0, 268, 269, 270, 271, 272, 273, 274, 275, 276, - 277, 278, 279, 280, 0, 0, 281, 282, 0, 0, - 0, 344, 0, 0, 0, 0, 344, 0, 0, 283, - 353, 284, 285, 286, 287, 288, 289, 290, 291, 292, - 293, 0, 0, 231, 0, 0, 0, 0, 0, 394, - 397, 398, 399, 400, 401, 402, 403, 404, 405, 406, - 407, 408, 409, 410, 411, 412, 413, 414, 415, 416, - 417, 418, 419, 420, 421, 422, 0, 0, 202, 0, - 0, 0, 0, 0, 437, 202, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 231, 0, 0, 0, 0, 0, 394, 0, 231, 0, - 0, 0, 353, 0, 0, 0, 0, 202, 0, 353, - 0, 0, 0, 482, 484, 0, 0, 0, 202, 490, - 0, 0, 0, 0, 460, 463, 0, 0, 0, 0, - 0, 497, 0, 0, 0, 0, 0, 0, 501, 0, - 0, 353, 0, 344, 490, 0, 0, 202, 0, 0, - 0, 0, 353, 0, 0, 0, 504, 0, 0, 178, - 178, 0, 178, 178, 0, 0, 0, 0, 0, 201, - 201, 201, 0, 0, 0, 0, 178, 0, 0, 0, - 0, 353, 0, 0, 268, 269, 270, 271, 272, 273, - 274, 275, 276, 277, 278,-32768,-32768, 0, 202, 281, - 282, 0, 0, 202, 0, 0, 247, 0, 524, 0, - 0, 0, 0, 0, 284, 285, 286, 287, 288, 289, - 290, 291, 292, 293, 0, 0, 0, 0, 0, 201, - 0, 0, 0, 0, 178, 0, 0, 0, 0, 556, - 522, 522, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 563, 0, 539, 0, 539, - 539, 567, 0, 0, 0, 0, 0, 0, 551, 0, - 463, 0, 463, 0, 0, 0, 0, 501, 0, 0, - 202, 0, 0, 575, 202, 0, 577, 578, 202, 0, - 0, 0, 344, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 588, 0, 0, 0, 178, 0, 0, - 0, 0, 0, 0, 353, 0, 0, 0, 353, 501, - 0, 0, 353, 0, 0, 0, 0, 0, 0, 501, - 0, 0, 0, 0, 0, 0, 490, 0, 0, 0, - 0, 0, 0, 612, 0, 0, 0, 0, 0, 0, - 0, 201, 616, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 201, 0, 201, 0, 0, 0, 344, - 0, 0, 0, 344, 0, 0, 0, 629, 0, 0, - 0, 634, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 539, 539, - 0, 0, 0, 539, 0, 320, 178, 178, 178, 178, - 178, 178, 463, 0, 0, 0, 0, 0, 393, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 268, --32768,-32768,-32768,-32768, 273, 274, 0, 0,-32768,-32768, - 344, 539, 0, 463, 281, 282, 0, 201, 0, 0, - 0, 0, 0, 0, 201, 0, 0, 0, 0, 284, - 285, 286, 287, 288, 289, 290, 291, 292, 293, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 201, 178, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 201, 0, 0, - 0, -367, 2, 0, 3, 4, 5, 6, 7, 0, - 0, 0, 8, 9, 0, 0, 0, 10, 0, 11, - 12, 13, 14, 15, 16, 17, 201, 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, 201, 0, 0, - 0, 0, 201, 49, 0, 0, 50, 51, 52, 53, - 0, 54, 178, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 55, 56, 0, 0, 0, - 0, 0, 0, 0, -304, 0, 0, -367, -367, 0, - 0, 0, -304, -304, -304, 0, 0, 0, -304, -304, - 0, -304, 0, 0, 0, 0, 0, 0, 0, 0, - -271, 0, 0, 0, 0, 0, 0, 178, -304, -304, - 0, -304, -304, -304, -304, 0, 0, 0, 0, 201, - 0, 0, 0, 201, 0, 0, 0, 201, 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, 178, 0, -304, -304, 0, -304, -304, - -304, -304, -304, -304, -304, -304, -304, -304, 0, -307, - 0, 0, -304, -304, -304, -304, -304, -307, -307, -307, - -304, -304, 0, -307, -307, 0, -307, 0, 0, 0, - 0, 0, 0, 0, 0, -272, 0, 0, 0, 0, - 0, 0, 0, -307, -307, 0, -307, -307, -307, -307, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, -307, -307, -307, -307, -307, -307, -307, - -307, -307, -307, -307, -307, -307, 0, 0, -307, -307, - -307, 0, -307, 0, 0, 0, 0, 0, 0, 0, - -307, -307, 0, -307, -307, -307, -307, -307, -307, -307, - -307, -307, -307, 0, -225, 0, 0, -307, -307, -307, - -307, -307, -225, -225, -225, -307, -307, 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, -367, - -367, -367, 8, 9, 0, 0, -367, 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, -367, -367, -367, - 8, 9, 0, -367, -367, 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, - -367, 8, 9, 55, 56, -367, 10, -367, 11, 12, - 13, 14, 15, 16, 17, -367, -367, 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, -367, 8, 9, 55, 56, -367, 10, 0, 11, - 12, 13, 14, 15, 16, 17, -367, -367, 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, -367, -367, 8, 9, 55, 56, 0, 10, 0, - 11, 12, 13, 14, 15, 16, 17, -367, -367, 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, - -367, 11, 12, 13, 14, 15, 16, 17, -367, -367, - 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, -367, - -367, 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, 227, - 51, 52, 53, 0, 54, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 55, 56, - 0, 0, 0, 2, -367, 3, 4, 5, 6, 7, - -367, -367, 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, -367, 3, 4, 5, 6, 7, -367, -367, - 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, -367, 8, 9, 55, 56, 0, 10, -367, 11, - 12, 13, 14, 15, 16, 17, -367, -367, 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, -367, -367, 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, - 86, 87, 88, 89, 90, 91, 92, 93, 0, 376, - 94, 95, 96, 97, 98, 0, 0, 99, 100, 101, - 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, - 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, - 122, 123, 124, 125, 126, 127, 34, 35, 128, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 129, - 130, 131, 132, 133, 134, 0, 135, 136, 0, 0, - 137, 0, 138, 0, 139, 140, 141, 142, 0, 0, - 0, 0, 0, 0, 0, 143, 0, 0, 0, 0, - 0, 144, 145, 146, 147, 148, 149, 150, 151, 152, - 153, 0, 154, 0, 0, 3, 4, 5, 0, 7, - 0, 155, 156, 8, 9, 0, 0, 0, 10, 0, - 11, 12, 13, 14, 15, 16, 17, 0, 0, 185, - 186, 20, 21, 22, 23, 24, 0, 0, 0, 0, - 0, 0, 0, 0, 27, 0, 0, 30, 31, 174, - 175, 34, 35, 176, 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, 196, 51, 52, - 197, 198, 54, 0, 0, -349, -349, -349, 0, -349, - 0, 0, 0, -349, -349, 0, 199, 56, -349, 299, - -349, -349, -349, -349, -349, -349, -349, 303, 0, -349, - -349, -349, -349, -349, -349, -349, 0, 0, 0, 0, - 0, 0, 0, 0, -349, 0, 0, -349, -349, -349, - -349, -349, -349, -349, -349, -349, -349, -349, -349, -349, - -349, -349, -349, -349, -349, -349, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, -349, 0, 0, -349, -349, -349, - -349, -349, -349, 0, 0, -351, -351, -351, 0, -351, - 0, 0, 0, -351, -351, 0, -349, -349, -351, -349, - -351, -351, -351, -351, -351, -351, -351, -349, 0, -351, - -351, -351, -351, -351, -351, -351, 0, 0, 0, 0, - 0, 0, 0, 0, -351, 0, 0, -351, -351, -351, - -351, -351, -351, -351, -351, -351, -351, -351, -351, -351, - -351, -351, -351, -351, -351, -351, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, -351, 0, 0, -351, -351, -351, - -351, -351, -351, 0, 0, -350, -350, -350, 0, -350, - 0, 0, 0, -350, -350, 0, -351, -351, -350, -351, - -350, -350, -350, -350, -350, -350, -350, -351, 0, -350, - -350, -350, -350, -350, -350, -350, 0, 0, 0, 0, - 0, 0, 0, 0, -350, 0, 0, -350, -350, -350, - -350, -350, -350, -350, -350, -350, -350, -350, -350, -350, - -350, -350, -350, -350, -350, -350, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, -350, 0, 0, -350, -350, -350, - -350, -350, -350, 0, 0, 3, 4, 5, 0, 7, - 0, 0, 0, 8, 9, 0, -350, -350, 10, -350, - 11, 12, 13, 14, 15, 16, 17, -350, 0, 185, - 186, 20, 21, 22, 23, 24, 0, 0, 0, 0, - 0, 0, 0, 0, 27, 0, 0, 30, 31, 174, - 175, 34, 35, 176, 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, 196, 51, 52, - 197, 198, 54, 0, 0, 3, 4, 5, 0, 7, - 0, 0, 0, 8, 9, 0, 199, 56, 10, 0, - 11, 12, 13, 14, 15, 16, 17, 200, 0, 185, - 186, 20, 21, 22, 23, 24, 0, 0, 0, 0, - 0, 0, 0, 0, 27, 0, 0, 30, 31, 174, - 175, 34, 35, 176, 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, 196, 51, 52, - 197, 198, 54, 0, 0, 3, 4, 5, 0, 7, - 0, 0, 0, 8, 9, 0, 199, 56, 10, 0, - 11, 12, 13, 14, 15, 16, 17, 212, 0, 185, - 186, 20, 21, 22, 23, 24, 0, 0, 0, 0, - 0, 0, 0, 0, 27, 0, 0, 30, 31, 174, - 175, 34, 35, 176, 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, 196, 51, 52, - 197, 198, 54, 0, 0, -349, -349, -349, 0, -349, - 0, 0, 0, -349, -349, 0, 199, 56, -349, 0, - -349, -349, -349, -349, -349, -349, -349, 214, 0, -349, - -349, -349, -349, -349, -349, -349, 0, 0, 0, 0, - 0, 0, 0, 0, -349, 0, 0, -349, -349, -349, - -349, -349, -349, -349, -349, -349, -349, -349, -349, -349, - -349, -349, -349, -349, -349, -349, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, -349, 0, 0, -349, -349, -349, - -349, -349, -349, 0, 0, -351, -351, -351, 0, -351, - 0, 0, 0, -351, -351, 0, -349, -349, -351, 0, - -351, -351, -351, -351, -351, -351, -351, -349, 0, -351, - -351, -351, -351, -351, -351, -351, 0, 0, 0, 0, - 0, 0, 0, 0, -351, 0, 0, -351, -351, -351, - -351, -351, -351, -351, -351, -351, -351, -351, -351, -351, - -351, -351, -351, -351, -351, -351, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, -351, 0, 0, -351, -351, -351, - -351, -351, -351, 0, 0, -350, -350, -350, 0, -350, - 0, 0, 0, -350, -350, 0, -351, -351, -350, 0, - -350, -350, -350, -350, -350, -350, -350, -351, 0, -350, - -350, -350, -350, -350, -350, -350, 0, 0, 0, 0, - 0, 0, 0, 0, -350, 0, 0, -350, -350, -350, - -350, -350, -350, -350, -350, -350, -350, -350, -350, -350, - -350, -350, -350, -350, -350, -350, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, -350, 0, 0, -350, -350, -350, - -350, -350, -350, 0, 0, 3, 4, 5, 0, 7, - 0, 0, 0, 8, 9, 0, -350, -350, 10, 0, - 11, 12, 13, 14, 15, 16, 17, -350, 0, 185, - 186, 20, 21, 22, 23, 24, 0, 0, 0, 0, - 0, 0, 0, 0, 27, 0, 0, 30, 31, 174, - 175, 34, 35, 176, 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, 196, 51, 52, - 197, 198, 54, 0, 0, 3, 4, 5, 0, 7, - 0, 0, 0, 8, 9, 0, 199, 56, 10, 0, - 11, 12, 13, 14, 15, 16, 17, 512, 0, 185, - 186, 20, 21, 22, 23, 24, 0, 0, 0, 0, - 0, 0, 0, 0, 27, 0, 0, 30, 31, 174, - 175, 34, 35, 176, 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, 196, 51, 52, - 197, 198, 54, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 199, 56, 86, 87, - 88, 89, 90, 91, 92, 93, 0, 516, 94, 95, - 96, 97, 98, 0, 0, 99, 100, 101, 102, 103, - 104, 105, 106, 107, 108, 163, 164, 165, 166, 113, - 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, - 167, 168, 169, 127, 243, 244, 170, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 129, 130, 131, - 132, 133, 134, 0, 135, 136, 0, 0, 137, 0, - 138, 0, 139, 140, 141, 142, 0, 0, 0, 0, - 0, 0, 0, 143, 0, 0, 0, 0, 0, 144, - 145, 146, 147, 148, 149, 150, 151, 152, 153, 0, - 154, 86, 87, 88, 89, 90, 91, 92, 93, 155, - 0, 94, 95, 96, 97, 98, 0, 0, 99, 100, - 101, 102, 103, 104, 105, 106, 107, 108, 163, 164, - 165, 166, 113, 114, 115, 116, 117, 118, 119, 120, - 121, 122, 123, 167, 168, 169, 127, 217, 0, 170, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 129, 130, 131, 132, 133, 134, 0, 135, 136, 0, - 0, 137, 0, 138, 0, 139, 140, 141, 142, 0, - 0, 0, 0, 0, 0, 0, 143, 0, 0, 0, - 0, 0, 144, 145, 146, 147, 148, 149, 150, 151, - 152, 153, 0, 154, 86, 87, 88, 89, 90, 91, - 92, 93, 155, 0, 94, 95, 96, 97, 98, 0, - 0, 99, 100, 101, 102, 103, 104, 105, 106, 107, - 108, 163, 164, 165, 166, 113, 114, 115, 116, 117, - 118, 119, 120, 121, 122, 123, 167, 168, 169, 127, - 0, 0, 170, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 129, 130, 131, 132, 133, 134, 0, - 135, 136, 0, 0, 137, 0, 138, 0, 139, 140, - 141, 142, 0, 0, 0, 0, 0, 0, 0, 143, - 0, 0, 0, 0, 0, 144, 145, 146, 147, 148, - 149, 150, 151, 152, 153, 0, 154, 0, 3, 4, - 5, 0, 7, 0, 0, 155, 8, 9, 0, 0, - 0, 10, 0, 11, 12, 13, 14, 15, 16, 17, - 0, 0, 185, 186, 20, 21, 22, 23, 24, 0, - 0, 0, 0, 0, 0, 0, 0, 27, 0, 0, - 30, 31, 174, 175, 34, 35, 176, 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, - 196, 51, 52, 197, 198, 54, 0, 0, 0, 0, - 0, 0, 0, 3, 4, 5, 0, 7, 0, 199, - 56, 8, 9, 0, 0, 339, 10, 0, 11, 12, - 13, 14, 15, 16, 17, 0, 0, 185, 186, 20, - 21, 22, 23, 24, 0, 0, 0, 0, 0, 0, - 0, 0, 27, 0, 0, 30, 31, 174, 175, 34, - 35, 176, 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, 196, 51, 52, 197, 198, - 54, 0, 0, 0, 0, 0, 0, 0, 3, 4, - 5, 6, 7, 0, 199, 56, 8, 9, 0, 0, - 349, 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, 174, 175, 34, 35, 176, 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, 185, 186, 20, 21, 22, 23, 24, 0, - 0, 0, 0, 0, 0, 0, 0, 27, 0, 0, - 30, 31, 174, 175, 34, 35, 176, 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, - 196, 51, 52, 197, 198, 54, 0, 0, 3, 4, - 5, 0, 7, 0, 0, 0, 8, 9, 0, 199, - 56, 10, 0, 11, 12, 13, 14, 15, 16, 17, - 0, 0, 185, 186, 187, 21, 22, 23, 24, 0, - 0, 0, 0, 0, 0, 0, 0, 27, 0, 0, - 30, 31, 174, 175, 34, 35, 176, 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, - 196, 51, 52, 483, 198, 54, 0, 0, 3, 4, - 5, 0, 7, 0, 0, 0, 8, 9, 0, 199, - 56, 10, 0, 11, 12, 13, 14, 15, 16, 17, - 0, 0, 185, 186, 187, 21, 22, 23, 24, 0, - 0, 0, 0, 0, 0, 0, 0, 27, 0, 0, - 30, 31, 174, 175, 34, 35, 176, 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, - 196, 51, 52, 489, 198, 54, 0, 0, 3, 4, - 5, 0, 7, 0, 0, 0, 8, 9, 0, 199, - 56, 10, 0, 11, 12, 13, 14, 15, 16, 17, - 0, 0, 185, 186, 187, 21, 22, 23, 24, 0, - 0, 0, 0, 0, 0, 0, 0, 27, 0, 0, - 30, 31, 174, 175, 34, 35, 176, 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, - 196, 51, 52, 609, 198, 54, 0, 0, 3, 4, - 5, 0, 7, 0, 0, 0, 8, 9, 0, 199, - 56, 10, 0, 11, 12, 13, 14, 15, 16, 17, - 0, 0, 185, 186, 187, 21, 22, 23, 24, 0, - 0, 0, 0, 0, 0, 0, 0, 27, 0, 0, - 30, 31, 174, 175, 34, 35, 176, 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, - 196, 51, 52, 384, 0, 54, 0, 0, 3, 4, - 5, 0, 7, 0, 0, 0, 8, 9, 0, 199, - 56, 10, 0, 11, 12, 13, 14, 15, 16, 17, - 0, 0, 185, 186, 187, 21, 22, 23, 24, 0, - 0, 0, 0, 0, 0, 0, 0, 27, 0, 0, - 30, 31, 174, 175, 34, 35, 176, 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, - 196, 51, 52, 467, 0, 54, 0, 0, 3, 4, - 5, 0, 7, 0, 0, 0, 8, 9, 0, 199, - 56, 10, 0, 11, 12, 13, 14, 15, 16, 17, - 0, 0, 185, 186, 187, 21, 22, 23, 24, 0, - 0, 0, 0, 0, 0, 0, 0, 27, 0, 0, - 30, 31, 174, 175, 34, 35, 176, 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, - 196, 51, 52, 571, 0, 54, 0, 0, 3, 4, - 5, 0, 7, 0, 0, 0, 8, 9, 0, 199, - 56, 10, 0, 11, 12, 13, 14, 15, 16, 17, - 0, 0, 185, 186, 187, 21, 22, 23, 24, 0, - 0, 0, 0, 0, 0, 0, 0, 27, 0, 0, - 30, 31, 174, 175, 34, 35, 176, 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, - 196, 51, 52, 605, 0, 54, 0, 0, 3, 4, - 5, 0, 7, 0, 0, 0, 8, 9, 0, 199, - 56, 10, 0, 11, 12, 13, 14, 15, 16, 17, - 0, 0, 185, 186, 187, 21, 22, 23, 24, 0, - 0, 0, 0, 0, 0, 0, 0, 27, 0, 0, - 30, 31, 174, 175, 34, 35, 176, 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, - 196, 51, 52, 0, 0, 54, 0, 0, 3, 4, - 5, 0, 7, 0, 0, 0, 8, 9, 0, 199, - 56, 10, 0, 11, 12, 13, 14, 15, 16, 17, - 0, 0, 185, 186, 20, 21, 22, 23, 24, 0, - 0, 0, 0, 0, 0, 0, 0, 27, 0, 0, - 30, 31, 174, 175, 34, 35, 176, 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, - 196, 51, 52, 0, 0, 54, 0, 0, 3, 4, - 5, 0, 7, 0, 0, 0, 8, 9, 0, 199, - 56, 10, 0, 11, 12, 13, 14, 15, 16, 17, - 0, 0, 185, 186, 20, 21, 22, 23, 24, 0, - 0, 0, 0, 0, 0, 0, 0, 27, 0, 0, - 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, - 196, 51, 52, 0, 0, 54, 0, 0, 3, 4, - 5, 0, 7, 0, 0, 0, 8, 9, 0, 199, - 56, 10, 0, 11, 12, 13, 14, 15, 16, 17, - 0, 0, 185, 186, 187, 21, 22, 23, 24, 0, - 0, 0, 0, 0, 0, 0, 0, 188, 0, 0, - 30, 31, 174, 175, 34, 35, 176, 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, 581, 0, 0, 8, 9, 0, 0, 0, 10, - 0, 11, 12, 13, 14, 15, 16, 17, 0, 0, - 185, 186, 187, 21, 22, 23, 24, 0, 0, 0, - 0, 0, 0, 0, 0, 188, 0, 0, 30, 31, - 174, 175, 34, 35, 176, 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, 185, 186, - 187, 21, 22, 23, 24, 0, 0, 0, 0, 0, - 0, 0, 0, 188, 0, 0, 30, 31, 174, 175, - 34, 35, 176, 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, 263, 51, 52, 264, - 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, 185, 186, 187, 21, - 22, 23, 24, 0, 0, 0, 0, 0, 0, 0, - 0, 188, 0, 0, 30, 31, 174, 175, 34, 35, - 176, 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, 263, 51, 52, 509, 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, 185, 186, 187, 21, 22, 23, - 24, 0, 0, 0, 0, 0, 0, 0, 0, 188, - 0, 0, 30, 31, 174, 175, 34, 35, 176, 37, - 38, 39, 40, 41, 42, 43, 44, 45, 46, 268, - 269, 270, 271, 272, 273, 274, 0, 0, 277, 278, - 0, 0, 0, 0, 281, 282, 0, 0, 0, 49, - 0, 0, 196, 51, 52, 0, 0, 54, 0, 284, - 285, 286, 287, 288, 289, 290, 291, 292, 293 -}; - -static const short yycheck[] = { 1, - 2, 13, 181, 65, 210, 7, 8, 9, 10, 11, - 12, 184, 214, 6, 52, 319, 18, 19, 20, 188, - 347, 8, 9, 25, 11, 12, 313, 342, 51, 52, - 58, 2, 347, 26, 50, 19, 13, 26, 25, 25, - 18, 19, 20, 25, 335, 372, 78, 227, 50, 25, - 25, 1, 25, 55, 111, 346, 84, 453, 454, 537, - 64, 54, 540, 116, 34, 35, 47, 13, 4, 111, - 107, 72, 107, 47, 116, 540, 78, 51, 81, 26, - 115, 83, 26, 263, 375, 91, 83, 26, 34, 35, - 34, 35, 34, 35, 91, 96, 83, 101, 102, 103, - 78, 303, 34, 35, 107, 79, 109, 88, 89, 112, - 96, 83, 115, 49, 96, 15, 83, 17, 91, 91, - 96, 96, 83, 96, 91, 111, 91, 116, 117, 111, - 91, 337, 14, 15, 115, 111, 111, 110, 47, 116, - 117, 1, 2, 312, 622, 95, 116, 7, 8, 9, - 10, 11, 12, 13, 156, 183, 184, 622, 18, 19, - 20, 448, 466, 195, 479, 25, 116, 117, 107, 156, - 116, 117, 116, 117, 116, 117, 81, 111, 110, 88, - 89, 83, 116, 352, 26, 47, 81, 81, 47, 91, - 50, 83, 111, 53, 196, 55, 592, 593, 200, 91, - 8, 597, 116, 117, 109, 65, 64, 112, 91, 111, - 212, 227, 214, 17, 109, 109, 200, 508, 78, 111, - 222, 107, 200, 83, 115, 227, 88, 89, 212, 88, - 89, 81, 81, 111, 212, 115, 81, 564, 261, 635, - 115, 99, 100, 101, 102, 103, 81, 263, 81, 564, - 25, 115, 254, 255, 256, 257, 258, 259, 260, 109, - 109, 263, 112, 112, 109, 267, 107, 112, 255, 256, - 257, 258, 259, 260, 109, 111, 109, 112, 306, 307, - 486, 64, 47, 254, 81, 458, 51, 110, 81, 81, - 469, 110, 294, 295, 296, 318, 156, 81, 83, 34, - 35, 303, 606, 326, 342, 478, 91, 81, 110, 311, - 512, 598, 109, 83, 516, 112, 109, 109, 81, 112, - 322, 91, 81, 325, 113, 109, 111, 329, 112, 331, - 392, 333, 334, 335, 336, 109, 196, 235, 112, 237, - 200, 111, 81, 345, 346, 111, 109, 81, 81, 336, - 109, 108, 212, 64, 214, 47, 48, 563, 360, 51, - 362, 567, 222, 15, 357, 534, 49, 227, 79, 80, - 109, 13, 374, 375, 10, 109, 109, 60, 61, 47, - 48, 110, 111, 51, 110, 96, 97, 98, 99, 100, - 101, 102, 103, 110, 254, 255, 256, 257, 258, 259, - 260, 47, 48, 263, 264, 51, 110, 267, 47, 48, - 47, 48, 51, 108, 51, 47, 48, 110, 83, 51, - 111, 111, 450, 602, 426, 110, 113, 10, 634, 431, - 458, 37, 38, 39, 40, 110, 296, 110, 91, 441, - 442, 111, 47, 303, 47, 111, 9, 449, 426, 111, - 478, 311, 64, 431, 441, 111, 111, 10, 10, 461, - 89, 115, 322, 456, 457, 325, 115, 79, 80, 329, - 113, 331, 113, 1, 2, 335, 336, 5, 111, 7, - 8, 9, 10, 11, 12, 13, 346, 99, 100, 101, - 102, 103, 108, 113, 496, 10, 10, 25, 89, 527, - 360, 10, 10, 10, 113, 507, 508, 96, 520, 496, - 512, 110, 110, 10, 516, 375, 108, 10, 111, 521, - 110, 523, 50, 10, 526, 53, 10, 0, 0, 53, - 637, 435, 392, 606, 599, 520, 267, 65, 64, 5, - 598, 448, 537, -1, 546, -1, -1, 549, -1, -1, - 552, -1, -1, 79, 80, 83, 558, -1, -1, -1, - 562, -1, -1, -1, -1, 552, 426, -1, -1, -1, - -1, 431, 98, 99, 100, 101, 102, 103, -1, -1, - -1, 441, 442, -1, -1, -1, -1, -1, 1, 449, - -1, -1, -1, -1, 7, -1, -1, 10, 1, 2, - -1, 461, -1, -1, 7, -1, -1, 10, -1, -1, - 13, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, 626, -1, 628, -1, 156, -1, - -1, 1, 2, -1, -1, -1, 496, 7, 8, 9, - 10, 11, 12, 13, -1, -1, -1, 50, 508, 509, - -1, -1, 512, -1, -1, 25, 516, -1, -1, -1, - 520, 521, -1, 523, -1, -1, 526, -1, 196, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - 50, -1, -1, 53, 1, 2, 546, -1, -1, 549, - 7, -1, 552, 10, 222, 65, -1, -1, 558, 227, - -1, -1, 562, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, 83, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, 254, 255, 256, 257, - 258, 259, 260, 50, -1, 263, 264, -1, -1, -1, - -1, 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, 626, -1, 628, 92, - -1, 94, 95, 96, 97, 98, 99, 100, 101, 102, - 103, -1, -1, 311, -1, -1, 156, -1, 111, -1, - -1, -1, -1, 196, 322, -1, -1, 325, -1, -1, - -1, 329, -1, 331, -1, -1, -1, -1, 336, 222, - -1, -1, -1, -1, -1, -1, -1, -1, -1, 222, - -1, -1, -1, -1, 227, -1, 196, -1, -1, -1, - -1, -1, 360, -1, -1, -1, -1, -1, 64, 65, - 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, - 76, 254, 222, 79, 80, -1, -1, 227, 84, -1, - 263, 264, -1, -1, 392, -1, 92, -1, 94, 95, - 96, 97, 98, 99, 100, 101, 102, 103, -1, 196, - -1, -1, -1, -1, 254, 255, 256, 257, 258, 259, - 260, -1, -1, 263, 264, -1, -1, -1, 311, -1, - -1, -1, -1, -1, -1, 222, -1, -1, 311, 322, - 227, -1, 325, 441, 442, -1, 329, -1, 331, 322, - -1, 449, 325, -1, -1, -1, 329, -1, 331, -1, - -1, -1, -1, 461, -1, -1, -1, 254, -1, -1, - -1, 311, -1, -1, -1, -1, 263, 360, -1, -1, - 267, -1, 322, -1, -1, 325, -1, 360, -1, 329, - -1, 331, -1, -1, -1, -1, 336, -1, 496, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, 509, -1, -1, -1, -1, -1, -1, -1, -1, - 360, -1, 520, 521, 311, 523, -1, -1, 526, -1, - -1, -1, -1, -1, -1, 322, -1, -1, 325, -1, - -1, -1, 329, -1, 331, -1, -1, -1, 546, -1, - -1, 549, 392, -1, 552, -1, -1, -1, -1, 442, - 558, -1, -1, -1, 562, -1, 449, -1, -1, 442, - -1, -1, -1, 360, -1, -1, 449, -1, 461, -1, - 64, 65, 66, 67, 68, 69, 70, 71, 461, 73, - 74, -1, -1, -1, -1, 79, 80, -1, -1, -1, - -1, 441, 442, -1, -1, -1, -1, -1, -1, 449, - 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, - -1, 461, -1, -1, -1, -1, -1, -1, 626, -1, - 628, -1, -1, -1, -1, -1, 509, -1, 521, -1, - 523, -1, -1, 526, -1, -1, -1, 520, 521, -1, - 523, -1, -1, 526, -1, 442, 496, -1, -1, -1, - -1, -1, 449, 546, -1, -1, 549, -1, -1, 509, - 18, 19, 20, 546, 461, 558, 549, -1, -1, 562, - 520, 521, -1, 523, -1, 558, 526, -1, -1, 562, - -1, -1, -1, -1, -1, -1, -1, -1, -1, 47, - 48, -1, -1, 51, 52, -1, 546, 55, 56, 549, - -1, -1, 552, -1, -1, -1, -1, -1, 558, -1, - -1, -1, 562, -1, -1, -1, -1, -1, -1, -1, - 78, -1, -1, -1, 521, -1, 523, 51, 52, 526, - -1, -1, -1, 626, -1, 628, -1, -1, -1, -1, - -1, -1, -1, 626, -1, 628, -1, -1, -1, 546, - -1, -1, 549, -1, -1, -1, -1, -1, -1, -1, - -1, 558, -1, -1, -1, 562, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, 626, -1, 628, 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, 93, 94, - 95, 96, 97, 98, 99, 100, 101, 102, 103, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, 626, - -1, 628, -1, -1, -1, -1, -1, -1, -1, 197, - 198, 199, 200, -1, -1, -1, -1, -1, -1, 173, - -1, -1, -1, -1, 212, -1, 214, -1, -1, -1, - -1, 64, 65, 66, 67, 68, 69, 70, 71, 72, - 73, 74, 75, 76, -1, -1, 79, 80, -1, -1, - -1, 205, -1, -1, -1, -1, 210, -1, -1, 92, - 214, 94, 95, 96, 97, 98, 99, 100, 101, 102, - 103, -1, -1, 261, -1, -1, -1, -1, -1, 267, - 268, 269, 270, 271, 272, 273, 274, 275, 276, 277, - 278, 279, 280, 281, 282, 283, 284, 285, 286, 287, - 288, 289, 290, 291, 292, 293, -1, -1, 296, -1, - -1, -1, -1, -1, 302, 303, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - 318, -1, -1, -1, -1, -1, 324, -1, 326, -1, - -1, -1, 296, -1, -1, -1, -1, 335, -1, 303, - -1, -1, -1, 341, 342, -1, -1, -1, 346, 347, - -1, -1, -1, -1, 318, 319, -1, -1, -1, -1, - -1, 359, -1, -1, -1, -1, -1, -1, 366, -1, - -1, 335, -1, 337, 372, -1, -1, 375, -1, -1, - -1, -1, 346, -1, -1, -1, 384, -1, -1, 8, - 9, -1, 11, 12, -1, -1, -1, -1, -1, 18, - 19, 20, -1, -1, -1, -1, 25, -1, -1, -1, - -1, 375, -1, -1, 64, 65, 66, 67, 68, 69, - 70, 71, 72, 73, 74, 75, 76, -1, 426, 79, - 80, -1, -1, 431, -1, -1, 55, -1, 436, -1, - -1, -1, -1, -1, 94, 95, 96, 97, 98, 99, - 100, 101, 102, 103, -1, -1, -1, -1, -1, 78, - -1, -1, -1, -1, 83, -1, -1, -1, -1, 467, - 434, 435, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, 483, -1, 451, -1, 453, - 454, 489, -1, -1, -1, -1, -1, -1, 462, -1, - 464, -1, 466, -1, -1, -1, -1, 505, -1, -1, - 508, -1, -1, 511, 512, -1, 514, 515, 516, -1, - -1, -1, 486, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, 531, -1, -1, -1, 156, -1, -1, - -1, -1, -1, -1, 508, -1, -1, -1, 512, 547, - -1, -1, 516, -1, -1, -1, -1, -1, -1, 557, - -1, -1, -1, -1, -1, -1, 564, -1, -1, -1, - -1, -1, -1, 571, -1, -1, -1, -1, -1, -1, - -1, 200, 580, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, 212, -1, 214, -1, -1, -1, 563, - -1, -1, -1, 567, -1, -1, -1, 605, -1, -1, - -1, 609, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, 592, 593, - -1, -1, -1, 597, -1, 599, 255, 256, 257, 258, - 259, 260, 606, -1, -1, -1, -1, -1, 267, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, 64, - 65, 66, 67, 68, 69, 70, -1, -1, 73, 74, - 634, 635, -1, 637, 79, 80, -1, 296, -1, -1, - -1, -1, -1, -1, 303, -1, -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, -1, -1, 335, 336, -1, -1, - -1, -1, -1, -1, -1, -1, -1, 346, -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, 375, -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, 426, -1, -1, - -1, -1, 431, 82, -1, -1, 85, 86, 87, 88, - -1, 90, 441, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, 104, 105, -1, -1, -1, - -1, -1, -1, -1, 0, -1, -1, 116, 117, -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, 496, 34, 35, - -1, 37, 38, 39, 40, -1, -1, -1, -1, 508, - -1, -1, -1, 512, -1, -1, -1, 516, -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, 552, -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, 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, 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, 64, - 65, 66, 67, 68, 69, 70, -1, -1, 73, 74, - -1, -1, -1, -1, 79, 80, -1, -1, -1, 82, - -1, -1, 85, 86, 87, -1, -1, 90, -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 237 "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 246 "parse.y" -{ - if (yyvsp[0].node && !compile_for_eval) { - /* last expression should not be void */ - if (nd_type(yyvsp[0].node) != NODE_BLOCK) void_expr(yyvsp[0].node); - else { - NODE *node = yyvsp[0].node; - while (node->nd_next) { - node = node->nd_next; - } - void_expr(node->nd_head); - } - } - 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 3: -#line 266 "parse.y" -{ - void_stmts(yyvsp[-1].node); - yyval.node = yyvsp[-1].node; - ; - break;} -case 5: -#line 273 "parse.y" -{ - yyval.node = newline_node(yyvsp[0].node); - ; - break;} -case 6: -#line 277 "parse.y" -{ - yyval.node = block_append(yyvsp[-2].node, newline_node(yyvsp[0].node)); - ; - break;} -case 7: -#line 281 "parse.y" -{ - yyval.node = yyvsp[0].node; - ; - break;} -case 9: -#line 286 "parse.y" -{lex_state = EXPR_FNAME;; - break;} -case 10: -#line 287 "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 293 "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 299 "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 308 "parse.y" -{ - yyerror("can't make alias for the number variables"); - yyval.node = 0; - ; - break;} -case 14: -#line 313 "parse.y" -{ - if (cur_mid || in_single) - yyerror("undef within method"); - yyval.node = yyvsp[0].node; - ; - break;} -case 15: -#line 319 "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 325 "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 331 "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 341 "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 351 "parse.y" -{ - if (cur_mid || in_single) { - yyerror("BEGIN in method"); - } - local_push(); - ; - break;} -case 20: -#line 358 "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 365 "parse.y" -{ - if (compile_for_eval && (cur_mid || in_single)) { - yyerror("END in method; use at_exit"); - } - - yyval.node = NEW_ITER(0, NEW_POSTEXE(), yyvsp[-1].node); - ; - break;} -case 22: -#line 373 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = node_assign(yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 24: -#line 380 "parse.y" -{ - value_expr(yyvsp[0].node); - yyvsp[-2].node->nd_value = yyvsp[0].node; - yyval.node = yyvsp[-2].node; - ; - break;} -case 25: -#line 386 "parse.y" -{ - value_expr(yyvsp[0].node); - if (!compile_for_eval && !cur_mid && !in_single) - yyerror("return appeared outside of method"); - yyval.node = NEW_RETURN(yyvsp[0].node); - ; - break;} -case 26: -#line 393 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = NEW_YIELD(yyvsp[0].node); - ; - break;} -case 28: -#line 399 "parse.y" -{ - yyval.node = logop(NODE_AND, yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 29: -#line 403 "parse.y" -{ - yyval.node = logop(NODE_OR, yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 30: -#line 407 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = NEW_NOT(cond(yyvsp[0].node)); - ; - break;} -case 31: -#line 412 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = NEW_NOT(cond(yyvsp[0].node)); - ; - break;} -case 33: -#line 419 "parse.y" -{ - yyval.node = new_fcall(yyvsp[-1].id, yyvsp[0].node); - fixpos(yyval.node, yyvsp[0].node); - ; - break;} -case 34: -#line 424 "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 430 "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 36: -#line 436 "parse.y" -{ - if (!compile_for_eval && !cur_mid && !in_single) - yyerror("super called outside of method"); - yyval.node = NEW_SUPER(yyvsp[0].node); - fixpos(yyval.node, yyvsp[0].node); - ; - break;} -case 38: -#line 445 "parse.y" -{ - yyval.node = yyvsp[-1].node; - ; - break;} -case 40: -#line 451 "parse.y" -{ - yyval.node = NEW_MASGN(NEW_LIST(yyvsp[-1].node), 0); - ; - break;} -case 41: -#line 456 "parse.y" -{ - yyval.node = NEW_MASGN(NEW_LIST(yyvsp[0].node), 0); - ; - break;} -case 42: -#line 460 "parse.y" -{ - yyval.node = NEW_MASGN(NEW_LIST(yyvsp[-2].node), yyvsp[0].node); - ; - break;} -case 43: -#line 464 "parse.y" -{ - yyval.node = NEW_MASGN(list_concat(NEW_LIST(yyvsp[-1].node),yyvsp[0].node), 0); - ; - break;} -case 44: -#line 468 "parse.y" -{ - yyval.node = NEW_MASGN(list_concat(NEW_LIST(yyvsp[-4].node),yyvsp[-3].node),yyvsp[0].node); - ; - break;} -case 45: -#line 472 "parse.y" -{ - yyval.node = NEW_MASGN(0, yyvsp[0].node); - ; - break;} -case 47: -#line 478 "parse.y" -{ - yyval.node = yyvsp[-1].node; - ; - break;} -case 48: -#line 483 "parse.y" -{ - yyval.node = yyvsp[-1].node; - ; - break;} -case 49: -#line 488 "parse.y" -{ - yyval.node = NEW_LIST(yyvsp[0].node); - ; - break;} -case 50: -#line 492 "parse.y" -{ - yyval.node = list_append(yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 51: -#line 497 "parse.y" -{ - yyval.node = assignable(yyvsp[0].id, 0); - ; - break;} -case 52: -#line 501 "parse.y" -{ - yyval.node = aryset(yyvsp[-3].node, yyvsp[-1].node); - ; - break;} -case 53: -#line 505 "parse.y" -{ - yyval.node = attrset(yyvsp[-2].node, yyvsp[0].id); - ; - break;} -case 54: -#line 509 "parse.y" -{ - rb_backref_error(yyvsp[0].node); - yyval.node = 0; - ; - break;} -case 55: -#line 515 "parse.y" -{ - yyval.node = assignable(yyvsp[0].id, 0); - ; - break;} -case 56: -#line 519 "parse.y" -{ - yyval.node = aryset(yyvsp[-3].node, yyvsp[-1].node); - ; - break;} -case 57: -#line 523 "parse.y" -{ - yyval.node = attrset(yyvsp[-2].node, yyvsp[0].id); - ; - break;} -case 58: -#line 527 "parse.y" -{ - rb_backref_error(yyvsp[0].node); - yyval.node = 0; - ; - break;} -case 59: -#line 533 "parse.y" -{ - yyerror("class/module name must be CONSTANT"); - ; - break;} -case 64: -#line 542 "parse.y" -{ - lex_state = EXPR_END; - yyval.id = yyvsp[0].id; - ; - break;} -case 65: -#line 547 "parse.y" -{ - lex_state = EXPR_END; - yyval.id = yyvsp[0].id; - ; - break;} -case 66: -#line 553 "parse.y" -{ - yyval.node = NEW_UNDEF(yyvsp[0].id); - ; - break;} -case 67: -#line 556 "parse.y" -{lex_state = EXPR_FNAME;; - break;} -case 68: -#line 557 "parse.y" -{ - yyval.node = block_append(yyvsp[-3].node, NEW_UNDEF(yyvsp[0].id)); - ; - break;} -case 69: -#line 561 "parse.y" -{ yyval.id = tDOT2; ; - break;} -case 70: -#line 562 "parse.y" -{ yyval.id = '|'; ; - break;} -case 71: -#line 563 "parse.y" -{ yyval.id = '^'; ; - break;} -case 72: -#line 564 "parse.y" -{ yyval.id = '&'; ; - break;} -case 73: -#line 565 "parse.y" -{ yyval.id = tCMP; ; - break;} -case 74: -#line 566 "parse.y" -{ yyval.id = tEQ; ; - break;} -case 75: -#line 567 "parse.y" -{ yyval.id = tEQQ; ; - break;} -case 76: -#line 568 "parse.y" -{ yyval.id = tMATCH; ; - break;} -case 77: -#line 569 "parse.y" -{ yyval.id = '>'; ; - break;} -case 78: -#line 570 "parse.y" -{ yyval.id = tGEQ; ; - break;} -case 79: -#line 571 "parse.y" -{ yyval.id = '<'; ; - break;} -case 80: -#line 572 "parse.y" -{ yyval.id = tLEQ; ; - break;} -case 81: -#line 573 "parse.y" -{ yyval.id = tLSHFT; ; - break;} -case 82: -#line 574 "parse.y" -{ yyval.id = tRSHFT; ; - break;} -case 83: -#line 575 "parse.y" -{ yyval.id = '+'; ; - break;} -case 84: -#line 576 "parse.y" -{ yyval.id = '-'; ; - break;} -case 85: -#line 577 "parse.y" -{ yyval.id = '*'; ; - break;} -case 86: -#line 578 "parse.y" -{ yyval.id = '*'; ; - break;} -case 87: -#line 579 "parse.y" -{ yyval.id = '/'; ; - break;} -case 88: -#line 580 "parse.y" -{ yyval.id = '%'; ; - break;} -case 89: -#line 581 "parse.y" -{ yyval.id = tPOW; ; - break;} -case 90: -#line 582 "parse.y" -{ yyval.id = '~'; ; - break;} -case 91: -#line 583 "parse.y" -{ yyval.id = tUPLUS; ; - break;} -case 92: -#line 584 "parse.y" -{ yyval.id = tUMINUS; ; - break;} -case 93: -#line 585 "parse.y" -{ yyval.id = tAREF; ; - break;} -case 94: -#line 586 "parse.y" -{ yyval.id = tASET; ; - break;} -case 95: -#line 587 "parse.y" -{ yyval.id = '`'; ; - break;} -case 136: -#line 598 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = node_assign(yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 137: -#line 602 "parse.y" -{yyval.node = assignable(yyvsp[-1].id, 0);; - break;} -case 138: -#line 603 "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 619 "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 634 "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 645 "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 656 "parse.y" -{ - rb_backref_error(yyvsp[-2].node); - yyval.node = 0; - ; - break;} -case 143: -#line 661 "parse.y" -{ - yyval.node = NEW_DOT2(yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 144: -#line 665 "parse.y" -{ - yyval.node = NEW_DOT3(yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 145: -#line 669 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, '+', 1, yyvsp[0].node); - ; - break;} -case 146: -#line 673 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, '-', 1, yyvsp[0].node); - ; - break;} -case 147: -#line 677 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, '*', 1, yyvsp[0].node); - ; - break;} -case 148: -#line 681 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, '/', 1, yyvsp[0].node); - ; - break;} -case 149: -#line 685 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, '%', 1, yyvsp[0].node); - ; - break;} -case 150: -#line 689 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, tPOW, 1, yyvsp[0].node); - ; - break;} -case 151: -#line 693 "parse.y" -{ - yyval.node = call_op(yyvsp[0].node, tUPLUS, 0); - ; - break;} -case 152: -#line 697 "parse.y" -{ - yyval.node = call_op(yyvsp[0].node, tUMINUS, 0); - ; - break;} -case 153: -#line 701 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, '|', 1, yyvsp[0].node); - ; - break;} -case 154: -#line 705 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, '^', 1, yyvsp[0].node); - ; - break;} -case 155: -#line 709 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, '&', 1, yyvsp[0].node); - ; - break;} -case 156: -#line 713 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, tCMP, 1, yyvsp[0].node); - ; - break;} -case 157: -#line 717 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, '>', 1, yyvsp[0].node); - ; - break;} -case 158: -#line 721 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, tGEQ, 1, yyvsp[0].node); - ; - break;} -case 159: -#line 725 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, '<', 1, yyvsp[0].node); - ; - break;} -case 160: -#line 729 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, tLEQ, 1, yyvsp[0].node); - ; - break;} -case 161: -#line 733 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, tEQ, 1, yyvsp[0].node); - ; - break;} -case 162: -#line 737 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, tEQQ, 1, yyvsp[0].node); - ; - break;} -case 163: -#line 741 "parse.y" -{ - yyval.node = NEW_NOT(call_op(yyvsp[-2].node, tEQ, 1, yyvsp[0].node)); - ; - break;} -case 164: -#line 745 "parse.y" -{ - yyval.node = match_gen(yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 165: -#line 749 "parse.y" -{ - yyval.node = NEW_NOT(match_gen(yyvsp[-2].node, yyvsp[0].node)); - ; - break;} -case 166: -#line 753 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = NEW_NOT(cond(yyvsp[0].node)); - ; - break;} -case 167: -#line 758 "parse.y" -{ - yyval.node = call_op(yyvsp[0].node, '~', 0); - ; - break;} -case 168: -#line 762 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, tLSHFT, 1, yyvsp[0].node); - ; - break;} -case 169: -#line 766 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, tRSHFT, 1, yyvsp[0].node); - ; - break;} -case 170: -#line 770 "parse.y" -{ - yyval.node = logop(NODE_AND, yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 171: -#line 774 "parse.y" -{ - yyval.node = logop(NODE_OR, yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 172: -#line 777 "parse.y" -{in_defined = 1;; - break;} -case 173: -#line 778 "parse.y" -{ - in_defined = 0; - yyval.node = NEW_DEFINED(yyvsp[0].node); - ; - break;} -case 174: -#line 783 "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 789 "parse.y" -{ - yyval.node = yyvsp[0].node; - ; - break;} -case 176: -#line 794 "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 179: -#line 805 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = NEW_LIST(yyvsp[0].node); - ; - break;} -case 180: -#line 810 "parse.y" -{ - yyval.node = yyvsp[-1].node; - ; - break;} -case 181: -#line 814 "parse.y" -{ - yyval.node = arg_blk_pass(yyvsp[-1].node, yyvsp[0].node); - ; - break;} -case 182: -#line 818 "parse.y" -{ - yyval.node = arg_concat(yyvsp[-4].node, yyvsp[-1].node); - yyval.node = arg_blk_pass(yyval.node, yyvsp[0].node); - ; - break;} -case 183: -#line 823 "parse.y" -{ - yyval.node = NEW_LIST(NEW_HASH(yyvsp[-1].node)); - ; - break;} -case 184: -#line 827 "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 832 "parse.y" -{ - yyval.node = arg_concat(NEW_LIST(NEW_HASH(yyvsp[-4].node)), yyvsp[-1].node); - yyval.node = arg_blk_pass(yyval.node, yyvsp[0].node); - ; - break;} -case 186: -#line 837 "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 842 "parse.y" -{ - yyval.node = list_append(yyvsp[-3].node, NEW_HASH(yyvsp[-1].node)); - ; - break;} -case 188: -#line 846 "parse.y" -{ - yyval.node = arg_concat(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 851 "parse.y" -{ - value_expr(yyvsp[-1].node); - yyval.node = arg_blk_pass(NEW_RESTARGS(yyvsp[-1].node), yyvsp[0].node); - ; - break;} -case 191: -#line 858 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = NEW_BLOCK_PASS(yyvsp[0].node); - ; - break;} -case 192: -#line 864 "parse.y" -{ - yyval.node = yyvsp[0].node; - ; - break;} -case 196: -#line 873 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = NEW_LIST(yyvsp[0].node); - ; - break;} -case 197: -#line 878 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = list_append(yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 198: -#line 884 "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 896 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = arg_concat(yyvsp[-3].node, yyvsp[0].node); - ; - break;} -case 200: -#line 901 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = yyvsp[0].node; - ; - break;} -case 201: -#line 907 "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 204: -#line 924 "parse.y" -{ - yyval.node = NEW_LIT(yyvsp[0].val); - ; - break;} -case 205: -#line 928 "parse.y" -{ - value_expr(yyvsp[-2].node); - yyval.node = NEW_COLON2(yyvsp[-2].node, yyvsp[0].id); - ; - break;} -case 206: -#line 933 "parse.y" -{ - yyval.node = NEW_COLON3(yyvsp[0].id); - ; - break;} -case 207: -#line 937 "parse.y" -{ - yyval.node = NEW_STR(yyvsp[0].val); - ; - break;} -case 209: -#line 942 "parse.y" -{ - yyval.node = NEW_XSTR(yyvsp[0].val); - ; - break;} -case 214: -#line 950 "parse.y" -{ - value_expr(yyvsp[-3].node); - yyval.node = NEW_CALL(yyvsp[-3].node, tAREF, yyvsp[-1].node); - ; - break;} -case 215: -#line 955 "parse.y" -{ - if (yyvsp[-1].node == 0) - yyval.node = NEW_ZARRAY(); /* zero length array*/ - else { - yyval.node = yyvsp[-1].node; - } - ; - break;} -case 216: -#line 963 "parse.y" -{ - yyval.node = NEW_HASH(yyvsp[-1].node); - ; - break;} -case 217: -#line 967 "parse.y" -{ - if (!compile_for_eval && !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 974 "parse.y" -{ - if (!compile_for_eval && !cur_mid && !in_single) - yyerror("return appeared outside of method"); - yyval.node = NEW_RETURN(0); - ; - break;} -case 219: -#line 980 "parse.y" -{ - if (!compile_for_eval && !cur_mid && !in_single) - yyerror("return appeared outside of method"); - yyval.node = NEW_RETURN(0); - ; - break;} -case 220: -#line 986 "parse.y" -{ - value_expr(yyvsp[-1].node); - yyval.node = NEW_YIELD(yyvsp[-1].node); - ; - break;} -case 221: -#line 991 "parse.y" -{ - yyval.node = NEW_YIELD(0); - ; - break;} -case 222: -#line 995 "parse.y" -{ - yyval.node = NEW_YIELD(0); - ; - break;} -case 223: -#line 998 "parse.y" -{in_defined = 1;; - break;} -case 224: -#line 999 "parse.y" -{ - in_defined = 0; - yyval.node = NEW_DEFINED(yyvsp[-1].node); - ; - break;} -case 225: -#line 1004 "parse.y" -{ - yyval.node = NEW_VCALL(yyvsp[0].id); - ; - break;} -case 226: -#line 1008 "parse.y" -{ - yyvsp[0].node->nd_iter = NEW_FCALL(yyvsp[-1].id, 0); - yyval.node = yyvsp[0].node; - ; - break;} -case 228: -#line 1014 "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 1026 "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 1035 "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 1043 "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 1051 "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 1059 "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 1067 "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 1078 "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 1093 "parse.y" -{ - yyval.node = yyvsp[-1].node; - ; - break;} -case 237: -#line 1097 "parse.y" -{ - if (cur_mid || in_single) - yyerror("class definition in method body"); - - class_nest++; - cref_push(); - local_push(); - ; - break;} -case 238: -#line 1107 "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 1115 "parse.y" -{ - class_nest++; - cref_push(); - local_push(); - ; - break;} -case 240: -#line 1122 "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 1130 "parse.y" -{ - if (cur_mid || in_single) - yyerror("module definition in method body"); - class_nest++; - cref_push(); - local_push(); - ; - break;} -case 242: -#line 1139 "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 1147 "parse.y" -{ - if (cur_mid || in_single) - yyerror("nested method definition"); - cur_mid = yyvsp[0].id; - local_push(); - ; - break;} -case 244: -#line 1156 "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 1163 "parse.y" -{lex_state = EXPR_FNAME;; - break;} -case 246: -#line 1164 "parse.y" -{ - value_expr(yyvsp[-3].node); - in_single++; - local_push(); - lex_state = EXPR_END; /* force for args */ - ; - break;} -case 247: -#line 1173 "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 1180 "parse.y" -{ - yyval.node = NEW_BREAK(); - ; - break;} -case 249: -#line 1184 "parse.y" -{ - yyval.node = NEW_NEXT(); - ; - break;} -case 250: -#line 1188 "parse.y" -{ - yyval.node = NEW_REDO(); - ; - break;} -case 251: -#line 1192 "parse.y" -{ - yyval.node = NEW_RETRY(); - ; - break;} -case 258: -#line 1207 "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 260: -#line 1215 "parse.y" -{ - yyval.node = yyvsp[0].node; - ; - break;} -case 264: -#line 1224 "parse.y" -{ - yyval.node = 0; - ; - break;} -case 265: -#line 1228 "parse.y" -{ - yyval.node = 0; - ; - break;} -case 266: -#line 1232 "parse.y" -{ - yyval.node = yyvsp[-1].node; - ; - break;} -case 267: -#line 1237 "parse.y" -{ - yyval.vars = dyna_push(); - ; - break;} -case 268: -#line 1243 "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 1250 "parse.y" -{ - yyval.vars = dyna_push(); - ; - break;} -case 270: -#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 271: -#line 1262 "parse.y" -{ - yyval.node = NEW_VCALL(yyvsp[0].id); - ; - break;} -case 272: -#line 1266 "parse.y" -{ - yyval.node = NEW_VCALL(yyvsp[0].id); - ; - break;} -case 273: -#line 1270 "parse.y" -{ - yyval.node = NEW_VCALL(yyvsp[0].id); - ; - break;} -case 276: -#line 1277 "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 277: -#line 1287 "parse.y" -{ - yyval.node = new_fcall(yyvsp[-3].id, yyvsp[-1].node); - fixpos(yyval.node, yyvsp[-1].node); - ; - break;} -case 278: -#line 1292 "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 279: -#line 1298 "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 280: -#line 1304 "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 281: -#line 1310 "parse.y" -{ - value_expr(yyvsp[-2].node); - yyval.node = new_call(yyvsp[-2].node, yyvsp[0].id, 0); - ; - break;} -case 282: -#line 1315 "parse.y" -{ - if (!compile_for_eval && !cur_mid && - !in_single && !in_defined) - yyerror("super called outside of method"); - yyval.node = NEW_SUPER(yyvsp[-1].node); - ; - break;} -case 283: -#line 1322 "parse.y" -{ - if (!compile_for_eval && !cur_mid && - !in_single && !in_defined) - yyerror("super called outside of method"); - yyval.node = NEW_ZSUPER(); - ; - break;} -case 286: -#line 1336 "parse.y" -{ - yyval.node = NEW_WHEN(yyvsp[-3].node, yyvsp[-1].node, yyvsp[0].node); - ; - break;} -case 288: -#line 1342 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = list_append(yyvsp[-3].node, NEW_WHEN(yyvsp[0].node, 0, 0)); - ; - break;} -case 289: -#line 1347 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = NEW_LIST(NEW_WHEN(yyvsp[0].node, 0, 0)); - ; - break;} -case 292: -#line 1358 "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 295: -#line 1366 "parse.y" -{ - yyval.node = yyvsp[0].node; - ; - break;} -case 297: -#line 1372 "parse.y" -{ - yyval.val = INT2FIX(yyvsp[0].id); - ; - break;} -case 308: -#line 1388 "parse.y" -{yyval.id = kNIL;; - break;} -case 309: -#line 1389 "parse.y" -{yyval.id = kSELF;; - break;} -case 310: -#line 1390 "parse.y" -{yyval.id = kTRUE;; - break;} -case 311: -#line 1391 "parse.y" -{yyval.id = kFALSE;; - break;} -case 312: -#line 1392 "parse.y" -{yyval.id = k__FILE__;; - break;} -case 313: -#line 1393 "parse.y" -{yyval.id = k__LINE__;; - break;} -case 314: -#line 1396 "parse.y" -{ - yyval.node = gettable(yyvsp[0].id); - ; - break;} -case 317: -#line 1404 "parse.y" -{ - yyval.node = 0; - ; - break;} -case 318: -#line 1408 "parse.y" -{ - lex_state = EXPR_BEG; - ; - break;} -case 319: -#line 1412 "parse.y" -{ - yyval.node = yyvsp[-1].node; - ; - break;} -case 320: -#line 1415 "parse.y" -{yyerrok; yyval.node = 0;; - break;} -case 321: -#line 1418 "parse.y" -{ - yyval.node = yyvsp[-2].node; - lex_state = EXPR_BEG; - ; - break;} -case 322: -#line 1423 "parse.y" -{ - yyval.node = yyvsp[-1].node; - ; - break;} -case 323: -#line 1428 "parse.y" -{ - yyval.node = block_append(NEW_ARGS(yyvsp[-5].num, yyvsp[-3].node, yyvsp[-1].id), yyvsp[0].node); - ; - break;} -case 324: -#line 1432 "parse.y" -{ - yyval.node = block_append(NEW_ARGS(yyvsp[-3].num, yyvsp[-1].node, -1), yyvsp[0].node); - ; - break;} -case 325: -#line 1436 "parse.y" -{ - yyval.node = block_append(NEW_ARGS(yyvsp[-3].num, 0, yyvsp[-1].id), yyvsp[0].node); - ; - break;} -case 326: -#line 1440 "parse.y" -{ - yyval.node = block_append(NEW_ARGS(yyvsp[-1].num, 0, -1), yyvsp[0].node); - ; - break;} -case 327: -#line 1444 "parse.y" -{ - yyval.node = block_append(NEW_ARGS(0, yyvsp[-3].node, yyvsp[-1].id), yyvsp[0].node); - ; - break;} -case 328: -#line 1448 "parse.y" -{ - yyval.node = block_append(NEW_ARGS(0, yyvsp[-1].node, -1), yyvsp[0].node); - ; - break;} -case 329: -#line 1452 "parse.y" -{ - yyval.node = block_append(NEW_ARGS(0, 0, yyvsp[-1].id), yyvsp[0].node); - ; - break;} -case 330: -#line 1456 "parse.y" -{ - yyval.node = block_append(NEW_ARGS(0, 0, -1), yyvsp[0].node); - ; - break;} -case 331: -#line 1460 "parse.y" -{ - yyval.node = NEW_ARGS(0, 0, -1); - ; - break;} -case 332: -#line 1465 "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 333: -#line 1472 "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 334: -#line 1480 "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 335: -#line 1487 "parse.y" -{ - yyval.node = NEW_BLOCK(yyvsp[0].node); - yyval.node->nd_end = yyval.node; - ; - break;} -case 336: -#line 1492 "parse.y" -{ - yyval.node = block_append(yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 337: -#line 1497 "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 338: -#line 1504 "parse.y" -{ - yyval.node = NEW_BLOCK_ARG(yyvsp[0].id); - ; - break;} -case 339: -#line 1509 "parse.y" -{ - yyval.node = yyvsp[0].node; - ; - break;} -case 341: -#line 1515 "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 342: -#line 1528 "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 344: -#line 1547 "parse.y" -{ - yyval.node = yyvsp[-1].node; - ; - break;} -case 345: -#line 1551 "parse.y" -{ - if (yyvsp[-1].node->nd_alen%2 != 0) { - yyerror("odd number list for Hash"); - } - yyval.node = yyvsp[-1].node; - ; - break;} -case 347: -#line 1560 "parse.y" -{ - yyval.node = list_concat(yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 348: -#line 1565 "parse.y" -{ - yyval.node = list_append(NEW_LIST(yyvsp[-2].node), yyvsp[0].node); - ; - break;} -case 363: -#line 1589 "parse.y" -{yyerrok;; - break;} -case 366: -#line 1593 "parse.y" -{yyerrok;; - break;} -case 367: -#line 1596 "parse.y" -{ - yyval.node = 0; - ; - 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 1599 "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 HAVE_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(); - compile_for_eval = 0; - 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, line) - const char *f; - VALUE s; - int line; -{ - lex_gets = lex_get_str; - lex_gets_ptr = 0; - lex_input = s; - lex_pbeg = lex_p = lex_pend = 0; - ruby_sourceline = line - 1; - compile_for_eval = 1; - - return yycompile(f); -} - -NODE* -rb_compile_cstr(f, s, len, line) - const char *f, *s; - int len, line; -{ - return rb_compile_string(f, rb_str_new(s, len), line); -} - -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 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; - } - 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); - 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); - 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; -} - -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; - } - 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+1); - 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)){ - 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); - 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)){ - 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; - } - 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; - } - 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) { - 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) { - 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 == '\r') { - c = nextc(); - if (c != '\n') pushback(c); - } - 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 && space_seen && !ISSPACE(c)) { - 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 * -aryset(recv, idx) - NODE *recv, *idx; -{ - value_expr(recv); - - 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) - NODE *recv; - ID id; -{ - value_expr(recv); - - return NEW_CALL(recv, rb_id_attrset(id), 0); -} - -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 NODE * -arg_concat(node1, node2) - NODE *node1; - NODE *node2; -{ - return NEW_ARGSCAT(node1, node2); -} - -static NODE * -arg_add(node1, node2) - NODE *node1; - NODE *node2; -{ - if (!node1) return NEW_LIST(node2); - if (nd_type(node1) == NODE_ARRAY) { - return list_append(node1, node2); - } - else { - return NEW_ARGSCAT(node1, node2); - } -} - -static NODE* -node_assign(lhs, rhs) - NODE *lhs, *rhs; -{ - if (!lhs) return 0; - - value_expr(rhs); - switch (nd_type(lhs)) { - case NODE_GASGN: - case NODE_IASGN: - case NODE_LASGN: - case NODE_DASGN: - case NODE_DASGN_PUSH: - case NODE_CASGN: - case NODE_MASGN: - lhs->nd_value = rhs; - break; - - case NODE_CALL: - lhs->nd_args = arg_add(lhs->nd_args, rhs); - break; - - default: - /* should not happen */ - break; - } - - if (rhs) fixpos(lhs, rhs); - return lhs; -} - -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 void -void_expr(node) - NODE *node; -{ - char *useless = 0; - - if (!ruby_verbose) return; - if (!node) return; - - again: - switch (nd_type(node)) { - case NODE_NEWLINE: - node = node->nd_next; - goto again; - - case NODE_CALL: - switch (node->nd_mid) { - case '+': - case '-': - case '*': - case '/': - case '%': - case tPOW: - case tUPLUS: - case tUMINUS: - case '|': - case '^': - case '&': - case tCMP: - case '>': - case tGEQ: - case '<': - case tLEQ: - case tEQ: - case tNEQ: - case tAREF: - case tRSHFT: - case tCOLON2: - case tCOLON3: - useless = rb_id2name(node->nd_mid); - break; - } - break; - - case NODE_LVAR: - case NODE_DVAR: - case NODE_GVAR: - case NODE_IVAR: - case NODE_NTH_REF: - case NODE_BACK_REF: - useless = "a variable"; - break; - case NODE_CVAR: - case NODE_CREF: - useless = "a constant"; - break; - case NODE_LIT: - case NODE_STR: - case NODE_DSTR: - case NODE_DREGX: - case NODE_DREGX_ONCE: - useless = "a literal"; - break; - case NODE_COLON2: - case NODE_COLON3: - useless = "::"; - break; - case NODE_DOT2: - useless = ".."; - break; - case NODE_DOT3: - useless = "..."; - break; - case NODE_SELF: - useless = "self"; - break; - case NODE_NIL: - useless = "nil"; - break; - case NODE_TRUE: - useless = "true"; - break; - case NODE_FALSE: - useless = "false"; - break; - case NODE_DEFINED: - useless = "defined?"; - break; - } - - if (useless) { - int line = ruby_sourceline; - - ruby_sourceline = nd_line(node); - rb_warn("useless use of %s in void context", useless); - ruby_sourceline = line; - } -} - -static void -void_stmts(node) - NODE *node; -{ - if (!ruby_verbose) return; - if (!node) return; - if (nd_type(node) != NODE_BLOCK) return; - - for (;;) { - if (!node->nd_next) return; - void_expr(node->nd_head); - node = node->nd_next; - } -} - -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, "..", - tDOT3, "...", - '+', "+", - '-', "-", - '+', "+(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); - } -} |