diff options
| author | matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 1999-06-09 09:21:37 +0000 |
|---|---|---|
| committer | matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 1999-06-09 09:21:37 +0000 |
| commit | c1241cd2ed230573bb81b52173d6cd2bd91176f2 (patch) | |
| tree | caa3babd9a35b930814fffa9c8ebb3366d46dae8 /parse.c | |
| parent | 17ae11ca25d210da8c7deeeee0f03fd1a09ee0b2 (diff) | |
thread bugs
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_3@482 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'parse.c')
| -rw-r--r-- | parse.c | 7571 |
1 files changed, 0 insertions, 7571 deletions
diff --git a/parse.c b/parse.c deleted file mode 100644 index 71cf6c8300..0000000000 --- a/parse.c +++ /dev/null @@ -1,7571 +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> - -#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, no reserved words. */ - EXPR_DOT, /* right after `.' or `::', 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 110 "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 647 -#define YYFLAG -32768 -#define YYNTBASE 118 - -#define YYTRANSLATE(x) ((unsigned)(x) <= 345 ? yytranslate[x] : 212) - -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, 143, 149, 154, 157, 159, 161, - 165, 168, 170, 174, 176, 181, 185, 187, 189, 194, - 198, 200, 202, 204, 206, 208, 210, 212, 214, 216, - 217, 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, 348, 350, 352, 354, 356, 360, - 361, 366, 373, 379, 385, 389, 393, 397, 401, 405, - 409, 413, 417, 421, 424, 427, 431, 435, 439, 443, - 447, 451, 455, 459, 463, 467, 471, 475, 479, 482, - 485, 489, 493, 497, 501, 502, 507, 513, 515, 517, - 519, 522, 524, 527, 530, 536, 539, 542, 548, 553, - 558, 566, 570, 572, 575, 578, 580, 582, 584, 586, - 590, 592, 597, 600, 602, 604, 607, 609, 613, 616, - 618, 620, 622, 624, 626, 628, 630, 635, 639, 643, - 648, 652, 654, 659, 663, 665, 666, 673, 675, 678, - 680, 683, 690, 697, 703, 709, 714, 722, 729, 733, - 734, 741, 742, 750, 751, 757, 758, 765, 766, 767, - 777, 779, 781, 783, 785, 787, 789, 792, 794, 796, - 798, 804, 806, 809, 811, 813, 815, 818, 820, 824, - 825, 831, 832, 838, 840, 842, 844, 846, 848, 851, - 856, 863, 867, 874, 878, 883, 885, 887, 889, 895, - 897, 902, 905, 907, 909, 915, 917, 919, 922, 924, - 927, 929, 931, 933, 935, 937, 939, 941, 943, 945, - 947, 949, 951, 953, 955, 957, 959, 961, 963, 965, - 967, 968, 973, 976, 981, 984, 991, 996, 1001, 1004, - 1009, 1012, 1015, 1017, 1018, 1020, 1024, 1028, 1030, 1034, - 1037, 1039, 1042, 1045, 1047, 1049, 1050, 1056, 1058, 1061, - 1064, 1066, 1070, 1074, 1076, 1078, 1080, 1082, 1084, 1086, - 1088, 1090, 1092, 1094, 1096, 1098, 1099, 1101, 1102, 1104, - 1105, 1107, 1109, 1111, 1113, 1115, 1118 -}; - -static const short yyrhs[] = { -1, - 119, 120, 0, 121, 206, 0, 211, 0, 122, 0, - 121, 210, 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, 202, 146, 0, 154, 109, 203, 146, 0, - 154, 81, 203, 146, 0, 29, 146, 0, 129, 0, - 85, 128, 110, 0, 129, 0, 85, 128, 110, 0, - 131, 0, 131, 88, 134, 0, 131, 88, 0, 131, - 132, 0, 131, 132, 111, 88, 134, 0, 131, 132, - 111, 88, 0, 88, 133, 0, 88, 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, 207, 143, 141, 0, 141, 92, 141, 93, - 141, 0, 154, 0, 145, 0, 211, 0, 146, 207, - 0, 126, 0, 150, 111, 0, 150, 148, 0, 150, - 111, 88, 141, 148, 0, 200, 111, 0, 200, 148, - 0, 200, 111, 88, 141, 148, 0, 150, 111, 200, - 148, 0, 150, 111, 200, 111, 0, 150, 111, 200, - 111, 88, 141, 148, 0, 88, 141, 148, 0, 147, - 0, 89, 141, 0, 111, 147, 0, 211, 0, 150, - 0, 211, 0, 141, 0, 150, 111, 141, 0, 150, - 0, 150, 111, 88, 141, 0, 88, 141, 0, 146, - 0, 211, 0, 150, 208, 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, 199, - 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, 207, 115, 155, 125, - 110, 0, 48, 0, 202, 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, 209, 157, 120, 10, 0, 0, - 4, 135, 158, 120, 10, 0, 0, 5, 136, 159, - 189, 120, 10, 0, 0, 0, 5, 197, 205, 160, - 136, 161, 189, 120, 10, 0, 21, 0, 22, 0, - 23, 0, 24, 0, 209, 0, 13, 0, 209, 13, - 0, 209, 0, 26, 0, 165, 0, 14, 125, 162, - 120, 164, 0, 211, 0, 15, 120, 0, 134, 0, - 127, 0, 211, 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, - 202, 115, 145, 110, 0, 154, 109, 203, 115, 145, - 110, 0, 154, 109, 203, 0, 154, 81, 203, 115, - 145, 110, 0, 154, 81, 204, 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, 211, 0, 211, 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, 209, 0, 0, 95, 188, 125, - 209, 0, 1, 209, 0, 115, 190, 207, 110, 0, - 190, 209, 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, 88, 0, 89, 47, - 0, 111, 195, 0, 211, 0, 185, 0, 0, 115, - 198, 125, 207, 110, 0, 211, 0, 200, 208, 0, - 150, 208, 0, 201, 0, 200, 111, 201, 0, 141, - 84, 141, 0, 47, 0, 51, 0, 48, 0, 47, - 0, 51, 0, 48, 0, 139, 0, 47, 0, 48, - 0, 139, 0, 109, 0, 81, 0, 0, 210, 0, - 0, 116, 0, 0, 116, 0, 111, 0, 117, 0, - 116, 0, 209, 0, 210, 117, 0, 0 -}; - -#endif - -#if YYDEBUG != 0 -static const short yyrline[] = { 0, - 232, 241, 260, 266, 267, 271, 275, 280, 281, 282, - 287, 293, 302, 307, 313, 319, 325, 335, 345, 352, - 359, 367, 372, 374, 380, 387, 392, 393, 397, 401, - 406, 411, 413, 418, 424, 430, 438, 439, 444, 445, - 450, 454, 458, 462, 466, 470, 474, 478, 483, 484, - 489, 494, 498, 503, 507, 511, 515, 521, 525, 529, - 533, 539, 543, 545, 546, 547, 548, 553, 559, 563, - 564, 568, 569, 570, 571, 572, 573, 574, 575, 576, - 577, 578, 579, 580, 581, 582, 583, 584, 585, 586, - 587, 588, 589, 590, 591, 592, 593, 594, 596, 596, - 596, 596, 597, 597, 597, 597, 597, 597, 597, 598, - 598, 598, 598, 598, 598, 598, 599, 599, 599, 599, - 599, 599, 599, 600, 600, 600, 600, 600, 600, 600, - 601, 601, 601, 601, 601, 601, 602, 602, 604, 609, - 610, 625, 640, 651, 662, 667, 671, 675, 679, 683, - 687, 691, 695, 699, 703, 707, 711, 715, 719, 723, - 727, 731, 735, 739, 743, 747, 751, 755, 759, 764, - 768, 772, 776, 780, 784, 785, 789, 795, 800, 808, - 809, 811, 816, 820, 824, 829, 833, 838, 843, 848, - 852, 857, 862, 864, 870, 874, 876, 877, 879, 884, - 890, 902, 907, 913, 927, 928, 930, 934, 939, 943, - 947, 948, 952, 953, 954, 955, 956, 961, 969, 973, - 980, 986, 992, 997, 1001, 1005, 1005, 1010, 1014, 1019, - 1020, 1029, 1038, 1047, 1055, 1063, 1071, 1079, 1099, 1103, - 1113, 1121, 1128, 1136, 1145, 1153, 1161, 1170, 1171, 1178, - 1186, 1190, 1194, 1198, 1203, 1204, 1205, 1207, 1208, 1210, - 1211, 1220, 1221, 1226, 1227, 1229, 1230, 1234, 1238, 1243, - 1248, 1256, 1261, 1268, 1272, 1276, 1280, 1281, 1283, 1293, - 1298, 1304, 1310, 1316, 1321, 1328, 1337, 1338, 1340, 1347, - 1348, 1353, 1359, 1360, 1362, 1369, 1371, 1372, 1377, 1378, - 1383, 1385, 1386, 1387, 1389, 1390, 1392, 1393, 1394, 1395, - 1396, 1397, 1398, 1399, 1400, 1401, 1403, 1408, 1409, 1411, - 1415, 1419, 1423, 1425, 1430, 1435, 1439, 1443, 1447, 1451, - 1455, 1459, 1463, 1467, 1472, 1479, 1487, 1494, 1499, 1504, - 1510, 1515, 1520, 1524, 1526, 1539, 1539, 1557, 1558, 1562, - 1570, 1571, 1576, 1581, 1582, 1583, 1585, 1586, 1587, 1588, - 1590, 1591, 1592, 1594, 1595, 1597, 1598, 1600, 1601, 1603, - 1604, 1605, 1607, 1608, 1610, 1611, 1613 -}; -#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","@17","assoc_list", -"assocs","assoc","operation","operation2","operation3","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, 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, - 194, 195, 196, 196, 197, 198, 197, 199, 199, 199, - 200, 200, 201, 202, 202, 202, 203, 203, 203, 203, - 204, 204, 204, 205, 205, 206, 206, 207, 207, 208, - 208, 208, 209, 209, 210, 210, 211 -}; - -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, 2, 5, 4, 2, 1, 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, - 1, 2, 2, 1, 1, 0, 5, 1, 2, 2, - 1, 3, 3, 1, 1, 1, 1, 1, 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, 251, 252, 253, 254, 222, 225, 286, - 312, 311, 313, 314, 0, 0, 368, 19, 0, 316, - 315, 354, 356, 309, 308, 355, 305, 306, 210, 212, - 301, 211, 213, 214, 318, 319, 0, 0, 0, 0, - 377, 377, 48, 0, 0, 0, 2, 366, 5, 23, - 27, 0, 37, 0, 41, 49, 0, 32, 178, 0, - 8, 230, 207, 299, 317, 215, 216, 0, 4, 7, - 62, 63, 0, 0, 244, 108, 120, 109, 133, 105, - 126, 115, 114, 131, 113, 112, 107, 136, 117, 106, - 121, 125, 127, 119, 111, 128, 138, 130, 129, 122, - 132, 116, 104, 124, 123, 118, 134, 137, 135, 103, - 110, 101, 102, 99, 100, 64, 66, 65, 94, 95, - 92, 76, 77, 78, 81, 83, 79, 72, 96, 97, - 84, 85, 89, 80, 82, 73, 74, 75, 86, 87, - 88, 90, 91, 93, 98, 346, 246, 67, 68, 317, - 345, 0, 129, 122, 132, 116, 99, 100, 64, 65, - 69, 14, 377, 307, 228, 310, 0, 27, 0, 230, - 0, 0, 0, 0, 222, 225, 286, 368, 265, 264, - 0, 0, 317, 216, 0, 0, 0, 0, 0, 0, - 182, 199, 204, 193, 377, 25, 178, 317, 216, 377, - 351, 0, 26, 377, 36, 30, 0, 9, 369, 175, - 0, 0, 154, 178, 155, 209, 0, 0, 0, 37, - 199, 370, 0, 205, 370, 0, 370, 348, 47, 0, - 54, 57, 304, 303, 302, 300, 31, 169, 170, 374, - 373, 3, 375, 367, 0, 0, 0, 0, 0, 0, - 0, 51, 0, 43, 52, 44, 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, 377, 270, 279, 272, 231, - 140, 0, 377, 33, 229, 0, 0, 321, 240, 320, - 0, 0, 334, 365, 364, 248, 70, 377, 377, 296, - 256, 0, 255, 0, 0, 0, 0, 259, 0, 258, - 0, 0, 0, 0, 377, 0, 377, 194, 221, 0, - 0, 183, 184, 196, 0, 377, 186, 187, 224, 0, - 0, 368, 180, 11, 13, 12, 0, 226, 0, 0, - 0, 0, 0, 239, 38, 372, 371, 206, 218, 350, - 219, 372, 349, 0, 377, 376, 6, 15, 16, 17, - 18, 28, 29, 0, 201, 24, 0, 42, 0, 58, - 61, 0, 288, 139, 287, 22, 153, 159, 164, 165, - 166, 161, 163, 173, 174, 167, 168, 146, 147, 171, - 172, 0, 160, 162, 156, 157, 158, 148, 149, 150, - 151, 152, 361, 362, 208, 363, 0, 284, 357, 359, - 358, 360, 282, 0, 179, 377, 377, 0, 145, 0, - 242, 323, 0, 0, 0, 368, 335, 341, 0, 334, - 0, 0, 377, 338, 377, 377, 333, 0, 0, 0, - 197, 198, 0, 377, 262, 377, 257, 377, 0, 290, - 0, 236, 0, 0, 0, 357, 358, 282, 0, 0, - 0, 192, 220, 353, 0, 200, 195, 377, 357, 0, - 0, 0, 352, 223, 285, 181, 10, 0, 176, 0, - 21, 38, 200, 56, 0, 203, 0, 50, 0, 377, - 46, 53, 0, 377, 35, 0, 0, 377, 34, 217, - 268, 0, 0, 266, 0, 141, 280, 0, 0, 0, - 245, 0, 0, 340, 342, 368, 0, 325, 0, 329, - 344, 0, 331, 0, 332, 249, 71, 0, 0, 263, - 0, 0, 297, 0, 0, 260, 0, 292, 0, 0, - 234, 235, 217, 0, 377, 190, 189, 217, 377, 0, - 20, 55, 0, 357, 0, 45, 177, 0, 143, 144, - 0, 0, 267, 0, 0, 0, 0, 322, 241, 347, - 337, 0, 247, 336, 377, 377, 343, 0, 339, 377, - 334, 377, 298, 238, 0, 232, 233, 0, 377, 0, - 185, 0, 188, 227, 202, 59, 283, 281, 142, 269, - 271, 273, 243, 324, 0, 327, 328, 330, 0, 295, - 0, 291, 293, 294, 289, 237, 377, 377, 0, 377, - 191, 326, 250, 261, 0, 0, 0 -}; - -static const short yydefgoto[] = { 645, - 1, 228, 58, 59, 357, 221, 60, 61, 62, 229, - 63, 64, 65, 266, 66, 179, 84, 157, 172, 459, - 158, 159, 68, 438, 359, 434, 435, 352, 204, 343, - 460, 205, 386, 206, 233, 224, 498, 444, 528, 311, - 313, 458, 601, 322, 329, 555, 556, 192, 523, 298, - 436, 300, 437, 70, 71, 180, 396, 327, 471, 635, - 319, 552, 73, 246, 74, 208, 76, 209, 309, 443, - 451, 452, 453, 454, 455, 456, 597, 540, 162, 312, - 236, 210, 211, 195, 478, 428, 316, 252, 220, 368, - 323, 254, 79 -}; - -static const short yypact[] = {-32768, - 1810, 5014, 139, 42, 3321, 4815, 2255, 5104, 5104, 2727, - 5104, 5104, 6272,-32768,-32768,-32768,-32768, 3786, 3876, 3966, --32768,-32768,-32768,-32768, 5104, 4712, -53,-32768, 72,-32768, --32768, 1928, 2138,-32768,-32768, 2033,-32768,-32768,-32768,-32768, --32768,-32768,-32768,-32768,-32768,-32768, 5914, 5914, 42, 2818, - 5914, 5914, 6536, 4609, 6004, 5914,-32768, 226, 355, 212, - 132, 41,-32768, 81, 6360,-32768, 105, 1680, -25, 172, --32768, 54,-32768,-32768, 90,-32768, 159, 3426,-32768, 355, --32768,-32768, 5104, 43,-32768,-32768,-32768,-32768,-32768,-32768, --32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768, --32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768, 125, 142, - 171, 220,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768, --32768,-32768,-32768, 292, 300, 303,-32768, 304,-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,-32768,-32768,-32768,-32768,-32768, --32768, 307,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768, --32768, 94, 195, 3516, 3606, 3696, 25,-32768, 121, 115, - 25, 198, 36, 36, 129, 146, 156, -53,-32768,-32768, - 136, 251, 28, 44, -9, 2926, 5914, 5914, 5914, 1160, --32768, 1427,-32768,-32768, 167,-32768, 187, 97, 106, 181, --32768, 4919,-32768, 5194,-32768,-32768, 278,-32768,-32768, 179, - 209, 3034, 259, 210, 259,-32768, 2818, 215, 236, 272, - 1680, -44, 277,-32768, -44, 279, -28,-32768,-32768, 228, - 245, 274,-32768,-32768,-32768,-32768,-32768, 259, 259,-32768, --32768,-32768,-32768, 3216, 5104, 5104, 5104, 5104, 5104, 5104, - 5554,-32768, 2818, 6536,-32768, 288, 6094, 5914, 5914, 5914, - 5914, 5914, 5914, 5914, 5914, 5914, 5914, 5914, 5914, 5914, - 5914, 5914, 5914, 5914, 5914, 5914, 5914, 5914, 5914, 5914, - 5914, 5914, 5914, 6565, 6624, 5194,-32768,-32768,-32768,-32768, --32768, 5914, 5194,-32768,-32768, 12, 226,-32768,-32768,-32768, - 3125, 5104, 89,-32768,-32768,-32768,-32768, 5914, 385,-32768, --32768, 2363, 389, 5914, 2545, 5644, 393,-32768, 3125,-32768, - 3125, 179, 6565, 6683, 5194, 5104, 774, 1680,-32768, 296, - 5914, 5284,-32768,-32768, 6742, 5194, 5374,-32768,-32768, 311, - 313, -53,-32768,-32768,-32768,-32768, 4815,-32768, 5914, 3034, - 306, 6742, 315,-32768, 320, 5914,-32768,-32768,-32768,-32768, --32768, 5914,-32768, 6801, 5194,-32768, 355, 212, 212, 212, - 212,-32768,-32768, 5914, 322,-32768, 324,-32768, 298, 245, - 274, 6448, 132, 1680,-32768,-32768, 259, 7031, 7031, 7031, - 7031, 485, 485, 7071, 6991, 7031, 7031, 6951, 6951, 138, - 138, 6911, 485, 485, 185, 185, 130, 211, 211, 259, - 259, 259, 4056, 4146, 4236, 4326, 4416,-32768, 186,-32768, - 334,-32768, 4506, 323,-32768, -6, -6, 5914, 1680, 328, --32768,-32768, 5104, 3125, 430, 40, 354, 399, 401, 26, - 3125, 226, 338,-32768, 340, 341,-32768, 4815, 4815, 29, - 345,-32768, 2636, 448,-32768, 362,-32768, 385, 5914, 347, - 18,-32768, 449, 451, 349, 51,-32768, 350, 356, 36, - 378,-32768,-32768, 1680, 5914, 1427,-32768, 359, 144, 358, - 5914, 1427,-32768,-32768,-32768,-32768,-32768, 5104, 1680, 366, --32768, 287, 1680, 263, 365, 1680, 5734,-32768, 6860, 5194, - 6536,-32768, 5914, 5194,-32768, 5914, 5914, 5194,-32768, 250, --32768, 6184, 3125,-32768, 3034, 1680,-32768, 3125, 12, 465, --32768, 369, 5914,-32768,-32768, -53, 471,-32768, 34,-32768, --32768, 38,-32768, 400,-32768,-32768,-32768, 2255, 5914,-32768, - 3125, 480,-32768, 5104, 481,-32768, 482, 1680, 5824, 2454, --32768,-32768, 53, 3125, 774, 5464,-32768, 199, 774, 57, --32768, 299, 5914, 74, 380,-32768, 1680, 384, 1680, 1680, - 388, 5914,-32768, 403, 491, 387, 492,-32768,-32768,-32768, - 1680, 394,-32768, 354, 395, 341,-32768, 354,-32768, 341, - 89, 195,-32768,-32768, 25,-32768,-32768, 5914, 92, 495, --32768, 5914,-32768,-32768, 1680, 299,-32768,-32768, 1680,-32768, --32768,-32768,-32768,-32768, 38,-32768,-32768,-32768, 3125,-32768, - 2363, 1680,-32768,-32768,-32768,-32768, 774, 341, 497, 362, --32768,-32768,-32768,-32768, 508, 512,-32768 -}; - -static const short yypgoto[] = {-32768, --32768, 711,-32768, 13,-32768,-32768, 108, 1461, -11, -70, - -27, -61,-32768,-32768, 461, 453, 61, 14,-32768,-32768, - -237,-32768, 1082,-32768,-32768, -296, -182, 8, -306, -207, --32768, -18,-32768, 16,-32768, -1,-32768,-32768,-32768,-32768, --32768,-32768,-32768, -168, -162, -125, -305, -4, 79,-32768, --32768, -41,-32768,-32768, 252, 703,-32768, -86,-32768,-32768, - -73,-32768,-32768,-32768,-32768, 475, 525, 567,-32768,-32768, - -69, 83,-32768, -481, -8, -494, -284, -413,-32768,-32768, --32768, -36, -342, 93, -126,-32768,-32768,-32768, -167, -63, - -33,-32768, 1100 -}; - - -#define YYLAST 7174 - - -static const short yytable[] = { 69, - 69, 189, 348, 265, 493, 69, 69, 69, 69, 69, - 69, 191, 325, 464, 80, 237, 207, 207, 207, 171, - 332, 331, 230, 69, 253, 203, 203, 215, 457, 493, - 321, 351, 232, 235, 213, 487, 305, 321, 479, 218, - 487, 543, 545, 307, 596, 259, 260, 600, 69, 490, - 310, 240, -58, 207, 328, 294, 426, 432, 259, 260, - 599, 328, 219, 240, 85, 521, 366, 245, -61, 259, - 260, 367, 447, 259, 260, -60, 207, -59, 505, -277, - 594, 69, 372, 295, 598, 304, 296, 367, 81, 522, - 259, 260, 82, 78, 78, 426, 432, 299, -60, 78, - 78, 78, 78, 78, 78, 303, 463, 432, 326, 226, - 78, 78, 78, 448, 449, 177, 181, 78, 183, 184, - 440, 448, 449, -58, 432, 448, 449, 250, 251, 482, - 638, 261, 216, 250, 251, 447, 432, 308, -54, -61, - 250, 251, 78, 599, 250, 251, -60, 78, -59, 330, - 330, 250, 251, 305, -57, 219, 363, -278, 250, 251, - 299, -56, 557, -55, -60, 457, 614, 427, 433, -60, - 78, 370, 301, 373, 487, 78, 448, 449, 222, 301, - -58, 626, 627, -60, 496, 81, 628, -58, 302, 82, - 306, 262, 387, 268, 69, 267, -61, 297, 207, 230, - -54, 268, 318, 450, 317, -312, 475, 203, 281, 282, - 207, 324, 207, 575, 326, 340, 333, 83, 433, 203, - 69, 299, -311, 493, 642, 69, 516, 350, 289, 290, - 291, 292, 293, -312, -60, 230, 289, 290, 291, 292, - 293, 302, 385, 200, 334, 259, 260, 335, 268, -61, - -311, -313, 69, 69, 69, 69, 69, 69, 69, 487, - 212, 69, 389, 281, 282, 207, 377, 294, 516, -57, - 214, 432, 441, 442, 268, 336, -60, 342, 532, -313, - 567, 582, 288, 289, 290, 291, 292, 293, 78, -59, - 333, 347, 78, 358, 207, 345, -56, 548, 346, 461, - -314, 207, 560, 633, 78, 488, 78, 470, 333, 69, - 69, 291, 292, 293, 78, 360, 457, 564, 362, 78, - 69, 346, 268, 69, 364, -317, 354, 69, -314, 69, - 512, 578, 582, 207, 69, 581, 374, 355, 356, 375, - -59, 250, 251, -357, 207, 365, 78, 78, 78, 78, - 78, 78, 78, -317, -216, 78, -317, 611, 69, 78, - -55, 613, 378, 379, 380, 381, 382, 383, 592, -357, - 497, -357, -316, 207, -357, 554, 463, -357, 333, -217, - -315, -39, -216, -307, -310, -216, 371, 314, 78, 369, - 240, 255, 256, 257, 258, 78, -40, -50, 392, 463, - -316, 467, 472, 78, 78, 483, 509, -217, -315, 510, - -217, -307, -310, 501, 78, 315, 517, 78, 538, 446, - 494, 78, 495, 78, 502, 207, 330, 78, 78, 641, - -50, 207, 507, 508, 515, 520, 631, 527, 78, 531, - 519, 69, 69, 480, 533, 534, 330, 535, 539, 69, - 542, 544, 78, 67, 67, 549, 551, 559, 561, 67, - 562, 69, 67, 514, 518, 190, 198, 78, 563, 566, - 568, 546, 547, 571, 589, 75, 75, 572, 590, 160, - 593, 75, 75, 75, 75, 75, 75, 193, 449, 604, - 606, 607, 616, 617, 622, 588, 69, 618, 620, 75, - 621, 623, 67, 624, 636, 625, 643, 646, 207, 389, - 189, 647, 207, 239, 644, 525, 207, 584, 395, 78, - 191, 69, 634, 69, 75, 78, 69, 241, 630, 161, - 595, 629, 536, 0, 0, 78, 78, 0, 0, 241, - 0, 0, 0, 78, 0, 0, 69, 0, 268, 69, - 529, 0, 69, 0, 0, 78, 0, 75, 69, 0, - 0, 0, 69, 281, 282, 0, 0, 77, 77, 0, - 0, 0, 0, 77, 77, 77, 77, 77, 77, 194, - 286, 287, 288, 289, 290, 291, 292, 293, 0, 0, - 78, 77, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 78, 0, 0, 570, 78, 0, 0, 0, - 78, 0, 0, 0, 0, 78, 77, 78, 0, 242, - 78, 0, 0, 0, 0, 0, 0, 69, 0, 69, - 0, 242, 0, 0, 0, 0, 0, 0, 0, 0, - 78, 0, 0, 78, 0, 0, 78, 0, 67, 77, - 0, 0, 78, 0, 0, 0, 78, 0, 0, 0, - 0, 605, 0, 0, 0, 0, 0, 0, 0, 0, - 75, 0, 0, 0, 67, 0, 0, 0, 0, 67, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 75, 0, 0, 0, - 0, 75, 0, 72, 72, 0, 67, 0, 0, 72, - 0, 57, 72, 0, 0, 67, 388, 173, 0, 0, - 182, 78, 0, 78, 0, 0, 0, 0, 75, 75, - 75, 75, 75, 75, 75, 0, 0, 75, 390, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 72, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 77, 67, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 67, 0, 0, 67, 0, 0, - 0, 67, 0, 67, 0, 75, 75, 0, 77, 0, - 0, 0, 0, 77, 0, 0, 75, 0, 0, 75, - 0, 0, 0, 75, 0, 75, 0, 0, 0, 0, - 75, 0, 67, 0, 0, 0, 0, 0, 0, 0, - 77, 77, 77, 77, 77, 77, 77, 0, 0, 77, - 391, 0, 0, 0, 75, 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, 0, 0, 0, 283, 241, 284, 285, 286, - 287, 288, 289, 290, 291, 292, 293, 77, 77, 0, - 0, 0, 0, 0, 481, 0, 0, 0, 77, 0, - 0, 77, 0, 0, 0, 77, 67, 77, 72, 0, - 0, 0, 77, 67, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 67, 0, 75, 75, 0, - 0, 0, 0, 0, 72, 75, 77, 0, 0, 72, - 0, 0, 361, 0, 0, 0, 0, 75, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 72, 0, 242, 0, - 0, 0, 0, 576, 0, 72, 0, 0, 0, 72, - 0, 0, 75, 0, 190, 67, 0, 67, 0, 0, - 67, 0, 0, 0, 0, 390, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 193, 75, 0, 75, - 67, 0, 75, 67, 0, 0, 0, 0, 0, 77, - 77, 0, 67, 72, 0, 0, 67, 77, 0, 0, - 0, 445, 75, 0, 72, 75, 0, 72, 75, 77, - 0, 72, 466, 72, 75, 468, 0, 0, 75, 473, - 0, 474, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 72, 0, 77, 0, 0, 0, 0, 0, - 500, 0, 0, 0, 0, 0, 0, 391, 0, 0, - 0, 67, 0, 67, 0, 0, 0, 0, 194, 77, - 0, 77, 0, 0, 77, 0, 0, 0, 0, 202, - 202, 202, 0, 75, 0, 75, 0, 0, 0, 0, - 0, 0, 0, 0, 77, 0, 0, 77, 0, 0, - 77, 0, 0, 0, 0, 0, 77, 0, 223, 225, - 77, 0, 231, 202, 0, 0, 248, 249, 0, 0, - 0, 0, 0, 0, 0, 0, 72, 0, 0, 0, - 234, 238, 0, 72, 530, 0, 0, 0, 0, 202, - 0, 537, 3, 4, 5, 72, 7, 0, 0, 0, - 8, 9, 0, 550, 0, 10, 0, 11, 12, 13, - 14, 15, 16, 17, 0, 0, 185, 186, 20, 21, - 22, 23, 24, 0, 0, 77, 0, 77, 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, 72, 0, 72, 0, 0, - 72, 0, 0, 585, 0, 586, 0, 0, 587, 0, - 0, 49, 0, 0, 196, 51, 52, 197, 198, 54, - 72, 0, 0, 72, 0, 0, 0, 0, 602, 0, - 0, 603, 72, 199, 56, 0, 72, 0, 0, 339, - 609, 0, 320, 0, 610, 0, 0, 0, 337, 338, - 248, 202, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 202, 0, 202, 0, 0, 0, 0, - 0, 0, 0, 0, 344, 0, 0, 0, 0, 344, - 0, 0, 0, 353, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 72, 0, 72, 0, 0, 0, 0, 0, 639, - 0, 640, 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, 439, 202, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 353, 0, 0, 0, 231, - 0, 0, 353, 0, 0, 394, 0, 231, 0, 0, - 0, 0, 0, 0, 0, 0, 202, 462, 465, 0, - 0, 0, 484, 486, 0, 0, 0, 202, 492, 0, - 0, 0, 0, 0, 353, 0, 344, 0, 0, 0, - 499, 0, 0, 0, 0, 353, 0, 503, 0, 0, - 0, 0, 0, 492, 0, 0, 202, 0, 0, 0, - 0, 0, 0, 0, 0, 506, 0, 0, 178, 178, - 0, 178, 178, 0, 353, 0, 0, 0, 201, 201, - 201, 0, 0, 0, 0, 178, 0, 0, 0, 0, - 268, 269, 270, 271, 272, 273, 274, 275, 276, 277, - 278, 279, 280, 0, 0, 281, 282, 0, 202, 0, - 341, 0, 0, 0, 202, 247, 0, 0, 283, 526, - 284, 285, 286, 287, 288, 289, 290, 291, 292, 293, - 0, 0, 0, 0, 0, 524, 524, 0, 201, 0, - 0, 0, 0, 178, 0, 0, 0, 0, 0, 0, - 558, 0, 541, 0, 541, 541, 0, 0, 0, 0, - 0, 0, 0, 553, 0, 465, 565, 465, 0, 0, - 0, 0, 569, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 344, 503, 0, - 0, 202, 0, 0, 577, 202, 0, 579, 580, 202, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 353, - 0, 0, 0, 353, 591, 0, 0, 353, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 503, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 503, 0, 0, 0, 0, 0, 0, 492, 0, 0, - 0, 0, 0, 0, 615, 0, 0, 0, 0, 0, - 201, 0, 0, 619, 344, 0, 0, 0, 344, 0, - 0, 0, 201, 0, 201, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 632, - 0, 0, 0, 637, 541, 541, 0, 0, 0, 541, - 0, 320, 0, 0, 0, 0, 0, 0, 465, 0, - 0, 0, 0, 0, 0, 178, 178, 178, 178, 178, - 178, 0, 0, 0, 0, 0, 0, 393, 0, 0, - 0, 0, 0, 0, 0, 0, 344, 541, 0, 465, - 0, 0, 0, 268, 269, 270, 271, 272, 273, 274, - 275, 276, 277, 278, 279, 280, 201, 0, 281, 282, - 0, 0, 0, 201, 0, 0, 0, 0, 0, 0, - 0, 283, 178, 284, 285, 286, 287, 288, 289, 290, - 291, 292, 293, 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, -377, - 2, 0, 3, 4, 5, 6, 7, 0, 0, 0, - 8, 9, 0, 0, 0, 10, 0, 11, 12, 13, - 14, 15, 16, 17, 0, 201, 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, 201, 0, 0, - 0, 49, 0, 201, 50, 51, 52, 53, 0, 54, - 0, 0, 0, 178, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 55, 56, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, -377, -377, -307, 0, 0, - 0, 0, 0, 0, 0, -307, -307, -307, 0, 0, - 0, -307, -307, 0, -307, 0, 0, 0, 0, 0, - 0, 0, 0, -274, 0, 0, 0, 0, 178, 0, - 0, -307, -307, 0, -307, -307, -307, -307, 0, 0, - 201, 0, 0, 0, 201, 0, 0, 0, 201, 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, 178, 0, 0, 0, -307, -307, - 0, -307, -307, -307, -307, -307, -307, -307, -307, -307, - -307, 0, -310, 0, 0, -307, -307, -307, -307, -307, - -310, -310, -310, -307, -307, 0, -310, -310, 0, -310, - 0, 0, 0, 0, 0, 0, 0, 0, -275, 0, - 0, 0, 0, 0, 0, 0, -310, -310, 0, -310, - -310, -310, -310, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, -310, -310, -310, -310, - -310, -310, -310, -310, -310, -310, -310, -310, -310, 0, - 0, -310, -310, -310, 0, -310, 0, 0, 0, 0, - 0, 0, 0, -310, -310, 0, -310, -310, -310, -310, - -310, -310, -310, -310, -310, -310, 0, -228, 0, 0, - -310, -310, -310, -310, -310, -228, -228, -228, -310, -310, - 0, -228, -228, 0, -228, 0, 0, 0, 0, 0, - 0, 0, 0, -276, 0, 0, 0, 0, 0, 0, - 0, -228, -228, 0, -228, -228, -228, -228, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, -228, -228, -228, -228, -228, -228, -228, -228, -228, - -228, -228, -228, -228, 0, 0, -228, -228, -228, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, -228, - 0, -228, -228, -228, -228, -228, -228, -228, -228, -228, - -228, 0, 0, 0, 0, -228, -228, -228, 0, -228, - 0, 0, 0, -228, -228, 2, 0, 3, 4, 5, - 6, 7, -377, -377, -377, 8, 9, 0, 0, -377, - 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, - -377, -377, -377, 8, 9, 0, -377, -377, 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, -377, 8, 9, 55, 56, -377, 10, - -377, 11, 12, 13, 14, 15, 16, 17, -377, -377, - 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, -377, 8, 9, 55, 56, -377, - 10, 0, 11, 12, 13, 14, 15, 16, 17, -377, - -377, 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, -377, -377, 8, 9, 55, 56, - 0, 10, 0, 11, 12, 13, 14, 15, 16, 17, - -377, -377, 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, -377, 11, 12, 13, 14, 15, 16, - 17, -377, -377, 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, -377, -377, 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, -377, 3, 4, - 5, 6, 7, -377, -377, 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, -377, 3, 4, 5, 6, - 7, -377, -377, 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, -377, 8, 9, 55, 56, 0, - 10, -377, 11, 12, 13, 14, 15, 16, 17, -377, - -377, 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, - -377, -377, 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, -354, -354, - -354, 0, -354, 0, 0, 0, -354, -354, 0, 199, - 56, -354, 299, -354, -354, -354, -354, -354, -354, -354, - 303, 0, -354, -354, -354, -354, -354, -354, -354, 0, - 0, 0, 0, 0, 0, 0, 0, -354, 0, 0, - -354, -354, -354, -354, -354, -354, -354, -354, -354, -354, - -354, -354, -354, -354, -354, -354, -354, -354, -354, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, -354, 0, 0, - -354, -354, -354, -354, -354, -354, 0, 0, -356, -356, - -356, 0, -356, 0, 0, 0, -356, -356, 0, -354, - -354, -356, -354, -356, -356, -356, -356, -356, -356, -356, - -354, 0, -356, -356, -356, -356, -356, -356, -356, 0, - 0, 0, 0, 0, 0, 0, 0, -356, 0, 0, - -356, -356, -356, -356, -356, -356, -356, -356, -356, -356, - -356, -356, -356, -356, -356, -356, -356, -356, -356, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, -356, 0, 0, - -356, -356, -356, -356, -356, -356, 0, 0, -355, -355, - -355, 0, -355, 0, 0, 0, -355, -355, 0, -356, - -356, -355, -356, -355, -355, -355, -355, -355, -355, -355, - -356, 0, -355, -355, -355, -355, -355, -355, -355, 0, - 0, 0, 0, 0, 0, 0, 0, -355, 0, 0, - -355, -355, -355, -355, -355, -355, -355, -355, -355, -355, - -355, -355, -355, -355, -355, -355, -355, -355, -355, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, -355, 0, 0, - -355, -355, -355, -355, -355, -355, 0, 0, 3, 4, - 5, 0, 7, 0, 0, 0, 8, 9, 0, -355, - -355, 10, -355, 11, 12, 13, 14, 15, 16, 17, - -355, 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, -357, -357, - -357, 0, -357, 0, 0, 0, -357, -357, 0, 199, - 56, -357, 0, -357, -357, -357, -357, -357, -357, -357, - 214, 0, -357, -357, -357, -357, -357, -357, -357, 0, - 0, 0, 0, 0, 0, 0, 0, -357, 0, 0, - -357, -357, -357, -357, -357, -357, -357, -357, -357, -357, - -357, -357, -357, -357, -357, -357, -357, -357, -357, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, -357, 0, 0, - -357, -357, -357, -357, -357, -357, 0, 0, -359, -359, - -359, 0, -359, 0, 0, 0, -359, -359, 0, -357, - -357, -359, 0, -359, -359, -359, -359, -359, -359, -359, - -357, 0, -359, -359, -359, -359, -359, -359, -359, 0, - 0, 0, 0, 0, 0, 0, 0, -359, 0, 0, - -359, -359, -359, -359, -359, -359, -359, -359, -359, -359, - -359, -359, -359, -359, -359, -359, -359, -359, -359, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, -359, 0, 0, - -359, -359, -359, -359, -359, -359, 0, 0, -358, -358, - -358, 0, -358, 0, 0, 0, -358, -358, 0, -359, - -359, -358, 0, -358, -358, -358, -358, -358, -358, -358, - -359, 0, -358, -358, -358, -358, -358, -358, -358, 0, - 0, 0, 0, 0, 0, 0, 0, -358, 0, 0, - -358, -358, -358, -358, -358, -358, -358, -358, -358, -358, - -358, -358, -358, -358, -358, -358, -358, -358, -358, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, -358, 0, 0, - -358, -358, -358, -358, -358, -358, 0, 0, -360, -360, - -360, 0, -360, 0, 0, 0, -360, -360, 0, -358, - -358, -360, 0, -360, -360, -360, -360, -360, -360, -360, - -358, 0, -360, -360, -360, -360, -360, -360, -360, 0, - 0, 0, 0, 0, 0, 0, 0, -360, 0, 0, - -360, -360, -360, -360, -360, -360, -360, -360, -360, -360, - -360, -360, -360, -360, -360, -360, -360, -360, -360, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, -360, 0, 0, - -360, -360, -360, -360, -360, -360, 0, 0, 3, 4, - 5, 0, 7, 0, 0, 0, 8, 9, 0, -360, - -360, 10, 0, 11, 12, 13, 14, 15, 16, 17, - -360, 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, - 514, 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, - 518, 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, 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, 485, 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, 491, 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, 612, 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, 469, 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, 573, 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, 608, 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, 583, - 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, 511, 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, 423, 424, 0, 0, 425, 0, 49, 0, 0, - 196, 51, 52, 0, 0, 54, 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, - 429, 430, 0, 0, 431, 0, 0, 0, 155, 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, 476, - 430, 0, 0, 477, 0, 0, 0, 155, 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, 489, 430, - 0, 0, 431, 0, 0, 0, 155, 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, 504, 430, 0, - 0, 477, 0, 0, 0, 155, 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, 574, 430, 0, 0, - 477, 0, 0, 0, 155, 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, 0, 0, 0, - 0, 0, 0, 155, 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, 513, 284, 285, 286, 287, 288, 289, - 290, 291, 292, 293, 268, 269, 270, 271, 272, 273, - 274, 275, 276, 277, 278,-32768,-32768, 0, 0, 281, - 282, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 284, 285, 286, 287, 288, 289, - 290, 291, 292, 293, 268, 269, 270, 271, 272, 273, - 274, 275, 0, 277, 278, 0, 0, 0, 0, 281, - 282, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 284, 285, 286, 287, 288, 289, - 290, 291, 292, 293, 268,-32768,-32768,-32768,-32768, 273, - 274, 0, 0,-32768,-32768, 0, 0, 0, 0, 281, - 282, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 284, 285, 286, 287, 288, 289, - 290, 291, 292, 293, 268, 269, 270, 271, 272, 273, - 274, 0, 0, 277, 278, 0, 0, 0, 0, 281, - 282, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 284, 285, 286, 287, 288, 289, - 290, 291, 292, 293 -}; - -static const short yycheck[] = { 1, - 2, 13, 210, 65, 347, 7, 8, 9, 10, 11, - 12, 13, 181, 319, 2, 52, 18, 19, 20, 6, - 188, 184, 50, 25, 58, 18, 19, 20, 313, 372, - 13, 214, 51, 52, 19, 342, 78, 13, 335, 26, - 347, 455, 456, 1, 539, 34, 35, 542, 50, 346, - 84, 53, 25, 55, 26, 81, 294, 295, 34, 35, - 542, 26, 116, 65, 4, 72, 111, 54, 25, 34, - 35, 116, 47, 34, 35, 25, 78, 25, 375, 26, - 47, 83, 111, 109, 47, 78, 112, 116, 47, 96, - 34, 35, 51, 1, 2, 333, 334, 107, 25, 7, - 8, 9, 10, 11, 12, 115, 15, 345, 17, 49, - 18, 19, 20, 88, 89, 8, 9, 25, 11, 12, - 303, 88, 89, 96, 362, 88, 89, 116, 117, 337, - 625, 91, 25, 116, 117, 47, 374, 95, 111, 96, - 116, 117, 50, 625, 116, 117, 96, 55, 96, 183, - 184, 116, 117, 195, 111, 116, 227, 26, 116, 117, - 107, 111, 468, 111, 91, 450, 110, 294, 295, 96, - 78, 235, 83, 237, 481, 83, 88, 89, 107, 83, - 91, 595, 596, 110, 352, 47, 600, 91, 83, 51, - 83, 111, 263, 64, 196, 91, 91, 26, 200, 227, - 111, 64, 8, 115, 111, 81, 333, 200, 79, 80, - 212, 91, 214, 510, 17, 200, 81, 79, 345, 212, - 222, 107, 81, 566, 638, 227, 83, 212, 99, 100, - 101, 102, 103, 109, 91, 263, 99, 100, 101, 102, - 103, 83, 261, 115, 109, 34, 35, 112, 64, 91, - 109, 81, 254, 255, 256, 257, 258, 259, 260, 566, - 115, 263, 264, 79, 80, 267, 254, 81, 83, 111, - 115, 509, 306, 307, 64, 25, 91, 111, 446, 109, - 488, 83, 98, 99, 100, 101, 102, 103, 196, 91, - 81, 111, 200, 115, 296, 109, 111, 460, 112, 318, - 81, 303, 471, 609, 212, 342, 214, 326, 81, 311, - 312, 101, 102, 103, 222, 107, 601, 480, 109, 227, - 322, 112, 64, 325, 110, 81, 49, 329, 109, 331, - 392, 514, 83, 335, 336, 518, 109, 60, 61, 112, - 91, 116, 117, 81, 346, 110, 254, 255, 256, 257, - 258, 259, 260, 109, 81, 263, 112, 565, 360, 267, - 111, 569, 255, 256, 257, 258, 259, 260, 536, 107, - 357, 109, 81, 375, 112, 14, 15, 115, 81, 81, - 81, 110, 109, 81, 81, 112, 108, 81, 296, 113, - 392, 37, 38, 39, 40, 303, 110, 111, 111, 15, - 109, 13, 10, 311, 312, 110, 109, 109, 109, 112, - 112, 109, 109, 108, 322, 109, 83, 325, 452, 312, - 110, 329, 110, 331, 110, 427, 460, 335, 336, 637, - 111, 433, 111, 110, 427, 113, 605, 110, 346, 10, - 433, 443, 444, 336, 91, 47, 480, 47, 111, 451, - 111, 111, 360, 1, 2, 111, 9, 111, 10, 7, - 10, 463, 10, 115, 115, 13, 89, 375, 113, 111, - 113, 458, 459, 108, 10, 1, 2, 113, 110, 5, - 10, 7, 8, 9, 10, 11, 12, 13, 89, 10, - 10, 10, 113, 110, 108, 529, 498, 110, 96, 25, - 10, 10, 50, 110, 10, 111, 10, 0, 510, 511, - 522, 0, 514, 53, 640, 437, 518, 522, 267, 427, - 522, 523, 609, 525, 50, 433, 528, 53, 602, 5, - 539, 601, 450, -1, -1, 443, 444, -1, -1, 65, - -1, -1, -1, 451, -1, -1, 548, -1, 64, 551, - 443, -1, 554, -1, -1, 463, -1, 83, 560, -1, - -1, -1, 564, 79, 80, -1, -1, 1, 2, -1, - -1, -1, -1, 7, 8, 9, 10, 11, 12, 13, - 96, 97, 98, 99, 100, 101, 102, 103, -1, -1, - 498, 25, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, 510, -1, -1, 498, 514, -1, -1, -1, - 518, -1, -1, -1, -1, 523, 50, 525, -1, 53, - 528, -1, -1, -1, -1, -1, -1, 629, -1, 631, - -1, 65, -1, -1, -1, -1, -1, -1, -1, -1, - 548, -1, -1, 551, -1, -1, 554, -1, 196, 83, - -1, -1, 560, -1, -1, -1, 564, -1, -1, -1, - -1, 554, -1, -1, -1, -1, -1, -1, -1, -1, - 196, -1, -1, -1, 222, -1, -1, -1, -1, 227, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, 222, -1, -1, -1, - -1, 227, -1, 1, 2, -1, 254, -1, -1, 7, - -1, 1, 10, -1, -1, 263, 264, 7, -1, -1, - 10, 629, -1, 631, -1, -1, -1, -1, 254, 255, - 256, 257, 258, 259, 260, -1, -1, 263, 264, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, 50, -1, -1, -1, -1, -1, -1, -1, - -1, -1, 196, 311, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, 322, -1, -1, 325, -1, -1, - -1, 329, -1, 331, -1, 311, 312, -1, 222, -1, - -1, -1, -1, 227, -1, -1, 322, -1, -1, 325, - -1, -1, -1, 329, -1, 331, -1, -1, -1, -1, - 336, -1, 360, -1, -1, -1, -1, -1, -1, -1, - 254, 255, 256, 257, 258, 259, 260, -1, -1, 263, - 264, -1, -1, -1, 360, -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, -1, -1, -1, 92, 392, 94, 95, 96, - 97, 98, 99, 100, 101, 102, 103, 311, 312, -1, - -1, -1, -1, -1, 111, -1, -1, -1, 322, -1, - -1, 325, -1, -1, -1, 329, 444, 331, 196, -1, - -1, -1, 336, 451, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, 463, -1, 443, 444, -1, - -1, -1, -1, -1, 222, 451, 360, -1, -1, 227, - -1, -1, 222, -1, -1, -1, -1, 463, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, 254, -1, 392, -1, - -1, -1, -1, 511, -1, 263, -1, -1, -1, 267, - -1, -1, 498, -1, 522, 523, -1, 525, -1, -1, - 528, -1, -1, -1, -1, 511, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, 522, 523, -1, 525, - 548, -1, 528, 551, -1, -1, -1, -1, -1, 443, - 444, -1, 560, 311, -1, -1, 564, 451, -1, -1, - -1, 311, 548, -1, 322, 551, -1, 325, 554, 463, - -1, 329, 322, 331, 560, 325, -1, -1, 564, 329, - -1, 331, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, 360, -1, 498, -1, -1, -1, -1, -1, - 360, -1, -1, -1, -1, -1, -1, 511, -1, -1, - -1, 629, -1, 631, -1, -1, -1, -1, 522, 523, - -1, 525, -1, -1, 528, -1, -1, -1, -1, 18, - 19, 20, -1, 629, -1, 631, -1, -1, -1, -1, - -1, -1, -1, -1, 548, -1, -1, 551, -1, -1, - 554, -1, -1, -1, -1, -1, 560, -1, 47, 48, - 564, -1, 51, 52, -1, -1, 55, 56, -1, -1, - -1, -1, -1, -1, -1, -1, 444, -1, -1, -1, - 51, 52, -1, 451, 444, -1, -1, -1, -1, 78, - -1, 451, 3, 4, 5, 463, 7, -1, -1, -1, - 11, 12, -1, 463, -1, 16, -1, 18, 19, 20, - 21, 22, 23, 24, -1, -1, 27, 28, 29, 30, - 31, 32, 33, -1, -1, 629, -1, 631, -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, 523, -1, 525, -1, -1, - 528, -1, -1, 523, -1, 525, -1, -1, 528, -1, - -1, 82, -1, -1, 85, 86, 87, 88, 89, 90, - 548, -1, -1, 551, -1, -1, -1, -1, 548, -1, - -1, 551, 560, 104, 105, -1, 564, -1, -1, 110, - 560, -1, 173, -1, 564, -1, -1, -1, 197, 198, - 199, 200, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, 212, -1, 214, -1, -1, -1, -1, - -1, -1, -1, -1, 205, -1, -1, -1, -1, 210, - -1, -1, -1, 214, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, 629, -1, 631, -1, -1, -1, -1, -1, 629, - -1, 631, 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, 296, -1, -1, -1, 318, - -1, -1, 303, -1, -1, 324, -1, 326, -1, -1, - -1, -1, -1, -1, -1, -1, 335, 318, 319, -1, - -1, -1, 341, 342, -1, -1, -1, 346, 347, -1, - -1, -1, -1, -1, 335, -1, 337, -1, -1, -1, - 359, -1, -1, -1, -1, 346, -1, 366, -1, -1, - -1, -1, -1, 372, -1, -1, 375, -1, -1, -1, - -1, -1, -1, -1, -1, 384, -1, -1, 8, 9, - -1, 11, 12, -1, 375, -1, -1, -1, 18, 19, - 20, -1, -1, -1, -1, 25, -1, -1, -1, -1, - 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, - 74, 75, 76, -1, -1, 79, 80, -1, 427, -1, - 84, -1, -1, -1, 433, 55, -1, -1, 92, 438, - 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, - -1, -1, -1, -1, -1, 436, 437, -1, 78, -1, - -1, -1, -1, 83, -1, -1, -1, -1, -1, -1, - 469, -1, 453, -1, 455, 456, -1, -1, -1, -1, - -1, -1, -1, 464, -1, 466, 485, 468, -1, -1, - -1, -1, 491, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, 488, 507, -1, - -1, 510, -1, -1, 513, 514, -1, 516, 517, 518, - -1, -1, -1, -1, -1, -1, -1, -1, -1, 510, - -1, -1, -1, 514, 533, -1, -1, 518, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - 549, -1, -1, -1, -1, -1, -1, -1, -1, -1, - 559, -1, -1, -1, -1, -1, -1, 566, -1, -1, - -1, -1, -1, -1, 573, -1, -1, -1, -1, -1, - 200, -1, -1, 582, 565, -1, -1, -1, 569, -1, - -1, -1, 212, -1, 214, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, 608, - -1, -1, -1, 612, 595, 596, -1, -1, -1, 600, - -1, 602, -1, -1, -1, -1, -1, -1, 609, -1, - -1, -1, -1, -1, -1, 255, 256, 257, 258, 259, - 260, -1, -1, -1, -1, -1, -1, 267, -1, -1, - -1, -1, -1, -1, -1, -1, 637, 638, -1, 640, - -1, -1, -1, 64, 65, 66, 67, 68, 69, 70, - 71, 72, 73, 74, 75, 76, 296, -1, 79, 80, - -1, -1, -1, 303, -1, -1, -1, -1, -1, -1, - -1, 92, 312, 94, 95, 96, 97, 98, 99, 100, - 101, 102, 103, -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, 0, - 1, -1, 3, 4, 5, 6, 7, -1, -1, -1, - 11, 12, -1, -1, -1, 16, -1, 18, 19, 20, - 21, 22, 23, 24, -1, 375, 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, 427, -1, -1, - -1, 82, -1, 433, 85, 86, 87, 88, -1, 90, - -1, -1, -1, 443, -1, -1, -1, -1, -1, -1, - -1, -1, -1, 104, 105, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, 116, 117, 0, -1, -1, - -1, -1, -1, -1, -1, 8, 9, 10, -1, -1, - -1, 14, 15, -1, 17, -1, -1, -1, -1, -1, - -1, -1, -1, 26, -1, -1, -1, -1, 498, -1, - -1, 34, 35, -1, 37, 38, 39, 40, -1, -1, - 510, -1, -1, -1, 514, -1, -1, -1, 518, -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, 554, -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, 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, 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, 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, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, 47, 48, -1, -1, 51, -1, 82, -1, -1, - 85, 86, 87, -1, -1, 90, 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, - 47, 48, -1, -1, 51, -1, -1, -1, 114, -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, 47, - 48, -1, -1, 51, -1, -1, -1, 114, -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, 47, 48, - -1, -1, 51, -1, -1, -1, 114, -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, 47, 48, -1, - -1, 51, -1, -1, -1, 114, -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, 47, 48, -1, -1, - 51, -1, -1, -1, 114, -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, -1, -1, -1, - -1, -1, -1, 114, 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, 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, -1, -1, 94, 95, 96, 97, 98, 99, - 100, 101, 102, 103, 64, 65, 66, 67, 68, 69, - 70, 71, -1, 73, 74, -1, -1, -1, -1, 79, - 80, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, 94, 95, 96, 97, 98, 99, - 100, 101, 102, 103, 64, 65, 66, 67, 68, 69, - 70, -1, -1, 73, 74, -1, -1, -1, -1, 79, - 80, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, 94, 95, 96, 97, 98, 99, - 100, 101, 102, 103, 64, 65, 66, 67, 68, 69, - 70, -1, -1, 73, 74, -1, -1, -1, -1, 79, - 80, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -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 232 "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 241 "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 261 "parse.y" -{ - void_stmts(yyvsp[-1].node); - yyval.node = yyvsp[-1].node; - ; - break;} -case 5: -#line 268 "parse.y" -{ - yyval.node = newline_node(yyvsp[0].node); - ; - break;} -case 6: -#line 272 "parse.y" -{ - yyval.node = block_append(yyvsp[-2].node, newline_node(yyvsp[0].node)); - ; - break;} -case 7: -#line 276 "parse.y" -{ - yyval.node = yyvsp[0].node; - ; - break;} -case 9: -#line 281 "parse.y" -{lex_state = EXPR_FNAME;; - break;} -case 10: -#line 282 "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 288 "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 294 "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 303 "parse.y" -{ - yyerror("can't make alias for the number variables"); - yyval.node = 0; - ; - break;} -case 14: -#line 308 "parse.y" -{ - if (cur_mid || in_single) - yyerror("undef within method"); - yyval.node = yyvsp[0].node; - ; - break;} -case 15: -#line 314 "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 320 "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 326 "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 336 "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 346 "parse.y" -{ - if (cur_mid || in_single) { - yyerror("BEGIN in method"); - } - local_push(); - ; - break;} -case 20: -#line 353 "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 360 "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 368 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = node_assign(yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 24: -#line 375 "parse.y" -{ - value_expr(yyvsp[0].node); - yyvsp[-2].node->nd_value = yyvsp[0].node; - yyval.node = yyvsp[-2].node; - ; - break;} -case 25: -#line 381 "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 388 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = NEW_YIELD(yyvsp[0].node); - ; - break;} -case 28: -#line 394 "parse.y" -{ - yyval.node = logop(NODE_AND, yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 29: -#line 398 "parse.y" -{ - yyval.node = logop(NODE_OR, yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 30: -#line 402 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = NEW_NOT(cond(yyvsp[0].node)); - ; - break;} -case 31: -#line 407 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = NEW_NOT(cond(yyvsp[0].node)); - ; - break;} -case 33: -#line 414 "parse.y" -{ - yyval.node = new_fcall(yyvsp[-1].id, yyvsp[0].node); - fixpos(yyval.node, yyvsp[0].node); - ; - break;} -case 34: -#line 419 "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 425 "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 431 "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 440 "parse.y" -{ - yyval.node = yyvsp[-1].node; - ; - break;} -case 40: -#line 446 "parse.y" -{ - yyval.node = NEW_MASGN(NEW_LIST(yyvsp[-1].node), 0); - ; - break;} -case 41: -#line 451 "parse.y" -{ - yyval.node = NEW_MASGN(NEW_LIST(yyvsp[0].node), 0); - ; - break;} -case 42: -#line 455 "parse.y" -{ - yyval.node = NEW_MASGN(NEW_LIST(yyvsp[-2].node), yyvsp[0].node); - ; - break;} -case 43: -#line 459 "parse.y" -{ - yyval.node = NEW_MASGN(NEW_LIST(yyvsp[-1].node), -1); - ; - break;} -case 44: -#line 463 "parse.y" -{ - yyval.node = NEW_MASGN(list_concat(NEW_LIST(yyvsp[-1].node),yyvsp[0].node), 0); - ; - break;} -case 45: -#line 467 "parse.y" -{ - yyval.node = NEW_MASGN(list_concat(NEW_LIST(yyvsp[-4].node),yyvsp[-3].node),yyvsp[0].node); - ; - break;} -case 46: -#line 471 "parse.y" -{ - yyval.node = NEW_MASGN(list_concat(NEW_LIST(yyvsp[-3].node),yyvsp[-2].node),-1); - ; - break;} -case 47: -#line 475 "parse.y" -{ - yyval.node = NEW_MASGN(0, yyvsp[0].node); - ; - break;} -case 48: -#line 479 "parse.y" -{ - yyval.node = NEW_MASGN(0, -1); - ; - break;} -case 50: -#line 485 "parse.y" -{ - yyval.node = yyvsp[-1].node; - ; - break;} -case 51: -#line 490 "parse.y" -{ - yyval.node = yyvsp[-1].node; - ; - break;} -case 52: -#line 495 "parse.y" -{ - yyval.node = NEW_LIST(yyvsp[0].node); - ; - break;} -case 53: -#line 499 "parse.y" -{ - yyval.node = list_append(yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 54: -#line 504 "parse.y" -{ - yyval.node = assignable(yyvsp[0].id, 0); - ; - break;} -case 55: -#line 508 "parse.y" -{ - yyval.node = aryset(yyvsp[-3].node, yyvsp[-1].node); - ; - break;} -case 56: -#line 512 "parse.y" -{ - yyval.node = attrset(yyvsp[-2].node, yyvsp[0].id); - ; - break;} -case 57: -#line 516 "parse.y" -{ - rb_backref_error(yyvsp[0].node); - yyval.node = 0; - ; - break;} -case 58: -#line 522 "parse.y" -{ - yyval.node = assignable(yyvsp[0].id, 0); - ; - break;} -case 59: -#line 526 "parse.y" -{ - yyval.node = aryset(yyvsp[-3].node, yyvsp[-1].node); - ; - break;} -case 60: -#line 530 "parse.y" -{ - yyval.node = attrset(yyvsp[-2].node, yyvsp[0].id); - ; - break;} -case 61: -#line 534 "parse.y" -{ - rb_backref_error(yyvsp[0].node); - yyval.node = 0; - ; - break;} -case 62: -#line 540 "parse.y" -{ - yyerror("class/module name must be CONSTANT"); - ; - break;} -case 67: -#line 549 "parse.y" -{ - lex_state = EXPR_END; - yyval.id = yyvsp[0].id; - ; - break;} -case 68: -#line 554 "parse.y" -{ - lex_state = EXPR_END; - yyval.id = yyvsp[0].id; - ; - break;} -case 69: -#line 560 "parse.y" -{ - yyval.node = NEW_UNDEF(yyvsp[0].id); - ; - break;} -case 70: -#line 563 "parse.y" -{lex_state = EXPR_FNAME;; - break;} -case 71: -#line 564 "parse.y" -{ - yyval.node = block_append(yyvsp[-3].node, NEW_UNDEF(yyvsp[0].id)); - ; - break;} -case 72: -#line 568 "parse.y" -{ yyval.id = tDOT2; ; - break;} -case 73: -#line 569 "parse.y" -{ yyval.id = '|'; ; - break;} -case 74: -#line 570 "parse.y" -{ yyval.id = '^'; ; - break;} -case 75: -#line 571 "parse.y" -{ yyval.id = '&'; ; - break;} -case 76: -#line 572 "parse.y" -{ yyval.id = tCMP; ; - break;} -case 77: -#line 573 "parse.y" -{ yyval.id = tEQ; ; - break;} -case 78: -#line 574 "parse.y" -{ yyval.id = tEQQ; ; - break;} -case 79: -#line 575 "parse.y" -{ yyval.id = tMATCH; ; - break;} -case 80: -#line 576 "parse.y" -{ yyval.id = '>'; ; - break;} -case 81: -#line 577 "parse.y" -{ yyval.id = tGEQ; ; - break;} -case 82: -#line 578 "parse.y" -{ yyval.id = '<'; ; - break;} -case 83: -#line 579 "parse.y" -{ yyval.id = tLEQ; ; - break;} -case 84: -#line 580 "parse.y" -{ yyval.id = tLSHFT; ; - break;} -case 85: -#line 581 "parse.y" -{ yyval.id = tRSHFT; ; - break;} -case 86: -#line 582 "parse.y" -{ yyval.id = '+'; ; - break;} -case 87: -#line 583 "parse.y" -{ yyval.id = '-'; ; - break;} -case 88: -#line 584 "parse.y" -{ yyval.id = '*'; ; - break;} -case 89: -#line 585 "parse.y" -{ yyval.id = '*'; ; - break;} -case 90: -#line 586 "parse.y" -{ yyval.id = '/'; ; - break;} -case 91: -#line 587 "parse.y" -{ yyval.id = '%'; ; - break;} -case 92: -#line 588 "parse.y" -{ yyval.id = tPOW; ; - break;} -case 93: -#line 589 "parse.y" -{ yyval.id = '~'; ; - break;} -case 94: -#line 590 "parse.y" -{ yyval.id = tUPLUS; ; - break;} -case 95: -#line 591 "parse.y" -{ yyval.id = tUMINUS; ; - break;} -case 96: -#line 592 "parse.y" -{ yyval.id = tAREF; ; - break;} -case 97: -#line 593 "parse.y" -{ yyval.id = tASET; ; - break;} -case 98: -#line 594 "parse.y" -{ yyval.id = '`'; ; - break;} -case 139: -#line 605 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = node_assign(yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 140: -#line 609 "parse.y" -{yyval.node = assignable(yyvsp[-1].id, 0);; - break;} -case 141: -#line 610 "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 142: -#line 626 "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 143: -#line 641 "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 144: -#line 652 "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 145: -#line 663 "parse.y" -{ - rb_backref_error(yyvsp[-2].node); - yyval.node = 0; - ; - break;} -case 146: -#line 668 "parse.y" -{ - yyval.node = NEW_DOT2(yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 147: -#line 672 "parse.y" -{ - yyval.node = NEW_DOT3(yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 148: -#line 676 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, '+', 1, yyvsp[0].node); - ; - break;} -case 149: -#line 680 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, '-', 1, yyvsp[0].node); - ; - break;} -case 150: -#line 684 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, '*', 1, yyvsp[0].node); - ; - break;} -case 151: -#line 688 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, '/', 1, yyvsp[0].node); - ; - break;} -case 152: -#line 692 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, '%', 1, yyvsp[0].node); - ; - break;} -case 153: -#line 696 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, tPOW, 1, yyvsp[0].node); - ; - break;} -case 154: -#line 700 "parse.y" -{ - yyval.node = call_op(yyvsp[0].node, tUPLUS, 0); - ; - break;} -case 155: -#line 704 "parse.y" -{ - yyval.node = call_op(yyvsp[0].node, tUMINUS, 0); - ; - break;} -case 156: -#line 708 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, '|', 1, yyvsp[0].node); - ; - break;} -case 157: -#line 712 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, '^', 1, yyvsp[0].node); - ; - break;} -case 158: -#line 716 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, '&', 1, yyvsp[0].node); - ; - break;} -case 159: -#line 720 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, tCMP, 1, yyvsp[0].node); - ; - break;} -case 160: -#line 724 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, '>', 1, yyvsp[0].node); - ; - break;} -case 161: -#line 728 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, tGEQ, 1, yyvsp[0].node); - ; - break;} -case 162: -#line 732 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, '<', 1, yyvsp[0].node); - ; - break;} -case 163: -#line 736 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, tLEQ, 1, yyvsp[0].node); - ; - break;} -case 164: -#line 740 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, tEQ, 1, yyvsp[0].node); - ; - break;} -case 165: -#line 744 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, tEQQ, 1, yyvsp[0].node); - ; - break;} -case 166: -#line 748 "parse.y" -{ - yyval.node = NEW_NOT(call_op(yyvsp[-2].node, tEQ, 1, yyvsp[0].node)); - ; - break;} -case 167: -#line 752 "parse.y" -{ - yyval.node = match_gen(yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 168: -#line 756 "parse.y" -{ - yyval.node = NEW_NOT(match_gen(yyvsp[-2].node, yyvsp[0].node)); - ; - break;} -case 169: -#line 760 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = NEW_NOT(cond(yyvsp[0].node)); - ; - break;} -case 170: -#line 765 "parse.y" -{ - yyval.node = call_op(yyvsp[0].node, '~', 0); - ; - break;} -case 171: -#line 769 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, tLSHFT, 1, yyvsp[0].node); - ; - break;} -case 172: -#line 773 "parse.y" -{ - yyval.node = call_op(yyvsp[-2].node, tRSHFT, 1, yyvsp[0].node); - ; - break;} -case 173: -#line 777 "parse.y" -{ - yyval.node = logop(NODE_AND, yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 174: -#line 781 "parse.y" -{ - yyval.node = logop(NODE_OR, yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 175: -#line 784 "parse.y" -{in_defined = 1;; - break;} -case 176: -#line 785 "parse.y" -{ - in_defined = 0; - yyval.node = NEW_DEFINED(yyvsp[0].node); - ; - break;} -case 177: -#line 790 "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 178: -#line 796 "parse.y" -{ - yyval.node = yyvsp[0].node; - ; - break;} -case 179: -#line 801 "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 182: -#line 812 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = NEW_LIST(yyvsp[0].node); - ; - break;} -case 183: -#line 817 "parse.y" -{ - yyval.node = yyvsp[-1].node; - ; - break;} -case 184: -#line 821 "parse.y" -{ - yyval.node = arg_blk_pass(yyvsp[-1].node, yyvsp[0].node); - ; - break;} -case 185: -#line 825 "parse.y" -{ - yyval.node = arg_concat(yyvsp[-4].node, yyvsp[-1].node); - yyval.node = arg_blk_pass(yyval.node, yyvsp[0].node); - ; - break;} -case 186: -#line 830 "parse.y" -{ - yyval.node = NEW_LIST(NEW_HASH(yyvsp[-1].node)); - ; - break;} -case 187: -#line 834 "parse.y" -{ - yyval.node = NEW_LIST(NEW_HASH(yyvsp[-1].node)); - yyval.node = arg_blk_pass(yyval.node, yyvsp[0].node); - ; - break;} -case 188: -#line 839 "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 189: -#line 844 "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 190: -#line 849 "parse.y" -{ - yyval.node = list_append(yyvsp[-3].node, NEW_HASH(yyvsp[-1].node)); - ; - break;} -case 191: -#line 853 "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 192: -#line 858 "parse.y" -{ - value_expr(yyvsp[-1].node); - yyval.node = arg_blk_pass(NEW_RESTARGS(yyvsp[-1].node), yyvsp[0].node); - ; - break;} -case 194: -#line 865 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = NEW_BLOCK_PASS(yyvsp[0].node); - ; - break;} -case 195: -#line 871 "parse.y" -{ - yyval.node = yyvsp[0].node; - ; - break;} -case 199: -#line 880 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = NEW_LIST(yyvsp[0].node); - ; - break;} -case 200: -#line 885 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = list_append(yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 201: -#line 891 "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 202: -#line 903 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = arg_concat(yyvsp[-3].node, yyvsp[0].node); - ; - break;} -case 203: -#line 908 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = yyvsp[0].node; - ; - break;} -case 204: -#line 914 "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 207: -#line 931 "parse.y" -{ - yyval.node = NEW_LIT(yyvsp[0].val); - ; - break;} -case 208: -#line 935 "parse.y" -{ - value_expr(yyvsp[-2].node); - yyval.node = NEW_COLON2(yyvsp[-2].node, yyvsp[0].id); - ; - break;} -case 209: -#line 940 "parse.y" -{ - yyval.node = NEW_COLON3(yyvsp[0].id); - ; - break;} -case 210: -#line 944 "parse.y" -{ - yyval.node = NEW_STR(yyvsp[0].val); - ; - break;} -case 212: -#line 949 "parse.y" -{ - yyval.node = NEW_XSTR(yyvsp[0].val); - ; - break;} -case 217: -#line 957 "parse.y" -{ - value_expr(yyvsp[-3].node); - yyval.node = NEW_CALL(yyvsp[-3].node, tAREF, yyvsp[-1].node); - ; - break;} -case 218: -#line 962 "parse.y" -{ - if (yyvsp[-1].node == 0) - yyval.node = NEW_ZARRAY(); /* zero length array*/ - else { - yyval.node = yyvsp[-1].node; - } - ; - break;} -case 219: -#line 970 "parse.y" -{ - yyval.node = NEW_HASH(yyvsp[-1].node); - ; - break;} -case 220: -#line 974 "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 221: -#line 981 "parse.y" -{ - if (!compile_for_eval && !cur_mid && !in_single) - yyerror("return appeared outside of method"); - yyval.node = NEW_RETURN(0); - ; - break;} -case 222: -#line 987 "parse.y" -{ - if (!compile_for_eval && !cur_mid && !in_single) - yyerror("return appeared outside of method"); - yyval.node = NEW_RETURN(0); - ; - break;} -case 223: -#line 993 "parse.y" -{ - value_expr(yyvsp[-1].node); - yyval.node = NEW_YIELD(yyvsp[-1].node); - ; - break;} -case 224: -#line 998 "parse.y" -{ - yyval.node = NEW_YIELD(0); - ; - break;} -case 225: -#line 1002 "parse.y" -{ - yyval.node = NEW_YIELD(0); - ; - break;} -case 226: -#line 1005 "parse.y" -{in_defined = 1;; - break;} -case 227: -#line 1006 "parse.y" -{ - in_defined = 0; - yyval.node = NEW_DEFINED(yyvsp[-1].node); - ; - break;} -case 228: -#line 1011 "parse.y" -{ - yyval.node = NEW_VCALL(yyvsp[0].id); - ; - break;} -case 229: -#line 1015 "parse.y" -{ - yyvsp[0].node->nd_iter = NEW_FCALL(yyvsp[-1].id, 0); - yyval.node = yyvsp[0].node; - ; - break;} -case 231: -#line 1021 "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 232: -#line 1033 "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 233: -#line 1042 "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 234: -#line 1050 "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 235: -#line 1058 "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 236: -#line 1066 "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 237: -#line 1074 "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 238: -#line 1085 "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 239: -#line 1100 "parse.y" -{ - yyval.node = yyvsp[-1].node; - ; - break;} -case 240: -#line 1104 "parse.y" -{ - if (cur_mid || in_single) - yyerror("class definition in method body"); - - class_nest++; - cref_push(); - local_push(); - ; - break;} -case 241: -#line 1114 "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 242: -#line 1122 "parse.y" -{ - class_nest++; - cref_push(); - local_push(); - ; - break;} -case 243: -#line 1129 "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 244: -#line 1137 "parse.y" -{ - if (cur_mid || in_single) - yyerror("module definition in method body"); - class_nest++; - cref_push(); - local_push(); - ; - break;} -case 245: -#line 1146 "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 246: -#line 1154 "parse.y" -{ - if (cur_mid || in_single) - yyerror("nested method definition"); - cur_mid = yyvsp[0].id; - local_push(); - ; - break;} -case 247: -#line 1163 "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 248: -#line 1170 "parse.y" -{lex_state = EXPR_FNAME;; - break;} -case 249: -#line 1171 "parse.y" -{ - value_expr(yyvsp[-3].node); - in_single++; - local_push(); - lex_state = EXPR_END; /* force for args */ - ; - break;} -case 250: -#line 1180 "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 251: -#line 1187 "parse.y" -{ - yyval.node = NEW_BREAK(); - ; - break;} -case 252: -#line 1191 "parse.y" -{ - yyval.node = NEW_NEXT(); - ; - break;} -case 253: -#line 1195 "parse.y" -{ - yyval.node = NEW_REDO(); - ; - break;} -case 254: -#line 1199 "parse.y" -{ - yyval.node = NEW_RETRY(); - ; - break;} -case 261: -#line 1214 "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 263: -#line 1222 "parse.y" -{ - yyval.node = yyvsp[0].node; - ; - break;} -case 267: -#line 1231 "parse.y" -{ - yyval.node = 0; - ; - break;} -case 268: -#line 1235 "parse.y" -{ - yyval.node = 0; - ; - break;} -case 269: -#line 1239 "parse.y" -{ - yyval.node = yyvsp[-1].node; - ; - break;} -case 270: -#line 1244 "parse.y" -{ - yyval.vars = dyna_push(); - ; - break;} -case 271: -#line 1250 "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 272: -#line 1257 "parse.y" -{ - yyval.vars = dyna_push(); - ; - break;} -case 273: -#line 1262 "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 274: -#line 1269 "parse.y" -{ - yyval.node = NEW_VCALL(yyvsp[0].id); - ; - break;} -case 275: -#line 1273 "parse.y" -{ - yyval.node = NEW_VCALL(yyvsp[0].id); - ; - break;} -case 276: -#line 1277 "parse.y" -{ - yyval.node = NEW_VCALL(yyvsp[0].id); - ; - break;} -case 279: -#line 1284 "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 280: -#line 1294 "parse.y" -{ - yyval.node = new_fcall(yyvsp[-3].id, yyvsp[-1].node); - fixpos(yyval.node, yyvsp[-1].node); - ; - break;} -case 281: -#line 1299 "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 282: -#line 1305 "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 283: -#line 1311 "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 284: -#line 1317 "parse.y" -{ - value_expr(yyvsp[-2].node); - yyval.node = new_call(yyvsp[-2].node, yyvsp[0].id, 0); - ; - break;} -case 285: -#line 1322 "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 286: -#line 1329 "parse.y" -{ - if (!compile_for_eval && !cur_mid && - !in_single && !in_defined) - yyerror("super called outside of method"); - yyval.node = NEW_ZSUPER(); - ; - break;} -case 289: -#line 1343 "parse.y" -{ - yyval.node = NEW_WHEN(yyvsp[-3].node, yyvsp[-1].node, yyvsp[0].node); - ; - break;} -case 291: -#line 1349 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = list_append(yyvsp[-3].node, NEW_WHEN(yyvsp[0].node, 0, 0)); - ; - break;} -case 292: -#line 1354 "parse.y" -{ - value_expr(yyvsp[0].node); - yyval.node = NEW_LIST(NEW_WHEN(yyvsp[0].node, 0, 0)); - ; - break;} -case 295: -#line 1365 "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 298: -#line 1373 "parse.y" -{ - yyval.node = yyvsp[0].node; - ; - break;} -case 300: -#line 1379 "parse.y" -{ - lex_state = EXPR_END; - yyval.val = INT2FIX(yyvsp[0].id); - ; - break;} -case 311: -#line 1396 "parse.y" -{yyval.id = kNIL;; - break;} -case 312: -#line 1397 "parse.y" -{yyval.id = kSELF;; - break;} -case 313: -#line 1398 "parse.y" -{yyval.id = kTRUE;; - break;} -case 314: -#line 1399 "parse.y" -{yyval.id = kFALSE;; - break;} -case 315: -#line 1400 "parse.y" -{yyval.id = k__FILE__;; - break;} -case 316: -#line 1401 "parse.y" -{yyval.id = k__LINE__;; - break;} -case 317: -#line 1404 "parse.y" -{ - yyval.node = gettable(yyvsp[0].id); - ; - break;} -case 320: -#line 1412 "parse.y" -{ - yyval.node = 0; - ; - break;} -case 321: -#line 1416 "parse.y" -{ - lex_state = EXPR_BEG; - ; - break;} -case 322: -#line 1420 "parse.y" -{ - yyval.node = yyvsp[-1].node; - ; - break;} -case 323: -#line 1423 "parse.y" -{yyerrok; yyval.node = 0;; - break;} -case 324: -#line 1426 "parse.y" -{ - yyval.node = yyvsp[-2].node; - lex_state = EXPR_BEG; - ; - break;} -case 325: -#line 1431 "parse.y" -{ - yyval.node = yyvsp[-1].node; - ; - break;} -case 326: -#line 1436 "parse.y" -{ - yyval.node = block_append(NEW_ARGS(yyvsp[-5].num, yyvsp[-3].node, yyvsp[-1].id), yyvsp[0].node); - ; - break;} -case 327: -#line 1440 "parse.y" -{ - yyval.node = block_append(NEW_ARGS(yyvsp[-3].num, yyvsp[-1].node, -1), yyvsp[0].node); - ; - break;} -case 328: -#line 1444 "parse.y" -{ - yyval.node = block_append(NEW_ARGS(yyvsp[-3].num, 0, yyvsp[-1].id), yyvsp[0].node); - ; - break;} -case 329: -#line 1448 "parse.y" -{ - yyval.node = block_append(NEW_ARGS(yyvsp[-1].num, 0, -1), yyvsp[0].node); - ; - break;} -case 330: -#line 1452 "parse.y" -{ - yyval.node = block_append(NEW_ARGS(0, yyvsp[-3].node, yyvsp[-1].id), yyvsp[0].node); - ; - break;} -case 331: -#line 1456 "parse.y" -{ - yyval.node = block_append(NEW_ARGS(0, yyvsp[-1].node, -1), yyvsp[0].node); - ; - break;} -case 332: -#line 1460 "parse.y" -{ - yyval.node = block_append(NEW_ARGS(0, 0, yyvsp[-1].id), yyvsp[0].node); - ; - break;} -case 333: -#line 1464 "parse.y" -{ - yyval.node = block_append(NEW_ARGS(0, 0, -1), yyvsp[0].node); - ; - break;} -case 334: -#line 1468 "parse.y" -{ - yyval.node = NEW_ARGS(0, 0, -1); - ; - break;} -case 335: -#line 1473 "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 336: -#line 1480 "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 337: -#line 1488 "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 338: -#line 1495 "parse.y" -{ - yyval.node = NEW_BLOCK(yyvsp[0].node); - yyval.node->nd_end = yyval.node; - ; - break;} -case 339: -#line 1500 "parse.y" -{ - yyval.node = block_append(yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 340: -#line 1505 "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 341: -#line 1511 "parse.y" -{ - yyval.id = -2; - ; - break;} -case 342: -#line 1516 "parse.y" -{ - yyval.node = NEW_BLOCK_ARG(yyvsp[0].id); - ; - break;} -case 343: -#line 1521 "parse.y" -{ - yyval.node = yyvsp[0].node; - ; - break;} -case 345: -#line 1527 "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 346: -#line 1539 "parse.y" -{lex_state = EXPR_BEG;; - break;} -case 347: -#line 1540 "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 349: -#line 1559 "parse.y" -{ - yyval.node = yyvsp[-1].node; - ; - break;} -case 350: -#line 1563 "parse.y" -{ - if (yyvsp[-1].node->nd_alen%2 != 0) { - yyerror("odd number list for Hash"); - } - yyval.node = yyvsp[-1].node; - ; - break;} -case 352: -#line 1572 "parse.y" -{ - yyval.node = list_concat(yyvsp[-2].node, yyvsp[0].node); - ; - break;} -case 353: -#line 1577 "parse.y" -{ - yyval.node = list_append(NEW_LIST(yyvsp[-2].node), yyvsp[0].node); - ; - break;} -case 373: -#line 1607 "parse.y" -{yyerrok;; - break;} -case 376: -#line 1611 "parse.y" -{yyerrok;; - break;} -case 377: -#line 1614 "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 1617 "parse.y" - -#include <ctype.h> -#include <sys/types.h> -#include "regex.h" -#include "util.h" -#ifndef strdup -char *strdup(); -#endif - -#define is_identchar(c) (((int)(c))!=-1&&(ISALNUM(c) || (c) == '_' || ismbchar(c))) - -static char *tokenbuf = NULL; -static int tokidx, toksiz = 0; - -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++) { - int cc = nextc(); - - if (cc == -1) goto eof; - buf[i] = cc; - 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 { -#if 0 - int c1; - pushback(c); - c1 = read_escape(); - if (c1 != c) { - tokadd(c1); - } - else { - tokadd('\\'); - tokadd(c); - } -#else - tokadd('\\'); - tokadd(c); -#endif - } - } - 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 'p': - options |= RE_OPTION_POSIXLINE; - break; - case 'o': - once = 1; - break; - case 'n': - kcode = 8; - break; - case 'e': - kcode = 16; - break; - case 's': - kcode = 24; - break; - case 'u': - kcode = 32; - 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 == '\n') - continue; - 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 '\n': - continue; - - 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; - if (lex_state == EXPR_DOT) 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 || lex_state == EXPR_DOT) { - 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 || lex_state == EXPR_DOT) { - 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 || lex_state == EXPR_DOT) { - 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 || lex_state == EXPR_DOT) { - 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; - lex_state = kw->state; - if (state == EXPR_FNAME) { - yylval.id = rb_intern(kw->name); - } - 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_DOT) { - 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 = ruby_scope->local_tbl?ruby_scope->local_tbl[0]: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); - } -} |