parser3/src/main/compile.tab.C - diff

Return to compile.tab.C CVS log

Up to [parser3project] / parser3 / src / main

Diff for /parser3/src/main/compile.tab.C between versions 1.24 and 1.67

version 1.24, 2001/10/18 09:49:58	version 1.67, 2002/09/18 13:15:43
Line 10	Line 10
#define BAD_STRING_COMPARISON_OPERATOR 260	#define BAD_STRING_COMPARISON_OPERATOR 260
#define BAD_HEX_LITERAL 261	#define BAD_HEX_LITERAL 261
#define BAD_METHOD_DECL_START 262	#define BAD_METHOD_DECL_START 262
#define LAND 263	#define BAD_METHOD_PARAMETER_NAME_CHARACTER 263
#define LOR 264	#define BAD_MATH_OPERATOR_CHARACTER 264
#define LXOR 265	#define LAND 265
#define NLE 266	#define LOR 266
#define NGE 267	#define LXOR 267
#define NEQ 268	#define NXOR 268
#define NNE 269	#define NLE 269
#define SLT 270	#define NGE 270
#define SGT 271	#define NEQ 271
#define SLE 272	#define NNE 272
#define SGE 273	#define NSL 273
#define SEQ 274	#define NSR 274
#define SNE 275	#define SLT 275
#define DEF 276	#define SGT 276
#define IN 277	#define SLE 277
#define FEXISTS 278	#define SGE 278
#define DEXISTS 279	#define SEQ 279
#define IS 280	#define SNE 280
#define NEG 281	#define DEF 281
	#define IN 282
	#define FEXISTS 283
	#define DEXISTS 284
	#define IS 285
	#define NEG 286

#line 1 "compile.y"	#line 1 "compile.y"

Line 95 static int yylex(YYSTYPE lvalp, void p	Line 100 static int yylex(YYSTYPE lvalp, void p



#define YYFINAL 246	#define YYFINAL 252
#define YYFLAG -32768	#define YYFLAG -32768
#define YYNTBASE 55	#define YYNTBASE 60

#define YYTRANSLATE(x) ((unsigned)(x) <= 281 ? yytranslate[x] : 134)	#define YYTRANSLATE(x) ((unsigned)(x) <= 286 ? yytranslate[x] : 139)

static const char yytranslate[] = { 0,	static const char yytranslate[] = { 0,
2, 2, 2, 2, 2, 2, 2, 2, 2, 41,	2, 2, 2, 2, 2, 2, 2, 2, 2, 46,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,	2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,	2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 29, 53, 30, 45, 38, 32, 54, 49,	2, 2, 34, 58, 2, 50, 42, 36, 59, 54,
50, 36, 35, 2, 34, 48, 37, 2, 2, 2,	55, 40, 39, 2, 38, 53, 41, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 52, 44, 27,	2, 2, 2, 2, 2, 2, 2, 57, 49, 32,
2, 28, 2, 40, 2, 2, 2, 2, 2, 2,	2, 33, 2, 45, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,	2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,	2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
42, 2, 43, 51, 2, 2, 2, 2, 2, 2,	47, 43, 48, 56, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,	2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,	2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 46, 31, 47, 33, 2, 2, 2, 2,	2, 2, 51, 35, 52, 37, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,	2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,	2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,	2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
Line 130 static const char yytranslate[] = {	Line 135 static const char yytranslate[] = {
2, 2, 2, 2, 2, 1, 3, 4, 5, 6,	2, 2, 2, 2, 2, 1, 3, 4, 5, 6,
7, 8, 9, 10, 11, 12, 13, 14, 15, 16,	7, 8, 9, 10, 11, 12, 13, 14, 15, 16,
17, 18, 19, 20, 21, 22, 23, 24, 25, 26,	17, 18, 19, 20, 21, 22, 23, 24, 25, 26,
39	27, 28, 29, 30, 31, 44
};	};

#if YYDEBUG != 0	#if YYDEBUG != 0
Line 150 static const short yyprhs[] = { 0,	Line 155 static const short yyprhs[] = { 0,
306, 310, 313, 316, 319, 322, 325, 328, 331, 334,	306, 310, 313, 316, 319, 322, 325, 328, 331, 334,
338, 342, 346, 350, 354, 358, 362, 366, 370, 374,	338, 342, 346, 350, 354, 358, 362, 366, 370, 374,
378, 382, 386, 390, 394, 398, 402, 406, 410, 414,	378, 382, 386, 390, 394, 398, 402, 406, 410, 414,
418, 422, 426, 430, 432, 434, 435	418, 422, 426, 430, 434, 438, 442, 444, 446, 447
};	};

static const short yyrhs[] = { 57,	static const short yyrhs[] = { 62,
0, 56, 0, 58, 0, 56, 58, 0, 70, 0,	0, 61, 0, 63, 0, 61, 63, 0, 75, 0,
59, 0, 64, 0, 40, 4, 41, 60, 0, 133,	64, 0, 69, 0, 45, 4, 46, 65, 0, 138,
0, 61, 0, 62, 0, 61, 62, 0, 63, 41,	0, 66, 0, 67, 0, 66, 67, 0, 68, 46,
0, 133, 0, 4, 0, 40, 4, 66, 65, 69,	0, 138, 0, 4, 0, 45, 4, 71, 70, 74,
41, 70, 0, 133, 0, 66, 0, 42, 67, 43,	46, 75, 0, 138, 0, 71, 0, 47, 72, 48,
0, 133, 0, 68, 0, 4, 0, 68, 44, 4,	0, 138, 0, 73, 0, 4, 0, 73, 49, 4,
0, 133, 0, 4, 0, 133, 0, 71, 0, 72,	0, 138, 0, 4, 0, 138, 0, 76, 0, 77,
0, 71, 72, 0, 131, 0, 73, 0, 74, 0,	0, 76, 77, 0, 136, 0, 78, 0, 79, 0,
82, 0, 95, 0, 75, 0, 45, 76, 0, 78,	87, 0, 100, 0, 80, 0, 50, 81, 0, 83,
3, 0, 77, 0, 46, 78, 47, 0, 79, 0,	3, 0, 82, 0, 51, 83, 52, 0, 84, 0,
80, 0, 81, 0, 125, 81, 0, 117, 0, 114,	85, 0, 86, 0, 130, 86, 0, 122, 0, 119,
117, 0, 45, 83, 87, 0, 84, 0, 85, 0,	122, 0, 50, 88, 92, 0, 89, 0, 90, 0,
86, 0, 113, 0, 48, 113, 0, 125, 113, 0,	91, 0, 118, 0, 53, 118, 0, 130, 118, 0,
88, 0, 89, 0, 90, 0, 42, 91, 43, 0,	93, 0, 94, 0, 95, 0, 47, 96, 48, 0,
49, 128, 50, 0, 46, 70, 47, 0, 132, 0,	54, 133, 55, 0, 51, 75, 52, 0, 137, 0,
4, 0, 92, 0, 93, 0, 94, 0, 73, 0,	4, 0, 97, 0, 98, 0, 99, 0, 78, 0,
72, 71, 0, 96, 0, 0, 0, 51, 97, 99,	77, 76, 0, 101, 0, 0, 0, 56, 102, 104,
98, 100, 3, 0, 78, 0, 101, 0, 100, 101,	103, 105, 3, 0, 83, 0, 106, 0, 105, 106,
0, 102, 0, 103, 0, 104, 0, 42, 105, 43,	0, 107, 0, 108, 0, 109, 0, 47, 110, 48,
0, 49, 106, 50, 0, 46, 107, 47, 0, 108,	0, 54, 111, 55, 0, 51, 112, 52, 0, 113,
0, 105, 44, 108, 0, 109, 0, 106, 44, 109,	0, 110, 49, 113, 0, 114, 0, 111, 49, 114,
0, 110, 0, 107, 44, 110, 0, 111, 0, 112,	0, 115, 0, 112, 49, 115, 0, 116, 0, 117,
0, 70, 0, 132, 0, 4, 0, 92, 0, 128,	0, 75, 0, 137, 0, 4, 0, 97, 0, 133,
0, 118, 0, 114, 118, 0, 115, 0, 114, 115,	0, 123, 0, 119, 123, 0, 120, 0, 119, 120,
0, 116, 48, 0, 118, 0, 118, 0, 4, 5,	0, 121, 53, 0, 123, 0, 123, 0, 4, 5,
0, 4, 0, 119, 0, 120, 0, 121, 0, 45,	0, 4, 0, 124, 0, 125, 0, 126, 0, 50,
122, 0, 4, 123, 0, 42, 71, 43, 0, 4,	127, 0, 4, 128, 0, 47, 76, 48, 0, 4,
0, 124, 0, 123, 124, 0, 45, 122, 0, 126,	0, 129, 0, 128, 129, 0, 50, 127, 0, 131,
0, 127, 0, 4, 52, 0, 126, 52, 0, 129,	0, 132, 0, 4, 57, 0, 131, 57, 0, 134,
0, 4, 0, 75, 0, 96, 0, 53, 130, 53,	0, 4, 0, 80, 0, 101, 0, 58, 135, 58,
0, 54, 130, 54, 0, 49, 129, 50, 0, 34,	0, 59, 135, 59, 0, 54, 134, 55, 0, 38,
129, 0, 35, 129, 0, 33, 129, 0, 29, 129,	134, 0, 39, 134, 0, 37, 134, 0, 34, 134,
0, 22, 129, 0, 23, 129, 0, 24, 129, 0,	0, 27, 134, 0, 28, 134, 0, 29, 134, 0,
25, 129, 0, 129, 34, 129, 0, 129, 35, 129,	30, 134, 0, 134, 38, 134, 0, 134, 39, 134,
0, 129, 36, 129, 0, 129, 37, 129, 0, 129,	0, 134, 40, 134, 0, 134, 41, 134, 0, 134,
38, 129, 0, 129, 32, 129, 0, 129, 31, 129,	42, 134, 0, 134, 43, 134, 0, 134, 19, 134,
0, 129, 30, 129, 0, 129, 9, 129, 0, 129,	0, 134, 20, 134, 0, 134, 36, 134, 0, 134,
10, 129, 0, 129, 11, 129, 0, 129, 27, 129,	35, 134, 0, 134, 14, 134, 0, 134, 11, 134,
0, 129, 28, 129, 0, 129, 12, 129, 0, 129,	0, 134, 12, 134, 0, 134, 13, 134, 0, 134,
13, 129, 0, 129, 14, 129, 0, 129, 15, 129,	32, 134, 0, 134, 33, 134, 0, 134, 15, 134,
0, 129, 16, 129, 0, 129, 17, 129, 0, 129,	0, 134, 16, 134, 0, 134, 17, 134, 0, 134,
18, 129, 0, 129, 19, 129, 0, 129, 20, 129,	18, 134, 0, 134, 21, 134, 0, 134, 22, 134,
0, 129, 21, 129, 0, 129, 26, 129, 0, 70,	0, 134, 23, 134, 0, 134, 24, 134, 0, 134,
0, 4, 0, 0, 0	25, 134, 0, 134, 26, 134, 0, 134, 31, 134,
	0, 75, 0, 4, 0, 0, 0
};	};

#endif	#endif

#if YYDEBUG != 0	#if YYDEBUG != 0
static const short yyrline[] = { 0,	static const short yyrline[] = { 0,
107, 117, 119, 119, 120, 122, 122, 124, 190, 190,	114, 124, 126, 126, 127, 129, 129, 131, 198, 198,
191, 191, 192, 193, 193, 195, 224, 224, 225, 226,	199, 199, 200, 201, 201, 203, 232, 232, 233, 234,
226, 227, 227, 229, 229, 233, 233, 235, 235, 236,	234, 235, 235, 237, 237, 241, 241, 243, 243, 244,
236, 237, 237, 237, 241, 245, 246, 246, 247, 248,	244, 245, 245, 245, 249, 256, 257, 257, 258, 259,
250, 251, 266, 267, 267, 271, 275, 277, 278, 279,	261, 262, 284, 285, 285, 289, 293, 295, 296, 297,
294, 299, 301, 303, 304, 306, 312, 318, 324, 326,	314, 319, 321, 323, 324, 326, 332, 340, 346, 348,
327, 329, 335, 336, 336, 340, 344, 345, 346, 360,	349, 351, 357, 358, 358, 362, 368, 371, 374, 387,
362, 362, 363, 365, 366, 368, 369, 370, 371, 373,	389, 389, 390, 392, 393, 395, 396, 397, 398, 400,
375, 377, 379, 381, 383, 387, 391, 395, 397, 398,	402, 404, 406, 408, 410, 414, 418, 422, 424, 425,
400, 407, 407, 409, 409, 410, 411, 416, 421, 423,	427, 436, 436, 438, 438, 439, 440, 448, 453, 455,
425, 426, 427, 429, 433, 441, 447, 452, 452, 453,	457, 458, 459, 461, 465, 474, 480, 485, 485, 486,
458, 460, 462, 466, 478, 482, 484, 485, 486, 487,	491, 493, 495, 507, 519, 524, 526, 527, 528, 529,
488, 490, 491, 492, 493, 494, 495, 496, 497, 499,	530, 532, 533, 534, 535, 536, 537, 538, 539, 541,
500, 501, 502, 503, 504, 505, 506, 507, 508, 509,	542, 543, 544, 545, 546, 547, 548, 549, 550, 551,
510, 511, 512, 513, 514, 515, 516, 517, 518, 519,	552, 553, 554, 555, 556, 557, 558, 559, 560, 561,
520, 521, 522, 525, 534, 539, 540	562, 563, 564, 565, 566, 567, 570, 579, 584, 585
};	};
#endif	#endif

Line 228 static const short yyrline[] = { 0,	Line 234 static const short yyrline[] = { 0,

static const char * const yytname[] = { "$","error","$undefined.","EON","STRING",	static const char * const yytname[] = { "$","error","$undefined.","EON","STRING",
"BOGUS","BAD_STRING_COMPARISON_OPERATOR","BAD_HEX_LITERAL","BAD_METHOD_DECL_START",	"BOGUS","BAD_STRING_COMPARISON_OPERATOR","BAD_HEX_LITERAL","BAD_METHOD_DECL_START",
"\"&&\"","\"\|\|\"","\"##\"","\"<=\"","\">=\"","\"==\"","\"!=\"","\"lt\"","\"gt\"",	"BAD_METHOD_PARAMETER_NAME_CHARACTER","BAD_MATH_OPERATOR_CHARACTER","\"&&\"",
"\"le\"","\"ge\"","\"eq\"","\"ne\"","\"def\"","\"in\"","\"-f\"","\"-d\"","\"is\"",	"\"\|\|\"","\"!\|\|\"","\"!\|\"","\"<=\"","\">=\"","\"==\"","\"!=\"","\"<<\"","\">>\"",
"'<'","'>'","'!'","'#'","'\|'","'&'","'~'","'-'","'+'","'*'","'/'","'%'","NEG",	"\"lt\"","\"gt\"","\"le\"","\"ge\"","\"eq\"","\"ne\"","\"def\"","\"in\"","\"-f\"",
"'@'","'\\n'","'['","']'","';'","'$'","'{'","'}'","'.'","'('","')'","'^'","':'",	"\"-d\"","\"is\"","'<'","'>'","'!'","'\|'","'&'","'~'","'-'","'+'","'*'","'/'",
"'\\\"'","'\\''","all","methods","one_big_piece","method","control_method","maybe_control_strings",	"'%'","'\\\\'","NEG","'@'","'\\n'","'['","']'","';'","'$'","'{'","'}'","'.'",
"control_strings","control_string","maybe_string","code_method","maybe_bracketed_strings",	"'('","')'","'^'","':'","'\\\"'","'\\''","all","methods","one_big_piece","method",
"bracketed_maybe_strings","maybe_strings","strings","maybe_comment","maybe_codes",	"control_method","maybe_control_strings","control_strings","control_string",
"codes","code","action","get","get_value","get_name_value","name_in_curly_rdive",	"maybe_string","code_method","maybe_bracketed_strings","bracketed_maybe_strings",
"name_without_curly_rdive","name_without_curly_rdive_read","name_without_curly_rdive_class",	"maybe_strings","strings","maybe_comment","maybe_codes","codes","code","action",
"name_without_curly_rdive_code","put","name_expr_wdive","name_expr_wdive_root",	"get","get_value","get_name_value","name_in_curly_rdive","name_without_curly_rdive",
"name_expr_wdive_write","name_expr_wdive_class","construct","construct_square",	"name_without_curly_rdive_read","name_without_curly_rdive_class","name_without_curly_rdive_code",
"construct_round","construct_curly","any_constructor_code_value","constructor_code_value",	"put","name_expr_wdive","name_expr_wdive_root","name_expr_wdive_write","name_expr_wdive_class",
"constructor_code","codes__excluding_sole_str_literal","call","call_value","@1",	"construct","construct_square","construct_round","construct_curly","any_constructor_code_value",
"@2","call_name","store_params","store_param","store_square_param","store_round_param",	"constructor_code_value","constructor_code","codes__excluding_sole_str_literal",
"store_curly_param","store_code_param_parts","store_expr_param_parts","store_curly_param_parts",	"call","call_value","@1","@2","call_name","store_params","store_param","store_square_param",
"store_code_param_part","store_expr_param_part","store_curly_param_part","code_param_value",	"store_round_param","store_curly_param","store_code_param_parts","store_expr_param_parts",
"write_expr_value","name_expr_dive_code","name_path","name_step","name_advance1",	"store_curly_param_parts","store_code_param_part","store_expr_param_part","store_curly_param_part",
"name_advance2","name_expr_value","name_expr_subvar_value","name_expr_with_subvar_value",	"code_param_value","write_expr_value","name_expr_dive_code","name_path","name_step",
	"name_advance1","name_advance2","name_expr_value","name_expr_subvar_value","name_expr_with_subvar_value",
"name_square_code_value","subvar_ref_name_rdive","subvar_get_writes","subvar__get_write",	"name_square_code_value","subvar_ref_name_rdive","subvar_get_writes","subvar__get_write",
"class_prefix","class_static_prefix","class_constructor_prefix","expr_value",	"class_prefix","class_static_prefix","class_constructor_prefix","expr_value",
"expr","string_inside_quotes_value","write_string","void_value","empty", NULL	"expr","string_inside_quotes_value","write_string","void_value","empty", NULL
Line 253 static const char * const yytname[] = {	Line 260 static const char * const yytname[] = {
#endif	#endif

static const short yyr1[] = { 0,	static const short yyr1[] = { 0,
55, 55, 56, 56, 57, 58, 58, 59, 60, 60,	60, 60, 61, 61, 62, 63, 63, 64, 65, 65,
61, 61, 62, 63, 63, 64, 65, 65, 66, 67,	66, 66, 67, 68, 68, 69, 70, 70, 71, 72,
67, 68, 68, 69, 69, 70, 70, 71, 71, 72,	72, 73, 73, 74, 74, 75, 75, 76, 76, 77,
72, 73, 73, 73, 74, 75, 76, 76, 77, 78,	77, 78, 78, 78, 79, 80, 81, 81, 82, 83,
78, 79, 80, 81, 81, 82, 83, 83, 83, 84,	83, 84, 85, 86, 86, 87, 88, 88, 88, 89,
85, 86, 87, 87, 87, 88, 89, 90, 91, 91,	90, 91, 92, 92, 92, 93, 94, 95, 96, 96,
91, 92, 93, 94, 94, 95, 97, 98, 96, 99,	96, 97, 98, 99, 99, 100, 102, 103, 101, 104,
100, 100, 101, 101, 101, 102, 103, 104, 105, 105,	105, 105, 106, 106, 106, 107, 108, 109, 110, 110,
106, 106, 107, 107, 108, 109, 110, 111, 111, 111,	111, 111, 112, 112, 113, 114, 115, 116, 116, 116,
112, 113, 113, 114, 114, 115, 116, 117, 117, 118,	117, 118, 118, 119, 119, 120, 121, 122, 122, 123,
118, 118, 118, 119, 120, 121, 122, 123, 123, 124,	123, 123, 123, 124, 125, 126, 127, 128, 128, 129,
125, 125, 126, 127, 128, 129, 129, 129, 129, 129,	130, 130, 131, 132, 133, 134, 134, 134, 134, 134,
129, 129, 129, 129, 129, 129, 129, 129, 129, 129,	134, 134, 134, 134, 134, 134, 134, 134, 134, 134,
129, 129, 129, 129, 129, 129, 129, 129, 129, 129,	134, 134, 134, 134, 134, 134, 134, 134, 134, 134,
129, 129, 129, 129, 129, 129, 129, 129, 129, 129,	134, 134, 134, 134, 134, 134, 134, 134, 134, 134,
129, 129, 129, 130, 131, 132, 133	134, 134, 134, 134, 134, 134, 135, 136, 137, 138
};	};

static const short yyr2[] = { 0,	static const short yyr2[] = { 0,
Line 287 static const short yyr2[] = { 0,	Line 294 static const short yyr2[] = { 0,
3, 2, 2, 2, 2, 2, 2, 2, 2, 3,	3, 2, 2, 2, 2, 2, 2, 2, 2, 3,
3, 3, 3, 3, 3, 3, 3, 3, 3, 3,	3, 3, 3, 3, 3, 3, 3, 3, 3, 3,
3, 3, 3, 3, 3, 3, 3, 3, 3, 3,	3, 3, 3, 3, 3, 3, 3, 3, 3, 3,
3, 3, 3, 1, 1, 0, 0	3, 3, 3, 3, 3, 3, 1, 1, 0, 0
};	};

static const short yydefact[] = { 157,	static const short yydefact[] = { 160,
155, 0, 0, 67, 2, 1, 3, 6, 7, 5,	158, 0, 0, 67, 2, 1, 3, 6, 7, 5,
27, 28, 31, 32, 35, 33, 34, 66, 30, 26,	27, 28, 31, 32, 35, 33, 34, 66, 30, 26,
0, 100, 0, 0, 0, 0, 36, 38, 0, 40,	0, 100, 0, 0, 0, 0, 36, 38, 0, 40,
41, 42, 0, 47, 48, 49, 50, 0, 94, 0,	41, 42, 0, 47, 48, 49, 50, 0, 94, 0,
44, 92, 101, 102, 103, 0, 111, 112, 0, 4,	44, 92, 101, 102, 103, 0, 111, 112, 0, 4,
29, 157, 157, 157, 99, 0, 113, 105, 108, 0,	29, 160, 160, 160, 99, 0, 113, 105, 108, 0,
107, 104, 0, 0, 98, 0, 100, 51, 0, 92,	107, 104, 0, 0, 98, 0, 100, 51, 0, 92,
37, 156, 157, 0, 46, 53, 54, 55, 100, 95,	37, 159, 160, 0, 46, 53, 54, 55, 100, 95,
45, 93, 96, 43, 52, 114, 70, 68, 15, 8,	45, 93, 96, 43, 52, 114, 70, 68, 15, 8,
10, 11, 0, 9, 22, 0, 21, 20, 157, 18,	10, 11, 0, 9, 22, 0, 21, 20, 160, 18,
17, 110, 109, 106, 39, 93, 155, 0, 31, 0,	17, 110, 109, 106, 39, 93, 158, 0, 31, 0,
61, 62, 63, 59, 0, 116, 0, 0, 0, 0,	61, 62, 63, 59, 0, 116, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 157, 157, 117, 118,	0, 0, 0, 0, 0, 0, 160, 160, 117, 118,
0, 115, 0, 12, 14, 13, 19, 0, 25, 0,	0, 115, 0, 12, 14, 13, 19, 0, 25, 0,
24, 65, 56, 58, 126, 127, 128, 129, 125, 124,	24, 65, 56, 58, 126, 127, 128, 129, 125, 124,
122, 123, 0, 154, 0, 0, 57, 0, 0, 0,	122, 123, 0, 157, 0, 0, 57, 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, 0, 0, 0,	0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 156, 157, 0, 0, 71, 73, 74, 75, 23,	0, 0, 0, 0, 159, 160, 0, 0, 71, 73,
157, 121, 119, 120, 138, 139, 140, 143, 144, 145,	74, 75, 23, 160, 121, 119, 120, 141, 142, 143,
146, 147, 148, 149, 150, 151, 152, 153, 141, 142,	140, 146, 147, 148, 149, 136, 137, 150, 151, 152,
137, 136, 135, 130, 131, 132, 133, 134, 155, 90,	153, 154, 155, 156, 144, 145, 139, 138, 130, 131,
0, 79, 85, 88, 87, 0, 83, 0, 81, 86,	132, 133, 134, 135, 158, 90, 0, 79, 85, 88,
91, 69, 72, 16, 76, 156, 157, 78, 0, 77,	87, 0, 83, 0, 81, 86, 91, 69, 72, 16,
80, 84, 82, 0, 0, 0	76, 159, 160, 78, 0, 77, 80, 84, 82, 0,
	0, 0
};	};

static const short yydefgoto[] = { 244,	static const short yydefgoto[] = { 250,
5, 6, 7, 8, 90, 91, 92, 93, 9, 99,	5, 6, 7, 8, 90, 91, 92, 93, 9, 99,
54, 96, 97, 140, 154, 11, 12, 13, 14, 129,	54, 96, 97, 140, 154, 11, 12, 13, 14, 129,
27, 28, 29, 30, 31, 32, 16, 33, 34, 35,	27, 28, 29, 30, 31, 32, 16, 33, 34, 35,
36, 75, 76, 77, 78, 110, 220, 112, 113, 17,	36, 75, 76, 77, 78, 110, 226, 112, 113, 17,
130, 49, 133, 88, 185, 186, 187, 188, 189, 221,	130, 49, 133, 88, 188, 189, 190, 191, 192, 227,
228, 226, 222, 229, 227, 223, 230, 37, 64, 39,	234, 232, 228, 235, 233, 229, 236, 37, 64, 39,
40, 41, 65, 43, 44, 45, 62, 58, 59, 66,	40, 41, 65, 43, 44, 45, 62, 58, 59, 66,
47, 48, 231, 132, 155, 19, 224, 20	47, 48, 237, 132, 155, 19, 230, 20
};	};

static const short yypact[] = { 6,	static const short yypact[] = { 36,
-32768, 12, 75,-32768, -14,-32768,-32768,-32768,-32768,-32768,	-32768, 16, 98,-32768, 53,-32768,-32768,-32768,-32768,-32768,
32,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,	14,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,
61, 19, 32, 29, 91, 92,-32768,-32768, 45,-32768,	-3, 4, 14, 107, 30, 46,-32768,-32768, 116,-32768,
-32768,-32768, 55,-32768,-32768,-32768,-32768, 96,-32768, -40,	-32768,-32768, -15,-32768,-32768,-32768,-32768, 105,-32768, 73,
-32768, 4,-32768,-32768,-32768, 96, 46,-32768, 91,-32768,	-32768, 18,-32768,-32768,-32768, 105, 82,-32768, 30,-32768,
-32768, 95, 111, 97,-32768, 29,-32768, 98,-32768, 18,	-32768, 136, 137, 96,-32768, 107,-32768, 97,-32768, 41,
-32768,-32768, 93, 96, 100, 96, 98,-32768, 92, 100,	-32768,-32768, 94, 105, 112, 105, 97,-32768, 46, 112,
-32768, 40, 32, 5,-32768,-32768,-32768,-32768, 44,-32768,	-32768, 44, 14, 29,-32768,-32768,-32768,-32768, 1,-32768,
-32768, 4,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,	-32768, 18,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,
27,-32768, 123, 128,-32768, 138, 146,-32768, 188,-32768,	6,-32768, 110, 121,-32768, 120, 123,-32768, 165,-32768,
-32768,-32768,-32768,-32768,-32768, 100, 184, 32, 88, 192,	-32768,-32768,-32768,-32768,-32768, 112, 122, 14, 67, 125,
-32768,-32768,-32768,-32768, 173,-32768, 5, 5, 5, 5,	-32768,-32768,-32768,-32768, 124,-32768, 29, 29, 29, 29,
5, 5, 5, 5, 80, 5, 32, 32,-32768,-32768,	29, 29, 29, 29, 103, 29, 14, 14,-32768,-32768,
204, 274, 177,-32768,-32768,-32768,-32768, 251,-32768, 215,	119, 281, 52,-32768,-32768,-32768,-32768, 173,-32768, 133,
-32768, 32,-32768,-32768, 115, 115, 115, 115, 115, 142,	-32768, 14,-32768,-32768, 450, 450, 450, 450, 450, 433,
-32768,-32768, 232,-32768, 208, 203,-32768, 5, 5, 5,	-32768,-32768, 236,-32768, 126, 131,-32768, 29, 29, 29,
5, 5, 5, 5, 5, 5, 5, 5, 5, 5,	29, 29, 29, 29, 29, 29, 29, 29, 29, 29,
5, 5, 5, 5, 5, 5, 5, 5, 5, 5,	29, 29, 29, 29, 29, 29, 29, 29, 29, 29,
5, 41, 32, 5, 63,-32768,-32768,-32768,-32768,-32768,	29, 29, 29, 29, 45, 14, 29, 66,-32768,-32768,
32,-32768,-32768,-32768, 361, 334, 304, 386, 386, 136,	-32768,-32768,-32768, 14,-32768,-32768,-32768, 377, 347, 314,
136, 386, 386, 386, 386, 136, 136, 115, 386, 386,	245, 407, 407, 420, 420, 187, 458, 407, 407, 407,
-17, 196, 142, 151, 151,-32768,-32768,-32768, 178,-32768,	407, 420, 420, 450, 407, 407, -12, 433, 81, 81,
181,-32768,-32768,-32768,-32768, 72,-32768, 74,-32768,-32768,	-32768,-32768,-32768,-32768, 83,-32768, 85,-32768,-32768,-32768,
-32768,-32768,-32768,-32768,-32768, 41, 32,-32768, 5,-32768,	-32768, -30,-32768, 63,-32768,-32768,-32768,-32768,-32768,-32768,
-32768,-32768,-32768, 265, 271,-32768	-32768, 45, 14,-32768, 29,-32768,-32768,-32768,-32768, 180,
	181,-32768
};	};

static const short yypgoto[] = {-32768,	static const short yypgoto[] = {-32768,
-32768,-32768, 267,-32768,-32768,-32768, 182,-32768,-32768,-32768,	-32768,-32768, 177,-32768,-32768,-32768, 100,-32768,-32768,-32768,
220,-32768,-32768,-32768, 3, -18, -7, -71,-32768, 0,	138,-32768,-32768,-32768, 3, -18, -7, -71,-32768, 0,
-32768,-32768, 57,-32768,-32768, 21,-32768,-32768,-32768,-32768,	-32768,-32768, -11,-32768,-32768, -29,-32768,-32768,-32768,-32768,
-32768,-32768,-32768,-32768,-32768,-32768, 205,-32768,-32768,-32768,	-32768,-32768,-32768,-32768,-32768,-32768, 159,-32768,-32768,-32768,
2,-32768,-32768,-32768,-32768, 90,-32768,-32768,-32768,-32768,	2,-32768,-32768,-32768,-32768, 5,-32768,-32768,-32768,-32768,
-32768,-32768, 42, 58, 39,-32768,-32768, 68, 67, -32,	-32768,-32768, -47, -13, -10,-32768,-32768, 58, 79, -23,
-32768, 43, 9,-32768,-32768,-32768, 223,-32768, 222, 278,	-32768, -22, 9,-32768,-32768,-32768, 178,-32768, 179, 233,
-32768,-32768, 224, 37, 168,-32768, 227, -11	-32768,-32768, 164, 40, 111,-32768, 168, 84
};	};


#define YYLAST 424	#define YYLAST 501


static const short yytable[] = { 15,	static const short yytable[] = { 15,
109, 18, 10, 51, 60, 80, -98, 83, 116, 1,	109, 18, 10, 51, 60, 55, 166, 167, 55, 89,
15, 42, 18, 175, 176, 21, 177, 178, 179, 180,	15, 42, 18, 63, 80, 81, 84, 1, 243, 21,
181, 1, 15, 55, 18, 2, 117, 118, 119, 120,	-98, 244, 15, 178, 18, 179, 180, 181, 182, 183,
89, 80, 61, 121, 70, 1, 80, 122, 123, 124,	184, 72, 116, 22, 70, 73, 84, 87, 74, 1,
94, 98, 101, 107, 219, 2, 82, 71, 55, 125,	80, 81, 52, 53, 1, 80, 82, 107, 225, 67,
3, -97, 51, 126, 42, 4, 4, 127, 128, 15,	56, -160, 51, 56, 42, 117, 118, 119, 120, 15,
104, 18, 3, 56, 108, 232, 84, -157, 4, 38,	57, 18, 121, 3, 108, 122, 123, 124, 238, 4,
57, 15, 15, 18, 18, 115, 3, 106, 22, 135,	-97, 15, 15, 18, 18, 115, 23, 106, 125, 24,
81, 63, 4, 22, 3, 3, 84, 141, 56, 142,	2, 38, 126, 68, 4, 3, 127, 128, 104, 142,
4, 4, 69, 68, 22, 67, 72, 86, 89, 79,	3, 4, 23, 3, 3, 24, 4, 2, 185, 4,
73, 52, 53, 74, 182, 87, 81, 15, 183, 18,	4, 22, 186, 85, 69, 187, 22, 15, 79, 18,
109, 184, 38, 85, 95, 237, 23, 239, 238, 24,	61, 245, 185, 109, -64, -64, 186, 246, 71, 187,
25, 23, 26, 240, 24, 25, 15, 15, 18, 18,	181, 182, 183, 184, 38, 83, 15, 15, 18, 18,
-64, -64, 23, 23, 51, 24, 24, 23, 53, 105,	-89, -89, 241, 242, 51, 94, 98, 101, 86, 89,
24, 15, 56, 18, 174, 175, 176, -97, 177, 178,	95, 15, 53, 18, 23, 105, 56, 24, 25, 23,
179, 180, 181, 145, 146, 147, 148, 149, 150, 151,	26, 23, 24, 25, 24, 136, 145, 146, 147, 148,
152, 171, 153, 136, 109, 174, 175, 176, -14, 177,	149, 150, 151, 152, -97, 153, -14, 137, 139, -60,
178, 179, 180, 181, 108, 177, 178, 179, 180, 181,	109, 138, 143, 157, 135, 144, 193, 108, 194, 251,
137, 15, 15, 18, 18, 225, 179, 180, 181, 138,	252, 50, 141, 196, 15, 15, 18, 18, 231, 197,
15, 139, 18, 234, 195, 196, 197, 198, 199, 200,	134, 100, 239, 15, 247, 18, 240, 198, 199, 200,
201, 202, 203, 204, 205, 206, 207, 208, 209, 210,	201, 202, 203, 204, 205, 206, 207, 208, 209, 210,
211, 212, 213, 214, 215, 216, 217, 218, 182, 144,	211, 212, 213, 214, 215, 216, 217, 218, 219, 220,
-89, -89, 183, 235, 236, 184, -60, 176, 108, 177,	221, 222, 223, 224, 179, 180, 181, 182, 183, 184,
178, 179, 180, 181, 143, 15, 15, 18, 18, 225,	111, 249, 248, 102, 108, 46, 103, 131, 156, 114,
158, 159, 160, 161, 162, 163, 164, 165, 166, 167,	0, 15, 15, 18, 18, 231, 158, 159, 160, 161,
168, 169, 170, 157, 190, 191, 194, 171, 172, 173,	162, 163, 164, 165, 166, 167, 168, 169, 170, 171,
193, 174, 175, 176, 245, 177, 178, 179, 180, 181,	172, 173, 0, 166, 167, 0, 174, 175, 176, 0,
246, 50, 134, 100, 233, 242, 111, 241, 102, 103,	177, 178, 0, 179, 180, 181, 182, 183, 184, 177,
46, 192, 158, 159, 160, 161, 162, 163, 164, 165,	178, 0, 179, 180, 181, 182, 183, 184, 0, 0,
166, 167, 168, 169, 170, 156, 243, 131, 114, 171,	195, 158, 159, 160, 161, 162, 163, 164, 165, 166,
172, 173, 0, 174, 175, 176, 0, 177, 178, 179,	167, 168, 169, 170, 171, 172, 173, 0, 0, 0,
180, 181, 158, 159, 0, 161, 162, 163, 164, 165,	0, 174, 175, 176, 0, 177, 178, 0, 179, 180,
166, 167, 168, 169, 170, 0, 0, 0, 0, 171,	181, 182, 183, 184, 158, 159, 0, 161, 162, 163,
172, 173, 0, 174, 175, 176, 0, 177, 178, 179,	164, 165, 166, 167, 168, 169, 170, 171, 172, 173,
180, 181, 158, 0, 0, 161, 162, 163, 164, 165,	0, 0, 0, 0, 174, 175, 176, 0, 177, 178,
166, 167, 168, 169, 170, 0, 0, 0, 0, 171,	0, 179, 180, 181, 182, 183, 184, 158, 0, 0,
172, 173, 0, 174, 175, 176, 0, 177, 178, 179,	161, 162, 163, 164, 165, 166, 167, 168, 169, 170,
180, 181, 161, 162, 163, 164, 165, 166, 167, 168,	171, 172, 173, 0, 0, 0, 0, 174, 175, 176,
169, 170, 0, 0, 0, 0, 171, 172, 173, 0,	0, 177, 178, 0, 179, 180, 181, 182, 183, 184,
174, 175, 176, 0, 177, 178, 179, 180, 181, 163,	161, 162, 163, 164, 165, 166, 167, 168, 169, 170,
164, 0, 0, 0, 0, 169, 170, 0, 0, 0,	171, 172, 173, 0, 0, 0, 0, 174, 175, 176,
0, 171, 0, 0, 0, 174, 175, 176, 0, 177,	0, 177, 178, 0, 179, 180, 181, 182, 183, 184,
178, 179, 180, 181	161, 0, 0, 164, 165, 166, 167, 0, 0, 0,
	0, 172, 173, 161, 0, 0, 0, 174, 166, 167,
	0, 177, 178, 0, 179, 180, 181, 182, 183, 184,
	174, 166, 167, 0, 177, 178, 0, 179, 180, 181,
	182, 183, 184, 161, 0, 0, 0, 0, 166, 167,
	179, 180, 181, 182, 183, 184, 166, 0, 0, 0,
	0, 0, 0, 0, 177, 178, 0, 179, 180, 181,
	182, 183, 184, 0, 0, 179, 180, 181, 182, 183,
	184
};	};

static const short yycheck[] = { 0,	static const short yycheck[] = { 0,
72, 0, 0, 11, 23, 38, 3, 48, 4, 4,	72, 0, 0, 11, 23, 5, 19, 20, 5, 4,
11, 3, 11, 31, 32, 4, 34, 35, 36, 37,	11, 3, 11, 25, 38, 38, 46, 4, 49, 4,
38, 4, 23, 5, 23, 40, 22, 23, 24, 25,	3, 52, 23, 36, 23, 38, 39, 40, 41, 42,
4, 64, 4, 29, 26, 4, 69, 33, 34, 35,	43, 47, 4, 4, 26, 51, 66, 49, 54, 4,
52, 53, 54, 4, 4, 40, 38, 3, 5, 45,	64, 64, 46, 47, 4, 69, 38, 4, 4, 4,
45, 48, 60, 49, 46, 51, 51, 53, 54, 60,	50, 46, 60, 50, 46, 27, 28, 29, 30, 60,
43, 60, 45, 45, 72, 3, 46, 41, 51, 3,	57, 60, 34, 50, 72, 37, 38, 39, 3, 56,
52, 72, 73, 72, 73, 73, 45, 69, 4, 91,	53, 72, 73, 72, 73, 73, 47, 69, 50, 50,
38, 25, 51, 4, 45, 45, 66, 99, 45, 108,	45, 3, 54, 26, 56, 50, 58, 59, 48, 108,
51, 51, 26, 26, 4, 4, 42, 52, 4, 4,	50, 56, 47, 50, 50, 50, 56, 45, 47, 56,
46, 41, 42, 49, 42, 49, 64, 108, 46, 108,	56, 4, 51, 46, 26, 54, 4, 108, 4, 108,
182, 49, 46, 46, 4, 44, 42, 44, 47, 45,	4, 49, 47, 185, 48, 49, 51, 55, 3, 54,
46, 42, 48, 50, 45, 46, 127, 128, 127, 128,	40, 41, 42, 43, 46, 53, 127, 128, 127, 128,
43, 44, 42, 42, 142, 45, 45, 42, 42, 47,	48, 49, 48, 49, 142, 52, 53, 54, 57, 4,
45, 142, 45, 142, 30, 31, 32, 48, 34, 35,	4, 142, 47, 142, 47, 52, 50, 50, 51, 47,
36, 37, 38, 117, 118, 119, 120, 121, 122, 123,	53, 47, 50, 51, 50, 46, 117, 118, 119, 120,
124, 26, 126, 41, 236, 30, 31, 32, 41, 34,	121, 122, 123, 124, 53, 126, 46, 48, 4, 48,
35, 36, 37, 38, 182, 34, 35, 36, 37, 38,	242, 49, 48, 55, 91, 52, 4, 185, 46, 0,
43, 182, 183, 182, 183, 183, 36, 37, 38, 44,	0, 5, 99, 58, 185, 186, 185, 186, 186, 59,
191, 4, 191, 191, 158, 159, 160, 161, 162, 163,	91, 54, 188, 194, 242, 194, 194, 158, 159, 160,
164, 165, 166, 167, 168, 169, 170, 171, 172, 173,	161, 162, 163, 164, 165, 166, 167, 168, 169, 170,
174, 175, 176, 177, 178, 179, 180, 181, 42, 47,	171, 172, 173, 174, 175, 176, 177, 178, 179, 180,
43, 44, 46, 43, 44, 49, 43, 32, 236, 34,	181, 182, 183, 184, 38, 39, 40, 41, 42, 43,
35, 36, 37, 38, 43, 236, 237, 236, 237, 237,	72, 245, 243, 56, 242, 3, 58, 74, 128, 72,
9, 10, 11, 12, 13, 14, 15, 16, 17, 18,	-1, 242, 243, 242, 243, 243, 11, 12, 13, 14,
19, 20, 21, 50, 4, 41, 54, 26, 27, 28,	15, 16, 17, 18, 19, 20, 21, 22, 23, 24,
53, 30, 31, 32, 0, 34, 35, 36, 37, 38,	25, 26, -1, 19, 20, -1, 31, 32, 33, -1,
0, 5, 91, 54, 185, 237, 72, 236, 56, 58,	35, 36, -1, 38, 39, 40, 41, 42, 43, 35,
3, 50, 9, 10, 11, 12, 13, 14, 15, 16,	36, -1, 38, 39, 40, 41, 42, 43, -1, -1,
17, 18, 19, 20, 21, 128, 239, 74, 72, 26,	55, 11, 12, 13, 14, 15, 16, 17, 18, 19,
27, 28, -1, 30, 31, 32, -1, 34, 35, 36,	20, 21, 22, 23, 24, 25, 26, -1, -1, -1,
37, 38, 9, 10, -1, 12, 13, 14, 15, 16,	-1, 31, 32, 33, -1, 35, 36, -1, 38, 39,
17, 18, 19, 20, 21, -1, -1, -1, -1, 26,	40, 41, 42, 43, 11, 12, -1, 14, 15, 16,
27, 28, -1, 30, 31, 32, -1, 34, 35, 36,	17, 18, 19, 20, 21, 22, 23, 24, 25, 26,
37, 38, 9, -1, -1, 12, 13, 14, 15, 16,	-1, -1, -1, -1, 31, 32, 33, -1, 35, 36,
17, 18, 19, 20, 21, -1, -1, -1, -1, 26,	-1, 38, 39, 40, 41, 42, 43, 11, -1, -1,
27, 28, -1, 30, 31, 32, -1, 34, 35, 36,	14, 15, 16, 17, 18, 19, 20, 21, 22, 23,
37, 38, 12, 13, 14, 15, 16, 17, 18, 19,	24, 25, 26, -1, -1, -1, -1, 31, 32, 33,
20, 21, -1, -1, -1, -1, 26, 27, 28, -1,	-1, 35, 36, -1, 38, 39, 40, 41, 42, 43,
30, 31, 32, -1, 34, 35, 36, 37, 38, 14,	14, 15, 16, 17, 18, 19, 20, 21, 22, 23,
15, -1, -1, -1, -1, 20, 21, -1, -1, -1,	24, 25, 26, -1, -1, -1, -1, 31, 32, 33,
-1, 26, -1, -1, -1, 30, 31, 32, -1, 34,	-1, 35, 36, -1, 38, 39, 40, 41, 42, 43,
35, 36, 37, 38	14, -1, -1, 17, 18, 19, 20, -1, -1, -1,
	-1, 25, 26, 14, -1, -1, -1, 31, 19, 20,
	-1, 35, 36, -1, 38, 39, 40, 41, 42, 43,
	31, 19, 20, -1, 35, 36, -1, 38, 39, 40,
	41, 42, 43, 14, -1, -1, -1, -1, 19, 20,
	38, 39, 40, 41, 42, 43, 19, -1, -1, -1,
	-1, -1, -1, -1, 35, 36, -1, 38, 39, 40,
	41, 42, 43, -1, -1, 38, 39, 40, 41, 42,
	43
};	};
#define YYPURE 1	#define YYPURE 1

Line 1009 yyreduce:	Line 1034 yyreduce:
switch (yyn) {	switch (yyn) {

case 1:	case 1:
#line 108 "compile.y"	#line 115 "compile.y"
{	{
Method& method=*NEW Method(POOL,	Method& method=*NEW Method(POOL,
*main_method_name,	PC.request->main_method_name,
Method::CT_ANY,	Method::CT_ANY,
0, 0, /min, max numbered_params_count/	0, 0, /min, max numbered_params_count/
0/param_names/, 0/local_names/,	0/param_names/, 0/local_names/,
yyvsp[0]/parser_code/, 0/native_code/);	yyvsp[0]/parser_code/, 0/native_code/);
PC.cclass->add_method(*main_method_name, method);	PC.cclass->add_method(PC.request->main_method_name, method);
;	;
break;}	break;}
case 8:	case 8:
#line 125 "compile.y"	#line 132 "compile.y"
{	{
const String& command=*LA2S(yyvsp[-2]);	const String& command=*LA2S(yyvsp[-2]);
YYSTYPE strings_code=yyvsp[0];	YYSTYPE strings_code=yyvsp[0];
Line 1032 case 8:	Line 1057 case 8:
YYERROR;	YYERROR;
}	}
if(command==CLASS_NAME) {	if(command==CLASS_NAME) {
if(PC.cclass->base()) { // already changed from default?	if(PC.cclass->base_class()) { // already changed from default?
strcpy(PC.error, "class already have a name '");	strcpy(PC.error, "class already have a name '");
strncat(PC.error, PC.cclass->name().cstr(), 100);	strncat(PC.error, PC.cclass->name().cstr(), 100);
strcat(PC.error, "'");	strcat(PC.error, "'");
Line 1054 case 8:	Line 1079 case 8:
for(int i=0; i<strings_code->size(); i+=2)	for(int i=0; i<strings_code->size(); i+=2)
PC.request->use_file(*LA2S(strings_code, i));	PC.request->use_file(*LA2S(strings_code, i));
} else if(command==BASE_NAME) {	} else if(command==BASE_NAME) {
if(PC.cclass->base()) { // already changed from default?	if(PC.cclass->base_class()) { // already changed from default?
strcpy(PC.error, "class already have a base '");	strcpy(PC.error, "class already have a base '");
strncat(PC.error, PC.cclass->base()->name().cstr(), 100);	strncat(PC.error, PC.cclass->base_class()->name().cstr(), 100);
strcat(PC.error, "'");	strcat(PC.error, "'");
YYERROR;	YYERROR;
}	}
if(strings_code->size()==1*2) {	if(strings_code->size()==1*2) {
const String& base_name=*LA2S(strings_code);	const String& base_name=*LA2S(strings_code);
VClass base=static_cast<VClass >(	Value vbase_class=static_cast<VClass >(
PC.request->classes().get(base_name));	PC.request->classes().get(base_name));
if(!base) {	VStateless_class *base_class=vbase_class?vbase_class->get_class():0;
	if(!base_class) {
strcpy(PC.error, base_name.cstr());	strcpy(PC.error, base_name.cstr());
strcat(PC.error, ": undefined class in @"BASE_NAME);	strcat(PC.error, ": undefined class in @"BASE_NAME);
YYERROR;	YYERROR;
}	}
// @CLASS == @BASE sanity check	// @CLASS == @BASE sanity check
if(PC.cclass==base) {	if(PC.cclass==base_class) {
strcpy(PC.error, "@"CLASS_NAME" equals @"BASE_NAME);	strcpy(PC.error, "@"CLASS_NAME" equals @"BASE_NAME);
YYERROR;	YYERROR;
}	}
PC.cclass->set_base(*base);	PC.cclass->set_base(base_class);
} else {	} else {
strcpy(PC.error, "@"BASE_NAME" must contain sole name");	strcpy(PC.error, "@"BASE_NAME" must contain sole name");
YYERROR;	YYERROR;
Line 1089 case 8:	Line 1115 case 8:
;	;
break;}	break;}
case 12:	case 12:
#line 191 "compile.y"	#line 199 "compile.y"
{ yyval=yyvsp[-1]; P(yyval, yyvsp[0]) ;	{ yyval=yyvsp[-1]; P(yyval, yyvsp[0]) ;
break;}	break;}
case 16:	case 16:
#line 196 "compile.y"	#line 204 "compile.y"
{	{
const String *name=LA2S(yyvsp[-5]);	const String *name=LA2S(yyvsp[-5]);

Line 1123 case 16:	Line 1149 case 16:
;	;
break;}	break;}
case 19:	case 19:
#line 225 "compile.y"	#line 233 "compile.y"
{yyval=yyvsp[-1];	{yyval=yyvsp[-1];
break;}	break;}
case 23:	case 23:
#line 227 "compile.y"	#line 235 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]) ;
break;}	break;}
case 29:	case 29:
#line 235 "compile.y"	#line 243 "compile.y"
{ yyval=yyvsp[-1]; P(yyval, yyvsp[0]) ;	{ yyval=yyvsp[-1]; P(yyval, yyvsp[0]) ;
break;}	break;}
case 35:	case 35:
#line 241 "compile.y"	#line 249 "compile.y"
{	{
yyval=yyvsp[0]; /* stack: resulting value */	yyval=yyvsp[0]; /* stack: resulting value */
O(yyval, OP_WRITE_VALUE); /* value=pop; wcontext.write(value) */	changetail_or_append(yyval,
	OP_GET_ELEMENT, false, /->/OP_GET_ELEMENT__WRITE,
	/or /OP_WRITE_VALUE
	); /* value=pop; wcontext.write(value) */
;	;
break;}	break;}
case 36:	case 36:
#line 245 "compile.y"	#line 256 "compile.y"
{ yyval=yyvsp[0] ;	{ yyval=yyvsp[0] ;
break;}	break;}
case 39:	case 39:
#line 247 "compile.y"	#line 258 "compile.y"
{ yyval=yyvsp[-1] ;	{ yyval=yyvsp[-1] ;
break;}	break;}
case 42:	case 42:
#line 251 "compile.y"	#line 262 "compile.y"
{	{
yyval=N(POOL);	yyval=N(POOL);
Array *diving_code=yyvsp[0];	Array *diving_code=yyvsp[0];
const String *first_name=LA2S(diving_code);	const String *first_name=LA2S(diving_code);
	// self.xxx... -> xxx...
	// OP_VALUE+string+OP_GET_ELEMENT+... -> OP_WITH_SELF+...
if(first_name && *first_name==SELF_ELEMENT_NAME) {	if(first_name && *first_name==SELF_ELEMENT_NAME) {
O(yyval, OP_WITH_SELF); /* stack: starting context */	O(yyval, OP_WITH_SELF); /* stack: starting context */
P(yyval, diving_code,	P(yyval, diving_code,
/* skip over... */	/* skip over... */
diving_code->size()>2?3/OP_+string+get_element/:2/OP_+string/);	diving_code->size()>=3?3/OP_VALUE+string+OP_GET_ELEMENTx/:2/OP_+string/);
} else {	} else {
O(yyval, OP_WITH_READ); /* stack: starting context */	O(yyval, OP_WITH_READ); /* stack: starting context */

	// ^if ELEMENT -> ^if ELEMENT_OR_OPERATOR
	// OP_VALUE+string+OP_GET_ELEMENT. -> OP_VALUE+string+OP_GET_ELEMENT_OR_OPERATOR.
	if(PC.in_call_value && diving_code->size()==3)
	diving_code->put_int(2, OP_GET_ELEMENT_OR_OPERATOR);
P(yyval, diving_code);	P(yyval, diving_code);
}	}
/* diving code; stack: current context */	/* diving code; stack: current context */
;	;
break;}	break;}
case 43:	case 43:
#line 266 "compile.y"	#line 284 "compile.y"
{ yyval=yyvsp[-1]; P(yyval, yyvsp[0]) ;	{ yyval=yyvsp[-1]; P(yyval, yyvsp[0]) ;
break;}	break;}
case 45:	case 45:
#line 267 "compile.y"	#line 285 "compile.y"
{ yyval=yyvsp[-1]; P(yyval, yyvsp[0]) ;	{ yyval=yyvsp[-1]; P(yyval, yyvsp[0]) ;
break;}	break;}
case 46:	case 46:
#line 271 "compile.y"	#line 289 "compile.y"
{	{
yyval=yyvsp[-1]; /* stack: context,name */	yyval=yyvsp[-1]; /* stack: context,name */
P(yyval, yyvsp[0]); /* stack: context,name,constructor_value */	P(yyval, yyvsp[0]); /* stack: context,name,constructor_value */
;	;
break;}	break;}
case 50:	case 50:
#line 279 "compile.y"	#line 297 "compile.y"
{	{
yyval=N(POOL);	yyval=N(POOL);
Array *diving_code=yyvsp[0];	Array *diving_code=yyvsp[0];
const String *first_name=LA2S(diving_code);	const String *first_name=LA2S(diving_code);
	// $self.xxx... -> $xxx...
	// OP_VALUE+string+OP_GET_ELEMENT+... -> OP_WITH_SELF+...
if(first_name && *first_name==SELF_ELEMENT_NAME) {	if(first_name && *first_name==SELF_ELEMENT_NAME) {
O(yyval, OP_WITH_SELF); /* stack: starting context */	O(yyval, OP_WITH_SELF); /* stack: starting context */
P(yyval, diving_code,	P(yyval, diving_code,
/* skip over... */	/* skip over... */
diving_code->size()>2?3/OP_+string+get_element/:2/OP_+string/);	diving_code->size()>=3?3/OP_VALUE+string+OP_GET_ELEMENTx/:2/OP_+string/);
} else {	} else {
O(yyval, OP_WITH_ROOT); /* stack: starting context */	O(yyval, OP_WITH_ROOT); /* stack: starting context */
P(yyval, diving_code);	P(yyval, diving_code);
Line 1201 case 50:	Line 1239 case 50:
;	;
break;}	break;}
case 51:	case 51:
#line 294 "compile.y"	#line 314 "compile.y"
{	{
yyval=N(POOL);	yyval=N(POOL);
O(yyval, OP_WITH_WRITE); /* stack: starting context */	O(yyval, OP_WITH_WRITE); /* stack: starting context */
Line 1209 case 51:	Line 1247 case 51:
;	;
break;}	break;}
case 52:	case 52:
#line 299 "compile.y"	#line 319 "compile.y"
{ yyval=yyvsp[-1]; P(yyval, yyvsp[0]) ;	{ yyval=yyvsp[-1]; P(yyval, yyvsp[0]) ;
break;}	break;}
case 56:	case 56:
#line 306 "compile.y"	#line 326 "compile.y"
{	{
// stack: context, name	// stack: context, name
yyval=yyvsp[-1]; // stack: context, name, value	yyval=yyvsp[-1]; // stack: context, name, value
Line 1221 case 56:	Line 1259 case 56:
;	;
break;}	break;}
case 57:	case 57:
#line 312 "compile.y"	#line 332 "compile.y"
{	{
	yyval=N(POOL);
	O(yyval, OP_PREPARE_TO_EXPRESSION);
// stack: context, name	// stack: context, name
yyval=yyvsp[-1]; // stack: context, name, value	P(yyval, yyvsp[-1]); // stack: context, name, value
O(yyval, OP_CONSTRUCT_EXPR); /* value=pop->as_expr_result; name=pop; context=pop; construct(context,name,value) */	O(yyval, OP_CONSTRUCT_EXPR); /* value=pop->as_expr_result; name=pop; context=pop; construct(context,name,value) */
;	;
break;}	break;}
case 58:	case 58:
#line 318 "compile.y"	#line 340 "compile.y"
{	{
// stack: context, name	// stack: context, name
yyval=N(POOL);	yyval=N(POOL);
CCA(yyval, yyvsp[-1]); /* code=pop; name=pop; context=pop; construct(context,name,junction(code)) */	OA(yyval, OP_CURLY_CODE__CONSTRUCT, yyvsp[-1]); /* code=pop; name=pop; context=pop; construct(context,name,junction(code)) */
;	;
break;}	break;}
case 62:	case 62:
#line 329 "compile.y"	#line 351 "compile.y"
{	{
yyval=N(POOL);	yyval=N(POOL);
O(yyval, OP_CREATE_EWPOOL); /* stack: empty write context */	OA(yyval, OP_OBJECT_POOL, yyvsp[0]); /* stack: empty write context */
P(yyval, yyvsp[0]); /* some code that writes to that context */	/* some code that writes to that context */
O(yyval, OP_REDUCE_EWPOOL); /* context=pop; stack: context.value() */	/* context=pop; stack: context.value() */
;	;
break;}	break;}
case 65:	case 65:
#line 336 "compile.y"	#line 358 "compile.y"
{ yyval=yyvsp[-1]; P(yyval, yyvsp[0]) ;	{ yyval=yyvsp[-1]; P(yyval, yyvsp[0]) ;
break;}	break;}
case 66:	case 66:
#line 340 "compile.y"	#line 362 "compile.y"
{	{
yyval=yyvsp[0]; /* stack: value */	yyval=yyvsp[0]; /* stack: value */
O(yyval, OP_WRITE_VALUE); /* value=pop; wcontext.write(value) */	changetail_or_append(yyval,
	OP_CALL, true, /->/ OP_CALL__WRITE,
	/or /OP_WRITE_VALUE); /* value=pop; wcontext.write(value) */
;	;
break;}	break;}
case 67:	case 67:
#line 344 "compile.y"	#line 368 "compile.y"
{ PC.object_constructor_allowed=true ;	{
	PC.in_call_value=true;
	;
break;}	break;}
case 68:	case 68:
#line 345 "compile.y"	#line 371 "compile.y"
{ PC.object_constructor_allowed=false ;	{
	PC.in_call_value=false;
	;
break;}	break;}
case 69:	case 69:
#line 346 "compile.y"	#line 374 "compile.y"
{ /* ^field.$method{vasya} */	{ /* ^field.$method{vasya} */
yyval=yyvsp[-3]; /* with_xxx,diving code; stack: context,method_junction */	yyval=yyvsp[-3]; /* with_xxx,diving code; stack: context,method_junction */
O(yyval, OP_GET_METHOD_FRAME); /* stack: context,method_frame */

YYSTYPE params_code=yyvsp[-1];	YYSTYPE params_code=yyvsp[-1];
if(params_code->size()==3) // probably [] case. [OP_VALUE + Void + STORE_PARAM]	if(params_code->size()==3) { // probably [] case. [OP_VALUE + Void + STORE_PARAM]
if(Value *value=LA2V(params_code)) // it is OP_VALUE + value?	if(Value *value=LA2V(params_code)) // it is OP_VALUE + value?
if(!value->is_defined()) // value is VVoid?	if(!value->is_defined()) // value is VVoid?
params_code=0; // ^zzz[] case. don't append lone empty param.	params_code=0; // ^zzz[] case. don't append lone empty param.
if(params_code)	}
P(yyval, params_code); // filling method_frame.store_params	/* stack: context, method_junction */
O(yyval, OP_CALL); // method_frame=pop; ncontext=pop; call(ncontext,method_frame) stack: value	OA(yyval, OP_CALL, params_code); // method_frame=make frame(pop junction); ncontext=pop; call(ncontext,method_frame) stack: value
;	;
break;}	break;}
case 72:	case 72:
#line 362 "compile.y"	#line 389 "compile.y"
{ yyval=yyvsp[-1]; P(yyval, yyvsp[0]) ;	{ yyval=yyvsp[-1]; P(yyval, yyvsp[0]) ;
break;}	break;}
case 76:	case 76:
#line 368 "compile.y"	#line 395 "compile.y"
{yyval=yyvsp[-1];	{yyval=yyvsp[-1];
break;}	break;}
case 77:	case 77:
#line 369 "compile.y"	#line 396 "compile.y"
{yyval=yyvsp[-1];	{yyval=yyvsp[-1];
break;}	break;}
case 78:	case 78:
#line 370 "compile.y"	#line 397 "compile.y"
{yyval=yyvsp[-1];	{yyval=yyvsp[-1];
break;}	break;}
case 80:	case 80:
#line 373 "compile.y"	#line 400 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]) ;
break;}	break;}
case 82:	case 82:
#line 377 "compile.y"	#line 404 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]) ;
break;}	break;}
case 84:	case 84:
#line 381 "compile.y"	#line 408 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]) ;
break;}	break;}
case 85:	case 85:
#line 383 "compile.y"	#line 410 "compile.y"
{	{
yyval=yyvsp[0];	yyval=yyvsp[0];
O(yyval, OP_STORE_PARAM);	O(yyval, OP_STORE_PARAM);
;	;
break;}	break;}
case 86:	case 86:
#line 387 "compile.y"	#line 414 "compile.y"
{	{
yyval=N(POOL);	yyval=N(POOL);
PEA(yyval, yyvsp[0]);	OA(yyval, OP_EXPR_CODE__STORE_PARAM, yyvsp[0]);
;	;
break;}	break;}
case 87:	case 87:
#line 391 "compile.y"	#line 418 "compile.y"
{	{
yyval=N(POOL);	yyval=N(POOL);
PCA(yyval, yyvsp[0]);	OA(yyval, OP_CURLY_CODE__STORE_PARAM, yyvsp[0]);
;	;
break;}	break;}
case 91:	case 91:
#line 400 "compile.y"	#line 427 "compile.y"
{	{
yyval=yyvsp[0];	yyval=N(POOL);
	O(yyval, OP_PREPARE_TO_EXPRESSION);
	P(yyval, yyvsp[0]);
O(yyval, OP_WRITE_EXPR_RESULT);	O(yyval, OP_WRITE_EXPR_RESULT);
;	;
break;}	break;}
case 93:	case 93:
#line 407 "compile.y"	#line 436 "compile.y"
{ yyval=yyvsp[-1]; P(yyval, yyvsp[0]) ;	{ yyval=yyvsp[-1]; P(yyval, yyvsp[0]) ;
break;}	break;}
case 95:	case 95:
#line 409 "compile.y"	#line 438 "compile.y"
{ yyval=yyvsp[-1]; P(yyval, yyvsp[0]) ;	{ yyval=yyvsp[-1]; P(yyval, yyvsp[0]) ;
break;}	break;}
case 97:	case 97:
#line 411 "compile.y"	#line 440 "compile.y"
{	{
	// we know that name_advance1 not called from ^xxx context
	// so we'll not check for operator call possibility as we do in name_advance2

/* stack: context */	/* stack: context */
yyval=yyvsp[0]; /* stack: context,name */	yyval=yyvsp[0]; /* stack: context,name */
O(yyval, OP_GET_ELEMENT); /* name=pop; context=pop; stack: context.get_element(name) */	O(yyval, OP_GET_ELEMENT); /* name=pop; context=pop; stack: context.get_element(name) */
;	;
break;}	break;}
case 98:	case 98:
#line 416 "compile.y"	#line 448 "compile.y"
{	{
/* stack: context */	/* stack: context */
yyval=yyvsp[0]; /* stack: context,name */	yyval=yyvsp[0]; /* stack: context,name */
Line 1361 case 98:	Line 1411 case 98:
;	;
break;}	break;}
case 104:	case 104:
#line 429 "compile.y"	#line 461 "compile.y"
{	{
yyval=yyvsp[0];	yyval=yyvsp[0];
O(yyval, OP_GET_ELEMENT);	O(yyval, OP_GET_ELEMENT);
;	;
break;}	break;}
case 105:	case 105:
#line 433 "compile.y"	#line 465 "compile.y"
{	{
	Array *code;
	{
	change_string_literal_to_write_string_literal(code=yyvsp[-1]);
	P(code, yyvsp[0]);
	}
yyval=N(POOL);	yyval=N(POOL);
O(yyval, OP_CREATE_EWPOOL);	OA(yyval, OP_STRING_POOL, code);
P(yyval, yyvsp[-1]);
O(yyval, OP_WRITE_VALUE);
P(yyval, yyvsp[0]);
O(yyval, OP_REDUCE_EWPOOL);
;	;
break;}	break;}
case 106:	case 106:
#line 441 "compile.y"	#line 474 "compile.y"
{	{
yyval=N(POOL);	yyval=N(POOL);
O(yyval, OP_CREATE_EWPOOL);	OA(yyval, OP_OBJECT_POOL, yyvsp[-1]); /* stack: empty write context */
P(yyval, yyvsp[-1]);	/* some code that writes to that context */
O(yyval, OP_REDUCE_EWPOOL);	/* context=pop; stack: context.value() */
;	;
break;}	break;}
case 107:	case 107:
#line 447 "compile.y"	#line 480 "compile.y"
{	{
yyval=N(POOL);	yyval=N(POOL);
O(yyval, OP_WITH_READ);	O(yyval, OP_WITH_READ);
Line 1396 case 107:	Line 1447 case 107:
;	;
break;}	break;}
case 109:	case 109:
#line 452 "compile.y"	#line 485 "compile.y"
{ yyval=yyvsp[-1]; P(yyval, yyvsp[0]) ;	{ yyval=yyvsp[-1]; P(yyval, yyvsp[0]) ;
break;}	break;}
case 110:	case 110:
#line 453 "compile.y"	#line 486 "compile.y"
{	{
yyval=yyvsp[0];	yyval=yyvsp[0];
O(yyval, OP_GET_ELEMENT__WRITE);	O(yyval, OP_GET_ELEMENT__WRITE);
;	;
break;}	break;}
case 113:	case 113:
#line 462 "compile.y"	#line 495 "compile.y"
{	{
yyval=yyvsp[-1]; // stack: class name string	yyval=yyvsp[-1]; // stack: class name string
	if(*LA2S(yyval) == BASE_NAME) { // pseude BASE class
	if(VStateless_class *base=PC.cclass->base_class()) {
	change_string_literal_value(yyval, base->name());
	} else {
	strcpy(PC.error, "no base class declared");
	YYERROR;
	}
	}
O(yyval, OP_GET_CLASS);	O(yyval, OP_GET_CLASS);
;	;
break;}	break;}
case 114:	case 114:
#line 466 "compile.y"	#line 507 "compile.y"
{	{
yyval=yyvsp[-1];	yyval=yyvsp[-1];
if(!PC.object_constructor_allowed) {	if(!PC.in_call_value) {
strcpy(PC.error, ":: not allowed here");	strcpy(PC.error, ":: not allowed here");
YYERROR;	YYERROR;
}	}
Line 1425 case 114:	Line 1484 case 114:
;	;
break;}	break;}
case 115:	case 115:
#line 478 "compile.y"	#line 519 "compile.y"
{	{
	// see OP_PREPARE_TO_EXPRESSION!!
if((yyval=yyvsp[0])->size()==2) // only one string literal in there?	if((yyval=yyvsp[0])->size()==2) // only one string literal in there?
change_string_literal_to_double_literal(yyval); // make that string literal Double	change_string_literal_to_double_literal(yyval); // make that string literal Double
;	;
break;}	break;}
case 119:	case 119:
#line 486 "compile.y"	#line 528 "compile.y"
{ yyval = yyvsp[-1]; ;	{ yyval = yyvsp[-1]; ;
break;}	break;}
case 120:	case 120:
#line 487 "compile.y"	#line 529 "compile.y"
{ yyval = yyvsp[-1]; ;	{ yyval = yyvsp[-1]; ;
break;}	break;}
case 121:	case 121:
#line 488 "compile.y"	#line 530 "compile.y"
{ yyval = yyvsp[-1]; ;	{ yyval = yyvsp[-1]; ;
break;}	break;}
case 122:	case 122:
#line 490 "compile.y"	#line 532 "compile.y"
{ yyval=yyvsp[0]; O(yyval, OP_NEG) ;	{ yyval=yyvsp[0]; O(yyval, OP_NEG) ;
break;}	break;}
case 123:	case 123:
#line 491 "compile.y"	#line 533 "compile.y"
{ yyval=yyvsp[0] ;	{ yyval=yyvsp[0] ;
break;}	break;}
case 124:	case 124:
#line 492 "compile.y"	#line 534 "compile.y"
{ yyval=yyvsp[0]; O(yyval, OP_INV) ;	{ yyval=yyvsp[0]; O(yyval, OP_INV) ;
break;}	break;}
case 125:	case 125:
#line 493 "compile.y"	#line 535 "compile.y"
{ yyval=yyvsp[0]; O(yyval, OP_NOT) ;	{ yyval=yyvsp[0]; O(yyval, OP_NOT) ;
break;}	break;}
case 126:	case 126:
#line 494 "compile.y"	#line 536 "compile.y"
{ yyval=yyvsp[0]; O(yyval, OP_DEF) ;	{ yyval=yyvsp[0]; O(yyval, OP_DEF) ;
break;}	break;}
case 127:	case 127:
#line 495 "compile.y"	#line 537 "compile.y"
{ yyval=yyvsp[0]; O(yyval, OP_IN) ;	{ yyval=yyvsp[0]; O(yyval, OP_IN) ;
break;}	break;}
case 128:	case 128:
#line 496 "compile.y"	#line 538 "compile.y"
{ yyval=yyvsp[0]; O(yyval, OP_FEXISTS) ;	{ yyval=yyvsp[0]; O(yyval, OP_FEXISTS) ;
break;}	break;}
case 129:	case 129:
#line 497 "compile.y"	#line 539 "compile.y"
{ yyval=yyvsp[0]; O(yyval, OP_DEXISTS) ;	{ yyval=yyvsp[0]; O(yyval, OP_DEXISTS) ;
break;}	break;}
case 130:	case 130:
#line 499 "compile.y"	#line 541 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_SUB) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_SUB) ;
break;}	break;}
case 131:	case 131:
#line 500 "compile.y"	#line 542 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_ADD) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_ADD) ;
break;}	break;}
case 132:	case 132:
#line 501 "compile.y"	#line 543 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_MUL) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_MUL) ;
break;}	break;}
case 133:	case 133:
#line 502 "compile.y"	#line 544 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_DIV) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_DIV) ;
break;}	break;}
case 134:	case 134:
#line 503 "compile.y"	#line 545 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_MOD) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_MOD) ;
break;}	break;}
case 135:	case 135:
#line 504 "compile.y"	#line 546 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_BIN_AND) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_INTDIV) ;
break;}	break;}
case 136:	case 136:
#line 505 "compile.y"	#line 547 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_BIN_OR) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_BIN_SL) ;
break;}	break;}
case 137:	case 137:
#line 506 "compile.y"	#line 548 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_BIN_XOR) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_BIN_SR) ;
break;}	break;}
case 138:	case 138:
#line 507 "compile.y"	#line 549 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_LOG_AND) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_BIN_AND) ;
break;}	break;}
case 139:	case 139:
#line 508 "compile.y"	#line 550 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_LOG_OR) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_BIN_OR) ;
break;}	break;}
case 140:	case 140:
#line 509 "compile.y"	#line 551 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_LOG_XOR) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_BIN_XOR) ;
break;}	break;}
case 141:	case 141:
#line 510 "compile.y"	#line 552 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_NUM_LT) ;	{ yyval=yyvsp[-2]; OA(yyval, OP_NESTED_CODE, yyvsp[0]); O(yyval, OP_LOG_AND) ;
break;}	break;}
case 142:	case 142:
#line 511 "compile.y"	#line 553 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_NUM_GT) ;	{ yyval=yyvsp[-2]; OA(yyval, OP_NESTED_CODE, yyvsp[0]); O(yyval, OP_LOG_OR) ;
break;}	break;}
case 143:	case 143:
#line 512 "compile.y"	#line 554 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_NUM_LE) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_LOG_XOR) ;
break;}	break;}
case 144:	case 144:
#line 513 "compile.y"	#line 555 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_NUM_GE) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_NUM_LT) ;
break;}	break;}
case 145:	case 145:
#line 514 "compile.y"	#line 556 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_NUM_EQ) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_NUM_GT) ;
break;}	break;}
case 146:	case 146:
#line 515 "compile.y"	#line 557 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_NUM_NE) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_NUM_LE) ;
break;}	break;}
case 147:	case 147:
#line 516 "compile.y"	#line 558 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_STR_LT) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_NUM_GE) ;
break;}	break;}
case 148:	case 148:
#line 517 "compile.y"	#line 559 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_STR_GT) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_NUM_EQ) ;
break;}	break;}
case 149:	case 149:
#line 518 "compile.y"	#line 560 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_STR_LE) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_NUM_NE) ;
break;}	break;}
case 150:	case 150:
#line 519 "compile.y"	#line 561 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_STR_GE) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_STR_LT) ;
break;}	break;}
case 151:	case 151:
#line 520 "compile.y"	#line 562 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_STR_EQ) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_STR_GT) ;
break;}	break;}
case 152:	case 152:
#line 521 "compile.y"	#line 563 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_STR_NE) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_STR_LE) ;
break;}	break;}
case 153:	case 153:
#line 522 "compile.y"	#line 564 "compile.y"
{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_IS) ;	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_STR_GE) ;
break;}	break;}
case 154:	case 154:
#line 525 "compile.y"	#line 565 "compile.y"
	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_STR_EQ) ;
	break;}
	case 155:
	#line 566 "compile.y"
	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_STR_NE) ;
	break;}
	case 156:
	#line 567 "compile.y"
	{ yyval=yyvsp[-2]; P(yyval, yyvsp[0]); O(yyval, OP_IS) ;
	break;}
	case 157:
	#line 570 "compile.y"
{	{
yyval=N(POOL);	yyval=N(POOL);
O(yyval, OP_CREATE_SWPOOL); /* stack: empty write context */	OA(yyval, OP_STRING_POOL, yyvsp[0]); /* stack: empty write context */
P(yyval, yyvsp[0]); /* some code that writes to that context */	/* some code that writes to that context */
O(yyval, OP_REDUCE_SWPOOL); /* context=pop; stack: context.get_string() */	/* context=pop; stack: context.get_string() */
;	;
break;}	break;}
case 155:	case 158:
#line 534 "compile.y"	#line 579 "compile.y"
{	{
// optimized from OP_STRING+OP_WRITE_VALUE to OP_STRING__WRITE	// optimized from OP_STRING+OP_WRITE_VALUE to OP_STRING__WRITE
change_string_literal_to_write_string_literal(yyval=yyvsp[0])	change_string_literal_to_write_string_literal(yyval=yyvsp[0])
;	;
break;}	break;}
case 156:	case 159:
#line 539 "compile.y"	#line 584 "compile.y"
{ yyval=VL(NEW VVoid(POOL)) ;	{ yyval=VL(NEW VVoid(POOL)) ;
break;}	break;}
case 157:	case 160:
#line 540 "compile.y"	#line 585 "compile.y"
{ yyval=N(POOL) ;	{ yyval=N(POOL) ;
break;}	break;}
}	}
Line 1817 yyerrhandle:	Line 1889 yyerrhandle:
}	}
return 1;	return 1;
}	}
#line 542 "compile.y"	#line 587 "compile.y"

#endif	#endif

Line 1838 yyerrhandle:	Line 1910 yyerrhandle:
*/	*/

static int yylex(YYSTYPE lvalp, void pc) {	static int yylex(YYSTYPE lvalp, void pc) {
#define lexical_brackets_nestage PC.brackets_nestages[PC.sp]	#define lexical_brackets_nestage PC.brackets_nestages[PC.ls_sp]
#define RC {result=c; goto break2; }	#define RC {result=c; goto break2; }

register int c;	register int c;
Line 1865 static int yylex(YYSTYPE lvalp, void p	Line 1937 static int yylex(YYSTYPE lvalp, void p
PC.col++;	PC.col++;

if(c=='@' && PC.col==0+1) {	if(c=='@' && PC.col==0+1) {
	if(PC.ls==LS_DEF_SPECIAL_BODY) {
	// @SPECIAL
	// ...
	// @<here =
	pop_LS(PC); // exiting from LS_DEF_SPECIAL_BODY state
	} // continuing checks
if(PC.ls==LS_USER) {	if(PC.ls==LS_USER) {
push_LS(PC, LS_DEF_NAME);	push_LS(PC, LS_DEF_NAME);
RC;	RC;
} else // @ in first column inside some code	} else // @ in first column inside some code [when could that be?]
result=BAD_METHOD_DECL_START;	result=BAD_METHOD_DECL_START;
goto break2;	goto break2;
} else if(c=='^')	} else if(c=='^')
Line 1879 case LS_VAR_NAME_SIMPLE_WITH_COLON:	Line 1957 case LS_VAR_NAME_SIMPLE_WITH_COLON:
case LS_VAR_NAME_SIMPLE_WITHOUT_COLON:	case LS_VAR_NAME_SIMPLE_WITHOUT_COLON:
case LS_VAR_NAME_CURLY:	case LS_VAR_NAME_CURLY:
case LS_METHOD_NAME:	case LS_METHOD_NAME:
case LS_COMMENT:	case LS_USER_COMMENT:
case LS_DEF_COMMENT:	case LS_DEF_COMMENT:
// no literals in names, please	// no literals in names, please
break;	break;
Line 1947 default:	Line 2025 default:
PC.string->APPEND_CLEAN(begin, end-begin, PC.file, begin_line);	PC.string->APPEND_CLEAN(begin, end-begin, PC.file, begin_line);
}	}
// fall into COMMENT lexical state [wait for \n]	// fall into COMMENT lexical state [wait for \n]
push_LS(PC, LS_COMMENT);	push_LS(PC, LS_USER_COMMENT);
	continue;
}	}
switch(PC.ls) {	switch(PC.ls) {

Line 1985 default:	Line 2064 default:
break;	break;

// #COMMENT	// #COMMENT
case LS_COMMENT:	case LS_USER_COMMENT:
if(c=='\n') {	if(c=='\n') {
// skip comment	// skip comment
begin=PC.source;	begin=PC.source;
Line 2032 default:	Line 2111 default:

case LS_DEF_PARAMS:	case LS_DEF_PARAMS:
switch(c) {	switch(c) {
	case '$': // common error
	result=BAD_METHOD_PARAMETER_NAME_CHARACTER;
	goto break2;
case ';':	case ';':
RC;	RC;
case ']':	case ']':
Line 2065 default:	Line 2147 default:
break;	break;

case LS_DEF_SPECIAL_BODY:	case LS_DEF_SPECIAL_BODY:
// @todo in case	if(c=='\n')
// ################
// @next-method
// we are here with c=='@'
// which is wrong, and need action
if(c=='\n') {
switch(*PC.source) {
case '@': case 0: // end of special_code
pop_LS(PC);
break;
}
RC;	RC;
}
break;	break;

// (EXPRESSION)	// (EXPRESSION)
Line 2091 default:	Line 2162 default:
else // PC.ls==LS_VAR_ROUND // variable constructor ended	else // PC.ls==LS_VAR_ROUND // variable constructor ended
pop_LS(PC); // return to normal life	pop_LS(PC); // return to normal life
RC;	RC;
	case '#': // comment start skipping
	if(end!=begin) {
	// append piece till #
	PC.string->APPEND_CLEAN(begin, end-begin, PC.file, begin_line);
	}
	// fall into COMMENT lexical state [wait for \n]
	push_LS(PC, LS_EXPRESSION_COMMENT);
	lexical_brackets_nestage=1;
	continue;
case '$':	case '$':
push_LS(PC, LS_EXPRESSION_VAR_NAME_WITH_COLON);	push_LS(PC, LS_EXPRESSION_VAR_NAME_WITH_COLON);
RC;	RC;
Line 2110 default:	Line 2190 default:
skip_analized=1;	skip_analized=1;
result=DEXISTS;	result=DEXISTS;
goto break2;	goto break2;
default:	default: // minus
result=c;	result=c;
goto break2;	goto break2;
}	}
goto break2;	goto break2;
case '+': case '*': case '/': case '%':	case '+': case '*': case '/': case '%': case '\\':
case '~':	case '~':
case ';':	case ';':
RC;	RC;
case '&': case '\|': case '#':	case '&': case '\|':
if(*PC.source==c) { // && \|\|	if(*PC.source==c) { // && \|\|
result=c=='#'?LXOR:c=='&'?LAND:LOR;	result=c=='&'?LAND:LOR;
skip_analized=1;	skip_analized=1;
} else	} else
result=c;	result=c;
goto break2;	goto break2;
case '<': case '>': case '=': case '!':	case '!':
if(*PC.source=='=') { // <= >= == !=	switch(PC.source[0]) {
	case '\|': // !\| !\|\|
skip_analized=1;	skip_analized=1;
switch(c) {	if(PC.source[1]=='\|') {
case '<': result=NLE; break;	skip_analized++;
case '>': result=NGE; break;	result=LXOR;
case '=': result=NEQ; break;	} else
case '!': result=NNE; break;	result=NXOR;
}	goto break2;
} else	case '=': // !=
result=c;	skip_analized=1;
	result=NNE;
	goto break2;
	}
	RC;

	case '<': // <<, <=, <
	switch(*PC.source) {
	case '<': // <[<]
	skip_analized=1; result=NSL; break;
	case '=': // <[=]
	skip_analized=1; result=NLE; break;
	default: // <[]
	result=c; break;
	}
	goto break2;
	case '>': // >>, >=, >
	switch(*PC.source) {
	case '>': // >[>]
	skip_analized=1; result=NSR; break;
	case '=': // >[=]
	skip_analized=1; result=NGE; break;
	default: // >[]
	result=c; break;
	}
goto break2;	goto break2;
	case '=': // ==
	switch(*PC.source) {
	case '=': // =[=]
	skip_analized=1; result=NEQ; break;
	default: // =[]
	result=c; break; // not used now
	}
	goto break2;

case '"':	case '"':
push_LS(PC, LS_EXPRESSION_STRING_QUOTED);	push_LS(PC, LS_EXPRESSION_STRING_QUOTED);
RC;	RC;
Line 2200 default:	Line 2314 default:
continue;	continue;
}	}
break;	break;
	case LS_EXPRESSION_COMMENT:
	if(c=='(')
	lexical_brackets_nestage++;

	switch(*PC.source) {
	case '\n': case ')':
	if(*PC.source==')')
	if(--lexical_brackets_nestage!=0)
	continue;

	// skip comment
	begin=PC.source;
	begin_line=PC.line;

	pop_LS(PC);
	continue;
	}
	break;

// VARIABLE GET/PUT/WITH	// VARIABLE GET/PUT/WITH
case LS_VAR_NAME_SIMPLE_WITH_COLON:	case LS_VAR_NAME_SIMPLE_WITH_COLON:
Line 2209 default:	Line 2341 default:
if(	if(
PC.ls==LS_EXPRESSION_VAR_NAME_WITH_COLON \|\|	PC.ls==LS_EXPRESSION_VAR_NAME_WITH_COLON \|\|
PC.ls==LS_EXPRESSION_VAR_NAME_WITHOUT_COLON) {	PC.ls==LS_EXPRESSION_VAR_NAME_WITHOUT_COLON) {
// name in expr ends also before binary operators	// name in expr ends also before
switch(c) {	switch(c) {
	// expression minus
case '-':	case '-':
	// expression integer division
	case '\\':
pop_LS(PC);	pop_LS(PC);
PC.source--; if(--PC.col<0) { PC.line--; PC.col=-1; }	PC.source--; if(--PC.col<0) { PC.line--; PC.col=-1; }
result=EON;	result=EON;
Line 2241 default:	Line 2376 default:
case '&': case '\|':	case '&': case '\|':
case '=': case '!':	case '=': case '!':
// common delimiters	// common delimiters
case ',': case '?':	case ',': case '?': case '#':
// before call	// before call
case '^':	case '^':
pop_LS(PC);	pop_LS(PC);
Line 2460 break2:	Line 2595 break2:
if(end!=begin && end[-1]=='\n') // allow one empty line before LS_DEF_NAME	if(end!=begin && end[-1]=='\n') // allow one empty line before LS_DEF_NAME
end--;	end--;
}	}
if(end!=begin && PC.ls!=LS_COMMENT) { // last piece still alive and not comment?	if(end!=begin && PC.ls!=LS_USER_COMMENT) { // last piece still alive and not comment?
// append it	// append it
PC.string->APPEND_CLEAN(begin, end-begin, PC.file, begin_line/, start_col/);	PC.string->APPEND_CLEAN(begin, end-begin, PC.file, begin_line/, start_col/);
}	}

E-mail:

Removed from v.1.24
changed lines
	Added in v.1.67