diff options
author | matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 1999-01-20 04:59:32 +0000 |
---|---|---|
committer | matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 1999-01-20 04:59:32 +0000 |
commit | 9c5b1986a36c7a700b4c76817e35aa874ba7907c (patch) | |
tree | 5951a3d3d9a696af427384e6128c42ec2256e687 /parse.c | |
parent | edf2e9b7c75d2fff380f03c9ae279e53fe05ab59 (diff) | |
download | ruby-9c5b1986a36c7a700b4c76817e35aa874ba7907c.tar.gz |
Initial revision
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@370 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'parse.c')
-rw-r--r-- | parse.c | 7224 |
1 files changed, 7224 insertions, 0 deletions
diff --git a/parse.c b/parse.c new file mode 100644 index 0000000000..8c3bcc545a --- /dev/null +++ b/parse.c @@ -0,0 +1,7224 @@ + +/* 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> + +/* hack for bison */ +#ifdef const +# undef const +#endif + +#define ID_SCOPE_SHIFT 3 +#define ID_SCOPE_MASK 0x07 +#define ID_LOCAL 0x01 +#define ID_INSTANCE 0x02 +#define ID_GLOBAL 0x03 +#define ID_ATTRSET 0x04 +#define ID_CONST 0x05 + +#define is_id_notop(id) ((id)>LAST_TOKEN) +#define is_local_id(id) (is_id_notop(id)&&((id)&ID_SCOPE_MASK)==ID_LOCAL) +#define is_global_id(id) (is_id_notop(id)&&((id)&ID_SCOPE_MASK)==ID_GLOBAL) +#define is_instance_id(id) (is_id_notop(id)&&((id)&ID_SCOPE_MASK)==ID_INSTANCE) +#define is_attrset_id(id) (is_id_notop(id)&&((id)&ID_SCOPE_MASK)==ID_ATTRSET) +#define is_const_id(id) (is_id_notop(id)&&((id)&ID_SCOPE_MASK)==ID_CONST) + +NODE *ruby_eval_tree_begin = 0; +NODE *ruby_eval_tree = 0; + +char *ruby_sourcefile; /* current source file */ +int ruby_sourceline; /* current line no. */ + +static int yylex(); +static int yyerror(); + +static enum lex_state { + EXPR_BEG, /* ignore newline, +/- is a sign. */ + EXPR_MID, /* newline significant, +/- is a sign. */ + EXPR_END, /* newline significant, +/- is a operator. */ + EXPR_ARG, /* newline significant, +/- is a operator. */ + EXPR_FNAME, /* ignore newline, +/- is a operator, no reserved words. */ + EXPR_DOT, /* immediate after `.', no reserved words. */ + EXPR_CLASS, /* immediate after `class', no here document. */ +} lex_state; + +static int class_nest = 0; +static int in_single = 0; +static ID cur_mid = 0; + +static int value_expr(); +static NODE *cond(); +static NODE *logop(); + +static NODE *newline_node(); +static void fixpos(); + +static NODE *block_append(); +static NODE *list_append(); +static NODE *list_concat(); +static NODE *arg_add(); +static NODE *call_op(); +static int in_defined = 0; + +static NODE *arg_blk_pass(); +static NODE *new_call(); +static NODE *new_fcall(); + +static NODE *gettable(); +static NODE *assignable(); +static NODE *aryset(); +static NODE *attrset(); +static void rb_backref_error(); + +static NODE *match_gen(); +static void local_push(); +static void local_pop(); +static int local_append(); +static int local_cnt(); +static int local_id(); +static ID *local_tbl(); + +static struct RVarmap *dyna_push(); +static void dyna_pop(); +static int dyna_in_block(); + +#define cref_push() NEW_CREF() +static void cref_pop(); +static NODE *cur_cref; + +static void top_local_init(); +static void top_local_setup(); + +#line 109 "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 617 +#define YYFLAG -32768 +#define YYNTBASE 118 + +#define YYTRANSLATE(x) ((unsigned)(x) <= 345 ? yytranslate[x] : 206) + +static const char yytranslate[] = { 0, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 116, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 104, 2, 2, 2, 103, 98, 2, 115, + 110, 101, 99, 111, 100, 109, 102, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 93, 117, 95, + 91, 94, 92, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 112, 2, 113, 97, 2, 114, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 107, 96, 108, 105, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 1, 3, 4, 5, 6, + 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, + 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, + 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, + 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, + 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, + 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, + 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, + 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, + 87, 88, 89, 90, 106 +}; + +#if YYDEBUG != 0 +static const short yyprhs[] = { 0, + 0, 1, 4, 7, 8, 10, 14, 17, 20, 21, + 26, 30, 34, 38, 41, 45, 49, 53, 57, 58, + 64, 69, 71, 75, 78, 81, 83, 87, 91, 94, + 97, 99, 102, 107, 112, 115, 117, 121, 123, 127, + 129, 133, 136, 142, 145, 147, 151, 154, 156, 160, + 162, 167, 171, 173, 175, 177, 179, 181, 183, 185, + 187, 189, 190, 195, 197, 199, 201, 203, 205, 207, + 209, 211, 213, 215, 217, 219, 221, 223, 225, 227, + 229, 231, 233, 235, 237, 239, 241, 243, 245, 247, + 249, 251, 253, 255, 257, 259, 261, 263, 265, 267, + 269, 271, 273, 275, 277, 279, 281, 283, 285, 287, + 289, 291, 293, 295, 297, 299, 301, 303, 305, 307, + 309, 311, 313, 315, 317, 319, 321, 323, 325, 327, + 329, 330, 335, 342, 348, 354, 358, 359, 364, 371, + 377, 383, 387, 391, 395, 399, 403, 407, 411, 415, + 419, 422, 425, 429, 433, 437, 441, 445, 449, 453, + 457, 461, 465, 469, 473, 477, 480, 483, 487, 491, + 495, 499, 500, 505, 511, 513, 515, 516, 519, 521, + 524, 530, 533, 539, 544, 552, 556, 558, 561, 564, + 565, 567, 568, 570, 574, 576, 581, 584, 586, 587, + 590, 592, 596, 600, 603, 605, 607, 609, 611, 613, + 615, 617, 622, 626, 630, 635, 639, 641, 646, 650, + 652, 653, 660, 662, 665, 667, 670, 677, 684, 690, + 696, 701, 709, 716, 720, 721, 728, 729, 737, 738, + 744, 745, 752, 753, 754, 764, 766, 768, 770, 772, + 774, 776, 779, 781, 783, 785, 791, 792, 795, 797, + 799, 800, 803, 805, 809, 810, 816, 817, 823, 825, + 827, 829, 831, 833, 838, 845, 849, 856, 861, 863, + 869, 871, 876, 879, 881, 883, 889, 890, 891, 894, + 896, 899, 901, 903, 905, 907, 909, 911, 913, 915, + 917, 919, 921, 923, 925, 927, 929, 931, 933, 935, + 937, 939, 940, 945, 948, 953, 956, 963, 968, 973, + 976, 981, 984, 987, 989, 990, 992, 996, 1000, 1002, + 1006, 1009, 1012, 1015, 1016, 1018, 1023, 1024, 1027, 1030, + 1032, 1036, 1040, 1042, 1044, 1046, 1048, 1050, 1051, 1053, + 1054, 1056, 1057, 1059, 1061, 1063, 1065, 1067 +}; + +static const short yyrhs[] = { -1, + 119, 120, 0, 121, 201, 0, 0, 122, 0, 121, + 205, 122, 0, 1, 122, 0, 172, 168, 0, 0, + 41, 135, 123, 135, 0, 41, 49, 49, 0, 41, + 49, 61, 0, 41, 49, 60, 0, 6, 136, 0, + 122, 37, 125, 0, 122, 38, 125, 0, 122, 39, + 125, 0, 122, 40, 125, 0, 0, 43, 124, 107, + 120, 108, 0, 44, 107, 120, 108, 0, 125, 0, + 127, 91, 151, 0, 27, 152, 0, 28, 152, 0, + 126, 0, 125, 34, 125, 0, 125, 35, 125, 0, + 36, 125, 0, 104, 126, 0, 140, 0, 199, 146, + 0, 154, 109, 199, 146, 0, 154, 81, 199, 146, + 0, 29, 146, 0, 129, 0, 85, 128, 110, 0, + 129, 0, 85, 128, 110, 0, 131, 0, 131, 88, + 133, 0, 131, 132, 0, 131, 132, 111, 88, 133, + 0, 88, 133, 0, 133, 0, 85, 128, 110, 0, + 130, 111, 0, 130, 0, 132, 111, 130, 0, 182, + 0, 154, 112, 144, 113, 0, 154, 109, 47, 0, + 184, 0, 47, 0, 51, 0, 47, 0, 51, 0, + 48, 0, 138, 0, 139, 0, 135, 0, 0, 136, + 111, 137, 135, 0, 75, 0, 96, 0, 97, 0, + 98, 0, 65, 0, 66, 0, 67, 0, 73, 0, + 94, 0, 69, 0, 95, 0, 70, 0, 79, 0, + 80, 0, 99, 0, 100, 0, 101, 0, 88, 0, + 102, 0, 103, 0, 64, 0, 105, 0, 62, 0, + 63, 0, 77, 0, 78, 0, 114, 0, 45, 0, + 46, 0, 43, 0, 44, 0, 41, 0, 34, 0, + 7, 0, 21, 0, 16, 0, 3, 0, 5, 0, + 42, 0, 26, 0, 15, 0, 14, 0, 10, 0, + 9, 0, 33, 0, 20, 0, 37, 0, 25, 0, + 4, 0, 22, 0, 31, 0, 36, 0, 35, 0, + 23, 0, 8, 0, 24, 0, 27, 0, 30, 0, + 29, 0, 13, 0, 32, 0, 6, 0, 38, 0, + 40, 0, 17, 0, 39, 0, 28, 0, 0, 182, + 91, 141, 140, 0, 154, 112, 144, 113, 91, 140, + 0, 154, 109, 47, 91, 140, 0, 154, 109, 51, + 91, 140, 0, 184, 91, 140, 0, 0, 182, 83, + 142, 140, 0, 154, 112, 144, 113, 83, 140, 0, + 154, 109, 47, 83, 140, 0, 154, 109, 51, 83, + 140, 0, 184, 83, 140, 0, 140, 75, 140, 0, + 140, 76, 140, 0, 140, 99, 140, 0, 140, 100, + 140, 0, 140, 101, 140, 0, 140, 102, 140, 0, + 140, 103, 140, 0, 140, 64, 140, 0, 62, 140, + 0, 63, 140, 0, 140, 96, 140, 0, 140, 97, + 140, 0, 140, 98, 140, 0, 140, 65, 140, 0, + 140, 94, 140, 0, 140, 69, 140, 0, 140, 95, + 140, 0, 140, 70, 140, 0, 140, 66, 140, 0, + 140, 67, 140, 0, 140, 68, 140, 0, 140, 73, + 140, 0, 140, 74, 140, 0, 104, 140, 0, 105, + 140, 0, 140, 79, 140, 0, 140, 80, 140, 0, + 140, 71, 140, 0, 140, 72, 140, 0, 0, 42, + 202, 143, 140, 0, 140, 92, 140, 93, 140, 0, + 154, 0, 145, 0, 0, 146, 202, 0, 126, 0, + 150, 148, 0, 150, 111, 88, 140, 148, 0, 197, + 148, 0, 197, 111, 88, 140, 148, 0, 150, 111, + 197, 148, 0, 150, 111, 197, 111, 88, 140, 148, + 0, 88, 140, 148, 0, 147, 0, 89, 140, 0, + 111, 147, 0, 0, 150, 0, 0, 140, 0, 150, + 111, 140, 0, 150, 0, 150, 111, 88, 140, 0, + 88, 140, 0, 146, 0, 0, 150, 203, 0, 179, + 0, 154, 81, 51, 0, 154, 81, 47, 0, 82, + 134, 0, 54, 0, 57, 0, 55, 0, 58, 0, + 59, 0, 183, 0, 184, 0, 154, 112, 144, 113, + 0, 86, 153, 113, 0, 87, 196, 108, 0, 27, + 115, 152, 110, 0, 27, 115, 110, 0, 27, 0, + 28, 115, 152, 110, 0, 28, 115, 110, 0, 28, + 0, 0, 42, 202, 115, 155, 125, 110, 0, 48, + 0, 199, 170, 0, 173, 0, 173, 170, 0, 11, + 125, 162, 120, 164, 10, 0, 12, 125, 162, 120, + 165, 10, 0, 18, 125, 163, 120, 10, 0, 19, + 125, 163, 120, 10, 0, 16, 120, 174, 10, 0, + 20, 166, 25, 125, 163, 120, 10, 0, 7, 120, + 177, 165, 178, 10, 0, 85, 120, 110, 0, 0, + 3, 134, 185, 156, 120, 10, 0, 0, 3, 79, + 125, 204, 157, 120, 10, 0, 0, 4, 134, 158, + 120, 10, 0, 0, 5, 135, 159, 187, 120, 10, + 0, 0, 0, 5, 195, 200, 160, 135, 161, 187, + 120, 10, 0, 21, 0, 22, 0, 23, 0, 24, + 0, 204, 0, 13, 0, 204, 13, 0, 204, 0, + 26, 0, 165, 0, 14, 125, 162, 120, 164, 0, + 0, 15, 120, 0, 133, 0, 127, 0, 0, 96, + 96, 0, 72, 0, 96, 166, 96, 0, 0, 26, + 169, 167, 120, 10, 0, 0, 107, 171, 167, 120, + 108, 0, 47, 0, 51, 0, 48, 0, 173, 0, + 126, 0, 199, 115, 145, 110, 0, 154, 109, 199, + 115, 145, 110, 0, 154, 109, 199, 0, 154, 81, + 199, 115, 145, 110, 0, 29, 115, 145, 110, 0, + 29, 0, 17, 175, 162, 120, 176, 0, 150, 0, + 150, 111, 88, 140, 0, 88, 140, 0, 165, 0, + 174, 0, 8, 149, 163, 120, 177, 0, 0, 0, + 9, 120, 0, 181, 0, 90, 180, 0, 56, 0, + 135, 0, 50, 0, 49, 0, 52, 0, 53, 0, + 47, 0, 50, 0, 49, 0, 51, 0, 31, 0, + 30, 0, 32, 0, 33, 0, 46, 0, 45, 0, + 182, 0, 60, 0, 61, 0, 204, 0, 0, 95, + 186, 125, 204, 0, 1, 204, 0, 115, 188, 202, + 110, 0, 188, 204, 0, 189, 111, 191, 111, 192, + 194, 0, 189, 111, 191, 194, 0, 189, 111, 192, + 194, 0, 189, 194, 0, 191, 111, 192, 194, 0, + 191, 194, 0, 192, 194, 0, 193, 0, 0, 47, + 0, 189, 111, 47, 0, 47, 91, 140, 0, 190, + 0, 191, 111, 190, 0, 88, 47, 0, 89, 47, + 0, 111, 193, 0, 0, 183, 0, 85, 125, 202, + 110, 0, 0, 197, 203, 0, 150, 203, 0, 198, + 0, 197, 111, 198, 0, 140, 84, 140, 0, 47, + 0, 51, 0, 48, 0, 109, 0, 81, 0, 0, + 205, 0, 0, 116, 0, 0, 116, 0, 111, 0, + 117, 0, 116, 0, 204, 0, 205, 117, 0 +}; + +#endif + +#if YYDEBUG != 0 +static const short yyrline[] = { 0, + 231, 240, 248, 250, 254, 258, 262, 267, 276, 277, + 282, 288, 297, 302, 308, 314, 320, 330, 340, 348, + 355, 363, 365, 371, 378, 383, 384, 388, 392, 397, + 402, 404, 409, 415, 421, 429, 430, 435, 436, 441, + 445, 449, 453, 457, 462, 463, 468, 473, 477, 482, + 486, 490, 494, 500, 504, 506, 507, 508, 509, 514, + 520, 524, 525, 529, 530, 531, 532, 533, 534, 535, + 536, 537, 538, 539, 540, 541, 542, 543, 544, 545, + 546, 547, 548, 549, 550, 551, 552, 553, 554, 555, + 557, 557, 557, 557, 558, 558, 558, 558, 558, 558, + 558, 559, 559, 559, 559, 559, 559, 559, 560, 560, + 560, 560, 560, 560, 560, 561, 561, 561, 561, 561, + 561, 561, 562, 562, 562, 562, 562, 562, 563, 563, + 565, 566, 573, 578, 583, 588, 594, 595, 610, 625, + 636, 647, 652, 656, 660, 664, 668, 672, 676, 680, + 684, 688, 692, 696, 700, 704, 708, 712, 716, 720, + 724, 728, 732, 736, 740, 744, 749, 753, 757, 761, + 765, 769, 770, 774, 780, 785, 793, 797, 799, 804, + 808, 813, 818, 823, 828, 833, 838, 840, 846, 850, + 855, 856, 861, 866, 872, 884, 889, 895, 909, 913, + 915, 919, 924, 929, 933, 937, 938, 942, 943, 944, + 945, 946, 951, 959, 963, 970, 976, 982, 987, 991, + 995, 995, 1000, 1004, 1009, 1010, 1019, 1028, 1037, 1045, + 1053, 1061, 1069, 1089, 1093, 1103, 1111, 1118, 1126, 1135, + 1143, 1151, 1160, 1161, 1168, 1176, 1180, 1184, 1188, 1193, + 1194, 1195, 1197, 1198, 1200, 1201, 1210, 1214, 1219, 1220, + 1222, 1226, 1230, 1234, 1239, 1244, 1252, 1257, 1264, 1268, + 1272, 1276, 1277, 1279, 1284, 1290, 1296, 1302, 1308, 1316, + 1323, 1324, 1329, 1335, 1336, 1338, 1345, 1350, 1354, 1359, + 1360, 1364, 1366, 1367, 1368, 1370, 1371, 1373, 1374, 1375, + 1376, 1377, 1378, 1379, 1380, 1381, 1382, 1384, 1389, 1390, + 1392, 1396, 1400, 1404, 1406, 1411, 1416, 1420, 1424, 1428, + 1432, 1436, 1440, 1444, 1448, 1453, 1460, 1468, 1475, 1480, + 1485, 1492, 1497, 1501, 1506, 1519, 1537, 1541, 1545, 1553, + 1554, 1559, 1564, 1565, 1566, 1568, 1569, 1571, 1572, 1574, + 1575, 1577, 1578, 1579, 1581, 1582, 1584, 1585 +}; +#endif + + +#if YYDEBUG != 0 || defined (YYERROR_VERBOSE) + +static const char * const yytname[] = { "$","error","$undefined.","kCLASS", +"kMODULE","kDEF","kUNDEF","kBEGIN","kRESCUE","kENSURE","kEND","kIF","kUNLESS", +"kTHEN","kELSIF","kELSE","kCASE","kWHEN","kWHILE","kUNTIL","kFOR","kBREAK","kNEXT", +"kREDO","kRETRY","kIN","kDO","kRETURN","kYIELD","kSUPER","kSELF","kNIL","kTRUE", +"kFALSE","kAND","kOR","kNOT","kIF_MOD","kUNLESS_MOD","kWHILE_MOD","kUNTIL_MOD", +"kALIAS","kDEFINED","klBEGIN","klEND","k__LINE__","k__FILE__","tIDENTIFIER", +"tFID","tGVAR","tIVAR","tCONSTANT","tINTEGER","tFLOAT","tSTRING","tXSTRING", +"tREGEXP","tDSTRING","tDXSTRING","tDREGEXP","tNTH_REF","tBACK_REF","tUPLUS", +"tUMINUS","tPOW","tCMP","tEQ","tEQQ","tNEQ","tGEQ","tLEQ","tANDOP","tOROP","tMATCH", +"tNMATCH","tDOT2","tDOT3","tAREF","tASET","tLSHFT","tRSHFT","tCOLON2","tCOLON3", +"tOP_ASGN","tASSOC","tLPAREN","tLBRACK","tLBRACE","tSTAR","tAMPER","tSYMBEG", +"'='","'?'","':'","'>'","'<'","'|'","'^'","'&'","'+'","'-'","'*'","'/'","'%'", +"'!'","'~'","LAST_TOKEN","'{'","'}'","'.'","')'","','","'['","']'","'`'","'('", +"'\\n'","';'","program","@1","compstmt","stmts","stmt","@2","@3","expr","command_call", +"mlhs","mlhs_entry","mlhs_basic","mlhs_item","mlhs_head","mlhs_tail","lhs","cname", +"fname","undef_list","@4","op","reswords","arg","@5","@6","@7","aref_args","opt_call_args", +"call_args","block_arg","opt_block_arg","opt_list","args","mrhs","ret_args", +"array","primary","@8","@9","@10","@11","@12","@13","@14","then","do","if_tail", +"opt_else","iter_var","opt_iter_var","iter_do_block","@15","iter_block","@16", +"iterator","method_call","case_body","when_args","cases","rescue","ensure","literal", +"symbol","numeric","variable","var_ref","backref","superclass","@17","f_arglist", +"f_args","f_arg","f_opt","f_optarg","f_rest_arg","f_block_arg","opt_f_block_arg", +"singleton","assoc_list","assocs","assoc","operation","dot_or_colon","opt_terms", +"opt_nl","trailer","term","terms", NULL +}; +#endif + +static const short yyr1[] = { 0, + 119, 118, 120, 121, 121, 121, 121, 122, 123, 122, + 122, 122, 122, 122, 122, 122, 122, 122, 124, 122, + 122, 122, 125, 125, 125, 125, 125, 125, 125, 125, + 125, 126, 126, 126, 126, 127, 127, 128, 128, 129, + 129, 129, 129, 129, 130, 130, 131, 132, 132, 133, + 133, 133, 133, 134, 134, 135, 135, 135, 135, 135, + 136, 137, 136, 138, 138, 138, 138, 138, 138, 138, + 138, 138, 138, 138, 138, 138, 138, 138, 138, 138, + 138, 138, 138, 138, 138, 138, 138, 138, 138, 138, + 139, 139, 139, 139, 139, 139, 139, 139, 139, 139, + 139, 139, 139, 139, 139, 139, 139, 139, 139, 139, + 139, 139, 139, 139, 139, 139, 139, 139, 139, 139, + 139, 139, 139, 139, 139, 139, 139, 139, 139, 139, + 141, 140, 140, 140, 140, 140, 142, 140, 140, 140, + 140, 140, 140, 140, 140, 140, 140, 140, 140, 140, + 140, 140, 140, 140, 140, 140, 140, 140, 140, 140, + 140, 140, 140, 140, 140, 140, 140, 140, 140, 140, + 140, 143, 140, 140, 140, 144, 145, 145, 146, 146, + 146, 146, 146, 146, 146, 146, 146, 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, 154, + 155, 154, 154, 154, 154, 154, 154, 154, 154, 154, + 154, 154, 154, 154, 156, 154, 157, 154, 158, 154, + 159, 154, 160, 161, 154, 154, 154, 154, 154, 162, + 162, 162, 163, 163, 164, 164, 165, 165, 166, 166, + 167, 167, 167, 167, 169, 168, 171, 170, 172, 172, + 172, 172, 172, 173, 173, 173, 173, 173, 173, 174, + 175, 175, 175, 176, 176, 177, 177, 178, 178, 179, + 179, 179, 180, 180, 180, 181, 181, 182, 182, 182, + 182, 182, 182, 182, 182, 182, 182, 183, 184, 184, + 185, 186, 185, 185, 187, 187, 188, 188, 188, 188, + 188, 188, 188, 188, 188, 189, 189, 190, 191, 191, + 192, 193, 194, 194, 195, 195, 196, 196, 196, 197, + 197, 198, 199, 199, 199, 200, 200, 201, 201, 202, + 202, 203, 203, 203, 204, 204, 205, 205 +}; + +static const short yyr2[] = { 0, + 0, 2, 2, 0, 1, 3, 2, 2, 0, 4, + 3, 3, 3, 2, 3, 3, 3, 3, 0, 5, + 4, 1, 3, 2, 2, 1, 3, 3, 2, 2, + 1, 2, 4, 4, 2, 1, 3, 1, 3, 1, + 3, 2, 5, 2, 1, 3, 2, 1, 3, 1, + 4, 3, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 0, 4, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 0, 4, 6, 5, 5, 3, 0, 4, 6, 5, + 5, 3, 3, 3, 3, 3, 3, 3, 3, 3, + 2, 2, 3, 3, 3, 3, 3, 3, 3, 3, + 3, 3, 3, 3, 3, 2, 2, 3, 3, 3, + 3, 0, 4, 5, 1, 1, 0, 2, 1, 2, + 5, 2, 5, 4, 7, 3, 1, 2, 2, 0, + 1, 0, 1, 3, 1, 4, 2, 1, 0, 2, + 1, 3, 3, 2, 1, 1, 1, 1, 1, 1, + 1, 4, 3, 3, 4, 3, 1, 4, 3, 1, + 0, 6, 1, 2, 1, 2, 6, 6, 5, 5, + 4, 7, 6, 3, 0, 6, 0, 7, 0, 5, + 0, 6, 0, 0, 9, 1, 1, 1, 1, 1, + 1, 2, 1, 1, 1, 5, 0, 2, 1, 1, + 0, 2, 1, 3, 0, 5, 0, 5, 1, 1, + 1, 1, 1, 4, 6, 3, 6, 4, 1, 5, + 1, 4, 2, 1, 1, 5, 0, 0, 2, 1, + 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 0, 4, 2, 4, 2, 6, 4, 4, 2, + 4, 2, 2, 1, 0, 1, 3, 3, 1, 3, + 2, 2, 2, 0, 1, 4, 0, 2, 2, 1, + 3, 3, 1, 1, 1, 1, 1, 0, 1, 0, + 1, 0, 1, 1, 1, 1, 1, 2 +}; + +static const short yydefact[] = { 1, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 246, 247, 248, 249, 217, 220, 279, + 303, 302, 304, 305, 0, 0, 350, 19, 0, 307, + 306, 343, 345, 300, 299, 344, 296, 297, 205, 207, + 292, 206, 208, 209, 309, 310, 0, 0, 0, 0, + 199, 337, 0, 0, 0, 0, 2, 348, 5, 22, + 26, 0, 36, 0, 40, 45, 31, 175, 0, 225, + 201, 290, 308, 210, 211, 0, 7, 54, 55, 0, + 0, 239, 100, 112, 101, 125, 97, 118, 107, 106, + 123, 105, 104, 99, 128, 109, 98, 113, 117, 119, + 111, 103, 120, 130, 122, 121, 114, 124, 108, 96, + 116, 115, 110, 126, 129, 127, 95, 102, 93, 94, + 91, 92, 56, 58, 57, 86, 87, 84, 68, 69, + 70, 73, 75, 71, 64, 88, 89, 76, 77, 0, + 81, 72, 74, 65, 66, 67, 78, 79, 80, 82, + 83, 85, 90, 241, 59, 60, 308, 335, 0, 121, + 114, 124, 108, 91, 92, 56, 57, 61, 14, 287, + 298, 223, 301, 0, 26, 225, 0, 0, 0, 0, + 217, 220, 279, 350, 260, 259, 0, 0, 50, 53, + 0, 0, 0, 0, 0, 0, 179, 193, 198, 187, + 190, 24, 175, 308, 211, 190, 340, 0, 25, 177, + 35, 29, 0, 9, 351, 172, 0, 0, 151, 175, + 152, 204, 0, 0, 0, 36, 193, 352, 0, 352, + 0, 352, 44, 295, 294, 293, 291, 30, 166, 167, + 356, 355, 3, 357, 349, 0, 0, 0, 0, 0, + 0, 0, 47, 0, 0, 48, 42, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 177, 265, 8, 267, 226, + 137, 131, 0, 0, 177, 32, 224, 0, 0, 312, + 235, 311, 0, 350, 325, 347, 346, 243, 62, 192, + 257, 251, 0, 250, 0, 0, 0, 254, 0, 253, + 0, 0, 0, 0, 177, 0, 190, 188, 216, 0, + 0, 0, 180, 0, 177, 0, 182, 219, 0, 0, + 350, 11, 13, 12, 0, 221, 0, 0, 0, 0, + 0, 234, 37, 354, 353, 200, 213, 339, 214, 354, + 338, 358, 6, 15, 16, 17, 18, 27, 28, 0, + 195, 23, 0, 41, 0, 150, 156, 161, 162, 163, + 158, 160, 170, 171, 164, 165, 143, 144, 168, 169, + 0, 157, 159, 153, 154, 155, 145, 146, 147, 148, + 149, 203, 345, 202, 0, 343, 344, 276, 0, 176, + 261, 261, 0, 0, 142, 136, 0, 237, 314, 0, + 0, 0, 0, 326, 0, 0, 325, 0, 0, 334, + 329, 334, 334, 324, 0, 0, 0, 191, 0, 288, + 257, 252, 257, 0, 281, 0, 231, 0, 0, 0, + 52, 344, 276, 0, 0, 0, 186, 215, 342, 0, + 194, 189, 190, 343, 0, 0, 0, 341, 218, 278, + 178, 10, 0, 173, 0, 21, 37, 194, 197, 0, + 46, 0, 49, 0, 177, 34, 0, 0, 0, 0, + 177, 33, 212, 263, 0, 0, 0, 138, 132, 274, + 0, 0, 0, 240, 336, 0, 331, 332, 350, 0, + 316, 0, 320, 0, 322, 0, 323, 244, 63, 0, + 0, 258, 0, 0, 0, 0, 255, 0, 283, 0, + 0, 229, 230, 51, 0, 190, 0, 184, 212, 190, + 0, 20, 0, 43, 174, 0, 140, 134, 141, 135, + 0, 0, 0, 262, 0, 0, 0, 0, 313, 236, + 328, 0, 242, 327, 334, 334, 333, 0, 330, 334, + 325, 287, 289, 233, 0, 227, 228, 0, 257, 0, + 181, 0, 183, 222, 196, 277, 275, 139, 133, 264, + 266, 268, 238, 315, 0, 318, 319, 321, 0, 286, + 0, 282, 284, 285, 280, 232, 190, 334, 0, 257, + 185, 317, 245, 256, 0, 0, 0 +}; + +static const short yydefgoto[] = { 615, + 1, 224, 58, 59, 345, 217, 60, 61, 62, 225, + 63, 64, 65, 257, 66, 81, 154, 169, 436, 155, + 156, 67, 414, 413, 347, 409, 410, 341, 200, 333, + 437, 201, 372, 202, 229, 220, 473, 421, 501, 303, + 305, 435, 571, 313, 319, 526, 527, 188, 496, 288, + 411, 290, 412, 69, 176, 317, 446, 605, 311, 524, + 71, 237, 72, 204, 74, 205, 301, 420, 428, 429, + 430, 431, 432, 433, 567, 513, 159, 231, 206, 207, + 191, 308, 243, 216, 356, 314, 245 +}; + +static const short yypact[] = {-32768, + 1581, 4673, 29, 135, 4070, 4379, 2015, 4763, 4763, 2487, + 4763, 4763, 5841,-32768,-32768,-32768,-32768, 3427, 3517, 3607, +-32768,-32768,-32768,-32768, 4763, 4276, -45,-32768, 39,-32768, +-32768, 1679, 1898,-32768,-32768, 1793,-32768,-32768,-32768,-32768, +-32768,-32768,-32768,-32768,-32768,-32768, 5573, 5573, 135, 2578, + 5573, 5573, 6105, 4173, 5663, 5573,-32768, -25, 338, 93, + 136, 64,-32768, 59, 5929,-32768, 6104, 0, 147, 22, +-32768,-32768, 122,-32768, 168, 3067, 338,-32768,-32768, 4763, + 41,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768, +-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768, +-32768,-32768,-32768,-32768,-32768, -9, 1, 2, 12,-32768, +-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768, + 79, 85, 125,-32768, 130,-32768,-32768,-32768,-32768,-32768, +-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768, 4763, +-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768, +-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768, 175,-32768, +-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768, 74, 212, + 3157, 3247, 3337, 33,-32768, 118, 33, 221, 21, 21, + 155, 172, 177, -45,-32768, 192, 62, 285, 71, 78, + -17, 2686, 5573, 5573, 5573, 4483,-32768, 1089,-32768,-32768, + 205,-32768, 80, 210, 222, 211,-32768, 4578,-32768, 4853, +-32768,-32768, 36,-32768,-32768, 215, 230, 2794, 284, 143, + 284,-32768, 2578, 251, 257, 258, 6104, -22, 243, -22, + 264, 92,-32768,-32768,-32768,-32768,-32768,-32768, 284, 284, +-32768,-32768,-32768,-32768, 2976, 4763, 4763, 4763, 4763, 4763, + 4763, 5213,-32768, 2578, 6105,-32768, 268, 5573, 5573, 5573, + 5573, 5573, 5573, 5573, 5573, 5573, 5573, 5573, 5573, 5573, + 5573, 5573, 5573, 5573, 5573, 5573, 5573, 5573, 5573, 5573, + 5573, 5573, 5573, 235, 280, 4853,-32768,-32768,-32768,-32768, +-32768,-32768, 5573, 5573, 4853,-32768,-32768, 31, -25,-32768, +-32768,-32768, 2885, 28, -2,-32768,-32768,-32768,-32768, 5573, + 365,-32768, 2123, 382, 2305, 5303, 387,-32768, 2885,-32768, + 2885, 215, 235, 306, 4853, 4763, 749, 6104,-32768, 288, + 5573, 4943,-32768, 311, 4853, 5033,-32768,-32768, 290, 293, + -45,-32768,-32768,-32768, 4379,-32768, 5573, 2794, 297, 311, + 298,-32768, 299, 5573,-32768,-32768,-32768,-32768,-32768, 5573, +-32768,-32768, 338, 93, 93, 93, 93,-32768,-32768, 5573, + 300,-32768, 302,-32768, 6017, 284, 670, 670, 670, 670, + 286, 286, 1385, 6184, 670, 670, 6144, 6144, 129, 129, + 1339, 286, 286, 99, 99, 291, 66, 66, 284, 284, + 284, 3697,-32768, 3787, 3877, 197, 226, 3967, 296,-32768, + 68, 68, 5573, 5573, 6104, 6104, 304,-32768,-32768, 4763, + 2885, 391, 305, 326, 375, 376, 13, 2885, -25, 313, +-32768, 314, 315,-32768, 4379, 4379, 15, 318, 2396, 422, + 246,-32768, 365, 5573, 321, 25,-32768, 423, 425, 322, + 103,-32768, 324, 327, 21, 352,-32768,-32768, 6104, 5573, + 1089,-32768, 333, 232, 332, 5573, 1089,-32768,-32768,-32768, +-32768,-32768, 4763, 6104, 339,-32768, 253, 6104, 6104, 5393, +-32768, 6105,-32768, 5573, 4853,-32768, 5573, 5573, 5573, 5573, + 4853,-32768, 208,-32768, 5753, 2885, 2794, 6104, 6104,-32768, + 2885, 31, 439,-32768,-32768, 5573,-32768,-32768, -45, 440, +-32768, 26,-32768, 30,-32768, 362,-32768,-32768,-32768, 2015, + 5573,-32768, 2885, 443, 4763, 444,-32768, 445, 6104, 5483, + 2214,-32768,-32768, 160, 2885, 749, 5123,-32768, 238, 749, + 23,-32768, 5573,-32768, 6104, 346, 6104, 6104, 6104, 6104, + 347, 5573, 5573,-32768, 363, 448, 353, 450,-32768,-32768, + 6104, 355,-32768, 326, 351, 315,-32768, 326,-32768, 315, + -2, 212,-32768,-32768, 33,-32768,-32768, 5573, 206, 457, +-32768, 5573,-32768,-32768, 6104,-32768,-32768, 6104, 6104,-32768, +-32768,-32768,-32768,-32768, 30,-32768,-32768,-32768, 2885,-32768, + 2123, 6104,-32768,-32768,-32768,-32768, 749, 315, 458, 246, +-32768,-32768,-32768,-32768, 469, 470,-32768 +}; + +static const short yypgoto[] = {-32768, +-32768, 479,-32768, 32,-32768,-32768, 95, 1321, -10, -149, + -27, -49,-32768,-32768, 16, 46, 7,-32768,-32768,-32768, +-32768, 1012,-32768,-32768,-32768, -247, -196, 8, -300, -201, +-32768, -12,-32768, 18,-32768, -1,-32768,-32768,-32768,-32768, +-32768,-32768,-32768, -173, -159, -139, -289, -20, 61,-32768, +-32768, -46,-32768,-32768, 115, -103,-32768,-32768, -95,-32768, +-32768,-32768,-32768, 616, 473, 698,-32768,-32768, -89, 56, +-32768, -444, -24, -461, -274, -389,-32768,-32768, -32, -301, + 256,-32768,-32768, -169, 119, -56,-32768 +}; + + +#define YYLAST 6287 + + +static const short yytable[] = { 68, + 68, 244, 185, 315, 337, 68, 68, 68, 68, 68, + 68, 187, 168, 340, 322, 256, 203, 203, 203, 232, + 321, 440, 226, 68, 302, 199, 199, 211, 186, 297, + 434, 462, 214, 77, 468, 462, 209, 312, 228, 230, + 318, 299, 515, 517, 424, 312, 318, -272, 68, 82, + 566, 187, 570, 203, 250, 251, 250, 251, 468, 424, + 236, 250, 251, 187, 250, 251, 250, 251, 233, 569, + 215, -303, 564, 351, 203, 78, 568, 454, 68, 79, + 284, -302, -304, 296, 342, 425, 426, 465, 354, 289, + 241, 242, -305, 355, 222, 343, 344, 295, 417, -303, + 425, 426, 174, 177, 373, 179, 180, 80, 285, -302, + -304, 286, 427, 425, 426, 70, 70, 425, 426, 212, + -305, 70, 320, 320, 70, 457, 250, 251, 289, 258, + 241, 242, 584, 608, 423, 300, 241, 242, 68, 494, + 241, 242, 323, 215, 297, 218, 241, 242, 241, 242, + 569, -308, 434, 528, 252, 462, 241, 242, -211, -307, + 284, -273, 258, 495, 70, -306, 281, 282, 283, 253, + 324, 471, 287, 325, 298, 596, 597, 271, 272, -308, + 598, 78, -308, -343, 309, 79, -211, -307, 334, -211, + 68, 335, 258, -306, 203, 226, 278, 279, 280, 281, + 282, 283, 360, 199, 291, -298, 203, 355, 203, -343, + -301, -343, 292, 330, -343, 199, 68, -343, 612, 310, + 439, 68, 316, 323, 289, 339, 226, 279, 280, 281, + 282, 283, -50, -298, 304, 468, 462, 316, -301, 371, + -212, 418, 419, 68, 68, 68, 68, 68, 68, 68, + 293, 350, 68, 187, 335, 306, 76, 76, 294, 525, + 439, 538, 76, 76, 76, 76, 76, 76, -212, 196, + 374, -212, 531, 76, 76, 76, 363, 520, -53, 487, + 76, 402, 403, 307, 203, 404, 208, 488, 546, 603, + 552, 210, 291, 203, 551, 535, 434, 438, 553, 463, + 292, 68, -45, 445, 293, 76, 70, -52, 489, 326, + 76, 68, 294, 68, 487, 332, 490, 68, -51, 68, + 552, 336, 488, 203, 68, 483, 406, 403, 553, 346, + 407, 76, 70, 203, 581, 76, 348, 70, 583, 562, + 364, 365, 366, 367, 368, 369, 68, 258, 358, 258, + 361, 472, 451, 403, 258, 357, 452, 464, 403, 70, + 352, 407, -39, -46, 271, 272, 353, -38, 70, 271, + 272, 359, 511, 187, 246, 247, 248, 249, 375, 439, + 320, 276, 277, 278, 279, 280, 281, 282, 283, 279, + 280, 281, 282, 283, 442, 76, 447, 458, 320, 469, + 504, 601, 470, 203, 476, 611, 203, 477, 493, -46, + 480, 481, 486, 500, 505, 492, 506, 70, 68, 68, + 455, 507, 508, 512, 514, 516, 68, 70, 521, 70, + 523, 530, 532, 70, 533, 70, 485, 68, 491, 534, + 194, 518, 519, 537, 539, 559, 542, 76, 560, 563, + 426, 76, 574, 576, 577, 586, 587, 591, 590, 593, + 592, 595, 70, 76, 594, 76, 606, 613, 616, 617, + 614, 68, 497, 76, 555, 604, 600, 158, 76, 57, + 187, 599, 509, 203, 185, 170, 0, 565, 178, 203, + 0, 0, 0, 187, 68, 68, 0, 544, 0, 68, + 76, 76, 76, 76, 76, 76, 76, 0, 0, 76, + 186, 0, 0, 0, 502, 0, 0, 0, 68, 0, + 0, 68, 0, 68, 0, 0, 0, 0, 0, 68, + 0, 0, 0, 68, 0, 70, 0, 0, 0, 405, + 408, 76, 70, 0, 0, 0, 0, 0, 0, 0, + 76, 0, 0, 70, 0, 0, 0, 0, 76, 0, + 0, 0, 0, 0, 0, 0, 0, 541, 76, 0, + 76, 0, 0, 0, 76, 0, 76, 0, 450, 453, + 76, 76, 0, 0, 0, 0, 0, 0, 0, 408, + 76, 0, 0, 0, 0, 0, 0, 68, 0, 68, + 0, 0, 0, 76, 0, 453, 0, 0, 0, 0, + 70, 70, 0, 0, 0, 70, 73, 73, 0, 575, + 157, 0, 73, 73, 73, 73, 73, 73, 189, 0, + 0, 0, 0, 0, 70, 0, 0, 70, 0, 0, + 73, 0, 0, 0, 0, 70, 0, 0, 0, 70, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 76, 0, 0, 76, 0, 73, 0, 0, 189, 0, + 0, 0, 0, 0, 0, 76, 76, 0, 0, 0, + 189, 0, 0, 76, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 76, 73, 349, 0, 75, 75, + 0, 0, 0, 0, 75, 75, 75, 75, 75, 75, + 190, 0, 0, 70, 0, 70, 0, 0, 0, 0, + 0, 0, 75, 0, 0, 0, 0, 0, 76, 0, + 0, 0, 0, 258,-32768,-32768,-32768,-32768, 263, 264, + 76, 0,-32768,-32768, 0, 0, 76, 75, 271, 272, + 190, 76, 76, 0, 0, 73, 76, 0, 0, 0, + 0, 0, 190, 274, 275, 276, 277, 278, 279, 280, + 281, 282, 283, 0, 0, 76, 0, 75, 76, 0, + 76, 422, 0, 0, 0, 0, 76, 0, 0, 0, + 76, 441, 0, 443, 0, 0, 0, 448, 0, 449, + 0, 0, 0, 0, 0, 0, 0, 73, 0, 0, + 0, 0, 258, 259, 260, 261, 262, 263, 264, 265, + 266, 267, 268, 269, 270, 0, 475, 271, 272, 0, + 0, 0, 0, 73, 0, 0, 0, 75, 73, 0, + 273, 0, 274, 275, 276, 277, 278, 279, 280, 281, + 282, 283, 0, 0, 76, 0, 76, 0, 0, 456, + 73, 73, 73, 73, 73, 73, 73, 0, 0, 73, + 189, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 75, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 503, + 0, 0, 0, 0, 0, 0, 510, 0, 0, 0, + 0, 0, 0, 0, 0, 75, 0, 522, 73, 0, + 75, 0, 0, 0, 0, 0, 0, 0, 73, 0, + 73, 0, 0, 0, 73, 0, 73, 0, 0, 0, + 0, 73, 75, 75, 75, 75, 75, 75, 75, 0, + 0, 75, 190, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 73, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 556, 557, 0, 0, 0, 558, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 189, 0, 0, 0, 0, 0, 0, 0, 572, 0, + 75, 573, 0, 0, 0, 0, 0, 0, 0, 579, + 75, 0, 75, 580, 0, 0, 75, 0, 75, 0, + 0, 0, 0, 75, 0, 0, 0, 0, 0, 198, + 198, 198, 0, 0, 0, 73, 73, 0, 0, 0, + 0, 0, 0, 73, 0, 75, 0, 0, 0, 0, + 0, 0, 0, 0, 73, 0, 0, 0, 219, 221, + 0, 0, 227, 198, 0, 0, 239, 240, 0, 0, + 0, 0, 190, 0, 0, 0, 0, 609, 0, 610, + 0, 0, 0, 0, 0, 0, 0, 198, 73, 0, + 0, 0, 0, 0, 0, 0, 0, 189, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 189, 73, 73, 0, 0, 0, 73, 75, 75, 0, + 0, 0, 0, 0, 0, 75, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 73, 75, 0, 73, 0, + 73, 0, 0, 0, 0, 0, 73, 0, 0, 0, + 73, 0, 258, 259, 260, 261, 262, 263, 264, 265, + 266, 267, 268, 269, 270, 0, 0, 271, 272, 0, + 75, 0, 331, 0, 0, 0, 0, 0, 0, 190, + 273, 0, 274, 275, 276, 277, 278, 279, 280, 281, + 282, 283, 190, 75, 75, 0, 0, 0, 75, 0, + 0, 0, 0, 0, 327, 328, 239, 198, 0, 0, + 0, 0, 0, 0, 73, 0, 73, 75, 0, 198, + 75, 198, 75, 0, 0, 0, 0, 0, 75, 0, + 0, 0, 75, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 227, 0, 0, 0, 0, 0, 376, + 377, 378, 379, 380, 381, 382, 383, 384, 385, 386, + 387, 388, 389, 390, 391, 392, 393, 394, 395, 396, + 397, 398, 399, 400, 401, 0, 75, 198, 75, 0, + 0, 0, 0, 0, 415, 416, 198, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 227, 0, 0, 0, 0, 0, 227, 175, 175, + 0, 175, 175, 0, 0, 0, 198, 0, 197, 197, + 197, 0, 459, 461, 0, 175, 198, 467, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 474, 0, + 0, 0, 0, 0, 0, 478, 0, 0, 0, 0, + 0, 467, 0, 0, 0, 238, 0, 0, 0, 0, + 0, 479, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 197, 0, 0, 0, + 175, 0, 258, 259, 260, 261, 262, 263, 264, 265, + 266, 267, 268, 269, 270, 0, 198, 271, 272, 198, + 0, 0, 0, 0, 498, 499, 0, 0, 0, 0, + 273, 484, 274, 275, 276, 277, 278, 279, 280, 281, + 282, 283, 0, 0, 0, 0, 0, 0, 258, 259, + 260, 261, 262, 263, 264, 529, 0, 267, 268, 0, + 175, 0, 0, 271, 272, 0, 0, 0, 0, 0, + 0, 536, 0, 0, 0, 0, 0, 540, 274, 275, + 276, 277, 278, 279, 280, 281, 282, 283, 0, 0, + 0, 478, 0, 0, 0, 545, 198, 0, 547, 548, + 549, 550, 198, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 197, 561, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 197, 0, + 197, 0, 478, 0, 0, 0, 0, 0, 0, 0, + 0, 478, 0, 0, 0, 0, 0, 0, 467, 0, + 0, 0, 0, 0, 585, 0, 0, 0, 0, 0, + 0, 0, 0, 588, 589, 0, 175, 175, 175, 175, + 175, 175, 0, 0, 0, 0, 0, 0, 0, 0, + -4, 2, 0, 3, 4, 5, 6, 7, 0, 602, + 0, 8, 9, 607, 0, 0, 10, 0, 11, 12, + 13, 14, 15, 16, 17, 0, 197, 18, 19, 20, + 21, 22, 23, 24, 0, 197, 25, 0, 0, 0, + 0, 26, 27, 28, 29, 30, 31, 32, 33, 34, + 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, + 45, 46, 47, 48, 0, 197, 175, 0, 0, 0, + 0, 0, 0, 0, 0, 197, 0, 0, 0, 0, + 0, 0, 49, 0, 0, 50, 51, 52, 53, 0, + 54, 0, 0, 0, 0, 0, 0, 0, -298, 0, + 0, 0, 0, 0, 55, 56, -298, -298, -298, 0, + 0, 0, -298, -298, 0, -298, -4, -4, 0, 0, + 0, 0, 0, 0, -269, 0, 0, 0, 0, 0, + 0, 0, -298, -298, 0, -298, -298, -298, -298, 0, + 0, 0, 0, 0, 0, 197, 0, 0, 197, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 175, 0, -298, -298, -298, -298, -298, -298, -298, -298, + -298, -298, -298, -298, -298, 0, 0, -298, -298, -298, + 0, -298, 0, 0, 0, 0, 0, 0, 0, -298, + -298, 0, -298, -298, -298, -298, -298, -298, -298, -298, + -298, -298, 0, 0, 0, 0, -298, -298, -298, -298, + -298, 0, -301, 175, -298, -298, 0, 0, 0, 0, + -301, -301, -301, 0, 0, 197, -301, -301, 0, -301, + 0, 197, 0, 0, 0, 0, 0, 0, -270, 0, + 0, 0, 0, 0, 0, 0, -301, -301, 0, -301, + -301, -301, -301, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 175, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, -301, -301, -301, -301, + -301, -301, -301, -301, -301, -301, -301, -301, -301, 0, + 0, -301, -301, -301, 0, -301, 0, 0, 0, 0, + 0, 0, 0, -301, -301, 0, -301, -301, -301, -301, + -301, -301, -301, -301, -301, -301, 0, -223, 0, 0, + -301, -301, -301, -301, -301, -223, -223, -223, -301, -301, + 0, -223, -223, 0, -223, 0, 0, 0, 0, 0, + 0, 0, 0, -271, 0, 0, 0, 0, 0, 0, + 0, -223, -223, 0, -223, -223, -223, -223, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, -223, -223, -223, -223, -223, -223, -223, -223, -223, + -223, -223, -223, -223, 0, 0, -223, -223, -223, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, -223, + 0, -223, -223, -223, -223, -223, -223, -223, -223, -223, + -223, 0, 0, 0, 0, -223, -223, -223, 0, -223, + 0, 0, 0, -223, -223, 2, 0, 3, 4, 5, + 6, 7, -4, -4, -4, 8, 9, 0, 0, -4, + 10, 0, 11, 12, 13, 14, 15, 16, 17, 0, + 0, 18, 19, 20, 21, 22, 23, 24, 0, 0, + 25, 0, 0, 0, 0, 26, 27, 28, 29, 30, + 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, + 41, 42, 43, 44, 45, 46, 47, 48, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 49, 0, 0, 50, + 51, 52, 53, 0, 54, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 55, 56, + 0, 0, 0, 2, 0, 3, 4, 5, 6, 7, + -4, -4, -4, 8, 9, 0, -4, -4, 10, 0, + 11, 12, 13, 14, 15, 16, 17, 0, 0, 18, + 19, 20, 21, 22, 23, 24, 0, 0, 25, 0, + 0, 0, 0, 26, 27, 28, 29, 30, 31, 32, + 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, + 43, 44, 45, 46, 47, 48, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 49, 0, 0, 50, 51, 52, + 53, 0, 54, 0, 2, 0, 3, 4, 5, 6, + 7, 0, 0, -4, 8, 9, 55, 56, -4, 10, + -4, 11, 12, 13, 14, 15, 16, 17, -4, -4, + 18, 19, 20, 21, 22, 23, 24, 0, 0, 25, + 0, 0, 0, 0, 26, 27, 28, 29, 30, 31, + 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, + 42, 43, 44, 45, 46, 47, 48, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 49, 0, 0, 50, 51, + 52, 53, 0, 54, 0, 2, 0, 3, 4, 5, + 6, 7, 0, 0, -4, 8, 9, 55, 56, -4, + 10, 0, 11, 12, 13, 14, 15, 16, 17, -4, + -4, 18, 19, 20, 21, 22, 23, 24, 0, 0, + 25, 0, 0, 0, 0, 26, 27, 28, 29, 30, + 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, + 41, 42, 43, 44, 45, 46, 47, 48, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 49, 0, 0, 50, + 51, 52, 53, 0, 54, 0, 2, 0, 3, 4, + 5, 6, 7, 0, -4, -4, 8, 9, 55, 56, + 0, 10, 0, 11, 12, 13, 14, 15, 16, 17, + -4, -4, 18, 19, 20, 21, 22, 23, 24, 0, + 0, 25, 0, 0, 0, 0, 26, 27, 28, 29, + 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, + 40, 41, 42, 43, 44, 45, 46, 47, 48, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 49, 0, 0, + 50, 51, 52, 53, 0, 54, 0, 2, 0, 3, + 4, 5, 6, 7, 0, 0, 0, 8, 9, 55, + 56, 0, 10, -4, 11, 12, 13, 14, 15, 16, + 17, -4, -4, 18, 19, 20, 21, 22, 23, 24, + 0, 0, 25, 0, 0, 0, 0, 26, 27, 28, + 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, + 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 49, 0, + 0, 50, 51, 52, 53, 0, 54, 0, 2, 0, + 3, 4, 5, 6, 7, 0, 0, 0, 8, 9, + 55, 56, 0, 10, 0, 11, 12, 13, 14, 15, + 16, 17, -4, -4, 18, 19, 20, 21, 22, 23, + 24, 0, 0, 25, 0, 0, 0, 0, 26, 27, + 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, + 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, + 48, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 49, + 0, 0, 223, 51, 52, 53, 0, 54, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 55, 56, 0, 0, 0, 2, -4, 3, 4, + 5, 6, 7, -4, -4, 0, 8, 9, 0, 0, + 0, 10, 0, 11, 12, 13, 14, 15, 16, 17, + 0, 0, 18, 19, 20, 21, 22, 23, 24, 0, + 0, 25, 0, 0, 0, 0, 26, 27, 28, 29, + 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, + 40, 41, 42, 43, 44, 45, 46, 47, 48, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 49, 0, 0, + 50, 51, 52, 53, 0, 54, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 55, + 56, 0, 0, 0, 2, -4, 3, 4, 5, 6, + 7, -4, -4, 0, 8, 9, 0, 0, 0, 10, + 0, 11, 12, 13, 14, 15, 16, 17, 0, 0, + 18, 19, 20, 21, 22, 23, 24, 0, 0, 25, + 0, 0, 0, 0, 26, 27, 28, 29, 30, 31, + 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, + 42, 43, 44, 45, 46, 47, 48, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 49, 0, 0, 50, 51, + 52, 53, 0, 54, 0, 2, 0, 3, 4, 5, + 6, 7, 0, 0, -4, 8, 9, 55, 56, 0, + 10, -4, 11, 12, 13, 14, 15, 16, 17, -4, + -4, 18, 19, 20, 21, 22, 23, 24, 0, 0, + 25, 0, 0, 0, 0, 26, 27, 28, 29, 30, + 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, + 41, 42, 43, 44, 45, 46, 47, 48, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 49, 0, 0, 50, + 51, 52, 53, 0, 54, 0, 0, 0, 3, 4, + 5, 6, 7, 0, 0, 0, 8, 9, 55, 56, + 0, 10, 0, 11, 12, 13, 14, 15, 16, 17, + -4, -4, 18, 19, 20, 21, 22, 23, 24, 0, + 0, 25, 0, 0, 0, 0, 26, 27, 28, 29, + 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, + 40, 41, 42, 43, 44, 45, 46, 47, 48, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 49, 0, 0, + 50, 51, 52, 53, 0, 54, 0, 0, 0, 3, + 4, 5, 0, 7, 0, 0, 0, 8, 9, 55, + 56, 0, 10, 0, 11, 12, 13, 14, 15, 16, + 17, 0, 362, 181, 182, 20, 21, 22, 23, 24, + 0, 0, 0, 0, 0, 0, 0, 0, 27, 0, + 0, 30, 31, 171, 172, 34, 35, 173, 37, 38, + 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 49, 0, + 0, 192, 51, 52, 193, 194, 54, 0, 0, -343, + -343, -343, 0, -343, 0, 0, 0, -343, -343, 0, + 195, 56, -343, 289, -343, -343, -343, -343, -343, -343, + -343, 295, 0, -343, -343, -343, -343, -343, -343, -343, + 0, 0, 0, 0, 0, 0, 0, 0, -343, 0, + 0, -343, -343, -343, -343, -343, -343, -343, -343, -343, + -343, -343, -343, -343, -343, -343, -343, -343, -343, -343, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, -343, 0, + 0, -343, -343, -343, -343, -343, -343, 0, 0, -345, + -345, -345, 0, -345, 0, 0, 0, -345, -345, 0, + -343, -343, -345, -343, -345, -345, -345, -345, -345, -345, + -345, -343, 0, -345, -345, -345, -345, -345, -345, -345, + 0, 0, 0, 0, 0, 0, 0, 0, -345, 0, + 0, -345, -345, -345, -345, -345, -345, -345, -345, -345, + -345, -345, -345, -345, -345, -345, -345, -345, -345, -345, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, -345, 0, + 0, -345, -345, -345, -345, -345, -345, 0, 0, -344, + -344, -344, 0, -344, 0, 0, 0, -344, -344, 0, + -345, -345, -344, -345, -344, -344, -344, -344, -344, -344, + -344, -345, 0, -344, -344, -344, -344, -344, -344, -344, + 0, 0, 0, 0, 0, 0, 0, 0, -344, 0, + 0, -344, -344, -344, -344, -344, -344, -344, -344, -344, + -344, -344, -344, -344, -344, -344, -344, -344, -344, -344, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, -344, 0, + 0, -344, -344, -344, -344, -344, -344, 0, 0, 3, + 4, 5, 0, 7, 0, 0, 0, 8, 9, 0, + -344, -344, 10, -344, 11, 12, 13, 14, 15, 16, + 17, -344, 0, 181, 182, 20, 21, 22, 23, 24, + 0, 0, 0, 0, 0, 0, 0, 0, 27, 0, + 0, 30, 31, 171, 172, 34, 35, 173, 37, 38, + 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 49, 0, + 0, 192, 51, 52, 193, 194, 54, 0, 0, 3, + 4, 5, 0, 7, 0, 0, 0, 8, 9, 0, + 195, 56, 10, 0, 11, 12, 13, 14, 15, 16, + 17, 196, 0, 181, 182, 20, 21, 22, 23, 24, + 0, 0, 0, 0, 0, 0, 0, 0, 27, 0, + 0, 30, 31, 171, 172, 34, 35, 173, 37, 38, + 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 49, 0, + 0, 192, 51, 52, 193, 194, 54, 0, 0, 3, + 4, 5, 0, 7, 0, 0, 0, 8, 9, 0, + 195, 56, 10, 0, 11, 12, 13, 14, 15, 16, + 17, 208, 0, 181, 182, 20, 21, 22, 23, 24, + 0, 0, 0, 0, 0, 0, 0, 0, 27, 0, + 0, 30, 31, 171, 172, 34, 35, 173, 37, 38, + 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 49, 0, + 0, 192, 51, 52, 193, 194, 54, 0, 0, -343, + -343, -343, 0, -343, 0, 0, 0, -343, -343, 0, + 195, 56, -343, 0, -343, -343, -343, -343, -343, -343, + -343, 210, 0, -343, -343, -343, -343, -343, -343, -343, + 0, 0, 0, 0, 0, 0, 0, 0, -343, 0, + 0, -343, -343, -343, -343, -343, -343, -343, -343, -343, + -343, -343, -343, -343, -343, -343, -343, -343, -343, -343, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, -343, 0, + 0, -343, -343, -343, -343, -343, -343, 0, 0, -344, + -344, -344, 0, -344, 0, 0, 0, -344, -344, 0, + -343, -343, -344, 0, -344, -344, -344, -344, -344, -344, + -344, -343, 0, -344, -344, -344, -344, -344, -344, -344, + 0, 0, 0, 0, 0, 0, 0, 0, -344, 0, + 0, -344, -344, -344, -344, -344, -344, -344, -344, -344, + -344, -344, -344, -344, -344, -344, -344, -344, -344, -344, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, -344, 0, + 0, -344, -344, -344, -344, -344, -344, 0, 0, 3, + 4, 5, 0, 7, 0, 0, 0, 8, 9, 0, + -344, -344, 10, 0, 11, 12, 13, 14, 15, 16, + 17, -344, 0, 181, 182, 20, 21, 22, 23, 24, + 0, 0, 0, 0, 0, 0, 0, 0, 27, 0, + 0, 30, 31, 171, 172, 34, 35, 173, 37, 38, + 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 49, 0, + 0, 192, 51, 52, 193, 194, 54, 0, 0, 3, + 4, 5, 0, 7, 0, 0, 0, 8, 9, 0, + 195, 56, 10, 0, 11, 12, 13, 14, 15, 16, + 17, 485, 0, 181, 182, 20, 21, 22, 23, 24, + 0, 0, 0, 0, 0, 0, 0, 0, 27, 0, + 0, 30, 31, 171, 172, 34, 35, 173, 37, 38, + 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 49, 0, + 0, 192, 51, 52, 193, 194, 54, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 195, 56, 83, 84, 85, 86, 87, 88, 89, 90, + 0, 491, 91, 92, 93, 94, 95, 0, 0, 96, + 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, + 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, + 117, 118, 119, 120, 121, 122, 123, 124, 34, 35, + 125, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 126, 127, 128, 129, 130, 131, 0, 132, 133, + 0, 0, 134, 0, 135, 0, 136, 137, 138, 139, + 0, 0, 0, 0, 140, 0, 0, 141, 0, 0, + 0, 0, 0, 142, 143, 144, 145, 146, 147, 148, + 149, 150, 151, 0, 152, 83, 84, 85, 86, 87, + 88, 89, 90, 153, 0, 91, 92, 93, 94, 95, + 0, 0, 96, 97, 98, 99, 100, 101, 102, 103, + 104, 105, 160, 161, 162, 163, 110, 111, 112, 113, + 114, 115, 116, 117, 118, 119, 120, 164, 165, 166, + 124, 234, 235, 167, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 126, 127, 128, 129, 130, 131, + 0, 132, 133, 0, 0, 134, 0, 135, 0, 136, + 137, 138, 139, 0, 0, 0, 0, 0, 0, 0, + 141, 0, 0, 0, 0, 0, 142, 143, 144, 145, + 146, 147, 148, 149, 150, 151, 0, 152, 83, 84, + 85, 86, 87, 88, 89, 90, 153, 0, 91, 92, + 93, 94, 95, 0, 0, 96, 97, 98, 99, 100, + 101, 102, 103, 104, 105, 160, 161, 162, 163, 110, + 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, + 164, 165, 166, 124, 213, 0, 167, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 126, 127, 128, + 129, 130, 131, 0, 132, 133, 0, 0, 134, 0, + 135, 0, 136, 137, 138, 139, 0, 0, 0, 0, + 0, 0, 0, 141, 0, 0, 0, 0, 0, 142, + 143, 144, 145, 146, 147, 148, 149, 150, 151, 0, + 152, 83, 84, 85, 86, 87, 88, 89, 90, 153, + 0, 91, 92, 93, 94, 95, 0, 0, 96, 97, + 98, 99, 100, 101, 102, 103, 104, 105, 160, 161, + 162, 163, 110, 111, 112, 113, 114, 115, 116, 117, + 118, 119, 120, 164, 165, 166, 124, 0, 0, 167, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 126, 127, 128, 129, 130, 131, 0, 132, 133, 0, + 0, 134, 0, 135, 0, 136, 137, 138, 139, 0, + 0, 0, 0, 0, 0, 0, 141, 0, 0, 0, + 0, 0, 142, 143, 144, 145, 146, 147, 148, 149, + 150, 151, 0, 152, 0, 3, 4, 5, 0, 7, + 0, 0, 153, 8, 9, 0, 0, 0, 10, 0, + 11, 12, 13, 14, 15, 16, 17, 0, 0, 181, + 182, 20, 21, 22, 23, 24, 0, 0, 0, 0, + 0, 0, 0, 0, 27, 0, 0, 30, 31, 171, + 172, 34, 35, 173, 37, 38, 39, 40, 41, 42, + 43, 44, 45, 46, 47, 48, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 49, 0, 0, 192, 51, 52, + 193, 194, 54, 0, 0, 0, 0, 0, 0, 0, + 3, 4, 5, 0, 7, 0, 195, 56, 8, 9, + 0, 0, 329, 10, 0, 11, 12, 13, 14, 15, + 16, 17, 0, 0, 181, 182, 20, 21, 22, 23, + 24, 0, 0, 0, 0, 0, 0, 0, 0, 27, + 0, 0, 30, 31, 171, 172, 34, 35, 173, 37, + 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, + 48, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 49, + 0, 0, 192, 51, 52, 193, 194, 54, 0, 0, + 0, 0, 0, 0, 0, 3, 4, 5, 6, 7, + 0, 195, 56, 8, 9, 0, 0, 338, 10, 0, + 11, 12, 13, 14, 15, 16, 17, 0, 0, 18, + 19, 20, 21, 22, 23, 24, 0, 0, 25, 0, + 0, 0, 0, 26, 27, 28, 29, 30, 31, 32, + 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, + 43, 44, 45, 46, 47, 48, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 49, 0, 0, 50, 51, 52, + 53, 0, 54, 0, 0, 3, 4, 5, 0, 7, + 0, 0, 0, 8, 9, 0, 55, 56, 10, 0, + 11, 12, 13, 14, 15, 16, 17, 0, 0, 18, + 19, 20, 21, 22, 23, 24, 0, 0, 25, 0, + 0, 0, 0, 0, 27, 0, 0, 30, 31, 171, + 172, 34, 35, 173, 37, 38, 39, 40, 41, 42, + 43, 44, 45, 46, 47, 48, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 49, 0, 0, 50, 51, 52, + 53, 0, 54, 0, 0, 3, 4, 5, 0, 7, + 0, 0, 0, 8, 9, 0, 55, 56, 10, 0, + 11, 12, 13, 14, 15, 16, 17, 0, 0, 181, + 182, 20, 21, 22, 23, 24, 0, 0, 0, 0, + 0, 0, 0, 0, 27, 0, 0, 30, 31, 171, + 172, 34, 35, 173, 37, 38, 39, 40, 41, 42, + 43, 44, 45, 46, 47, 48, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 49, 0, 0, 192, 51, 52, + 193, 194, 54, 0, 0, 3, 4, 5, 0, 7, + 0, 0, 0, 8, 9, 0, 195, 56, 10, 0, + 11, 12, 13, 14, 15, 16, 17, 0, 0, 181, + 182, 183, 21, 22, 23, 24, 0, 0, 0, 0, + 0, 0, 0, 0, 27, 0, 0, 30, 31, 171, + 172, 34, 35, 173, 37, 38, 39, 40, 41, 42, + 43, 44, 45, 46, 47, 48, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 49, 0, 0, 192, 51, 52, + 460, 194, 54, 0, 0, 3, 4, 5, 0, 7, + 0, 0, 0, 8, 9, 0, 195, 56, 10, 0, + 11, 12, 13, 14, 15, 16, 17, 0, 0, 181, + 182, 183, 21, 22, 23, 24, 0, 0, 0, 0, + 0, 0, 0, 0, 27, 0, 0, 30, 31, 171, + 172, 34, 35, 173, 37, 38, 39, 40, 41, 42, + 43, 44, 45, 46, 47, 48, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 49, 0, 0, 192, 51, 52, + 466, 194, 54, 0, 0, 3, 4, 5, 0, 7, + 0, 0, 0, 8, 9, 0, 195, 56, 10, 0, + 11, 12, 13, 14, 15, 16, 17, 0, 0, 181, + 182, 183, 21, 22, 23, 24, 0, 0, 0, 0, + 0, 0, 0, 0, 27, 0, 0, 30, 31, 171, + 172, 34, 35, 173, 37, 38, 39, 40, 41, 42, + 43, 44, 45, 46, 47, 48, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 49, 0, 0, 192, 51, 52, + 582, 194, 54, 0, 0, 3, 4, 5, 0, 7, + 0, 0, 0, 8, 9, 0, 195, 56, 10, 0, + 11, 12, 13, 14, 15, 16, 17, 0, 0, 181, + 182, 183, 21, 22, 23, 24, 0, 0, 0, 0, + 0, 0, 0, 0, 27, 0, 0, 30, 31, 171, + 172, 34, 35, 173, 37, 38, 39, 40, 41, 42, + 43, 44, 45, 46, 47, 48, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 49, 0, 0, 192, 51, 52, + 370, 0, 54, 0, 0, 3, 4, 5, 0, 7, + 0, 0, 0, 8, 9, 0, 195, 56, 10, 0, + 11, 12, 13, 14, 15, 16, 17, 0, 0, 181, + 182, 183, 21, 22, 23, 24, 0, 0, 0, 0, + 0, 0, 0, 0, 27, 0, 0, 30, 31, 171, + 172, 34, 35, 173, 37, 38, 39, 40, 41, 42, + 43, 44, 45, 46, 47, 48, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 49, 0, 0, 192, 51, 52, + 444, 0, 54, 0, 0, 3, 4, 5, 0, 7, + 0, 0, 0, 8, 9, 0, 195, 56, 10, 0, + 11, 12, 13, 14, 15, 16, 17, 0, 0, 181, + 182, 183, 21, 22, 23, 24, 0, 0, 0, 0, + 0, 0, 0, 0, 27, 0, 0, 30, 31, 171, + 172, 34, 35, 173, 37, 38, 39, 40, 41, 42, + 43, 44, 45, 46, 47, 48, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 49, 0, 0, 192, 51, 52, + 543, 0, 54, 0, 0, 3, 4, 5, 0, 7, + 0, 0, 0, 8, 9, 0, 195, 56, 10, 0, + 11, 12, 13, 14, 15, 16, 17, 0, 0, 181, + 182, 183, 21, 22, 23, 24, 0, 0, 0, 0, + 0, 0, 0, 0, 27, 0, 0, 30, 31, 171, + 172, 34, 35, 173, 37, 38, 39, 40, 41, 42, + 43, 44, 45, 46, 47, 48, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 49, 0, 0, 192, 51, 52, + 578, 0, 54, 0, 0, 3, 4, 5, 0, 7, + 0, 0, 0, 8, 9, 0, 195, 56, 10, 0, + 11, 12, 13, 14, 15, 16, 17, 0, 0, 181, + 182, 183, 21, 22, 23, 24, 0, 0, 0, 0, + 0, 0, 0, 0, 27, 0, 0, 30, 31, 171, + 172, 34, 35, 173, 37, 38, 39, 40, 41, 42, + 43, 44, 45, 46, 47, 48, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 49, 0, 0, 192, 51, 52, + 0, 0, 54, 0, 0, 3, 4, 5, 0, 7, + 0, 0, 0, 8, 9, 0, 195, 56, 10, 0, + 11, 12, 13, 14, 15, 16, 17, 0, 0, 181, + 182, 20, 21, 22, 23, 24, 0, 0, 0, 0, + 0, 0, 0, 0, 27, 0, 0, 30, 31, 171, + 172, 34, 35, 173, 37, 38, 39, 40, 41, 42, + 43, 44, 45, 46, 47, 48, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 49, 0, 0, 192, 51, 52, + 0, 0, 54, 0, 0, 3, 4, 5, 0, 7, + 0, 0, 0, 8, 9, 0, 195, 56, 10, 0, + 11, 12, 13, 14, 15, 16, 17, 0, 0, 181, + 182, 183, 21, 22, 23, 24, 0, 0, 0, 0, + 0, 0, 0, 0, 184, 0, 0, 30, 31, 171, + 172, 34, 35, 173, 37, 38, 39, 40, 41, 42, + 43, 44, 45, 46, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 49, 0, 0, 50, 51, 52, + 53, 0, 54, 3, 4, 5, 0, 7, 554, 0, + 0, 8, 9, 0, 0, 0, 10, 0, 11, 12, + 13, 14, 15, 16, 17, 0, 0, 181, 182, 183, + 21, 22, 23, 24, 0, 0, 0, 0, 0, 0, + 0, 0, 184, 0, 0, 30, 31, 171, 172, 34, + 35, 173, 37, 38, 39, 40, 41, 42, 43, 44, + 45, 46, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 49, 0, 0, 50, 51, 52, 53, 0, + 54, 3, 4, 5, 0, 7, 0, 0, 0, 8, + 9, 0, 0, 0, 10, 0, 11, 12, 13, 14, + 15, 16, 17, 0, 0, 181, 182, 183, 21, 22, + 23, 24, 0, 0, 0, 0, 0, 0, 0, 0, + 184, 0, 0, 30, 31, 171, 172, 34, 35, 173, + 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 49, 0, 0, 254, 51, 52, 255, 0, 54, 3, + 4, 5, 0, 7, 0, 0, 0, 8, 9, 0, + 0, 0, 10, 0, 11, 12, 13, 14, 15, 16, + 17, 0, 0, 181, 182, 183, 21, 22, 23, 24, + 0, 0, 0, 0, 0, 0, 0, 0, 184, 0, + 0, 30, 31, 171, 172, 34, 35, 173, 37, 38, + 39, 40, 41, 42, 43, 44, 45, 46, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 49, 0, + 0, 254, 51, 52, 482, 0, 54, 3, 4, 5, + 0, 7, 0, 0, 0, 8, 9, 0, 0, 0, + 10, 0, 11, 12, 13, 14, 15, 16, 17, 0, + 0, 181, 182, 183, 21, 22, 23, 24, 0, 0, + 0, 0, 0, 0, 0, 0, 184, 0, 0, 30, + 31, 171, 172, 34, 35, 173, 37, 38, 39, 40, + 41, 42, 43, 44, 45, 46, 0, 258, 259, 260, + 261, 262, 263, 264, 265, 266, 267, 268, 269, 270, + 0, 0, 271, 272, 0, 0, 49, 0, 0, 192, + 51, 52, 0, 0, 54, 273, 0, 274, 275, 276, + 277, 278, 279, 280, 281, 282, 283, 258, 259, 260, + 261, 262, 263, 264, 265, 266, 267, 268,-32768,-32768, + 0, 0, 271, 272, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 274, 275, 276, + 277, 278, 279, 280, 281, 282, 283, 258, 259, 260, + 261, 262, 263, 264, 265, 0, 267, 268, 0, 0, + 0, 0, 271, 272, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 274, 275, 276, + 277, 278, 279, 280, 281, 282, 283 +}; + +static const short yycheck[] = { 1, + 2, 58, 13, 177, 206, 7, 8, 9, 10, 11, + 12, 13, 6, 210, 184, 65, 18, 19, 20, 52, + 180, 311, 50, 25, 81, 18, 19, 20, 13, 76, + 305, 332, 26, 2, 336, 336, 19, 13, 51, 52, + 26, 1, 432, 433, 47, 13, 26, 26, 50, 4, + 512, 53, 514, 55, 34, 35, 34, 35, 360, 47, + 54, 34, 35, 65, 34, 35, 34, 35, 53, 514, + 116, 81, 47, 223, 76, 47, 47, 325, 80, 51, + 81, 81, 81, 76, 49, 88, 89, 335, 111, 107, + 116, 117, 81, 116, 49, 60, 61, 115, 295, 109, + 88, 89, 8, 9, 254, 11, 12, 79, 109, 109, + 109, 112, 115, 88, 89, 1, 2, 88, 89, 25, + 109, 7, 179, 180, 10, 327, 34, 35, 107, 64, + 116, 117, 110, 595, 304, 95, 116, 117, 140, 72, + 116, 117, 81, 116, 191, 107, 116, 117, 116, 117, + 595, 81, 427, 443, 91, 456, 116, 117, 81, 81, + 81, 26, 64, 96, 50, 81, 101, 102, 103, 111, + 109, 341, 26, 112, 80, 565, 566, 79, 80, 109, + 570, 47, 112, 81, 111, 51, 109, 109, 109, 112, + 192, 112, 64, 109, 196, 223, 98, 99, 100, 101, + 102, 103, 111, 196, 83, 81, 208, 116, 210, 107, + 81, 109, 91, 196, 112, 208, 218, 115, 608, 8, + 15, 223, 17, 81, 107, 208, 254, 99, 100, 101, + 102, 103, 111, 109, 140, 537, 537, 17, 109, 252, + 81, 298, 299, 245, 246, 247, 248, 249, 250, 251, + 83, 109, 254, 255, 112, 81, 1, 2, 91, 14, + 15, 463, 7, 8, 9, 10, 11, 12, 109, 115, + 255, 112, 446, 18, 19, 20, 245, 437, 111, 83, + 25, 47, 48, 109, 286, 51, 115, 91, 485, 579, + 83, 115, 83, 295, 491, 455, 571, 310, 91, 332, + 91, 303, 111, 316, 83, 50, 192, 111, 83, 25, + 55, 313, 91, 315, 83, 111, 91, 319, 111, 321, + 83, 111, 91, 325, 326, 375, 47, 48, 91, 115, + 51, 76, 218, 335, 536, 80, 107, 223, 540, 509, + 246, 247, 248, 249, 250, 251, 348, 64, 230, 64, + 232, 345, 47, 48, 64, 113, 51, 47, 48, 245, + 110, 51, 110, 111, 79, 80, 110, 110, 254, 79, + 80, 108, 429, 375, 37, 38, 39, 40, 111, 15, + 437, 96, 97, 98, 99, 100, 101, 102, 103, 99, + 100, 101, 102, 103, 13, 140, 10, 110, 455, 110, + 10, 575, 110, 405, 108, 607, 408, 110, 113, 111, + 111, 110, 405, 110, 110, 408, 91, 303, 420, 421, + 326, 47, 47, 111, 111, 111, 428, 313, 111, 315, + 9, 111, 10, 319, 10, 321, 115, 439, 115, 113, + 89, 435, 436, 111, 113, 502, 108, 192, 10, 10, + 89, 196, 10, 10, 10, 110, 110, 10, 96, 10, + 108, 111, 348, 208, 110, 210, 10, 10, 0, 0, + 610, 473, 412, 218, 495, 579, 572, 5, 223, 1, + 482, 571, 427, 485, 495, 7, -1, 512, 10, 491, + -1, -1, -1, 495, 496, 497, -1, 482, -1, 501, + 245, 246, 247, 248, 249, 250, 251, -1, -1, 254, + 495, -1, -1, -1, 420, -1, -1, -1, 520, -1, + -1, 523, -1, 525, -1, -1, -1, -1, -1, 531, + -1, -1, -1, 535, -1, 421, -1, -1, -1, 284, + 285, 286, 428, -1, -1, -1, -1, -1, -1, -1, + 295, -1, -1, 439, -1, -1, -1, -1, 303, -1, + -1, -1, -1, -1, -1, -1, -1, 473, 313, -1, + 315, -1, -1, -1, 319, -1, 321, -1, 323, 324, + 325, 326, -1, -1, -1, -1, -1, -1, -1, 334, + 335, -1, -1, -1, -1, -1, -1, 599, -1, 601, + -1, -1, -1, 348, -1, 350, -1, -1, -1, -1, + 496, 497, -1, -1, -1, 501, 1, 2, -1, 525, + 5, -1, 7, 8, 9, 10, 11, 12, 13, -1, + -1, -1, -1, -1, 520, -1, -1, 523, -1, -1, + 25, -1, -1, -1, -1, 531, -1, -1, -1, 535, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + 405, -1, -1, 408, -1, 50, -1, -1, 53, -1, + -1, -1, -1, -1, -1, 420, 421, -1, -1, -1, + 65, -1, -1, 428, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, 439, 80, 218, -1, 1, 2, + -1, -1, -1, -1, 7, 8, 9, 10, 11, 12, + 13, -1, -1, 599, -1, 601, -1, -1, -1, -1, + -1, -1, 25, -1, -1, -1, -1, -1, 473, -1, + -1, -1, -1, 64, 65, 66, 67, 68, 69, 70, + 485, -1, 73, 74, -1, -1, 491, 50, 79, 80, + 53, 496, 497, -1, -1, 140, 501, -1, -1, -1, + -1, -1, 65, 94, 95, 96, 97, 98, 99, 100, + 101, 102, 103, -1, -1, 520, -1, 80, 523, -1, + 525, 303, -1, -1, -1, -1, 531, -1, -1, -1, + 535, 313, -1, 315, -1, -1, -1, 319, -1, 321, + -1, -1, -1, -1, -1, -1, -1, 192, -1, -1, + -1, -1, 64, 65, 66, 67, 68, 69, 70, 71, + 72, 73, 74, 75, 76, -1, 348, 79, 80, -1, + -1, -1, -1, 218, -1, -1, -1, 140, 223, -1, + 92, -1, 94, 95, 96, 97, 98, 99, 100, 101, + 102, 103, -1, -1, 599, -1, 601, -1, -1, 111, + 245, 246, 247, 248, 249, 250, 251, -1, -1, 254, + 255, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, 192, + -1, -1, -1, -1, -1, -1, -1, -1, -1, 421, + -1, -1, -1, -1, -1, -1, 428, -1, -1, -1, + -1, -1, -1, -1, -1, 218, -1, 439, 303, -1, + 223, -1, -1, -1, -1, -1, -1, -1, 313, -1, + 315, -1, -1, -1, 319, -1, 321, -1, -1, -1, + -1, 326, 245, 246, 247, 248, 249, 250, 251, -1, + -1, 254, 255, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, 348, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, 496, 497, -1, -1, -1, 501, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + 375, -1, -1, -1, -1, -1, -1, -1, 520, -1, + 303, 523, -1, -1, -1, -1, -1, -1, -1, 531, + 313, -1, 315, 535, -1, -1, 319, -1, 321, -1, + -1, -1, -1, 326, -1, -1, -1, -1, -1, 18, + 19, 20, -1, -1, -1, 420, 421, -1, -1, -1, + -1, -1, -1, 428, -1, 348, -1, -1, -1, -1, + -1, -1, -1, -1, 439, -1, -1, -1, 47, 48, + -1, -1, 51, 52, -1, -1, 55, 56, -1, -1, + -1, -1, 375, -1, -1, -1, -1, 599, -1, 601, + -1, -1, -1, -1, -1, -1, -1, 76, 473, -1, + -1, -1, -1, -1, -1, -1, -1, 482, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + 495, 496, 497, -1, -1, -1, 501, 420, 421, -1, + -1, -1, -1, -1, -1, 428, -1, -1, -1, -1, + -1, -1, -1, -1, -1, 520, 439, -1, 523, -1, + 525, -1, -1, -1, -1, -1, 531, -1, -1, -1, + 535, -1, 64, 65, 66, 67, 68, 69, 70, 71, + 72, 73, 74, 75, 76, -1, -1, 79, 80, -1, + 473, -1, 84, -1, -1, -1, -1, -1, -1, 482, + 92, -1, 94, 95, 96, 97, 98, 99, 100, 101, + 102, 103, 495, 496, 497, -1, -1, -1, 501, -1, + -1, -1, -1, -1, 193, 194, 195, 196, -1, -1, + -1, -1, -1, -1, 599, -1, 601, 520, -1, 208, + 523, 210, 525, -1, -1, -1, -1, -1, 531, -1, + -1, -1, 535, -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, 252, -1, -1, -1, -1, -1, 258, + 259, 260, 261, 262, 263, 264, 265, 266, 267, 268, + 269, 270, 271, 272, 273, 274, 275, 276, 277, 278, + 279, 280, 281, 282, 283, -1, 599, 286, 601, -1, + -1, -1, -1, -1, 293, 294, 295, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, 310, -1, -1, -1, -1, -1, 316, 8, 9, + -1, 11, 12, -1, -1, -1, 325, -1, 18, 19, + 20, -1, 331, 332, -1, 25, 335, 336, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, 347, -1, + -1, -1, -1, -1, -1, 354, -1, -1, -1, -1, + -1, 360, -1, -1, -1, 55, -1, -1, -1, -1, + -1, 370, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, 76, -1, -1, -1, + 80, -1, 64, 65, 66, 67, 68, 69, 70, 71, + 72, 73, 74, 75, 76, -1, 405, 79, 80, 408, + -1, -1, -1, -1, 413, 414, -1, -1, -1, -1, + 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, + 102, 103, -1, -1, -1, -1, -1, -1, 64, 65, + 66, 67, 68, 69, 70, 444, -1, 73, 74, -1, + 140, -1, -1, 79, 80, -1, -1, -1, -1, -1, + -1, 460, -1, -1, -1, -1, -1, 466, 94, 95, + 96, 97, 98, 99, 100, 101, 102, 103, -1, -1, + -1, 480, -1, -1, -1, 484, 485, -1, 487, 488, + 489, 490, 491, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, 196, 506, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, 208, -1, + 210, -1, 521, -1, -1, -1, -1, -1, -1, -1, + -1, 530, -1, -1, -1, -1, -1, -1, 537, -1, + -1, -1, -1, -1, 543, -1, -1, -1, -1, -1, + -1, -1, -1, 552, 553, -1, 246, 247, 248, 249, + 250, 251, -1, -1, -1, -1, -1, -1, -1, -1, + 0, 1, -1, 3, 4, 5, 6, 7, -1, 578, + -1, 11, 12, 582, -1, -1, 16, -1, 18, 19, + 20, 21, 22, 23, 24, -1, 286, 27, 28, 29, + 30, 31, 32, 33, -1, 295, 36, -1, -1, -1, + -1, 41, 42, 43, 44, 45, 46, 47, 48, 49, + 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, + 60, 61, 62, 63, -1, 325, 326, -1, -1, -1, + -1, -1, -1, -1, -1, 335, -1, -1, -1, -1, + -1, -1, 82, -1, -1, 85, 86, 87, 88, -1, + 90, -1, -1, -1, -1, -1, -1, -1, 0, -1, + -1, -1, -1, -1, 104, 105, 8, 9, 10, -1, + -1, -1, 14, 15, -1, 17, 116, 117, -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, 405, -1, -1, 408, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + 420, -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, -1, -1, -1, 108, 109, 110, 111, + 112, -1, 0, 473, 116, 117, -1, -1, -1, -1, + 8, 9, 10, -1, -1, 485, 14, 15, -1, 17, + -1, 491, -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, 525, -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, 3, + 4, 5, -1, 7, -1, -1, -1, 11, 12, 104, + 105, -1, 16, -1, 18, 19, 20, 21, 22, 23, + 24, -1, 117, 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, -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, 85, -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, 50, 51, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, 62, 63, 64, 65, 66, 67, + -1, 69, 70, -1, -1, 73, -1, 75, -1, 77, + 78, 79, 80, -1, -1, -1, -1, -1, -1, -1, + 88, -1, -1, -1, -1, -1, 94, 95, 96, 97, + 98, 99, 100, 101, 102, 103, -1, 105, 3, 4, + 5, 6, 7, 8, 9, 10, 114, -1, 13, 14, + 15, 16, 17, -1, -1, 20, 21, 22, 23, 24, + 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, + 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, + 45, 46, 47, 48, 49, -1, 51, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, 62, 63, 64, + 65, 66, 67, -1, 69, 70, -1, -1, 73, -1, + 75, -1, 77, 78, 79, 80, -1, -1, -1, -1, + -1, -1, -1, 88, -1, -1, -1, -1, -1, 94, + 95, 96, 97, 98, 99, 100, 101, 102, 103, -1, + 105, 3, 4, 5, 6, 7, 8, 9, 10, 114, + -1, 13, 14, 15, 16, 17, -1, -1, 20, 21, + 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, + 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, + 42, 43, 44, 45, 46, 47, 48, -1, -1, 51, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + 62, 63, 64, 65, 66, 67, -1, 69, 70, -1, + -1, 73, -1, 75, -1, 77, 78, 79, 80, -1, + -1, -1, -1, -1, -1, -1, 88, -1, -1, -1, + -1, -1, 94, 95, 96, 97, 98, 99, 100, 101, + 102, 103, -1, 105, -1, 3, 4, 5, -1, 7, + -1, -1, 114, 11, 12, -1, -1, -1, 16, -1, + 18, 19, 20, 21, 22, 23, 24, -1, -1, 27, + 28, 29, 30, 31, 32, 33, -1, -1, -1, -1, + -1, -1, -1, -1, 42, -1, -1, 45, 46, 47, + 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, + 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, 82, -1, -1, 85, 86, 87, + 88, 89, 90, -1, -1, -1, -1, -1, -1, -1, + 3, 4, 5, -1, 7, -1, 104, 105, 11, 12, + -1, -1, 110, 16, -1, 18, 19, 20, 21, 22, + 23, 24, -1, -1, 27, 28, 29, 30, 31, 32, + 33, -1, -1, -1, -1, -1, -1, -1, -1, 42, + -1, -1, 45, 46, 47, 48, 49, 50, 51, 52, + 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, + 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, 82, + -1, -1, 85, 86, 87, 88, 89, 90, -1, -1, + -1, -1, -1, -1, -1, 3, 4, 5, 6, 7, + -1, 104, 105, 11, 12, -1, -1, 110, 16, -1, + 18, 19, 20, 21, 22, 23, 24, -1, -1, 27, + 28, 29, 30, 31, 32, 33, -1, -1, 36, -1, + -1, -1, -1, 41, 42, 43, 44, 45, 46, 47, + 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, + 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, 82, -1, -1, 85, 86, 87, + 88, -1, 90, -1, -1, 3, 4, 5, -1, 7, + -1, -1, -1, 11, 12, -1, 104, 105, 16, -1, + 18, 19, 20, 21, 22, 23, 24, -1, -1, 27, + 28, 29, 30, 31, 32, 33, -1, -1, 36, -1, + -1, -1, -1, -1, 42, -1, -1, 45, 46, 47, + 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, + 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, 82, -1, -1, 85, 86, 87, + 88, -1, 90, -1, -1, 3, 4, 5, -1, 7, + -1, -1, -1, 11, 12, -1, 104, 105, 16, -1, + 18, 19, 20, 21, 22, 23, 24, -1, -1, 27, + 28, 29, 30, 31, 32, 33, -1, -1, -1, -1, + -1, -1, -1, -1, 42, -1, -1, 45, 46, 47, + 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, + 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, 82, -1, -1, 85, 86, 87, + 88, 89, 90, -1, -1, 3, 4, 5, -1, 7, + -1, -1, -1, 11, 12, -1, 104, 105, 16, -1, + 18, 19, 20, 21, 22, 23, 24, -1, -1, 27, + 28, 29, 30, 31, 32, 33, -1, -1, -1, -1, + -1, -1, -1, -1, 42, -1, -1, 45, 46, 47, + 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, + 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, 82, -1, -1, 85, 86, 87, + 88, 89, 90, -1, -1, 3, 4, 5, -1, 7, + -1, -1, -1, 11, 12, -1, 104, 105, 16, -1, + 18, 19, 20, 21, 22, 23, 24, -1, -1, 27, + 28, 29, 30, 31, 32, 33, -1, -1, -1, -1, + -1, -1, -1, -1, 42, -1, -1, 45, 46, 47, + 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, + 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, 82, -1, -1, 85, 86, 87, + 88, 89, 90, -1, -1, 3, 4, 5, -1, 7, + -1, -1, -1, 11, 12, -1, 104, 105, 16, -1, + 18, 19, 20, 21, 22, 23, 24, -1, -1, 27, + 28, 29, 30, 31, 32, 33, -1, -1, -1, -1, + -1, -1, -1, -1, 42, -1, -1, 45, 46, 47, + 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, + 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, 82, -1, -1, 85, 86, 87, + 88, 89, 90, -1, -1, 3, 4, 5, -1, 7, + -1, -1, -1, 11, 12, -1, 104, 105, 16, -1, + 18, 19, 20, 21, 22, 23, 24, -1, -1, 27, + 28, 29, 30, 31, 32, 33, -1, -1, -1, -1, + -1, -1, -1, -1, 42, -1, -1, 45, 46, 47, + 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, + 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, 82, -1, -1, 85, 86, 87, + 88, -1, 90, -1, -1, 3, 4, 5, -1, 7, + -1, -1, -1, 11, 12, -1, 104, 105, 16, -1, + 18, 19, 20, 21, 22, 23, 24, -1, -1, 27, + 28, 29, 30, 31, 32, 33, -1, -1, -1, -1, + -1, -1, -1, -1, 42, -1, -1, 45, 46, 47, + 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, + 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, 82, -1, -1, 85, 86, 87, + 88, -1, 90, -1, -1, 3, 4, 5, -1, 7, + -1, -1, -1, 11, 12, -1, 104, 105, 16, -1, + 18, 19, 20, 21, 22, 23, 24, -1, -1, 27, + 28, 29, 30, 31, 32, 33, -1, -1, -1, -1, + -1, -1, -1, -1, 42, -1, -1, 45, 46, 47, + 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, + 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, 82, -1, -1, 85, 86, 87, + 88, -1, 90, -1, -1, 3, 4, 5, -1, 7, + -1, -1, -1, 11, 12, -1, 104, 105, 16, -1, + 18, 19, 20, 21, 22, 23, 24, -1, -1, 27, + 28, 29, 30, 31, 32, 33, -1, -1, -1, -1, + -1, -1, -1, -1, 42, -1, -1, 45, 46, 47, + 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, + 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, 82, -1, -1, 85, 86, 87, + 88, -1, 90, -1, -1, 3, 4, 5, -1, 7, + -1, -1, -1, 11, 12, -1, 104, 105, 16, -1, + 18, 19, 20, 21, 22, 23, 24, -1, -1, 27, + 28, 29, 30, 31, 32, 33, -1, -1, -1, -1, + -1, -1, -1, -1, 42, -1, -1, 45, 46, 47, + 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, + 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, 82, -1, -1, 85, 86, 87, + -1, -1, 90, -1, -1, 3, 4, 5, -1, 7, + -1, -1, -1, 11, 12, -1, 104, 105, 16, -1, + 18, 19, 20, 21, 22, 23, 24, -1, -1, 27, + 28, 29, 30, 31, 32, 33, -1, -1, -1, -1, + -1, -1, -1, -1, 42, -1, -1, 45, 46, 47, + 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, + 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, 82, -1, -1, 85, 86, 87, + -1, -1, 90, -1, -1, 3, 4, 5, -1, 7, + -1, -1, -1, 11, 12, -1, 104, 105, 16, -1, + 18, 19, 20, 21, 22, 23, 24, -1, -1, 27, + 28, 29, 30, 31, 32, 33, -1, -1, -1, -1, + -1, -1, -1, -1, 42, -1, -1, 45, 46, 47, + 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, + 58, 59, 60, 61, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, 82, -1, -1, 85, 86, 87, + 88, -1, 90, 3, 4, 5, -1, 7, 96, -1, + -1, 11, 12, -1, -1, -1, 16, -1, 18, 19, + 20, 21, 22, 23, 24, -1, -1, 27, 28, 29, + 30, 31, 32, 33, -1, -1, -1, -1, -1, -1, + -1, -1, 42, -1, -1, 45, 46, 47, 48, 49, + 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, + 60, 61, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, 82, -1, -1, 85, 86, 87, 88, -1, + 90, 3, 4, 5, -1, 7, -1, -1, -1, 11, + 12, -1, -1, -1, 16, -1, 18, 19, 20, 21, + 22, 23, 24, -1, -1, 27, 28, 29, 30, 31, + 32, 33, -1, -1, -1, -1, -1, -1, -1, -1, + 42, -1, -1, 45, 46, 47, 48, 49, 50, 51, + 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + 82, -1, -1, 85, 86, 87, 88, -1, 90, 3, + 4, 5, -1, 7, -1, -1, -1, 11, 12, -1, + -1, -1, 16, -1, 18, 19, 20, 21, 22, 23, + 24, -1, -1, 27, 28, 29, 30, 31, 32, 33, + -1, -1, -1, -1, -1, -1, -1, -1, 42, -1, + -1, 45, 46, 47, 48, 49, 50, 51, 52, 53, + 54, 55, 56, 57, 58, 59, 60, 61, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, 82, -1, + -1, 85, 86, 87, 88, -1, 90, 3, 4, 5, + -1, 7, -1, -1, -1, 11, 12, -1, -1, -1, + 16, -1, 18, 19, 20, 21, 22, 23, 24, -1, + -1, 27, 28, 29, 30, 31, 32, 33, -1, -1, + -1, -1, -1, -1, -1, -1, 42, -1, -1, 45, + 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, + 56, 57, 58, 59, 60, 61, -1, 64, 65, 66, + 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, + -1, -1, 79, 80, -1, -1, 82, -1, -1, 85, + 86, 87, -1, -1, 90, 92, -1, 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 +}; +/* -*-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 231 "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 240 "parse.y" +{ + ruby_eval_tree = block_append(ruby_eval_tree, yyvsp[0].node); + top_local_setup(); + cur_cref = 0; + class_nest = 0; + ruby_dyna_vars = yyvsp[-1].vars; + ; + break;} +case 4: +#line 251 "parse.y" +{ + yyval.node = 0; + ; + break;} +case 5: +#line 255 "parse.y" +{ + yyval.node = newline_node(yyvsp[0].node); + ; + break;} +case 6: +#line 259 "parse.y" +{ + yyval.node = block_append(yyvsp[-2].node, newline_node(yyvsp[0].node)); + ; + break;} +case 7: +#line 263 "parse.y" +{ + yyval.node = yyvsp[0].node; + ; + break;} +case 8: +#line 268 "parse.y" +{ + if (yyvsp[-1].node && nd_type(yyvsp[-1].node) == NODE_BLOCK_PASS) { + rb_compile_error("both block arg and actual block given"); + } + yyvsp[0].node->nd_iter = yyvsp[-1].node; + yyval.node = yyvsp[0].node; + fixpos(yyval.node, yyvsp[0].node); + ; + break;} +case 9: +#line 276 "parse.y" +{lex_state = EXPR_FNAME;; + break;} +case 10: +#line 277 "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 283 "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 289 "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 298 "parse.y" +{ + yyerror("can't make alias for the number variables"); + yyval.node = 0; + ; + break;} +case 14: +#line 303 "parse.y" +{ + if (cur_mid || in_single) + yyerror("undef within method"); + yyval.node = yyvsp[0].node; + ; + break;} +case 15: +#line 309 "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 315 "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 321 "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 331 "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 341 "parse.y" +{ + if (cur_mid || in_single) { + yyerror("BEGIN in method"); + } + + local_push(); + ; + break;} +case 20: +#line 349 "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 356 "parse.y" +{ + if (cur_mid || in_single) { + yyerror("END in method; use at_exit"); + } + + yyval.node = NEW_ITER(0, NEW_POSTEXE(), yyvsp[-1].node); + ; + break;} +case 23: +#line 366 "parse.y" +{ + value_expr(yyvsp[0].node); + yyvsp[-2].node->nd_value = yyvsp[0].node; + yyval.node = yyvsp[-2].node; + ; + break;} +case 24: +#line 372 "parse.y" +{ + value_expr(yyvsp[0].node); + if (!cur_mid && !in_single) + yyerror("return appeared outside of method"); + yyval.node = NEW_RETURN(yyvsp[0].node); + ; + break;} +case 25: +#line 379 "parse.y" +{ + value_expr(yyvsp[0].node); + yyval.node = NEW_YIELD(yyvsp[0].node); + ; + break;} +case 27: +#line 385 "parse.y" +{ + yyval.node = logop(NODE_AND, yyvsp[-2].node, yyvsp[0].node); + ; + break;} +case 28: +#line 389 "parse.y" +{ + yyval.node = logop(NODE_OR, yyvsp[-2].node, yyvsp[0].node); + ; + break;} +case 29: +#line 393 "parse.y" +{ + value_expr(yyvsp[0].node); + yyval.node = NEW_NOT(cond(yyvsp[0].node)); + ; + break;} +case 30: +#line 398 "parse.y" +{ + value_expr(yyvsp[0].node); + yyval.node = NEW_NOT(cond(yyvsp[0].node)); + ; + break;} +case 32: +#line 405 "parse.y" +{ + yyval.node = new_fcall(yyvsp[-1].id, yyvsp[0].node); + fixpos(yyval.node, yyvsp[0].node); + ; + break;} +case 33: +#line 410 "parse.y" +{ + value_expr(yyvsp[-3].node); + yyval.node = new_call(yyvsp[-3].node, yyvsp[-1].id, yyvsp[0].node); + fixpos(yyval.node, yyvsp[-3].node); + ; + break;} +case 34: +#line 416 "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 422 "parse.y" +{ + if (!cur_mid && !in_single && !in_defined) + yyerror("super called outside of method"); + yyval.node = NEW_SUPER(yyvsp[0].node); + fixpos(yyval.node, yyvsp[0].node); + ; + break;} +case 37: +#line 431 "parse.y" +{ + yyval.node = yyvsp[-1].node; + ; + break;} +case 39: +#line 437 "parse.y" +{ + yyval.node = NEW_MASGN(NEW_LIST(yyvsp[-1].node), 0); + ; + break;} +case 40: +#line 442 "parse.y" +{ + yyval.node = NEW_MASGN(NEW_LIST(yyvsp[0].node), 0); + ; + break;} +case 41: +#line 446 "parse.y" +{ + yyval.node = NEW_MASGN(NEW_LIST(yyvsp[-2].node), yyvsp[0].node); + ; + break;} +case 42: +#line 450 "parse.y" +{ + yyval.node = NEW_MASGN(list_concat(NEW_LIST(yyvsp[-1].node),yyvsp[0].node), 0); + ; + break;} +case 43: +#line 454 "parse.y" +{ + yyval.node = NEW_MASGN(list_concat(NEW_LIST(yyvsp[-4].node),yyvsp[-3].node),yyvsp[0].node); + ; + break;} +case 44: +#line 458 "parse.y" +{ + yyval.node = NEW_MASGN(0, yyvsp[0].node); + ; + break;} +case 46: +#line 464 "parse.y" +{ + yyval.node = yyvsp[-1].node; + ; + break;} +case 47: +#line 469 "parse.y" +{ + yyval.node = yyvsp[-1].node; + ; + break;} +case 48: +#line 474 "parse.y" +{ + yyval.node = NEW_LIST(yyvsp[0].node); + ; + break;} +case 49: +#line 478 "parse.y" +{ + yyval.node = list_append(yyvsp[-2].node, yyvsp[0].node); + ; + break;} +case 50: +#line 483 "parse.y" +{ + yyval.node = assignable(yyvsp[0].id, 0); + ; + break;} +case 51: +#line 487 "parse.y" +{ + yyval.node = aryset(yyvsp[-3].node, yyvsp[-1].node, 0); + ; + break;} +case 52: +#line 491 "parse.y" +{ + yyval.node = attrset(yyvsp[-2].node, yyvsp[0].id, 0); + ; + break;} +case 53: +#line 495 "parse.y" +{ + rb_backref_error(yyvsp[0].node); + yyval.node = 0; + ; + break;} +case 54: +#line 501 "parse.y" +{ + yyerror("class/module name must be CONSTANT"); + ; + break;} +case 59: +#line 510 "parse.y" +{ + lex_state = EXPR_END; + yyval.id = yyvsp[0].id; + ; + break;} +case 60: +#line 515 "parse.y" +{ + lex_state = EXPR_END; + yyval.id = yyvsp[0].id; + ; + break;} +case 61: +#line 521 "parse.y" +{ + yyval.node = NEW_UNDEF(yyvsp[0].id); + ; + break;} +case 62: +#line 524 "parse.y" +{lex_state = EXPR_FNAME;; + break;} +case 63: +#line 525 "parse.y" +{ + yyval.node = block_append(yyvsp[-3].node, NEW_UNDEF(yyvsp[0].id)); + ; + break;} +case 64: +#line 529 "parse.y" +{ yyval.id = tDOT2; ; + break;} +case 65: +#line 530 "parse.y" +{ yyval.id = '|'; ; + break;} +case 66: +#line 531 "parse.y" +{ yyval.id = '^'; ; + break;} +case 67: +#line 532 "parse.y" +{ yyval.id = '&'; ; + break;} +case 68: +#line 533 "parse.y" +{ yyval.id = tCMP; ; + break;} +case 69: +#line 534 "parse.y" +{ yyval.id = tEQ; ; + break;} +case 70: +#line 535 "parse.y" +{ yyval.id = tEQQ; ; + break;} +case 71: +#line 536 "parse.y" +{ yyval.id = tMATCH; ; + break;} +case 72: +#line 537 "parse.y" +{ yyval.id = '>'; ; + break;} +case 73: +#line 538 "parse.y" +{ yyval.id = tGEQ; ; + break;} +case 74: +#line 539 "parse.y" +{ yyval.id = '<'; ; + break;} +case 75: +#line 540 "parse.y" +{ yyval.id = tLEQ; ; + break;} +case 76: +#line 541 "parse.y" +{ yyval.id = tLSHFT; ; + break;} +case 77: +#line 542 "parse.y" +{ yyval.id = tRSHFT; ; + break;} +case 78: +#line 543 "parse.y" +{ yyval.id = '+'; ; + break;} +case 79: +#line 544 "parse.y" +{ yyval.id = '-'; ; + break;} +case 80: +#line 545 "parse.y" +{ yyval.id = '*'; ; + break;} +case 81: +#line 546 "parse.y" +{ yyval.id = '*'; ; + break;} +case 82: +#line 547 "parse.y" +{ yyval.id = '/'; ; + break;} +case 83: +#line 548 "parse.y" +{ yyval.id = '%'; ; + break;} +case 84: +#line 549 "parse.y" +{ yyval.id = tPOW; ; + break;} +case 85: +#line 550 "parse.y" +{ yyval.id = '~'; ; + break;} +case 86: +#line 551 "parse.y" +{ yyval.id = tUPLUS; ; + break;} +case 87: +#line 552 "parse.y" +{ yyval.id = tUMINUS; ; + break;} +case 88: +#line 553 "parse.y" +{ yyval.id = tAREF; ; + break;} +case 89: +#line 554 "parse.y" +{ yyval.id = tASET; ; + break;} +case 90: +#line 555 "parse.y" +{ yyval.id = '`'; ; + break;} +case 131: +#line 565 "parse.y" +{yyval.node = assignable(yyvsp[-1].id, 0);; + break;} +case 132: +#line 566 "parse.y" +{ + yyval.node = yyvsp[-1].node; + if (yyval.node) { + yyval.node->nd_value = yyvsp[0].node; + fixpos(yyval.node, yyvsp[0].node); + } + ; + break;} +case 133: +#line 574 "parse.y" +{ + yyval.node = aryset(yyvsp[-5].node, yyvsp[-3].node, yyvsp[0].node); + fixpos(yyval.node, yyvsp[-5].node); + ; + break;} +case 134: +#line 579 "parse.y" +{ + yyval.node = attrset(yyvsp[-4].node, yyvsp[-2].id, yyvsp[0].node); + fixpos(yyval.node, yyvsp[0].node); + ; + break;} +case 135: +#line 584 "parse.y" +{ + yyval.node = attrset(yyvsp[-4].node, yyvsp[-2].id, yyvsp[0].node); + fixpos(yyval.node, yyvsp[0].node); + ; + break;} +case 136: +#line 589 "parse.y" +{ + value_expr(yyvsp[0].node); + rb_backref_error(yyvsp[-2].node); + yyval.node = 0; + ; + break;} +case 137: +#line 594 "parse.y" +{yyval.node = assignable(yyvsp[-1].id, 0);; + break;} +case 138: +#line 595 "parse.y" +{ + if (yyvsp[-2].id == tOROP) { + yyvsp[-1].node->nd_value = yyvsp[0].node; + yyval.node = NEW_OP_ASGN_OR(gettable(yyvsp[-3].id), yyvsp[-1].node); + } + else if (yyvsp[-2].id == tANDOP) { + yyvsp[-1].node->nd_value = yyvsp[0].node; + yyval.node = NEW_OP_ASGN_AND(gettable(yyvsp[-3].id), yyvsp[-1].node); + } + else { + yyval.node = yyvsp[-1].node; + yyval.node->nd_value = call_op(gettable(yyvsp[-3].id), yyvsp[-2].id, 1, yyvsp[0].node); + } + fixpos(yyval.node, yyvsp[0].node); + ; + break;} +case 139: +#line 611 "parse.y" +{ + NODE *args = NEW_LIST(yyvsp[0].node); + + list_append(yyvsp[-3].node, NEW_NIL()); + list_concat(args, yyvsp[-3].node); + if (yyvsp[-1].id == tOROP) { + yyvsp[-1].id = 0; + } + else if (yyvsp[-1].id == tANDOP) { + yyvsp[-1].id = 1; + } + yyval.node = NEW_OP_ASGN1(yyvsp[-5].node, yyvsp[-1].id, args); + fixpos(yyval.node, yyvsp[-5].node); + ; + break;} +case 140: +#line 626 "parse.y" +{ + if (yyvsp[-1].id == tOROP) { + yyvsp[-1].id = 0; + } + else if (yyvsp[-1].id == tANDOP) { + yyvsp[-1].id = 1; + } + yyval.node = NEW_OP_ASGN2(yyvsp[-4].node, yyvsp[-2].id, yyvsp[-1].id, yyvsp[0].node); + fixpos(yyval.node, yyvsp[-4].node); + ; + break;} +case 141: +#line 637 "parse.y" +{ + if (yyvsp[-1].id == tOROP) { + yyvsp[-1].id = 0; + } + else if (yyvsp[-1].id == tANDOP) { + yyvsp[-1].id = 1; + } + yyval.node = NEW_OP_ASGN2(yyvsp[-4].node, yyvsp[-2].id, yyvsp[-1].id, yyvsp[0].node); + fixpos(yyval.node, yyvsp[-4].node); + ; + break;} +case 142: +#line 648 "parse.y" +{ + rb_backref_error(yyvsp[-2].node); + yyval.node = 0; + ; + break;} +case 143: +#line 653 "parse.y" +{ + yyval.node = NEW_DOT2(yyvsp[-2].node, yyvsp[0].node); + ; + break;} +case 144: +#line 657 "parse.y" +{ + yyval.node = NEW_DOT3(yyvsp[-2].node, yyvsp[0].node); + ; + break;} +case 145: +#line 661 "parse.y" +{ + yyval.node = call_op(yyvsp[-2].node, '+', 1, yyvsp[0].node); + ; + break;} +case 146: +#line 665 "parse.y" +{ + yyval.node = call_op(yyvsp[-2].node, '-', 1, yyvsp[0].node); + ; + break;} +case 147: +#line 669 "parse.y" +{ + yyval.node = call_op(yyvsp[-2].node, '*', 1, yyvsp[0].node); + ; + break;} +case 148: +#line 673 "parse.y" +{ + yyval.node = call_op(yyvsp[-2].node, '/', 1, yyvsp[0].node); + ; + break;} +case 149: +#line 677 "parse.y" +{ + yyval.node = call_op(yyvsp[-2].node, '%', 1, yyvsp[0].node); + ; + break;} +case 150: +#line 681 "parse.y" +{ + yyval.node = call_op(yyvsp[-2].node, tPOW, 1, yyvsp[0].node); + ; + break;} +case 151: +#line 685 "parse.y" +{ + yyval.node = call_op(yyvsp[0].node, tUPLUS, 0); + ; + break;} +case 152: +#line 689 "parse.y" +{ + yyval.node = call_op(yyvsp[0].node, tUMINUS, 0); + ; + break;} +case 153: +#line 693 "parse.y" +{ + yyval.node = call_op(yyvsp[-2].node, '|', 1, yyvsp[0].node); + ; + break;} +case 154: +#line 697 "parse.y" +{ + yyval.node = call_op(yyvsp[-2].node, '^', 1, yyvsp[0].node); + ; + break;} +case 155: +#line 701 "parse.y" +{ + yyval.node = call_op(yyvsp[-2].node, '&', 1, yyvsp[0].node); + ; + break;} +case 156: +#line 705 "parse.y" +{ + yyval.node = call_op(yyvsp[-2].node, tCMP, 1, yyvsp[0].node); + ; + break;} +case 157: +#line 709 "parse.y" +{ + yyval.node = call_op(yyvsp[-2].node, '>', 1, yyvsp[0].node); + ; + break;} +case 158: +#line 713 "parse.y" +{ + yyval.node = call_op(yyvsp[-2].node, tGEQ, 1, yyvsp[0].node); + ; + break;} +case 159: +#line 717 "parse.y" +{ + yyval.node = call_op(yyvsp[-2].node, '<', 1, yyvsp[0].node); + ; + break;} +case 160: +#line 721 "parse.y" +{ + yyval.node = call_op(yyvsp[-2].node, tLEQ, 1, yyvsp[0].node); + ; + break;} +case 161: +#line 725 "parse.y" +{ + yyval.node = call_op(yyvsp[-2].node, tEQ, 1, yyvsp[0].node); + ; + break;} +case 162: +#line 729 "parse.y" +{ + yyval.node = call_op(yyvsp[-2].node, tEQQ, 1, yyvsp[0].node); + ; + break;} +case 163: +#line 733 "parse.y" +{ + yyval.node = NEW_NOT(call_op(yyvsp[-2].node, tEQ, 1, yyvsp[0].node)); + ; + break;} +case 164: +#line 737 "parse.y" +{ + yyval.node = match_gen(yyvsp[-2].node, yyvsp[0].node); + ; + break;} +case 165: +#line 741 "parse.y" +{ + yyval.node = NEW_NOT(match_gen(yyvsp[-2].node, yyvsp[0].node)); + ; + break;} +case 166: +#line 745 "parse.y" +{ + value_expr(yyvsp[0].node); + yyval.node = NEW_NOT(cond(yyvsp[0].node)); + ; + break;} +case 167: +#line 750 "parse.y" +{ + yyval.node = call_op(yyvsp[0].node, '~', 0); + ; + break;} +case 168: +#line 754 "parse.y" +{ + yyval.node = call_op(yyvsp[-2].node, tLSHFT, 1, yyvsp[0].node); + ; + break;} +case 169: +#line 758 "parse.y" +{ + yyval.node = call_op(yyvsp[-2].node, tRSHFT, 1, yyvsp[0].node); + ; + break;} +case 170: +#line 762 "parse.y" +{ + yyval.node = logop(NODE_AND, yyvsp[-2].node, yyvsp[0].node); + ; + break;} +case 171: +#line 766 "parse.y" +{ + yyval.node = logop(NODE_OR, yyvsp[-2].node, yyvsp[0].node); + ; + break;} +case 172: +#line 769 "parse.y" +{in_defined = 1;; + break;} +case 173: +#line 770 "parse.y" +{ + in_defined = 0; + yyval.node = NEW_DEFINED(yyvsp[0].node); + ; + break;} +case 174: +#line 775 "parse.y" +{ + value_expr(yyvsp[-4].node); + yyval.node = NEW_IF(cond(yyvsp[-4].node), yyvsp[-2].node, yyvsp[0].node); + fixpos(yyval.node, yyvsp[-4].node); + ; + break;} +case 175: +#line 781 "parse.y" +{ + yyval.node = yyvsp[0].node; + ; + break;} +case 176: +#line 786 "parse.y" +{ + if (yyvsp[0].node && nd_type(yyvsp[0].node) == NODE_BLOCK_PASS) { + rb_compile_error("block argument should not be given"); + } + yyval.node = yyvsp[0].node; + ; + break;} +case 177: +#line 794 "parse.y" +{ + yyval.node = 0; + ; + break;} +case 179: +#line 800 "parse.y" +{ + value_expr(yyvsp[0].node); + yyval.node = NEW_LIST(yyvsp[0].node); + ; + break;} +case 180: +#line 805 "parse.y" +{ + yyval.node = arg_blk_pass(yyvsp[-1].node, yyvsp[0].node); + ; + break;} +case 181: +#line 809 "parse.y" +{ + yyval.node = arg_add(yyvsp[-4].node, yyvsp[-1].node); + yyval.node = arg_blk_pass(yyval.node, yyvsp[0].node); + ; + break;} +case 182: +#line 814 "parse.y" +{ + yyval.node = NEW_LIST(NEW_HASH(yyvsp[-1].node)); + yyval.node = arg_blk_pass(yyval.node, yyvsp[0].node); + ; + break;} +case 183: +#line 819 "parse.y" +{ + yyval.node = arg_add(NEW_LIST(NEW_HASH(yyvsp[-4].node)), yyvsp[-1].node); + yyval.node = arg_blk_pass(yyval.node, yyvsp[0].node); + ; + break;} +case 184: +#line 824 "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 185: +#line 829 "parse.y" +{ + yyval.node = arg_add(list_append(yyvsp[-6].node, NEW_HASH(yyvsp[-4].node)), yyvsp[-1].node); + yyval.node = arg_blk_pass(yyval.node, yyvsp[0].node); + ; + break;} +case 186: +#line 834 "parse.y" +{ + value_expr(yyvsp[-1].node); + yyval.node = arg_blk_pass(NEW_RESTARGS(yyvsp[-1].node), yyvsp[0].node); + ; + break;} +case 188: +#line 841 "parse.y" +{ + value_expr(yyvsp[0].node); + yyval.node = NEW_BLOCK_PASS(yyvsp[0].node); + ; + break;} +case 189: +#line 847 "parse.y" +{ + yyval.node = yyvsp[0].node; + ; + break;} +case 190: +#line 851 "parse.y" +{ + yyval.node = 0; + ; + break;} +case 192: +#line 857 "parse.y" +{ + yyval.node = 0; + ; + break;} +case 193: +#line 862 "parse.y" +{ + value_expr(yyvsp[0].node); + yyval.node = NEW_LIST(yyvsp[0].node); + ; + break;} +case 194: +#line 867 "parse.y" +{ + value_expr(yyvsp[0].node); + yyval.node = list_append(yyvsp[-2].node, yyvsp[0].node); + ; + break;} +case 195: +#line 873 "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 196: +#line 885 "parse.y" +{ + value_expr(yyvsp[0].node); + yyval.node = arg_add(yyvsp[-3].node, yyvsp[0].node); + ; + break;} +case 197: +#line 890 "parse.y" +{ + value_expr(yyvsp[0].node); + yyval.node = yyvsp[0].node; + ; + break;} +case 198: +#line 896 "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 199: +#line 910 "parse.y" +{ + yyval.node = 0; + ; + break;} +case 201: +#line 916 "parse.y" +{ + yyval.node = NEW_LIT(yyvsp[0].val); + ; + break;} +case 202: +#line 920 "parse.y" +{ + value_expr(yyvsp[-2].node); + yyval.node = NEW_COLON2(yyvsp[-2].node, yyvsp[0].id); + ; + break;} +case 203: +#line 925 "parse.y" +{ + value_expr(yyvsp[-2].node); + yyval.node = new_call(yyvsp[-2].node, yyvsp[0].id, 0); + ; + break;} +case 204: +#line 930 "parse.y" +{ + yyval.node = NEW_COLON3(yyvsp[0].id); + ; + break;} +case 205: +#line 934 "parse.y" +{ + yyval.node = NEW_STR(yyvsp[0].val); + ; + break;} +case 207: +#line 939 "parse.y" +{ + yyval.node = NEW_XSTR(yyvsp[0].val); + ; + break;} +case 212: +#line 947 "parse.y" +{ + value_expr(yyvsp[-3].node); + yyval.node = NEW_CALL(yyvsp[-3].node, tAREF, yyvsp[-1].node); + ; + break;} +case 213: +#line 952 "parse.y" +{ + if (yyvsp[-1].node == 0) + yyval.node = NEW_ZARRAY(); /* zero length array*/ + else { + yyval.node = yyvsp[-1].node; + } + ; + break;} +case 214: +#line 960 "parse.y" +{ + yyval.node = NEW_HASH(yyvsp[-1].node); + ; + break;} +case 215: +#line 964 "parse.y" +{ + if (!cur_mid && !in_single) + yyerror("return appeared outside of method"); + value_expr(yyvsp[-1].node); + yyval.node = NEW_RETURN(yyvsp[-1].node); + ; + break;} +case 216: +#line 971 "parse.y" +{ + if (!cur_mid && !in_single) + yyerror("return appeared outside of method"); + yyval.node = NEW_RETURN(0); + ; + break;} +case 217: +#line 977 "parse.y" +{ + if (!cur_mid && !in_single) + yyerror("return appeared outside of method"); + yyval.node = NEW_RETURN(0); + ; + break;} +case 218: +#line 983 "parse.y" +{ + value_expr(yyvsp[-1].node); + yyval.node = NEW_YIELD(yyvsp[-1].node); + ; + break;} +case 219: +#line 988 "parse.y" +{ + yyval.node = NEW_YIELD(0); + ; + break;} +case 220: +#line 992 "parse.y" +{ + yyval.node = NEW_YIELD(0); + ; + break;} +case 221: +#line 995 "parse.y" +{in_defined = 1;; + break;} +case 222: +#line 996 "parse.y" +{ + in_defined = 0; + yyval.node = NEW_DEFINED(yyvsp[-1].node); + ; + break;} +case 223: +#line 1001 "parse.y" +{ + yyval.node = NEW_VCALL(yyvsp[0].id); + ; + break;} +case 224: +#line 1005 "parse.y" +{ + yyvsp[0].node->nd_iter = NEW_FCALL(yyvsp[-1].id, 0); + yyval.node = yyvsp[0].node; + ; + break;} +case 226: +#line 1011 "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 227: +#line 1023 "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 228: +#line 1032 "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 229: +#line 1040 "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 230: +#line 1048 "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 231: +#line 1056 "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 232: +#line 1064 "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 233: +#line 1075 "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 234: +#line 1090 "parse.y" +{ + yyval.node = yyvsp[-1].node; + ; + break;} +case 235: +#line 1094 "parse.y" +{ + if (cur_mid || in_single) + yyerror("class definition in method body"); + + class_nest++; + cref_push(); + local_push(); + ; + break;} +case 236: +#line 1104 "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 237: +#line 1112 "parse.y" +{ + class_nest++; + cref_push(); + local_push(); + ; + break;} +case 238: +#line 1119 "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 239: +#line 1127 "parse.y" +{ + if (cur_mid || in_single) + yyerror("module definition in method body"); + class_nest++; + cref_push(); + local_push(); + ; + break;} +case 240: +#line 1136 "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 241: +#line 1144 "parse.y" +{ + if (cur_mid || in_single) + yyerror("nested method definition"); + cur_mid = yyvsp[0].id; + local_push(); + ; + break;} +case 242: +#line 1153 "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 243: +#line 1160 "parse.y" +{lex_state = EXPR_FNAME;; + break;} +case 244: +#line 1161 "parse.y" +{ + value_expr(yyvsp[-3].node); + in_single++; + local_push(); + lex_state = EXPR_END; /* force for args */ + ; + break;} +case 245: +#line 1170 "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 246: +#line 1177 "parse.y" +{ + yyval.node = NEW_BREAK(); + ; + break;} +case 247: +#line 1181 "parse.y" +{ + yyval.node = NEW_NEXT(); + ; + break;} +case 248: +#line 1185 "parse.y" +{ + yyval.node = NEW_REDO(); + ; + break;} +case 249: +#line 1189 "parse.y" +{ + yyval.node = NEW_RETRY(); + ; + break;} +case 256: +#line 1204 "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 257: +#line 1211 "parse.y" +{ + yyval.node = 0; + ; + break;} +case 258: +#line 1215 "parse.y" +{ + yyval.node = yyvsp[0].node; + ; + break;} +case 261: +#line 1223 "parse.y" +{ + yyval.node = 0; + ; + break;} +case 262: +#line 1227 "parse.y" +{ + yyval.node = 0; + ; + break;} +case 263: +#line 1231 "parse.y" +{ + yyval.node = 0; + ; + break;} +case 264: +#line 1235 "parse.y" +{ + yyval.node = yyvsp[-1].node; + ; + break;} +case 265: +#line 1240 "parse.y" +{ + yyval.vars = dyna_push(); + ; + break;} +case 266: +#line 1246 "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 267: +#line 1253 "parse.y" +{ + yyval.vars = dyna_push(); + ; + break;} +case 268: +#line 1258 "parse.y" +{ + yyval.node = NEW_ITER(yyvsp[-2].node, 0, yyvsp[-1].node); + fixpos(yyval.node, yyvsp[-2].node?yyvsp[-2].node:yyvsp[-1].node); + dyna_pop(yyvsp[-3].vars); + ; + break;} +case 269: +#line 1265 "parse.y" +{ + yyval.node = NEW_VCALL(yyvsp[0].id); + ; + break;} +case 270: +#line 1269 "parse.y" +{ + yyval.node = NEW_VCALL(yyvsp[0].id); + ; + break;} +case 271: +#line 1273 "parse.y" +{ + yyval.node = NEW_VCALL(yyvsp[0].id); + ; + break;} +case 274: +#line 1280 "parse.y" +{ + yyval.node = new_fcall(yyvsp[-3].id, yyvsp[-1].node); + fixpos(yyval.node, yyvsp[-1].node); + ; + break;} +case 275: +#line 1285 "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 276: +#line 1291 "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 277: +#line 1297 "parse.y" +{ + value_expr(yyvsp[-5].node); + yyval.node = new_call(yyvsp[-5].node, yyvsp[-3].id, yyvsp[-1].node); + fixpos(yyval.node, yyvsp[-5].node); + ; + break;} +case 278: +#line 1303 "parse.y" +{ + if (!cur_mid && !in_single && !in_defined) + yyerror("super called outside of method"); + yyval.node = NEW_SUPER(yyvsp[-1].node); + ; + break;} +case 279: +#line 1309 "parse.y" +{ + if (!cur_mid && !in_single && !in_defined) + yyerror("super called outside of method"); + yyval.node = NEW_ZSUPER(); + ; + break;} +case 280: +#line 1319 "parse.y" +{ + yyval.node = NEW_WHEN(yyvsp[-3].node, yyvsp[-1].node, yyvsp[0].node); + ; + break;} +case 282: +#line 1325 "parse.y" +{ + value_expr(yyvsp[0].node); + yyval.node = list_append(yyvsp[-3].node, NEW_WHEN(yyvsp[0].node, 0, 0)); + ; + break;} +case 283: +#line 1330 "parse.y" +{ + value_expr(yyvsp[0].node); + yyval.node = NEW_LIST(NEW_WHEN(yyvsp[0].node, 0, 0)); + ; + break;} +case 286: +#line 1341 "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 287: +#line 1346 "parse.y" +{ + yyval.node = 0; + ; + break;} +case 288: +#line 1351 "parse.y" +{ + yyval.node = 0; + ; + break;} +case 289: +#line 1355 "parse.y" +{ + yyval.node = yyvsp[0].node; + ; + break;} +case 291: +#line 1361 "parse.y" +{ + yyval.val = INT2FIX(yyvsp[0].id); + ; + break;} +case 302: +#line 1377 "parse.y" +{yyval.id = kNIL;; + break;} +case 303: +#line 1378 "parse.y" +{yyval.id = kSELF;; + break;} +case 304: +#line 1379 "parse.y" +{yyval.id = kTRUE;; + break;} +case 305: +#line 1380 "parse.y" +{yyval.id = kFALSE;; + break;} +case 306: +#line 1381 "parse.y" +{yyval.id = k__FILE__;; + break;} +case 307: +#line 1382 "parse.y" +{yyval.id = k__LINE__;; + break;} +case 308: +#line 1385 "parse.y" +{ + yyval.node = gettable(yyvsp[0].id); + ; + break;} +case 311: +#line 1393 "parse.y" +{ + yyval.node = 0; + ; + break;} +case 312: +#line 1397 "parse.y" +{ + lex_state = EXPR_BEG; + ; + break;} +case 313: +#line 1401 "parse.y" +{ + yyval.node = yyvsp[-1].node; + ; + break;} +case 314: +#line 1404 "parse.y" +{yyerrok; yyval.node = 0;; + break;} +case 315: +#line 1407 "parse.y" +{ + yyval.node = yyvsp[-2].node; + lex_state = EXPR_BEG; + ; + break;} +case 316: +#line 1412 "parse.y" +{ + yyval.node = yyvsp[-1].node; + ; + break;} +case 317: +#line 1417 "parse.y" +{ + yyval.node = block_append(NEW_ARGS(yyvsp[-5].num, yyvsp[-3].node, yyvsp[-1].id), yyvsp[0].node); + ; + break;} +case 318: +#line 1421 "parse.y" +{ + yyval.node = block_append(NEW_ARGS(yyvsp[-3].num, yyvsp[-1].node, -1), yyvsp[0].node); + ; + break;} +case 319: +#line 1425 "parse.y" +{ + yyval.node = block_append(NEW_ARGS(yyvsp[-3].num, 0, yyvsp[-1].id), yyvsp[0].node); + ; + break;} +case 320: +#line 1429 "parse.y" +{ + yyval.node = block_append(NEW_ARGS(yyvsp[-1].num, 0, -1), yyvsp[0].node); + ; + break;} +case 321: +#line 1433 "parse.y" +{ + yyval.node = block_append(NEW_ARGS(0, yyvsp[-3].node, yyvsp[-1].id), yyvsp[0].node); + ; + break;} +case 322: +#line 1437 "parse.y" +{ + yyval.node = block_append(NEW_ARGS(0, yyvsp[-1].node, -1), yyvsp[0].node); + ; + break;} +case 323: +#line 1441 "parse.y" +{ + yyval.node = block_append(NEW_ARGS(0, 0, yyvsp[-1].id), yyvsp[0].node); + ; + break;} +case 324: +#line 1445 "parse.y" +{ + yyval.node = block_append(NEW_ARGS(0, 0, -1), yyvsp[0].node); + ; + break;} +case 325: +#line 1449 "parse.y" +{ + yyval.node = NEW_ARGS(0, 0, -1); + ; + break;} +case 326: +#line 1454 "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 327: +#line 1461 "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 328: +#line 1469 "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 329: +#line 1476 "parse.y" +{ + yyval.node = NEW_BLOCK(yyvsp[0].node); + yyval.node->nd_end = yyval.node; + ; + break;} +case 330: +#line 1481 "parse.y" +{ + yyval.node = block_append(yyvsp[-2].node, yyvsp[0].node); + ; + break;} +case 331: +#line 1486 "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 332: +#line 1493 "parse.y" +{ + yyval.node = NEW_BLOCK_ARG(yyvsp[0].id); + ; + break;} +case 333: +#line 1498 "parse.y" +{ + yyval.node = yyvsp[0].node; + ; + break;} +case 334: +#line 1502 "parse.y" +{ + yyval.node = 0; + ; + break;} +case 335: +#line 1507 "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 336: +#line 1520 "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 337: +#line 1538 "parse.y" +{ + yyval.node = 0; + ; + break;} +case 338: +#line 1542 "parse.y" +{ + yyval.node = yyvsp[-1].node; + ; + break;} +case 339: +#line 1546 "parse.y" +{ + if (yyvsp[-1].node->nd_alen%2 != 0) { + yyerror("odd number list for Hash"); + } + yyval.node = yyvsp[-1].node; + ; + break;} +case 341: +#line 1555 "parse.y" +{ + yyval.node = list_concat(yyvsp[-2].node, yyvsp[0].node); + ; + break;} +case 342: +#line 1560 "parse.y" +{ + yyval.node = list_append(NEW_LIST(yyvsp[-2].node), yyvsp[0].node); + ; + break;} +case 355: +#line 1581 "parse.y" +{yyerrok;; + break;} +case 358: +#line 1585 "parse.y" +{yyerrok;; + break;} +} + /* the action file gets copied in in place of this dollarsign */ +#line 542 "/usr/share/misc/bison.simple" + + yyvsp -= yylen; + yyssp -= yylen; +#ifdef YYLSP_NEEDED + yylsp -= yylen; +#endif + +#if YYDEBUG != 0 + if (yydebug) + { + short *ssp1 = yyss - 1; + fprintf (stderr, "state stack now"); + while (ssp1 != yyssp) + fprintf (stderr, " %d", *++ssp1); + fprintf (stderr, "\n"); + } +#endif + + *++yyvsp = yyval; + +#ifdef YYLSP_NEEDED + yylsp++; + if (yylen == 0) + { + yylsp->first_line = yylloc.first_line; + yylsp->first_column = yylloc.first_column; + yylsp->last_line = (yylsp-1)->last_line; + yylsp->last_column = (yylsp-1)->last_column; + yylsp->text = 0; + } + else + { + yylsp->last_line = (yylsp+yylen-1)->last_line; + yylsp->last_column = (yylsp+yylen-1)->last_column; + } +#endif + + /* Now "shift" the result of the reduction. + Determine what state that goes to, + based on the state we popped back to + and the rule number reduced by. */ + + yyn = yyr1[yyn]; + + yystate = yypgoto[yyn - YYNTBASE] + *yyssp; + if (yystate >= 0 && yystate <= YYLAST && yycheck[yystate] == *yyssp) + yystate = yytable[yystate]; + else + yystate = yydefgoto[yyn - YYNTBASE]; + + goto yynewstate; + +yyerrlab: /* here on detecting error */ + + if (! yyerrstatus) + /* If not already recovering from an error, report this error. */ + { + ++yynerrs; + +#ifdef YYERROR_VERBOSE + yyn = yypact[yystate]; + + if (yyn > YYFLAG && yyn < YYLAST) + { + int size = 0; + char *msg; + int x, count; + + count = 0; + /* Start X at -yyn if nec to avoid negative indexes in yycheck. */ + for (x = (yyn < 0 ? -yyn : 0); + x < (sizeof(yytname) / sizeof(char *)); x++) + if (yycheck[x + yyn] == x) + size += strlen(yytname[x]) + 15, count++; + msg = (char *) malloc(size + 15); + if (msg != 0) + { + strcpy(msg, "parse error"); + + if (count < 5) + { + count = 0; + for (x = (yyn < 0 ? -yyn : 0); + x < (sizeof(yytname) / sizeof(char *)); x++) + if (yycheck[x + yyn] == x) + { + strcat(msg, count == 0 ? ", expecting `" : " or `"); + strcat(msg, yytname[x]); + strcat(msg, "'"); + count++; + } + } + yyerror(msg); + free(msg); + } + else + yyerror ("parse error; also virtual memory exceeded"); + } + else +#endif /* YYERROR_VERBOSE */ + yyerror("parse error"); + } + + goto yyerrlab1; +yyerrlab1: /* here on error raised explicitly by an action */ + + if (yyerrstatus == 3) + { + /* if just tried and failed to reuse lookahead token after an error, discard it. */ + + /* return failure if at end of input */ + if (yychar == YYEOF) + YYABORT; + +#if YYDEBUG != 0 + if (yydebug) + fprintf(stderr, "Discarding token %d (%s).\n", yychar, yytname[yychar1]); +#endif + + yychar = YYEMPTY; + } + + /* Else will try to reuse lookahead token + after shifting the error token. */ + + yyerrstatus = 3; /* Each real token shifted decrements this */ + + goto yyerrhandle; + +yyerrdefault: /* current state does not do anything special for the error token. */ + +#if 0 + /* This is wrong; only states that explicitly want error tokens + should shift them. */ + yyn = yydefact[yystate]; /* If its default is to accept any token, ok. Otherwise pop it.*/ + if (yyn) goto yydefault; +#endif + +yyerrpop: /* pop the current state because it cannot handle the error token */ + + if (yyssp == yyss) YYABORT; + yyvsp--; + yystate = *--yyssp; +#ifdef YYLSP_NEEDED + yylsp--; +#endif + +#if YYDEBUG != 0 + if (yydebug) + { + short *ssp1 = yyss - 1; + fprintf (stderr, "Error: state stack now"); + while (ssp1 != yyssp) + fprintf (stderr, " %d", *++ssp1); + fprintf (stderr, "\n"); + } +#endif + +yyerrhandle: + + yyn = yypact[yystate]; + if (yyn == YYFLAG) + goto yyerrdefault; + + yyn += YYTERROR; + if (yyn < 0 || yyn > YYLAST || yycheck[yyn] != YYTERROR) + goto yyerrdefault; + + yyn = yytable[yyn]; + if (yyn < 0) + { + if (yyn == YYFLAG) + goto yyerrpop; + yyn = -yyn; + goto yyreduce; + } + else if (yyn == 0) + goto yyerrpop; + + if (yyn == YYFINAL) + YYACCEPT; + +#if YYDEBUG != 0 + if (yydebug) + fprintf(stderr, "Shifting error token, "); +#endif + + *++yyvsp = yylval; +#ifdef YYLSP_NEEDED + *++yylsp = yylloc; +#endif + + yystate = yyn; + goto yynewstate; + + yyacceptlab: + /* YYACCEPT comes here. */ + if (yyfree_stacks) + { + free (yyss); + free (yyvs); +#ifdef YYLSP_NEEDED + free (yyls); +#endif + } + return 0; + + yyabortlab: + /* YYABORT comes here. */ + if (yyfree_stacks) + { + free (yyss); + free (yyvs); +#ifdef YYLSP_NEEDED + free (yyls); +#endif + } + return 1; +} +#line 1586 "parse.y" + +#include <ctype.h> +#include <sys/types.h> +#include "regex.h" +#include "util.h" + +#define is_identchar(c) ((c)!=-1&&(ISALNUM(c) || (c) == '_' || ismbchar(c))) + +static char *tokenbuf = NULL; +static int tokidx, toksiz = 0; + +char *strdup(); + +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 newline_seen; +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; + newline_seen = 0; + ruby_sourcefile = f; + ruby_in_compile = 1; + n = yyparse(); + ruby_in_compile = 0; + if (n == 0) return ruby_eval_tree; + + return 0; +} + +static int lex_gets_ptr; + +static VALUE +lex_get_str(s) + VALUE s; +{ + char *beg, *end, *pend; + + beg = RSTRING(s)->ptr; + if (lex_gets_ptr) { + if (RSTRING(s)->len == lex_gets_ptr) return Qnil; + beg += lex_gets_ptr; + } + pend = RSTRING(s)->ptr + RSTRING(s)->len; + end = beg; + while (end < pend) { + if (*end++ == '\n') break; + } + lex_gets_ptr = end - RSTRING(s)->ptr; + return rb_str_new(beg, end - beg); +} + +NODE* +rb_compile_string(f, s) + char *f; + VALUE s; +{ + lex_gets = lex_get_str; + lex_gets_ptr = 0; + lex_input = s; + lex_pbeg = lex_p = lex_pend = 0; + if (!ruby_sourcefile || strcmp(f, ruby_sourcefile)) /* not in eval() */ + ruby_sourceline = 1; + + return yycompile(f); +} + +NODE* +rb_compile_cstr(f, s, len) + char *f, *s; + int len; +{ + return rb_compile_string(f, rb_str_new(s, len)); +} + +NODE* +rb_compile_file(f, file, start) + char *f; + VALUE file; + int start; +{ + lex_gets = rb_io_gets; + lex_input = file; + lex_pbeg = lex_p = lex_pend = 0; + ruby_sourceline = start; + + return yycompile(strdup(f)); +} + + +static void +normalize_newline(line) + VALUE line; +{ + if (RSTRING(line)->len >= 2 && + RSTRING(line)->ptr[RSTRING(line)->len-1] == '\n' && + RSTRING(line)->ptr[RSTRING(line)->len-2] == '\r') + { + RSTRING(line)->ptr[RSTRING(line)->len-2] = '\n'; + RSTRING(line)->len--; + } +} + +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+1; + heredoc_end = 0; + } + normalize_newline(v); + while (RSTRING(v)->len >= 2 && + RSTRING(v)->ptr[RSTRING(v)->len-1] == '\n' && + RSTRING(v)->ptr[RSTRING(v)->len-2] == '\\') { + VALUE v2 = (*lex_gets)(lex_input); + + if (!NIL_P(v2)) { + normalize_newline(v2); + rb_str_cat(v, RSTRING(v2)->ptr, RSTRING(v2)->len); + } + } + 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+1, &i); + } + return c; + + case 'x': /* hex constant */ + { + char buf[2]; + int i; + + for (i=0; i<2; i++) { + buf[i] = nextc(); + if (buf[i] == -1) goto eof; + if (!ISXDIGIT(buf[i])) { + pushback(buf[i]); + break; + } + } + c = scan_hex(buf, i+1, &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 '\n': + ruby_sourceline++; + break; + 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': + ruby_sourceline++; + 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 (c == paren) nest++; + if (c == term) nest--; + if (c == '\n') { + ruby_sourceline++; + } + else if (c == term) { + tokadd(c); + } + else { + pushback(c); + tokadd('\\'); + tokadd(read_escape()); + } + } + continue; + + case -1: + rb_compile_error("unterminated regexp"); + return 0; + + default: + if (ismbchar(c)) { + int i, len = mbclen(c)-1; + + for (i = 0; i < len; i++) { + tokadd(c); + c = nextc(); + } + } + break; + + regx_end: + for (;;) { + switch (c = nextc()) { + case 'i': + options |= RE_OPTION_IGNORECASE; + break; + case 'x': + options |= RE_OPTION_EXTENDED; + break; + case 'o': + once = 1; + break; + case 'n': + kcode = 4; + break; + case 'e': + kcode = 8; + break; + case 's': + kcode = 12; + break; + case 'u': + kcode = 16; + break; + default: + pushback(c); + goto end_options; + } + } + + end_options: + tokfix(); + lex_state = EXPR_END; + if (list) { + 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 */ + ruby_sourceline++; + /* -1 for chomp */ + yylval.val = rb_str_new(lex_pbeg, lex_pend - lex_pbeg - 1); + 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 == '\n') { + ruby_sourceline++; + } + 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') { + ruby_sourceline++; + } + else if (c == term) { + tokadd(c); + } + else { + pushback(c); + if (func != '"') tokadd('\\'); + tokadd(read_escape()); + } + continue; + } + if (c == paren) nest++; + if (c == term) { + nest--; + if (nest == 0) break; + } + tokadd(c); + } + + tokfix(); + lex_state = EXPR_END; + if (list) { + 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 == '\n') { + ruby_sourceline++; + } + else if (c == '\\') { + c = nextc(); + switch (c) { + case '\n': + ruby_sourceline++; + continue; + + case '\\': + c = '\\'; + break; + + case '\'': + if (term == '\'') { + c = '\''; + break; + } + /* fall through */ + default: + tokadd('\\'); + } + } + if (c == paren) nest++; + if (c == term) { + nest--; + if (nest == 0) break; + } + tokadd(c); + } + + tokfix(); + yylval.val = rb_str_new(tok(), toklen()); + lex_state = EXPR_END; + return tSTRING; +} + +static int +parse_quotedword(term, paren) + int term, paren; +{ + if (parse_qstring(term, paren) == 0) return 0; + yylval.node = NEW_CALL(NEW_STR(yylval.val), rb_intern("split"), 0); + return tDSTRING; +} + +char *strdup(); + +static int +here_document(term, indent) + char term; + int indent; +{ + int c; + char *eos, *p; + int len; + VALUE str; + volatile VALUE line; + 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 (;;) { + line = (*lex_gets)(lex_input); + if (NIL_P(line)) { + error: + ruby_sourceline = linesave; + rb_compile_error("can't find string \"%s\" anywhere before EOF", eos); + free(eos); + return 0; + } + normalize_newline(line); + ruby_sourceline++; + p = RSTRING(line)->ptr; + if (indent) { + while (*p && (*p == ' ' || *p == '\t')) { + p++; + } + } + if (strncmp(eos, p, len) == 0 && p[len] == '\n') { + break; + } + + lex_pbeg = lex_p = RSTRING(line)->ptr; + lex_pend = lex_p + RSTRING(line)->len; +#if 0 + if (indent) { + while (*lex_p && *lex_p == '\t') { + lex_p++; + } + } +#endif + 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; + } + } + 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) { + 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 atof +double atof(); +#endif + +static int +yylex() +{ + register int c; + int space_seen = 0; + struct kwtable *kw; + + if (newline_seen) { + ruby_sourceline += newline_seen; + newline_seen = 0; + } + +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; + if (c == '\\') { /* skip a char */ + c = nextc(); + if (c == '\n') ruby_sourceline++; + } + if (ismbchar(c)) { + int i, len = mbclen(c)-1; + + for (i = 0; i < len; i++) { + c = nextc(); + if (c == '\n') { + ruby_sourceline++; + break; + } + } + } + } + /* fall through */ + case '\n': + switch (lex_state) { + case EXPR_BEG: + case EXPR_FNAME: + case EXPR_DOT: + ruby_sourceline++; + goto retry; + default: + break; + } + newline_seen++; + lex_state = EXPR_BEG; + return '\n'; + + case '*': + if ((c = nextc()) == '*') { + lex_state = EXPR_BEG; + if (nextc() == '=') { + yylval.id = tPOW; + return tOP_ASGN; + } + pushback(c); + return tPOW; + } + if (c == '=') { + yylval.id = '*'; + lex_state = EXPR_BEG; + return tOP_ASGN; + } + pushback(c); + if (lex_state == EXPR_ARG && space_seen && !ISSPACE(c)){ + arg_ambiguous(); + lex_state = EXPR_BEG; + return tSTAR; + } + if (lex_state == EXPR_BEG || lex_state == EXPR_MID) { + lex_state = EXPR_BEG; + return tSTAR; + } + lex_state = EXPR_BEG; + return '*'; + + case '!': + lex_state = EXPR_BEG; + if ((c = nextc()) == '=') { + return tNEQ; + } + if (c == '~') { + return tNMATCH; + } + pushback(c); + return '!'; + + case '=': + if (lex_p == lex_pbeg + 1) { + /* skip embedded rd document */ + if (strncmp(lex_p, "begin", 5) == 0 && ISSPACE(lex_p[5])) { + for (;;) { + ruby_sourceline++; + 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; + } + } + ruby_sourceline++; + lex_p = lex_pend; + goto retry; + } + } + + lex_state = EXPR_BEG; + if ((c = nextc()) == '=') { + if ((c = nextc()) == '=') { + return tEQQ; + } + pushback(c); + return tEQ; + } + if (c == '~') { + return tMATCH; + } + else if (c == '>') { + return tASSOC; + } + pushback(c); + return '='; + + case '<': + c = nextc(); + if (c == '<' && + lex_state != EXPR_END && lex_state != EXPR_CLASS && + (lex_state != EXPR_ARG || space_seen)) { + int c2 = nextc(); + int indent = 0; + if (c2 == '-') { + indent = 1; + c2 = nextc(); + } + if (!ISSPACE(c2) && (strchr("\"'`", c2) || is_identchar(c2))) { + return here_document(c2, indent); + } + pushback(c2); + } + lex_state = EXPR_BEG; + if (c == '=') { + if ((c = nextc()) == '>') { + return tCMP; + } + pushback(c); + return tLEQ; + } + if (c == '<') { + if (nextc() == '=') { + yylval.id = tLSHFT; + return tOP_ASGN; + } + pushback(c); + return tLSHFT; + } + pushback(c); + return '<'; + + case '>': + lex_state = EXPR_BEG; + if ((c = nextc()) == '=') { + return tGEQ; + } + if (c == '>') { + if ((c = nextc()) == '=') { + yylval.id = tRSHFT; + return tOP_ASGN; + } + pushback(c); + return tRSHFT; + } + pushback(c); + return '>'; + + case '"': + return parse_string(c,c,c); + case '`': + if (lex_state == EXPR_FNAME) return c; + return parse_string(c,c,c); + + case '\'': + return parse_qstring(c,c); + + case '?': + if (lex_state == EXPR_END) { + lex_state = EXPR_BEG; + return '?'; + } + c = nextc(); + if (lex_state == EXPR_ARG && ISSPACE(c)){ + pushback(c); + arg_ambiguous(); + lex_state = EXPR_BEG; + return '?'; + } + if (c == '\\') { + c = read_escape(); + } + c &= 0xff; + yylval.val = INT2FIX(c); + lex_state = EXPR_END; + return tINTEGER; + + case '&': + if ((c = nextc()) == '&') { + lex_state = EXPR_BEG; + if ((c = nextc()) == '=') { + yylval.id = tANDOP; + return tOP_ASGN; + } + pushback(c); + return tANDOP; + } + else if (c == '=') { + yylval.id = '&'; + lex_state = EXPR_BEG; + return tOP_ASGN; + } + pushback(c); + if (lex_state == EXPR_ARG && space_seen && !ISSPACE(c)){ + arg_ambiguous(); + lex_state = EXPR_BEG; + return tAMPER; + } + if (lex_state == EXPR_BEG || lex_state == EXPR_MID) { + lex_state = EXPR_BEG; + return tAMPER; + } + lex_state = EXPR_BEG; + return '&'; + + case '|': + lex_state = EXPR_BEG; + if ((c = nextc()) == '|') { + if ((c = nextc()) == '=') { + yylval.id = tOROP; + return tOP_ASGN; + } + pushback(c); + return tOROP; + } + else if (c == '=') { + yylval.id = '|'; + return tOP_ASGN; + } + pushback(c); + return '|'; + + case '+': + c = nextc(); + if (lex_state == EXPR_FNAME) { + if (c == '@') { + return tUPLUS; + } + pushback(c); + return '+'; + } + if (c == '=') { + lex_state = EXPR_BEG; + yylval.id = '+'; + return tOP_ASGN; + } + if (lex_state == EXPR_BEG || lex_state == EXPR_MID) { + if (ISDIGIT(c)) { + goto start_num; + } + pushback(c); + lex_state = EXPR_BEG; + return tUPLUS; + } + lex_state = EXPR_BEG; + pushback(c); + return '+'; + + case '-': + c = nextc(); + if (lex_state == EXPR_FNAME) { + if (c == '@') { + return tUMINUS; + } + pushback(c); + return '-'; + } + if (c == '=') { + lex_state = EXPR_BEG; + yylval.id = '-'; + return tOP_ASGN; + } + if (lex_state == EXPR_BEG || lex_state == EXPR_MID) { + 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 */ + while (c = nextc()) { + if (c == '_') continue; + if (!ISXDIGIT(c)) break; + tokadd(c); + } + pushback(c); + tokfix(); + yylval.val = rb_str2inum(tok(), 16); + return tINTEGER; + } + else if (c >= '0' && c <= '7') { + /* octal */ + do { + tokadd(c); + while ((c = nextc()) == '_') + ; + } while (c >= '0' && c <= '9'); + pushback(c); + tokfix(); + yylval.val = rb_str2inum(tok(), 8); + return tINTEGER; + } + else 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) { + yylval.val = rb_float_new(atof(tok())); + return tFLOAT; + } + yylval.val = rb_str2inum(tok(), 10); + return tINTEGER; + } + + case ']': + case '}': + case ')': + lex_state = EXPR_END; + return c; + + case ':': + c = nextc(); + if (c == ':') { + if (lex_state == EXPR_BEG) { + lex_state = EXPR_BEG; + return tCOLON3; + } + if (lex_state == EXPR_ARG && space_seen) { + arg_ambiguous(); + lex_state = EXPR_BEG; + return tCOLON3; + } + lex_state = EXPR_DOT; + return tCOLON2; + } + pushback(c); + if (lex_state == EXPR_END || ISSPACE(c)) { + lex_state = EXPR_BEG; + return ':'; + } + lex_state = EXPR_FNAME; + return tSYMBEG; + + case '/': + if (lex_state == EXPR_BEG || lex_state == EXPR_MID) { + return parse_regx('/', '/'); + } + if ((c = nextc()) == '=') { + lex_state = EXPR_BEG; + yylval.id = '/'; + return tOP_ASGN; + } + if (lex_state == EXPR_ARG) { + if (space_seen && !ISSPACE(c)) { + pushback(c); + arg_ambiguous(); + return parse_regx('/', '/'); + } + } + lex_state = EXPR_BEG; + pushback(c); + return '/'; + + case '^': + lex_state = EXPR_BEG; + if (nextc() == '=') { + yylval.id = '^'; + return tOP_ASGN; + } + pushback(c); + return c; + + case ',': + case ';': + lex_state = EXPR_BEG; + return c; + + case '~': + if (lex_state == EXPR_FNAME) { + if ((c = nextc()) != '@') { + pushback(c); + } + } + lex_state = EXPR_BEG; + return '~'; + + case '(': + if (lex_state == EXPR_BEG || lex_state == EXPR_MID) { + c = tLPAREN; + lex_state = EXPR_BEG; + } + else { + lex_state = EXPR_BEG; + } + return c; + + case '[': + if (lex_state == EXPR_FNAME) { + if ((c = nextc()) == ']') { + if ((c = nextc()) == '=') { + return tASET; + } + pushback(c); + return tAREF; + } + pushback(c); + return '['; + } + else if (lex_state == EXPR_BEG || lex_state == EXPR_MID) { + c = tLBRACK; + } + else if (lex_state == EXPR_ARG && space_seen) { + arg_ambiguous(); + c = tLBRACK; + } + lex_state = EXPR_BEG; + return c; + + case '{': + if (lex_state != EXPR_END && lex_state != EXPR_ARG) + c = tLBRACE; + lex_state = EXPR_BEG; + return c; + + case '\\': + c = nextc(); + if (c == '\n') { + ruby_sourceline++; + 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 = term; + if (term == '(') term = ')'; + else if (term == '[') term = ']'; + else if (term == '{') term = '}'; + else if (term == '<') term = '>'; + + switch (c) { + case 'Q': + return parse_string('"', term, paren); + + case 'q': + return parse_qstring(term, paren); + + case 'w': + return parse_quotedword(term, paren); + + case 'x': + return parse_string('`', term, paren); + + case 'r': + return parse_regx(term, paren); + + default: + yyerror("unknown type of %string"); + return 0; + } + } + if ((c = nextc()) == '=') { + yylval.id = '%'; + return tOP_ASGN; + } + if (lex_state == EXPR_ARG) { + if (space_seen && !ISSPACE(c)) { + arg_ambiguous(); + goto quotation; + } + } + lex_state = EXPR_BEG; + pushback(c); + return '%'; + + case '$': + lex_state = EXPR_END; + newtok(); + c = nextc(); + switch (c) { + case '~': /* $~: match-data */ + /* fall through */ + case '_': /* $_: last read line string */ + local_cnt(c); + /* fall through */ + case '*': /* $*: argv */ + case '$': /* $$: pid */ + case '?': /* $?: last status */ + case '!': /* $!: error string */ + case '@': /* $@: error position */ + case '/': /* $/: input record separator */ + case '\\': /* $\: output record separator */ + case ';': /* $;: field separator */ + case ',': /* $,: output field separator */ + case '.': /* $.: last read line number */ + case '=': /* $=: ignorecase */ + case ':': /* $:: load path */ + case '<': /* $<: reading filename */ + case '>': /* $>: default output handle */ + case '\"': /* $": already loaded files */ + tokadd('$'); + tokadd(c); + tokfix(); + yylval.id = rb_intern(tok()); + return tGVAR; + + case '-': + tokadd('$'); + tokadd(c); + c = nextc(); + tokadd(c); + tokfix(); + yylval.id = rb_intern(tok()); + return tGVAR; + + case '&': /* $&: last match */ + case '`': /* $`: string before last match */ + case '\'': /* $': string after last match */ + case '+': /* $+: string matches last paren. */ + yylval.node = NEW_BACK_REF(c); + return tBACK_REF; + + case '1': case '2': case '3': + case '4': case '5': case '6': + case '7': case '8': case '9': + while (ISDIGIT(c)) { + tokadd(c); + c = nextc(); + } + pushback(c); + tokfix(); + yylval.node = NEW_NTH_REF(atoi(tok())); + return tNTH_REF; + + default: + if (!is_identchar(c)) { + pushback(c); + return '$'; + } + case '0': + tokadd('$'); + } + break; + + case '@': + c = nextc(); + if (!is_identchar(c)) { + pushback(c); + return '@'; + } + newtok(); + tokadd('@'); + break; + + default: + if (c != '_' && !ISALPHA(c) && !ismbchar(c)) { + rb_compile_error("Invalid char '%c' in expression", c); + goto retry; + } + + newtok(); + break; + } + + while (is_identchar(c)) { + tokadd(c); + if (ismbchar(c)) { + int i, len = mbclen(c)-1; + + tokadd(c); + for (i = 0; i < len; i++) { + c = nextc(); + tokadd(c); + } + } + c = nextc(); + } + if ((c == '!' || c == '?') && is_identchar(tok()[0])) { + tokadd(c); + } + else { + pushback(c); + } + tokfix(); + + { + int result; + + switch (tok()[0]) { + case '$': + lex_state = EXPR_END; + result = tGVAR; + break; + case '@': + lex_state = EXPR_END; + result = tIVAR; + break; + default: + if (lex_state != EXPR_DOT) { + /* See if it is a reserved word. */ + kw = rb_reserved_word(tok(), toklen()); + if (kw) { + enum lex_state state = lex_state; + if (lex_state == EXPR_FNAME) { + yylval.id = rb_intern(kw->name); + } + lex_state = kw->state; + return kw->id[state != EXPR_BEG]; + } + } + + if (ISUPPER(tok()[0])) { + result = tCONSTANT; + } + else if (toklast() == '!' || toklast() == '?') { + result = tFID; + } else { + result = tIDENTIFIER; + if (lex_state == EXPR_FNAME) { + lex_state = EXPR_END; + if ((c = nextc()) == '=') { + tokadd(c); + } + else { + pushback(c); + } + } + } + if (lex_state == EXPR_BEG || + lex_state == EXPR_DOT || + lex_state == EXPR_ARG){ + lex_state = EXPR_ARG; + } + else { + lex_state = EXPR_END; + } + } + tokfix(); + yylval.id = rb_intern(tok()); + return result; + } +} + +static NODE* +rb_str_extend(list, term) + NODE *list; + char term; +{ + int c; + int brace = -1; + VALUE ss; + NODE *node; + int nest; + + c = nextc(); + switch (c) { + case '$': + case '@': + case '{': + break; + default: + tokadd('#'); + pushback(c); + return list; + } + + ss = rb_str_new(tok(), toklen()); + if (list == 0) { + list = NEW_DSTR(ss); + } + else if (toklen() > 0) { + list_append(list, NEW_STR(ss)); + } + newtok(); + + switch (c) { + case '$': + tokadd('$'); + c = nextc(); + if (c == -1) return (NODE*)-1; + switch (c) { + case '1': case '2': case '3': + case '4': case '5': case '6': + case '7': case '8': case '9': + while (ISDIGIT(c)) { + tokadd(c); + c = nextc(); + } + pushback(c); + goto fetch_id; + + case '&': case '+': + case '_': case '~': + case '*': case '$': case '?': + case '!': case '@': case ',': + case '.': case '=': case ':': + case '<': case '>': case '\\': + refetch: + tokadd(c); + goto fetch_id; + + default: + if (c == term) { + list_append(list, NEW_STR(rb_str_new2("#$"))); + pushback(c); + newtok(); + return list; + } + switch (c) { + case '\"': + case '/': + case '\'': + case '`': + goto refetch; + } + if (!is_identchar(c)) { + yyerror("bad global variable in string"); + newtok(); + return list; + } + } + /* through */ + + case '@': + tokadd(c); + c = nextc(); + while (is_identchar(c)) { + tokadd(c); + if (ismbchar(c)) { + int i, len = mbclen(c)-1; + + tokadd(c); + for (i = 0; i < len; i++) { + c = nextc(); + tokadd(c); + } + } + c = nextc(); + } + pushback(c); + break; + + case '{': + if (c == '{') brace = '}'; + nest = 0; + do { + loop_again: + c = nextc(); + switch (c) { + case -1: + if (nest > 0) { + yyerror("bad substitution in string"); + newtok(); + return list; + } + return (NODE*)-1; + case '}': + if (c == brace) { + if (nest == 0) break; + nest--; + } + tokadd(c); + goto loop_again; + case '\\': + c = read_escape(); + tokadd(c); + goto loop_again; + case '{': + if (brace != -1) nest++; + case '\"': + case '/': + case '`': + if (c == term) { + pushback(c); + list_append(list, NEW_STR(rb_str_new2("#"))); + rb_warning("bad substitution in string"); + tokfix(); + list_append(list, NEW_STR(rb_str_new(tok(), toklen()))); + newtok(); + return list; + } + default: + tokadd(c); + break; + } + } while (c != brace); + } + + fetch_id: + tokfix(); + node = NEW_EVSTR(tok(),toklen()); + list_append(list, node); + newtok(); + + return list; +} + +NODE* +rb_node_newnode(type, a0, a1, a2) + enum node_type type; + NODE *a0, *a1, *a2; +{ + NODE *n = (NODE*)rb_newobj(); + + n->flags |= T_NODE; + nd_set_type(n, type); + nd_set_line(n, ruby_sourceline); + n->nd_file = ruby_sourcefile; + + n->u1.node = a0; + n->u2.node = a1; + n->u3.node = a2; + + return n; +} + +static enum node_type +nodetype(node) /* for debug */ + NODE *node; +{ + return (enum node_type)nd_type(node); +} + +static int +nodeline(node) + NODE *node; +{ + return nd_line(node); +} + +static NODE* +newline_node(node) + NODE *node; +{ + NODE *nl = 0; + if (node) { + nl = NEW_NEWLINE(node); + fixpos(nl, node); + nl->nd_nth = nd_line(node); + } + return nl; +} + +static void +fixpos(node, orig) + NODE *node, *orig; +{ + if (!node) return; + if (!orig) return; + node->nd_file = orig->nd_file; + nd_set_line(node, nd_line(orig)); +} + +static NODE* +block_append(head, tail) + NODE *head, *tail; +{ + NODE *end; + + if (tail == 0) return head; + if (head == 0) return tail; + + if (nd_type(head) != NODE_BLOCK) { + end = NEW_BLOCK(head); + end->nd_end = end; + fixpos(end, head); + head = end; + } + else { + end = head->nd_end; + } + + if (RTEST(rb_verbose)) { + NODE *nd = end->nd_head; + newline: + switch (nd_type(nd)) { + case NODE_RETURN: + case NODE_BREAK: + case NODE_NEXT: + case NODE_REDO: + case NODE_RETRY: + rb_warning("statement not reached"); + break; + + case NODE_NEWLINE: + nd = nd->nd_next; + goto newline; + + default: + break; + } + } + + if (nd_type(tail) != NODE_BLOCK) { + tail = NEW_BLOCK(tail); + tail->nd_end = tail; + } + end->nd_next = tail; + head->nd_end = tail->nd_end; + return head; +} + +static NODE* +list_append(head, tail) + NODE *head, *tail; +{ + NODE *last; + + if (head == 0) return NEW_LIST(tail); + + last = head; + while (last->nd_next) { + last = last->nd_next; + } + + last->nd_next = NEW_LIST(tail); + head->nd_alen += 1; + return head; +} + +static NODE* +list_concat(head, tail) + NODE *head, *tail; +{ + NODE *last; + + last = head; + while (last->nd_next) { + last = last->nd_next; + } + + last->nd_next = tail; + head->nd_alen += tail->nd_alen; + + return head; +} + +static NODE * +call_op(recv, id, narg, arg1) + NODE *recv; + ID id; + int narg; + NODE *arg1; +{ + value_expr(recv); + if (narg == 1) { + value_expr(arg1); + } + + return NEW_CALL(recv, id, narg==1?NEW_LIST(arg1):0); +} + +static NODE* +match_gen(node1, node2) + NODE *node1; + NODE *node2; +{ + local_cnt('~'); + + switch (nd_type(node1)) { + case NODE_DREGX: + case NODE_DREGX_ONCE: + return NEW_MATCH2(node1, node2); + + case NODE_LIT: + if (TYPE(node1->nd_lit) == T_REGEXP) { + return NEW_MATCH2(node1, node2); + } + } + + switch (nd_type(node2)) { + case NODE_DREGX: + case NODE_DREGX_ONCE: + return NEW_MATCH3(node2, node1); + + case NODE_LIT: + if (TYPE(node2->nd_lit) == T_REGEXP) { + return NEW_MATCH3(node2, node1); + } + } + + return NEW_CALL(node1, tMATCH, NEW_LIST(node2)); +} + +static NODE* +gettable(id) + ID id; +{ + if (id == kSELF) { + return NEW_SELF(); + } + else if (id == kNIL) { + return NEW_NIL(); + } + else if (id == kTRUE) { + return NEW_TRUE(); + } + else if (id == kFALSE) { + return NEW_FALSE(); + } + else if (id == k__FILE__) { + return NEW_STR(rb_str_new2(ruby_sourcefile)); + } + else if (id == k__LINE__) { + return NEW_LIT(INT2FIX(ruby_sourceline)); + } + else if (is_local_id(id)) { + if (dyna_in_block() && rb_dvar_defined(id)) return NEW_DVAR(id); + if (local_id(id)) return NEW_LVAR(id); + /* method call without arguments */ + return NEW_VCALL(id); + } + else if (is_global_id(id)) { + return NEW_GVAR(id); + } + else if (is_instance_id(id)) { + return NEW_IVAR(id); + } + else if (is_const_id(id)) { + return NEW_CVAR(id); + } + rb_bug("invalid id for gettable"); + return 0; +} + +static NODE* +assignable(id, val) + ID id; + NODE *val; +{ + NODE *lhs = 0; + + value_expr(val); + if (id == kSELF) { + yyerror("Can't change the value of self"); + } + else if (id == kNIL) { + yyerror("Can't assign to nil"); + } + else if (id == kTRUE) { + yyerror("Can't assign to true"); + } + else if (id == kFALSE) { + yyerror("Can't assign to false"); + } + else if (id == k__FILE__) { + yyerror("Can't assign to __FILE__"); + } + else if (id == k__LINE__) { + yyerror("Can't assign to __LINE__"); + } + else if (is_local_id(id)) { + if (rb_dvar_defined(id)) { + lhs = NEW_DASGN(id, val); + } + else if (local_id(id) || !dyna_in_block()) { + lhs = NEW_LASGN(id, val); + } + else{ + rb_dvar_push(id, 0); + lhs = NEW_DASGN_PUSH(id, val); + } + } + else if (is_global_id(id)) { + lhs = NEW_GASGN(id, val); + } + else if (is_instance_id(id)) { + lhs = NEW_IASGN(id, val); + } + else if (is_const_id(id)) { + if (cur_mid || in_single) + yyerror("dynamic constant assignment"); + lhs = NEW_CASGN(id, val); + } + else { + rb_bug("bad id for variable"); + } + return lhs; +} + +static NODE * +arg_add(node1, node2) + NODE *node1; + NODE *node2; +{ + return NEW_ARGSCAT(node1, node2); +} + +static NODE * +aryset(recv, idx, val) + NODE *recv, *idx, *val; +{ + value_expr(recv); + value_expr(val); + if (idx) { + if (nd_type(idx) == NODE_ARRAY) { + idx = list_append(idx, val); + } + else { + idx = arg_add(idx, val); + } + } + return NEW_CALL(recv, tASET, idx); +} + +ID +rb_id_attrset(id) + ID id; +{ + id &= ~ID_SCOPE_MASK; + id |= ID_ATTRSET; + return id; +} + +static NODE * +attrset(recv, id, val) + NODE *recv, *val; + ID id; +{ + value_expr(recv); + value_expr(val); + + return NEW_CALL(recv, rb_id_attrset(id), NEW_LIST(val)); +} + +static void +rb_backref_error(node) + NODE *node; +{ + switch (nd_type(node)) { + case NODE_NTH_REF: + rb_compile_error("Can't set variable $%d", node->nd_nth); + break; + case NODE_BACK_REF: + rb_compile_error("Can't set variable $%c", node->nd_nth); + break; + } +} + +static int +value_expr(node) + NODE *node; +{ + if (node == 0) return Qtrue; + + switch (nd_type(node)) { + case NODE_RETURN: + case NODE_BREAK: + case NODE_NEXT: + case NODE_REDO: + case NODE_RETRY: + case NODE_WHILE: + case NODE_UNTIL: + case NODE_CLASS: + case NODE_MODULE: + case NODE_DEFN: + case NODE_DEFS: + yyerror("void value expression"); + return Qfalse; + break; + + case NODE_BLOCK: + while (node->nd_next) { + node = node->nd_next; + } + return value_expr(node->nd_head); + + case NODE_IF: + return value_expr(node->nd_body) && value_expr(node->nd_else); + + case NODE_NEWLINE: + return value_expr(node->nd_next); + + default: + return Qtrue; + } +} + +static NODE *cond2(); + +static int +assign_in_cond(node) + NODE *node; +{ + switch (nd_type(node)) { + case NODE_MASGN: + yyerror("multiple assignment in conditional"); + return 1; + + case NODE_LASGN: + case NODE_DASGN: + case NODE_GASGN: + case NODE_IASGN: + case NODE_CASGN: + break; + + case NODE_NEWLINE: + default: + return 0; + } + + switch (nd_type(node->nd_value)) { + case NODE_LIT: + case NODE_STR: + case NODE_DSTR: + case NODE_XSTR: + case NODE_DXSTR: + case NODE_EVSTR: + case NODE_DREGX: + case NODE_NIL: + case NODE_TRUE: + case NODE_FALSE: + /* reports always */ + rb_warn("found = in conditional, should be =="); + return 1; + + default: + break; + } + if (assign_in_cond(node->nd_value) == 0) { + rb_warning("assignment in condition"); + } + return 1; +} + +static NODE* +cond0(node) + NODE *node; +{ + enum node_type type = nd_type(node); + + assign_in_cond(node); + switch (type) { + case NODE_DREGX: + case NODE_DREGX_ONCE: + local_cnt('_'); + local_cnt('~'); + return NEW_MATCH2(node, NEW_GVAR(rb_intern("$_"))); + + case NODE_DOT2: + case NODE_DOT3: + node->nd_beg = cond2(node->nd_beg); + node->nd_end = cond2(node->nd_end); + if (type == NODE_DOT2) nd_set_type(node,NODE_FLIP2); + else if (type == NODE_DOT3) nd_set_type(node, NODE_FLIP3); + node->nd_cnt = local_append(0); + return node; + + case NODE_LIT: + if (TYPE(node->nd_lit) == T_REGEXP) { + local_cnt('_'); + local_cnt('~'); + return NEW_MATCH(node); + } + if (TYPE(node->nd_lit) == T_STRING) { + local_cnt('_'); + local_cnt('~'); + return NEW_MATCH(rb_reg_new(RSTRING(node)->ptr,RSTRING(node)->len,0)); + } + default: + return node; + } +} + +static NODE* +cond(node) + NODE *node; +{ + if (node == 0) return 0; + if (nd_type(node) == NODE_NEWLINE){ + node->nd_next = cond0(node->nd_next); + return node; + } + return cond0(node); +} + +static NODE* +cond2(node) + NODE *node; +{ + enum node_type type; + + node = cond(node); + type = nd_type(node); + if (type == NODE_NEWLINE) node = node->nd_next; + if (type == NODE_LIT && FIXNUM_P(node->nd_lit)) { + return call_op(node,tEQ,1,NEW_GVAR(rb_intern("$."))); + } + return node; +} + +static NODE* +logop(type, left, right) + enum node_type type; + NODE *left, *right; +{ + value_expr(left); + return rb_node_newnode(type, cond(left), cond(right), 0); +} + +static NODE * +arg_blk_pass(node1, node2) + NODE *node1; + NODE *node2; +{ + if (node2) { + node2->nd_head = node1; + return node2; + } + return node1; +} + +static NODE* +new_call(r,m,a) + NODE *r; + ID m; + NODE *a; +{ + if (a && nd_type(a) == NODE_BLOCK_PASS) { + a->nd_iter = NEW_CALL(r,m,a->nd_head); + return a; + } + return NEW_CALL(r,m,a); +} + +static NODE* +new_fcall(m,a) + ID m; + NODE *a; +{ + if (a && nd_type(a) == NODE_BLOCK_PASS) { + a->nd_iter = NEW_FCALL(m,a->nd_head); + return a; + } + return NEW_FCALL(m,a); +} + +static struct local_vars { + ID *tbl; + int nofree; + int cnt; + int dlev; + struct local_vars *prev; +} *lvtbl; + +static void +local_push() +{ + struct local_vars *local; + + local = ALLOC(struct local_vars); + local->prev = lvtbl; + local->nofree = 0; + local->cnt = 0; + local->tbl = 0; + local->dlev = 0; + lvtbl = local; +} + +static void +local_pop() +{ + struct local_vars *local = lvtbl->prev; + + if (lvtbl->tbl) { + if (!lvtbl->nofree) free(lvtbl->tbl); + else lvtbl->tbl[0] = lvtbl->cnt; + } + free(lvtbl); + lvtbl = local; +} + +static ID* +local_tbl() +{ + lvtbl->nofree = 1; + return lvtbl->tbl; +} + +static int +local_append(id) + ID id; +{ + if (lvtbl->tbl == 0) { + lvtbl->tbl = ALLOC_N(ID, 4); + lvtbl->tbl[0] = 0; + lvtbl->tbl[1] = '_'; + lvtbl->tbl[2] = '~'; + lvtbl->cnt = 2; + if (id == '_') return 0; + if (id == '~') return 1; + } + else { + REALLOC_N(lvtbl->tbl, ID, lvtbl->cnt+2); + } + + lvtbl->tbl[lvtbl->cnt+1] = id; + return lvtbl->cnt++; +} + +static int +local_cnt(id) + ID id; +{ + int cnt, max; + + if (id == 0) return lvtbl->cnt; + + for (cnt=1, max=lvtbl->cnt+1; cnt<max ;cnt++) { + if (lvtbl->tbl[cnt] == id) return cnt-1; + } + return local_append(id); +} + +static int +local_id(id) + ID id; +{ + int i, max; + + if (lvtbl == 0) return Qfalse; + for (i=3, max=lvtbl->cnt+1; i<max; i++) { + if (lvtbl->tbl[i] == id) return Qtrue; + } + return Qfalse; +} + +static void +top_local_init() +{ + local_push(); + lvtbl->cnt = ruby_scope->local_tbl?ruby_scope->local_tbl[0]:0; + if (lvtbl->cnt > 0) { + lvtbl->tbl = ALLOC_N(ID, lvtbl->cnt+3); + MEMCPY(lvtbl->tbl, ruby_scope->local_tbl, ID, lvtbl->cnt+1); + } + else { + lvtbl->tbl = 0; + } + if (ruby_dyna_vars) + lvtbl->dlev = 1; + else + lvtbl->dlev = 0; +} + +static void +top_local_setup() +{ + int len = lvtbl->cnt; + int i; + + if (len > 0) { + i = lvtbl->tbl[0]; + + if (i < len) { + if (i == 0 || ruby_scope->flag == SCOPE_ALLOCA) { + VALUE *vars = ALLOC_N(VALUE, len+1); + if (ruby_scope->local_vars) { + *vars++ = ruby_scope->local_vars[-1]; + MEMCPY(vars, ruby_scope->local_vars, VALUE, i); + rb_mem_clear(vars+i, len-i); + } + else { + *vars++ = 0; + rb_mem_clear(vars, len); + } + ruby_scope->local_vars = vars; + ruby_scope->flag |= SCOPE_MALLOC; + } + else { + VALUE *vars = ruby_scope->local_vars-1; + REALLOC_N(vars, VALUE, len+1); + ruby_scope->local_vars = vars+1; + rb_mem_clear(ruby_scope->local_vars+i, len-i); + } + if (ruby_scope->local_tbl && ruby_scope->local_vars[-1] == 0) { + free(ruby_scope->local_tbl); + } + ruby_scope->local_vars[-1] = 0; + ruby_scope->local_tbl = local_tbl(); + } + } + local_pop(); +} + +static struct RVarmap* +dyna_push() +{ + lvtbl->dlev++; + return ruby_dyna_vars; +} + +static void +dyna_pop(vars) + struct RVarmap* vars; +{ + lvtbl->dlev--; + ruby_dyna_vars = vars; +} + +static int +dyna_in_block() +{ + return (lvtbl->dlev > 0); +} + +static void +cref_pop() +{ + cur_cref = cur_cref->nd_next; +} + +void +rb_parser_append_print() +{ + ruby_eval_tree = + block_append(ruby_eval_tree, + NEW_FCALL(rb_intern("print"), + NEW_ARRAY(NEW_GVAR(rb_intern("$_"))))); +} + +void +rb_parser_while_loop(chop, split) + int chop, split; +{ + if (split) { + ruby_eval_tree = + block_append(NEW_GASGN(rb_intern("$F"), + NEW_CALL(NEW_GVAR(rb_intern("$_")), + rb_intern("split"), 0)), + ruby_eval_tree); + } + if (chop) { + ruby_eval_tree = + block_append(NEW_CALL(NEW_GVAR(rb_intern("$_")), + rb_intern("chop!"), 0), ruby_eval_tree); + } + ruby_eval_tree = NEW_OPT_N(ruby_eval_tree); +} + +static struct { + ID token; + char *name; +} op_tbl[] = { + tDOT2, "..", + '+', "+", + '-', "-", + '+', "+(binary)", + '-', "-(binary)", + '*', "*", + '/', "/", + '%', "%", + tPOW, "**", + tUPLUS, "+@", + tUMINUS, "-@", + tUPLUS, "+(unary)", + tUMINUS, "-(unary)", + '|', "|", + '^', "^", + '&', "&", + tCMP, "<=>", + '>', ">", + tGEQ, ">=", + '<', "<", + tLEQ, "<=", + tEQ, "==", + tEQQ, "===", + tNEQ, "!=", + tMATCH, "=~", + tNMATCH, "!~", + '!', "!", + '~', "~", + '!', "!(unary)", + '~', "~(unary)", + '!', "!@", + '~', "~@", + tAREF, "[]", + tASET, "[]=", + tLSHFT, "<<", + tRSHFT, ">>", + tCOLON2, "::", + tCOLON3, "::", + '`', "`", + 0, 0, +}; + +char *rb_id2name(); +char *rb_class2name(); + +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) + 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); + } +} |