diff --git a/ChangeLog.txt b/ChangeLog.txt index 6375bced4c..495942ae44 100644 --- a/ChangeLog.txt +++ b/ChangeLog.txt @@ -10,6 +10,26 @@ * Change, ! Fix, % Optimization, + Addition, - Removal, ; Comment */ +2014-10-05 16:40 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl) + * src/3rd/tiff/tiff.dif + * src/3rd/tiff/tiffconf.h + * do not redefine O_* macros in all *nix builds + + * src/compiler/harbour.yyc + * src/compiler/harbour.yyh + * src/macro/macro.yyc + * src/macro/macro.yyh + * regenerated with bison 3.0.2. + + * src/rtl/hbcom.c + ! fixed compilation with OpenWatcom for Linux + + * src/rtl/hbsocket.c + * pacified warning in OpenWatcom Linux builds + + * src/rtl/hbjson.c + * own code for conversion integer numbers + 2014-10-05 11:45 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl) * src/compiler/harbour.y * src/macro/macro.y diff --git a/src/3rd/tiff/tiff.dif b/src/3rd/tiff/tiff.dif index f0ca032b22..7dbfd2f948 100644 --- a/src/3rd/tiff/tiff.dif +++ b/src/3rd/tiff/tiff.dif @@ -687,7 +687,7 @@ diff -urN tiff.orig/tiffconf.h tiff/tiffconf.h #define PHOTOSHOP_SUPPORT #define IPTC_SUPPORT + -+#if ! defined( HB_OS_DARWIN ) ++#if ! defined( HB_OS_UNIX ) +#ifndef O_RDONLY +#define O_RDONLY 0 +#endif diff --git a/src/3rd/tiff/tiffconf.h b/src/3rd/tiff/tiffconf.h index d6c22f68e6..52057356fd 100644 --- a/src/3rd/tiff/tiffconf.h +++ b/src/3rd/tiff/tiffconf.h @@ -163,7 +163,7 @@ #define PHOTOSHOP_SUPPORT #define IPTC_SUPPORT -#if ! defined( HB_OS_DARWIN ) +#if ! defined( HB_OS_UNIX ) #ifndef O_RDONLY #define O_RDONLY 0 #endif diff --git a/src/compiler/harbour.yyc b/src/compiler/harbour.yyc index fa2465090f..45e269827c 100644 --- a/src/compiler/harbour.yyc +++ b/src/compiler/harbour.yyc @@ -1,8 +1,8 @@ -/* A Bison parser, made by GNU Bison 2.5. */ +/* A Bison parser, made by GNU Bison 3.0.2. */ /* Bison implementation for Yacc-like parsers in C - Copyright (C) 1984, 1989-1990, 2000-2011 Free Software Foundation, Inc. + Copyright (C) 1984, 1989-1990, 2000-2013 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 @@ -44,7 +44,7 @@ #define YYBISON 1 /* Bison version. */ -#define YYBISON_VERSION "2.5" +#define YYBISON_VERSION "3.0.2" /* Skeleton name. */ #define YYSKELETON_NAME "yacc.c" @@ -58,23 +58,17 @@ /* Pull parsers. */ #define YYPULL 1 -/* Using locations. */ -#define YYLSP_NEEDED 0 /* Substitute the variable and function names. */ #define yyparse hb_comp_yyparse #define yylex hb_comp_yylex #define yyerror hb_comp_yyerror -#define yylval hb_comp_yylval -#define yychar hb_comp_yychar #define yydebug hb_comp_yydebug #define yynerrs hb_comp_yynerrs /* Copy the first part of user declarations. */ - -/* Line 268 of yacc.c */ -#line 5 "harbour.y" +#line 5 "harbour.y" /* yacc.c:339 */ /* * Harbour Project source code: @@ -189,14 +183,15 @@ static PHB_EXPR hb_compCheckPassByRef( HB_COMP_DECL, PHB_EXPR pExpr ); static void hb_compDebugStart( void ) { } +#line 187 "harboury.c" /* yacc.c:339 */ -/* Line 268 of yacc.c */ -#line 195 "harboury.c" - -/* Enabling traces. */ -#ifndef YYDEBUG -# define YYDEBUG 0 -#endif +# ifndef YY_NULLPTR +# if defined __cplusplus && 201103L <= __cplusplus +# define YY_NULLPTR nullptr +# else +# define YY_NULLPTR 0 +# endif +# endif /* Enabling verbose error messages. */ #ifdef YYERROR_VERBOSE @@ -206,138 +201,141 @@ static void hb_compDebugStart( void ) { } # define YYERROR_VERBOSE 0 #endif -/* Enabling the token table. */ -#ifndef YYTOKEN_TABLE -# define YYTOKEN_TABLE 0 +/* In a future release of Bison, this section will be replaced + by #include "harboury.h". */ +#ifndef YY_HB_COMP_YY_HARBOURY_H_INCLUDED +# define YY_HB_COMP_YY_HARBOURY_H_INCLUDED +/* Debug traces. */ +#ifndef YYDEBUG +# define YYDEBUG 0 +#endif +#if YYDEBUG +extern int hb_comp_yydebug; #endif - -/* Tokens. */ +/* Token type. */ #ifndef YYTOKENTYPE # define YYTOKENTYPE - /* Put the tokens into the symbol table, so that GDB and other debuggers - know about them. */ - enum yytokentype { - FUNCTION = 258, - PROCEDURE = 259, - IDENTIFIER = 260, - RETURN = 261, - NIL = 262, - NUM_DOUBLE = 263, - INASSIGN = 264, - NUM_LONG = 265, - LOCAL = 266, - STATIC = 267, - IIF = 268, - IF = 269, - ELSE = 270, - ELSEIF = 271, - END = 272, - ENDIF = 273, - LITERAL = 274, - TRUEVALUE = 275, - FALSEVALUE = 276, - ANNOUNCE = 277, - EXTERN = 278, - DYNAMIC = 279, - INIT = 280, - EXIT = 281, - AND = 282, - OR = 283, - NOT = 284, - PUBLIC = 285, - EQ = 286, - NE1 = 287, - NE2 = 288, - INC = 289, - DEC = 290, - ALIASOP = 291, - DOCASE = 292, - CASE = 293, - OTHERWISE = 294, - ENDCASE = 295, - ENDDO = 296, - MEMVAR = 297, - WHILE = 298, - LOOP = 299, - FOR = 300, - NEXT = 301, - TO = 302, - STEP = 303, - LE = 304, - GE = 305, - FIELD = 306, - IN = 307, - PARAMETERS = 308, - PLUSEQ = 309, - MINUSEQ = 310, - MULTEQ = 311, - DIVEQ = 312, - POWER = 313, - EXPEQ = 314, - MODEQ = 315, - PRIVATE = 316, - BEGINSEQ = 317, - BREAK = 318, - RECOVER = 319, - RECOVERUSING = 320, - ALWAYS = 321, - ENDSEQ = 322, - DO = 323, - WITH = 324, - SELF = 325, - LINE = 326, - MACROVAR = 327, - MACROTEXT = 328, - AS_ARRAY = 329, - AS_BLOCK = 330, - AS_CHARACTER = 331, - AS_CLASS = 332, - AS_DATE = 333, - AS_LOGICAL = 334, - AS_NUMERIC = 335, - AS_OBJECT = 336, - AS_VARIANT = 337, - DECLARE = 338, - OPTIONAL = 339, - DECLARE_CLASS = 340, - DECLARE_MEMBER = 341, - AS_ARRAY_ARRAY = 342, - AS_BLOCK_ARRAY = 343, - AS_CHARACTER_ARRAY = 344, - AS_CLASS_ARRAY = 345, - AS_DATE_ARRAY = 346, - AS_LOGICAL_ARRAY = 347, - AS_NUMERIC_ARRAY = 348, - AS_OBJECT_ARRAY = 349, - PROCREQ = 350, - CBSTART = 351, - DOIDENT = 352, - FOREACH = 353, - DESCEND = 354, - DOSWITCH = 355, - ENDSWITCH = 356, - WITHOBJECT = 357, - ENDWITH = 358, - NUM_DATE = 359, - TIMESTAMP = 360, - EPSILON = 361, - HASHOP = 362, - THREAD = 363, - POST = 364, - UNARY = 365, - PRE = 366 - }; + enum yytokentype + { + FUNCTION = 258, + PROCEDURE = 259, + IDENTIFIER = 260, + RETURN = 261, + NIL = 262, + NUM_DOUBLE = 263, + INASSIGN = 264, + NUM_LONG = 265, + LOCAL = 266, + STATIC = 267, + IIF = 268, + IF = 269, + ELSE = 270, + ELSEIF = 271, + END = 272, + ENDIF = 273, + LITERAL = 274, + TRUEVALUE = 275, + FALSEVALUE = 276, + ANNOUNCE = 277, + EXTERN = 278, + DYNAMIC = 279, + INIT = 280, + EXIT = 281, + AND = 282, + OR = 283, + NOT = 284, + PUBLIC = 285, + EQ = 286, + NE1 = 287, + NE2 = 288, + INC = 289, + DEC = 290, + ALIASOP = 291, + DOCASE = 292, + CASE = 293, + OTHERWISE = 294, + ENDCASE = 295, + ENDDO = 296, + MEMVAR = 297, + WHILE = 298, + LOOP = 299, + FOR = 300, + NEXT = 301, + TO = 302, + STEP = 303, + LE = 304, + GE = 305, + FIELD = 306, + IN = 307, + PARAMETERS = 308, + PLUSEQ = 309, + MINUSEQ = 310, + MULTEQ = 311, + DIVEQ = 312, + POWER = 313, + EXPEQ = 314, + MODEQ = 315, + PRIVATE = 316, + BEGINSEQ = 317, + BREAK = 318, + RECOVER = 319, + RECOVERUSING = 320, + ALWAYS = 321, + ENDSEQ = 322, + DO = 323, + WITH = 324, + SELF = 325, + LINE = 326, + MACROVAR = 327, + MACROTEXT = 328, + AS_ARRAY = 329, + AS_BLOCK = 330, + AS_CHARACTER = 331, + AS_CLASS = 332, + AS_DATE = 333, + AS_LOGICAL = 334, + AS_NUMERIC = 335, + AS_OBJECT = 336, + AS_VARIANT = 337, + DECLARE = 338, + OPTIONAL = 339, + DECLARE_CLASS = 340, + DECLARE_MEMBER = 341, + AS_ARRAY_ARRAY = 342, + AS_BLOCK_ARRAY = 343, + AS_CHARACTER_ARRAY = 344, + AS_CLASS_ARRAY = 345, + AS_DATE_ARRAY = 346, + AS_LOGICAL_ARRAY = 347, + AS_NUMERIC_ARRAY = 348, + AS_OBJECT_ARRAY = 349, + PROCREQ = 350, + CBSTART = 351, + DOIDENT = 352, + FOREACH = 353, + DESCEND = 354, + DOSWITCH = 355, + ENDSWITCH = 356, + WITHOBJECT = 357, + ENDWITH = 358, + NUM_DATE = 359, + TIMESTAMP = 360, + EPSILON = 361, + HASHOP = 362, + THREAD = 363, + POST = 364, + UNARY = 365, + PRE = 366 + }; #endif - - +/* Value type. */ #if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED -typedef union YYSTYPE +typedef union YYSTYPE YYSTYPE; +union YYSTYPE { - -/* Line 293 of yacc.c */ -#line 121 "harbour.y" +#line 121 "harbour.y" /* yacc.c:355 */ const char * string; /* to hold a string returned by lex */ int iNumber; /* to hold a temporary integer number */ @@ -376,21 +374,20 @@ typedef union YYSTYPE } asCodeblock; PHB_VARTYPE asVarType; - - -/* Line 293 of yacc.c */ -#line 383 "harboury.c" -} YYSTYPE; +#line 378 "harboury.c" /* yacc.c:355 */ +}; # define YYSTYPE_IS_TRIVIAL 1 -# define yystype YYSTYPE /* obsolescent; will be withdrawn */ # define YYSTYPE_IS_DECLARED 1 #endif -/* Copy the second part of user declarations. */ -/* Line 343 of yacc.c */ -#line 160 "harbour.y" +int hb_comp_yyparse (PHB_COMP pComp); + +#endif /* !YY_HB_COMP_YY_HARBOURY_H_INCLUDED */ + +/* Copy the second part of user declarations. */ +#line 160 "harbour.y" /* yacc.c:358 */ /* This must be placed after the above union - the union is * typedef-ined to YYSTYPE @@ -398,9 +395,7 @@ typedef union YYSTYPE extern int yylex( YYSTYPE *, HB_COMP_DECL ); /* main lex token function, called by yyparse() */ extern void yyerror( HB_COMP_DECL, const char * ); /* parsing error management function */ - -/* Line 343 of yacc.c */ -#line 404 "harboury.c" +#line 399 "harboury.c" /* yacc.c:358 */ #ifdef short # undef short @@ -414,11 +409,8 @@ typedef unsigned char yytype_uint8; #ifdef YYTYPE_INT8 typedef YYTYPE_INT8 yytype_int8; -#elif (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -typedef signed char yytype_int8; #else -typedef short int yytype_int8; +typedef signed char yytype_int8; #endif #ifdef YYTYPE_UINT16 @@ -438,8 +430,7 @@ typedef short int yytype_int16; # define YYSIZE_T __SIZE_TYPE__ # elif defined size_t # define YYSIZE_T size_t -# elif ! defined YYSIZE_T && (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) +# elif ! defined YYSIZE_T # include /* INFRINGES ON USER NAME SPACE */ # define YYSIZE_T size_t # else @@ -453,38 +444,67 @@ typedef short int yytype_int16; # if defined YYENABLE_NLS && YYENABLE_NLS # if ENABLE_NLS # include /* INFRINGES ON USER NAME SPACE */ -# define YY_(msgid) dgettext ("bison-runtime", msgid) +# define YY_(Msgid) dgettext ("bison-runtime", Msgid) # endif # endif # ifndef YY_ -# define YY_(msgid) msgid +# define YY_(Msgid) Msgid +# endif +#endif + +#ifndef YY_ATTRIBUTE +# if (defined __GNUC__ \ + && (2 < __GNUC__ || (__GNUC__ == 2 && 96 <= __GNUC_MINOR__))) \ + || defined __SUNPRO_C && 0x5110 <= __SUNPRO_C +# define YY_ATTRIBUTE(Spec) __attribute__(Spec) +# else +# define YY_ATTRIBUTE(Spec) /* empty */ +# endif +#endif + +#ifndef YY_ATTRIBUTE_PURE +# define YY_ATTRIBUTE_PURE YY_ATTRIBUTE ((__pure__)) +#endif + +#ifndef YY_ATTRIBUTE_UNUSED +# define YY_ATTRIBUTE_UNUSED YY_ATTRIBUTE ((__unused__)) +#endif + +#if !defined _Noreturn \ + && (!defined __STDC_VERSION__ || __STDC_VERSION__ < 201112) +# if defined _MSC_VER && 1200 <= _MSC_VER +# define _Noreturn __declspec (noreturn) +# else +# define _Noreturn YY_ATTRIBUTE ((__noreturn__)) # endif #endif /* Suppress unused-variable warnings by "using" E. */ #if ! defined lint || defined __GNUC__ -# define YYUSE(e) ((void) (e)) +# define YYUSE(E) ((void) (E)) #else -# define YYUSE(e) /* empty */ +# define YYUSE(E) /* empty */ #endif -/* Identity function, used to suppress warnings about constant conditions. */ -#ifndef lint -# define YYID(n) (n) +#if defined __GNUC__ && 407 <= __GNUC__ * 100 + __GNUC_MINOR__ +/* Suppress an incorrect diagnostic about yylval being uninitialized. */ +# define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN \ + _Pragma ("GCC diagnostic push") \ + _Pragma ("GCC diagnostic ignored \"-Wuninitialized\"")\ + _Pragma ("GCC diagnostic ignored \"-Wmaybe-uninitialized\"") +# define YY_IGNORE_MAYBE_UNINITIALIZED_END \ + _Pragma ("GCC diagnostic pop") #else -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -static int -YYID (int yyi) -#else -static int -YYID (yyi) - int yyi; +# define YY_INITIAL_VALUE(Value) Value #endif -{ - return yyi; -} +#ifndef YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN +# define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN +# define YY_IGNORE_MAYBE_UNINITIALIZED_END #endif +#ifndef YY_INITIAL_VALUE +# define YY_INITIAL_VALUE(Value) /* Nothing. */ +#endif + #if ! defined yyoverflow || YYERROR_VERBOSE @@ -503,9 +523,9 @@ YYID (yyi) # define alloca _alloca # else # define YYSTACK_ALLOC alloca -# if ! defined _ALLOCA_H && ! defined EXIT_SUCCESS && (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) +# if ! defined _ALLOCA_H && ! defined EXIT_SUCCESS # include /* INFRINGES ON USER NAME SPACE */ + /* Use EXIT_SUCCESS as a witness for stdlib.h. */ # ifndef EXIT_SUCCESS # define EXIT_SUCCESS 0 # endif @@ -515,8 +535,8 @@ YYID (yyi) # endif # ifdef YYSTACK_ALLOC - /* Pacify GCC's `empty if-body' warning. */ -# define YYSTACK_FREE(Ptr) do { /* empty */; } while (YYID (0)) + /* Pacify GCC's 'empty if-body' warning. */ +# define YYSTACK_FREE(Ptr) do { /* empty */; } while (0) # ifndef YYSTACK_ALLOC_MAXIMUM /* The OS might guarantee only one guard page at the bottom of the stack, and a page size can be as small as 4096 bytes. So we cannot safely @@ -532,7 +552,7 @@ YYID (yyi) # endif # if (defined __cplusplus && ! defined EXIT_SUCCESS \ && ! ((defined YYMALLOC || defined malloc) \ - && (defined YYFREE || defined free))) + && (defined YYFREE || defined free))) # include /* INFRINGES ON USER NAME SPACE */ # ifndef EXIT_SUCCESS # define EXIT_SUCCESS 0 @@ -540,15 +560,13 @@ YYID (yyi) # endif # ifndef YYMALLOC # define YYMALLOC malloc -# if ! defined malloc && ! defined EXIT_SUCCESS && (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) +# if ! defined malloc && ! defined EXIT_SUCCESS void *malloc (YYSIZE_T); /* INFRINGES ON USER NAME SPACE */ # endif # endif # ifndef YYFREE # define YYFREE free -# if ! defined free && ! defined EXIT_SUCCESS && (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) +# if ! defined free && ! defined EXIT_SUCCESS void free (void *); /* INFRINGES ON USER NAME SPACE */ # endif # endif @@ -558,7 +576,7 @@ void free (void *); /* INFRINGES ON USER NAME SPACE */ #if (! defined yyoverflow \ && (! defined __cplusplus \ - || (defined YYSTYPE_IS_TRIVIAL && YYSTYPE_IS_TRIVIAL))) + || (defined YYSTYPE_IS_TRIVIAL && YYSTYPE_IS_TRIVIAL))) /* A type that is properly aligned for any stack member. */ union yyalloc @@ -583,35 +601,35 @@ union yyalloc elements in the stack, and YYPTR gives the new location of the stack. Advance YYPTR to a properly aligned location for the next stack. */ -# define YYSTACK_RELOCATE(Stack_alloc, Stack) \ - do \ - { \ - YYSIZE_T yynewbytes; \ - YYCOPY (&yyptr->Stack_alloc, Stack, yysize); \ - Stack = &yyptr->Stack_alloc; \ - yynewbytes = yystacksize * sizeof (*Stack) + YYSTACK_GAP_MAXIMUM; \ - yyptr += yynewbytes / sizeof (*yyptr); \ - } \ - while (YYID (0)) +# define YYSTACK_RELOCATE(Stack_alloc, Stack) \ + do \ + { \ + YYSIZE_T yynewbytes; \ + YYCOPY (&yyptr->Stack_alloc, Stack, yysize); \ + Stack = &yyptr->Stack_alloc; \ + yynewbytes = yystacksize * sizeof (*Stack) + YYSTACK_GAP_MAXIMUM; \ + yyptr += yynewbytes / sizeof (*yyptr); \ + } \ + while (0) #endif #if defined YYCOPY_NEEDED && YYCOPY_NEEDED -/* Copy COUNT objects from FROM to TO. The source and destination do +/* Copy COUNT objects from SRC to DST. The source and destination do not overlap. */ # ifndef YYCOPY # if defined __GNUC__ && 1 < __GNUC__ -# define YYCOPY(To, From, Count) \ - __builtin_memcpy (To, From, (Count) * sizeof (*(From))) +# define YYCOPY(Dst, Src, Count) \ + __builtin_memcpy (Dst, Src, (Count) * sizeof (*(Src))) # else -# define YYCOPY(To, From, Count) \ - do \ - { \ - YYSIZE_T yyi; \ - for (yyi = 0; yyi < (Count); yyi++) \ - (To)[yyi] = (From)[yyi]; \ - } \ - while (YYID (0)) +# define YYCOPY(Dst, Src, Count) \ + do \ + { \ + YYSIZE_T yyi; \ + for (yyi = 0; yyi < (Count); yyi++) \ + (Dst)[yyi] = (Src)[yyi]; \ + } \ + while (0) # endif # endif #endif /* !YYCOPY_NEEDED */ @@ -627,17 +645,19 @@ union yyalloc #define YYNNTS 242 /* YYNRULES -- Number of rules. */ #define YYNRULES 613 -/* YYNRULES -- Number of states. */ +/* YYNSTATES -- Number of states. */ #define YYNSTATES 956 -/* YYTRANSLATE(YYLEX) -- Bison symbol number corresponding to YYLEX. */ +/* YYTRANSLATE[YYX] -- Symbol number corresponding to YYX as returned + by yylex, with out-of-bounds checking. */ #define YYUNDEFTOK 2 #define YYMAXUTOK 366 -#define YYTRANSLATE(YYX) \ +#define YYTRANSLATE(YYX) \ ((unsigned int) (YYX) <= YYMAXUTOK ? yytranslate[YYX] : YYUNDEFTOK) -/* YYTRANSLATE[YYLEX] -- Bison symbol number corresponding to YYLEX. */ +/* YYTRANSLATE[TOKEN-NUM] -- Symbol number corresponding to TOKEN-NUM + as returned by yylex, without out-of-bounds checking. */ static const yytype_uint8 yytranslate[] = { 0, 2, 2, 2, 2, 2, 2, 2, 2, 2, @@ -680,258 +700,7 @@ static const yytype_uint8 yytranslate[] = }; #if YYDEBUG -/* YYPRHS[YYN] -- Index of the first RHS symbol of rule number YYN in - YYRHS. */ -static const yytype_uint16 yyprhs[] = -{ - 0, 0, 3, 5, 6, 8, 10, 12, 14, 16, - 19, 22, 25, 28, 31, 34, 38, 42, 47, 54, - 55, 61, 62, 68, 69, 78, 79, 88, 89, 91, - 93, 95, 96, 98, 100, 104, 105, 107, 108, 110, - 112, 114, 116, 118, 120, 122, 125, 127, 129, 131, - 133, 135, 137, 139, 141, 143, 145, 148, 151, 156, - 159, 162, 165, 168, 171, 174, 177, 180, 183, 186, - 189, 192, 195, 198, 199, 204, 207, 210, 213, 214, - 219, 220, 221, 227, 228, 229, 235, 237, 239, 241, - 245, 249, 250, 255, 260, 262, 266, 267, 270, 272, - 274, 276, 278, 280, 282, 287, 295, 300, 308, 309, - 311, 313, 315, 317, 320, 321, 323, 325, 329, 331, - 335, 337, 339, 341, 343, 345, 347, 349, 351, 353, - 355, 357, 359, 361, 363, 365, 367, 369, 371, 373, - 375, 377, 379, 381, 384, 387, 389, 392, 394, 397, - 400, 402, 404, 407, 409, 412, 416, 419, 422, 425, - 429, 433, 436, 440, 446, 448, 451, 453, 455, 458, - 461, 464, 466, 468, 471, 475, 478, 481, 484, 487, - 490, 493, 496, 499, 502, 505, 508, 511, 514, 517, - 519, 521, 524, 527, 530, 533, 536, 539, 542, 545, - 548, 551, 554, 557, 560, 563, 566, 569, 572, 575, - 578, 581, 584, 587, 590, 593, 596, 599, 602, 605, - 608, 611, 614, 617, 620, 623, 626, 629, 632, 635, - 638, 641, 644, 647, 650, 653, 656, 661, 663, 668, - 671, 674, 676, 680, 682, 684, 687, 690, 693, 696, - 699, 701, 703, 707, 711, 714, 716, 718, 723, 726, - 731, 734, 736, 738, 740, 742, 744, 746, 748, 750, - 753, 755, 757, 759, 761, 763, 765, 767, 769, 771, - 774, 776, 778, 781, 783, 786, 788, 790, 792, 794, - 796, 798, 800, 802, 804, 806, 808, 811, 814, 816, - 818, 820, 821, 823, 825, 827, 829, 831, 833, 835, - 837, 839, 841, 843, 845, 847, 849, 851, 853, 855, - 857, 859, 861, 863, 865, 867, 869, 871, 873, 875, - 877, 879, 881, 883, 886, 889, 892, 895, 898, 901, - 905, 909, 913, 917, 921, 925, 929, 933, 935, 937, - 939, 941, 943, 945, 949, 953, 957, 961, 965, 969, - 973, 977, 981, 985, 989, 993, 997, 1001, 1005, 1009, - 1013, 1016, 1019, 1023, 1028, 1030, 1034, 1035, 1040, 1041, - 1043, 1045, 1049, 1052, 1057, 1059, 1063, 1064, 1065, 1071, - 1072, 1078, 1080, 1084, 1088, 1091, 1100, 1103, 1104, 1109, - 1110, 1115, 1116, 1122, 1123, 1128, 1130, 1134, 1136, 1140, - 1142, 1145, 1150, 1154, 1157, 1158, 1164, 1168, 1171, 1174, - 1178, 1183, 1184, 1190, 1193, 1198, 1199, 1202, 1203, 1208, - 1211, 1216, 1217, 1226, 1227, 1233, 1237, 1242, 1246, 1247, - 1255, 1257, 1261, 1263, 1266, 1268, 1271, 1272, 1279, 1280, - 1284, 1285, 1287, 1289, 1293, 1294, 1296, 1298, 1300, 1304, - 1308, 1314, 1316, 1320, 1322, 1325, 1329, 1335, 1340, 1346, - 1354, 1358, 1363, 1370, 1376, 1383, 1392, 1394, 1396, 1398, - 1400, 1402, 1404, 1406, 1408, 1411, 1415, 1419, 1424, 1425, - 1426, 1433, 1434, 1439, 1440, 1441, 1448, 1449, 1450, 1458, - 1460, 1462, 1464, 1468, 1472, 1475, 1480, 1482, 1484, 1486, - 1487, 1491, 1493, 1496, 1497, 1498, 1505, 1506, 1507, 1515, - 1516, 1517, 1523, 1524, 1530, 1531, 1532, 1540, 1542, 1544, - 1546, 1548, 1549, 1550, 1551, 1564, 1566, 1568, 1569, 1572, - 1575, 1577, 1580, 1582, 1585, 1587, 1589, 1591, 1595, 1598, - 1600, 1602, 1606, 1607, 1608, 1609, 1620, 1621, 1623, 1624, - 1629, 1632, 1634, 1636, 1638, 1639, 1644, 1646, 1649, 1650, - 1656, 1657, 1664, 1666, 1669, 1670, 1671, 1677, 1678, 1679, - 1680, 1681, 1693, 1695, 1697, 1698, 1701, 1702, 1706, 1708, - 1709, 1713, 1717, 1719, 1722, 1726, 1729, 1730, 1733, 1735, - 1738, 1740, 1743, 1747, 1749, 1751, 1753, 1755, 1757, 1758, - 1765, 1767, 1769, 1771 -}; - -/* YYRHS -- A `-1'-separated list of the rules' RHS. */ -static const yytype_int16 yyrhs[] = -{ - 135, 0, -1, 136, -1, -1, 375, -1, 275, -1, - 138, -1, 150, -1, 137, -1, 1, 375, -1, 136, - 375, -1, 136, 275, -1, 136, 138, -1, 136, 150, - -1, 136, 137, -1, 136, 1, 375, -1, 71, 10, - 375, -1, 71, 10, 19, 375, -1, 71, 10, 19, - 122, 19, 375, -1, -1, 143, 3, 168, 139, 375, - -1, -1, 143, 4, 168, 140, 375, -1, -1, 143, - 3, 168, 141, 126, 144, 127, 375, -1, -1, 143, - 4, 168, 142, 126, 144, 127, 375, -1, -1, 12, - -1, 25, -1, 26, -1, -1, 106, -1, 149, -1, - 149, 125, 106, -1, -1, 147, -1, -1, 148, -1, - 80, -1, 76, -1, 78, -1, 79, -1, 75, -1, - 81, -1, 77, 168, -1, 82, -1, 148, -1, 74, - -1, 93, -1, 89, -1, 91, -1, 92, -1, 87, - -1, 88, -1, 94, -1, 90, 168, -1, 168, 145, - -1, 149, 125, 168, 145, -1, 291, 159, -1, 254, - 159, -1, 204, 159, -1, 200, 159, -1, 215, 159, - -1, 195, 159, -1, 252, 159, -1, 225, 159, -1, - 224, 159, -1, 235, 159, -1, 227, 159, -1, 228, - 159, -1, 368, 159, -1, 63, 159, -1, -1, 63, - 151, 218, 375, -1, 26, 159, -1, 44, 159, -1, - 6, 159, -1, -1, 6, 152, 218, 375, -1, -1, - -1, 30, 153, 262, 154, 375, -1, -1, -1, 61, - 155, 262, 156, 375, -1, 256, -1, 268, -1, 272, - -1, 23, 166, 375, -1, 24, 167, 375, -1, -1, - 22, 168, 157, 375, -1, 95, 158, 127, 375, -1, - 19, -1, 19, 114, 19, -1, -1, 160, 375, -1, - 375, -1, 150, -1, 275, -1, 137, -1, 162, -1, - 1, -1, 163, 3, 168, 375, -1, 163, 3, 168, - 126, 144, 127, 375, -1, 163, 4, 168, 375, -1, - 163, 4, 168, 126, 144, 127, 375, -1, -1, 12, - -1, 25, -1, 26, -1, 161, -1, 164, 161, -1, - -1, 164, -1, 168, -1, 166, 125, 168, -1, 168, - -1, 167, 125, 168, -1, 5, -1, 48, -1, 47, - -1, 44, -1, 26, -1, 52, -1, 84, -1, 23, - -1, 24, -1, 22, -1, 11, -1, 42, -1, 12, - -1, 61, -1, 30, -1, 53, -1, 95, -1, 99, - -1, 108, -1, 8, -1, 10, -1, 104, -1, 105, - -1, 10, 36, -1, 8, 36, -1, 7, -1, 173, - 36, -1, 19, -1, 175, 36, -1, 247, 36, -1, - 20, -1, 21, -1, 178, 36, -1, 70, -1, 180, - 36, -1, 128, 241, 129, -1, 182, 36, -1, 182, - 239, -1, 184, 36, -1, 128, 107, 129, -1, 128, - 188, 129, -1, 186, 36, -1, 218, 107, 220, -1, - 188, 125, 218, 107, 220, -1, 168, -1, 168, 36, - -1, 72, -1, 73, -1, 191, 36, -1, 121, 252, - -1, 193, 36, -1, 191, -1, 193, -1, 51, 36, - -1, 51, 36, 196, -1, 196, 190, -1, 196, 172, - -1, 196, 253, -1, 196, 192, -1, 196, 194, -1, - 196, 174, -1, 196, 176, -1, 196, 179, -1, 196, - 177, -1, 196, 181, -1, 196, 183, -1, 196, 185, - -1, 196, 187, -1, 196, 255, -1, 168, -1, 195, - -1, 172, 198, -1, 192, 198, -1, 194, 198, -1, - 253, 198, -1, 174, 198, -1, 176, 198, -1, 179, - 198, -1, 177, 198, -1, 187, 198, -1, 181, 198, - -1, 183, 198, -1, 185, 198, -1, 202, 198, -1, - 255, 198, -1, 206, 198, -1, 214, 198, -1, 216, - 198, -1, 190, 198, -1, 196, 198, -1, 197, 198, - -1, 172, 252, -1, 190, 252, -1, 192, 252, -1, - 194, 252, -1, 253, 252, -1, 196, 252, -1, 169, - 239, -1, 173, 239, -1, 170, 239, -1, 171, 239, - -1, 175, 239, -1, 247, 239, -1, 178, 239, -1, - 186, 239, -1, 180, 239, -1, 189, 239, -1, 199, - 239, -1, 200, 239, -1, 195, 239, -1, 211, 239, - -1, 215, 239, -1, 204, 239, -1, 254, 239, -1, - 252, 239, -1, 201, 36, -1, 168, 126, 207, 127, - -1, 203, -1, 195, 126, 207, 127, -1, 122, 203, - -1, 204, 36, -1, 210, -1, 207, 125, 210, -1, - 220, -1, 209, -1, 122, 168, -1, 122, 191, -1, - 122, 199, -1, 122, 211, -1, 122, 201, -1, 106, - -1, 208, -1, 222, 130, 212, -1, 213, 130, 212, - -1, 130, 212, -1, 168, -1, 195, -1, 126, 122, - 168, 127, -1, 211, 36, -1, 211, 126, 207, 127, - -1, 215, 36, -1, 169, -1, 173, -1, 170, -1, - 171, -1, 175, -1, 247, -1, 178, -1, 180, -1, - 180, 147, -1, 182, -1, 184, -1, 186, -1, 199, - -1, 200, -1, 191, -1, 193, -1, 201, -1, 204, - -1, 204, 147, -1, 254, -1, 211, -1, 211, 147, - -1, 215, -1, 215, 147, -1, 228, -1, 235, -1, - 224, -1, 225, -1, 226, -1, 236, -1, 237, -1, - 238, -1, 217, -1, 189, -1, 252, -1, 189, 147, - -1, 252, 147, -1, 205, -1, 106, -1, 218, -1, - -1, 218, -1, 168, -1, 199, -1, 191, -1, 193, - -1, 211, -1, 201, -1, 252, -1, 169, -1, 173, - -1, 170, -1, 171, -1, 175, -1, 247, -1, 178, - -1, 180, -1, 182, -1, 184, -1, 186, -1, 199, - -1, 200, -1, 195, -1, 189, -1, 201, -1, 252, - -1, 204, -1, 254, -1, 211, -1, 215, -1, 34, - -1, 35, -1, 222, 223, -1, 34, 218, -1, 35, - 218, -1, 29, 218, -1, 115, 218, -1, 114, 218, - -1, 222, 110, 218, -1, 222, 9, 218, -1, 222, - 54, 218, -1, 222, 55, 218, -1, 222, 56, 218, - -1, 222, 57, 218, -1, 222, 60, 218, -1, 222, - 59, 218, -1, 229, -1, 230, -1, 231, -1, 232, - -1, 233, -1, 234, -1, 218, 114, 218, -1, 218, - 115, 218, -1, 218, 116, 218, -1, 218, 117, 218, - -1, 218, 118, 218, -1, 218, 58, 218, -1, 218, - 27, 218, -1, 218, 28, 218, -1, 218, 31, 218, - -1, 218, 111, 218, -1, 218, 112, 218, -1, 218, - 49, 218, -1, 218, 50, 218, -1, 218, 32, 218, - -1, 218, 33, 218, -1, 218, 113, 218, -1, 218, - 110, 218, -1, 240, 131, -1, 132, 219, -1, 240, - 125, 219, -1, 240, 131, 132, 219, -1, 210, -1, - 241, 125, 210, -1, -1, 96, 243, 244, 133, -1, - -1, 106, -1, 245, -1, 245, 125, 106, -1, 168, - 145, -1, 245, 125, 168, 145, -1, 218, -1, 246, - 125, 218, -1, -1, -1, 242, 248, 246, 249, 129, - -1, -1, 242, 375, 250, 165, 129, -1, 218, -1, - 251, 125, 218, -1, 126, 251, 127, -1, 252, 36, - -1, 13, 126, 218, 125, 208, 125, 208, 127, -1, - 254, 36, -1, -1, 11, 257, 261, 375, -1, -1, - 12, 258, 261, 375, -1, -1, 108, 12, 259, 261, - 375, -1, -1, 53, 260, 274, 375, -1, 264, -1, - 261, 125, 264, -1, 263, -1, 262, 125, 263, -1, - 264, -1, 191, 145, -1, 191, 145, 9, 218, -1, - 191, 266, 146, -1, 168, 145, -1, -1, 168, 145, - 265, 9, 218, -1, 168, 266, 146, -1, 267, 131, - -1, 132, 218, -1, 267, 125, 218, -1, 267, 131, - 132, 218, -1, -1, 51, 269, 270, 271, 375, -1, - 168, 145, -1, 270, 125, 168, 145, -1, -1, 52, - 168, -1, -1, 42, 273, 274, 375, -1, 168, 145, - -1, 274, 125, 168, 145, -1, -1, 83, 168, 126, - 276, 285, 127, 145, 375, -1, -1, 83, 168, 277, - 280, 375, -1, 85, 168, 375, -1, 85, 168, 168, - 375, -1, 86, 281, 375, -1, -1, 86, 128, 145, - 278, 279, 129, 375, -1, 283, -1, 279, 125, 283, - -1, 281, -1, 280, 281, -1, 283, -1, 280, 283, - -1, -1, 168, 126, 282, 286, 127, 145, -1, -1, - 168, 284, 145, -1, -1, 289, -1, 290, -1, 289, - 125, 290, -1, -1, 289, -1, 290, -1, 106, -1, - 289, 125, 106, -1, 289, 125, 290, -1, 289, 125, - 290, 125, 106, -1, 288, -1, 287, 125, 288, -1, - 220, -1, 168, 145, -1, 122, 168, 145, -1, 122, - 168, 126, 287, 127, -1, 289, 125, 168, 145, -1, - 289, 125, 122, 168, 145, -1, 289, 125, 122, 168, - 126, 287, 127, -1, 84, 168, 145, -1, 84, 122, - 168, 145, -1, 84, 122, 168, 126, 287, 127, -1, - 290, 125, 84, 168, 145, -1, 290, 125, 84, 122, - 168, 145, -1, 290, 125, 84, 122, 168, 126, 287, - 127, -1, 292, -1, 305, -1, 320, -1, 326, -1, - 356, -1, 338, -1, 343, -1, 372, -1, 293, 303, - -1, 293, 296, 303, -1, 293, 298, 303, -1, 293, - 298, 296, 303, -1, -1, -1, 14, 251, 294, 375, - 295, 165, -1, -1, 15, 375, 297, 165, -1, -1, - -1, 16, 299, 251, 375, 300, 165, -1, -1, -1, - 298, 16, 301, 251, 375, 302, 165, -1, 304, -1, - 18, -1, 17, -1, 310, 311, 306, -1, 310, 316, - 306, -1, 310, 306, -1, 310, 311, 316, 306, -1, - 307, -1, 40, -1, 17, -1, -1, 37, 309, 375, - -1, 308, -1, 308, 164, -1, -1, -1, 38, 312, - 251, 375, 313, 165, -1, -1, -1, 311, 38, 314, - 251, 375, 315, 165, -1, -1, -1, 39, 317, 375, - 318, 165, -1, -1, 316, 39, 319, 375, 165, -1, - -1, -1, 323, 251, 375, 321, 165, 322, 324, -1, - 43, -1, 325, -1, 41, -1, 17, -1, -1, -1, - -1, 45, 221, 330, 218, 327, 47, 251, 331, 328, - 375, 329, 332, -1, 110, -1, 9, -1, -1, 48, - 251, -1, 165, 333, -1, 46, -1, 46, 168, -1, - 17, -1, 17, 168, -1, 168, -1, 199, -1, 334, - -1, 335, 125, 334, -1, 122, 168, -1, 218, -1, - 336, -1, 337, 125, 336, -1, -1, -1, -1, 98, - 335, 52, 337, 339, 342, 340, 375, 341, 332, -1, - -1, 99, -1, -1, 349, 344, 350, 345, -1, 349, - 345, -1, 346, -1, 101, -1, 17, -1, -1, 100, - 348, 218, 375, -1, 347, -1, 347, 164, -1, -1, - 38, 218, 351, 375, 165, -1, -1, 350, 38, 218, - 352, 375, 165, -1, 353, -1, 350, 353, -1, -1, - -1, 39, 354, 375, 355, 165, -1, -1, -1, -1, - -1, 62, 357, 362, 375, 165, 358, 365, 359, 363, - 360, 361, -1, 67, -1, 17, -1, -1, 69, 218, - -1, -1, 364, 375, 165, -1, 66, -1, -1, 366, - 375, 165, -1, 367, 375, 165, -1, 64, -1, 65, - 168, -1, 68, 195, 369, -1, 97, 369, -1, -1, - 69, 370, -1, 125, -1, 125, 371, -1, 371, -1, - 370, 125, -1, 370, 125, 371, -1, 168, -1, 209, - -1, 205, -1, 217, -1, 252, -1, -1, 102, 218, - 375, 373, 165, 374, -1, 103, -1, 17, -1, 123, - -1, 124, -1 -}; - -/* YYRLINE[YYN] -- source line where rule number YYN was defined. */ + /* YYRLINE[YYN] -- Source line where rule number YYN was defined. */ static const yytype_uint16 yyrline[] = { 0, 287, 287, 288, 291, 292, 293, 294, 295, 296, @@ -999,7 +768,7 @@ static const yytype_uint16 yyrline[] = }; #endif -#if YYDEBUG || YYERROR_VERBOSE || YYTOKEN_TABLE +#if YYDEBUG || YYERROR_VERBOSE || 0 /* YYTNAME[SYMBOL-NUM] -- String name of the symbol SYMBOL-NUM. First, the terminals, then, starting at YYNTOKENS, nonterminals. */ static const char *const yytname[] = @@ -1065,13 +834,13 @@ static const char *const yytname[] = "$@56", "$@57", "BeginSeq", "@58", "@59", "$@60", "$@61", "EndSeqID", "BlockSeq", "AlwaysSeq", "Always", "RecoverSeq", "RecoverEmpty", "RecoverUsing", "DoProc", "DoArgs", "DoArgList", "DoArgument", - "WithObject", "@62", "EndWithID", "Crlf", 0 + "WithObject", "@62", "EndWithID", "Crlf", YY_NULLPTR }; #endif # ifdef YYPRINT -/* YYTOKNUM[YYLEX-NUM] -- Internal token number corresponding to - token YYLEX-NUM. */ +/* YYTOKNUM[NUM] -- (External) token number corresponding to the + (internal) symbol number NUM (which must be that of a token). */ static const yytype_uint16 yytoknum[] = { 0, 256, 257, 258, 259, 260, 261, 262, 263, 264, @@ -1091,276 +860,18 @@ static const yytype_uint16 yytoknum[] = }; # endif -/* YYR1[YYN] -- Symbol number of symbol that rule YYN derives. */ -static const yytype_uint16 yyr1[] = -{ - 0, 134, 135, 135, 136, 136, 136, 136, 136, 136, - 136, 136, 136, 136, 136, 136, 137, 137, 137, 139, - 138, 140, 138, 141, 138, 142, 138, 143, 143, 143, - 143, 144, 144, 144, 144, 145, 145, 146, 146, 147, - 147, 147, 147, 147, 147, 147, 147, 147, 148, 148, - 148, 148, 148, 148, 148, 148, 148, 149, 149, 150, - 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, - 150, 150, 150, 151, 150, 150, 150, 150, 152, 150, - 153, 154, 150, 155, 156, 150, 150, 150, 150, 150, - 150, 157, 150, 150, 158, 158, 160, 159, 161, 161, - 161, 161, 161, 161, 162, 162, 162, 162, 163, 163, - 163, 163, 164, 164, 165, 165, 166, 166, 167, 167, - 168, 168, 168, 168, 168, 168, 168, 168, 168, 168, - 168, 168, 168, 168, 168, 168, 168, 168, 168, 169, - 169, 170, 171, 172, 172, 173, 174, 175, 176, 177, - 178, 178, 179, 180, 181, 182, 183, 184, 185, 186, - 186, 187, 188, 188, 189, 190, 191, 191, 192, 193, - 194, 195, 195, 196, 196, 197, 197, 197, 197, 197, - 197, 197, 197, 197, 197, 197, 197, 197, 197, 198, - 198, 199, 199, 199, 199, 199, 199, 199, 199, 199, - 199, 199, 199, 199, 199, 199, 199, 199, 199, 199, - 199, 200, 200, 200, 200, 200, 200, 201, 201, 201, - 201, 201, 201, 201, 201, 201, 201, 201, 201, 201, - 201, 201, 201, 201, 201, 202, 203, 204, 204, 205, - 206, 207, 207, 208, 208, 209, 209, 209, 209, 209, - 210, 210, 211, 211, 211, 212, 212, 213, 214, 215, - 216, 217, 217, 217, 217, 217, 217, 217, 217, 217, - 217, 217, 217, 217, 217, 217, 217, 217, 217, 217, - 217, 217, 217, 217, 217, 217, 217, 217, 217, 217, - 217, 217, 217, 218, 218, 218, 218, 218, 218, 219, - 219, 220, 220, 221, 221, 221, 221, 221, 221, 221, - 222, 222, 222, 222, 222, 222, 222, 222, 222, 222, - 222, 222, 222, 222, 222, 222, 222, 222, 222, 222, - 222, 223, 223, 224, 225, 225, 226, 226, 226, 227, - 228, 229, 230, 231, 232, 233, 234, 235, 235, 235, - 235, 235, 235, 236, 236, 236, 236, 236, 236, 237, - 237, 238, 238, 238, 238, 238, 238, 238, 238, 238, - 239, 240, 240, 240, 241, 241, 243, 242, 244, 244, - 244, 244, 245, 245, 246, 246, 248, 249, 247, 250, - 247, 251, 251, 252, 253, 254, 255, 257, 256, 258, - 256, 259, 256, 260, 256, 261, 261, 262, 262, 263, - 263, 263, 263, 264, 265, 264, 264, 266, 267, 267, - 267, 269, 268, 270, 270, 271, 271, 273, 272, 274, - 274, 276, 275, 277, 275, 275, 275, 275, 278, 275, - 279, 279, 280, 280, 280, 280, 282, 281, 284, 283, - 285, 285, 285, 285, 286, 286, 286, 286, 286, 286, - 286, 287, 287, 288, 289, 289, 289, 289, 289, 289, - 290, 290, 290, 290, 290, 290, 291, 291, 291, 291, - 291, 291, 291, 291, 292, 292, 292, 292, 294, 295, - 293, 297, 296, 299, 300, 298, 301, 302, 298, 303, - 304, 304, 305, 305, 305, 305, 306, 307, 307, 309, - 308, 310, 310, 312, 313, 311, 314, 315, 311, 317, - 318, 316, 319, 316, 321, 322, 320, 323, 324, 325, - 325, 327, 328, 329, 326, 330, 330, 331, 331, 332, - 333, 333, 333, 333, 334, 334, 335, 335, 336, 336, - 337, 337, 339, 340, 341, 338, 342, 342, 344, 343, - 343, 345, 346, 346, 348, 347, 349, 349, 351, 350, - 352, 350, 350, 350, 354, 355, 353, 357, 358, 359, - 360, 356, 361, 361, 362, 362, 363, 363, 364, 365, - 365, 365, 366, 367, 368, 368, 369, 369, 370, 370, - 370, 370, 370, 371, 371, 371, 371, 371, 373, 372, - 374, 374, 375, 375 -}; - -/* YYR2[YYN] -- Number of symbols composing right hand side of rule YYN. */ -static const yytype_uint8 yyr2[] = -{ - 0, 2, 1, 0, 1, 1, 1, 1, 1, 2, - 2, 2, 2, 2, 2, 3, 3, 4, 6, 0, - 5, 0, 5, 0, 8, 0, 8, 0, 1, 1, - 1, 0, 1, 1, 3, 0, 1, 0, 1, 1, - 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 2, 2, 4, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 0, 4, 2, 2, 2, 0, 4, - 0, 0, 5, 0, 0, 5, 1, 1, 1, 3, - 3, 0, 4, 4, 1, 3, 0, 2, 1, 1, - 1, 1, 1, 1, 4, 7, 4, 7, 0, 1, - 1, 1, 1, 2, 0, 1, 1, 3, 1, 3, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 2, 2, 1, 2, 1, 2, 2, - 1, 1, 2, 1, 2, 3, 2, 2, 2, 3, - 3, 2, 3, 5, 1, 2, 1, 1, 2, 2, - 2, 1, 1, 2, 3, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 1, - 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 4, 1, 4, 2, - 2, 1, 3, 1, 1, 2, 2, 2, 2, 2, - 1, 1, 3, 3, 2, 1, 1, 4, 2, 4, - 2, 1, 1, 1, 1, 1, 1, 1, 1, 2, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, - 1, 1, 2, 1, 2, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 2, 2, 1, 1, - 1, 0, 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, 2, 2, 2, 2, 2, 2, 3, - 3, 3, 3, 3, 3, 3, 3, 1, 1, 1, - 1, 1, 1, 3, 3, 3, 3, 3, 3, 3, - 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, - 2, 2, 3, 4, 1, 3, 0, 4, 0, 1, - 1, 3, 2, 4, 1, 3, 0, 0, 5, 0, - 5, 1, 3, 3, 2, 8, 2, 0, 4, 0, - 4, 0, 5, 0, 4, 1, 3, 1, 3, 1, - 2, 4, 3, 2, 0, 5, 3, 2, 2, 3, - 4, 0, 5, 2, 4, 0, 2, 0, 4, 2, - 4, 0, 8, 0, 5, 3, 4, 3, 0, 7, - 1, 3, 1, 2, 1, 2, 0, 6, 0, 3, - 0, 1, 1, 3, 0, 1, 1, 1, 3, 3, - 5, 1, 3, 1, 2, 3, 5, 4, 5, 7, - 3, 4, 6, 5, 6, 8, 1, 1, 1, 1, - 1, 1, 1, 1, 2, 3, 3, 4, 0, 0, - 6, 0, 4, 0, 0, 6, 0, 0, 7, 1, - 1, 1, 3, 3, 2, 4, 1, 1, 1, 0, - 3, 1, 2, 0, 0, 6, 0, 0, 7, 0, - 0, 5, 0, 5, 0, 0, 7, 1, 1, 1, - 1, 0, 0, 0, 12, 1, 1, 0, 2, 2, - 1, 2, 1, 2, 1, 1, 1, 3, 2, 1, - 1, 3, 0, 0, 0, 10, 0, 1, 0, 4, - 2, 1, 1, 1, 0, 4, 1, 2, 0, 5, - 0, 6, 1, 2, 0, 0, 5, 0, 0, 0, - 0, 11, 1, 1, 0, 2, 0, 3, 1, 0, - 3, 3, 1, 2, 3, 2, 0, 2, 1, 2, - 1, 2, 3, 1, 1, 1, 1, 1, 0, 6, - 1, 1, 1, 1 -}; - -/* YYDEFACT[STATE-NAME] -- Default reduction number in state STATE-NUM. - Performed when YYTABLE doesn't specify something else to do. Zero - means the default is an error. */ -static const yytype_uint16 yydefact[] = -{ - 0, 0, 120, 78, 145, 139, 140, 397, 399, 0, - 0, 147, 150, 151, 129, 127, 128, 29, 124, 80, - 0, 0, 509, 427, 527, 123, 0, 122, 121, 421, - 125, 403, 83, 577, 73, 0, 153, 0, 166, 167, - 0, 126, 0, 0, 136, 376, 596, 0, 137, 564, - 0, 141, 142, 138, 0, 612, 613, 0, 301, 0, - 0, 0, 8, 6, 0, 7, 164, 310, 312, 313, - 0, 311, 0, 314, 0, 0, 316, 0, 317, 0, - 318, 0, 319, 0, 320, 0, 324, 0, 171, 0, - 172, 0, 323, 0, 0, 321, 322, 325, 0, 237, - 327, 0, 329, 0, 0, 330, 0, 0, 96, 96, - 96, 96, 347, 348, 349, 350, 351, 352, 96, 386, - 315, 326, 0, 328, 0, 86, 87, 88, 5, 96, - 476, 0, 477, 0, 0, 478, 0, 479, 481, 482, - 0, 558, 480, 96, 483, 4, 9, 0, 77, 0, - 144, 143, 0, 0, 0, 130, 132, 129, 127, 128, - 124, 0, 134, 131, 123, 0, 135, 133, 136, 138, - 0, 0, 0, 261, 263, 264, 262, 265, 267, 268, - 270, 271, 272, 294, 275, 276, 323, 273, 274, 277, - 278, 298, 281, 283, 293, 391, 0, 287, 288, 289, - 285, 286, 290, 291, 292, 266, 488, 295, 280, 91, - 0, 116, 0, 118, 75, 0, 334, 335, 0, 0, - 76, 164, 171, 172, 304, 322, 308, 327, 307, 330, - 0, 0, 309, 328, 173, 0, 0, 0, 584, 0, - 72, 171, 172, 596, 0, 433, 0, 35, 0, 0, - 94, 0, 378, 0, 595, 164, 545, 326, 546, 0, - 0, 0, 401, 0, 169, 0, 0, 250, 0, 0, - 0, 251, 244, 374, 302, 243, 0, 255, 256, 254, - 1, 0, 14, 12, 13, 11, 10, 0, 0, 165, - 301, 0, 217, 0, 219, 220, 189, 190, 191, 211, - 146, 218, 195, 148, 221, 196, 198, 152, 223, 197, - 154, 225, 200, 156, 157, 201, 158, 202, 161, 224, - 199, 226, 208, 212, 168, 192, 213, 170, 193, 214, - 301, 64, 229, 0, 0, 189, 176, 0, 180, 0, - 181, 183, 0, 182, 0, 184, 0, 185, 0, 186, - 0, 187, 175, 178, 179, 209, 0, 216, 177, 0, - 188, 210, 227, 62, 228, 235, 203, 240, 61, 232, - 205, 258, 301, 230, 0, 206, 260, 63, 231, 207, - 0, 331, 332, 0, 0, 0, 0, 0, 0, 0, - 0, 333, 67, 66, 69, 70, 68, 0, 389, 149, - 222, 394, 65, 234, 194, 215, 396, 60, 233, 204, - 59, 0, 493, 501, 500, 0, 0, 484, 499, 103, - 399, 110, 124, 101, 99, 112, 102, 0, 0, 100, - 98, 508, 513, 519, 507, 504, 506, 0, 0, 0, - 0, 563, 562, 0, 560, 561, 71, 0, 97, 35, - 0, 405, 0, 0, 336, 338, 337, 0, 239, 48, - 43, 40, 0, 41, 42, 39, 44, 46, 53, 54, - 50, 0, 51, 52, 49, 55, 269, 47, 296, 279, - 282, 284, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 297, 0, 0, 89, 0, 90, 35, 81, 407, - 409, 510, 35, 0, 536, 535, 0, 174, 35, 425, - 0, 84, 0, 0, 0, 594, 0, 16, 431, 0, - 0, 435, 438, 36, 446, 437, 0, 0, 379, 35, - 0, 380, 598, 164, 298, 604, 293, 0, 295, 597, - 600, 0, 0, 0, 608, 0, 0, 393, 159, 245, - 246, 247, 249, 239, 248, 0, 160, 301, 301, 155, - 15, 19, 21, 0, 241, 302, 299, 300, 371, 0, - 370, 0, 0, 253, 340, 341, 342, 343, 344, 346, - 345, 339, 252, 384, 387, 0, 491, 0, 485, 496, - 0, 486, 0, 0, 113, 0, 0, 516, 502, 0, - 522, 503, 524, 0, 574, 0, 572, 79, 0, 413, - 37, 0, 0, 398, 400, 301, 45, 56, 359, 360, - 361, 366, 367, 364, 365, 358, 369, 362, 363, 368, - 353, 354, 355, 356, 357, 392, 489, 92, 117, 119, - 410, 37, 0, 0, 429, 0, 428, 531, 423, 0, - 0, 0, 404, 0, 585, 0, 74, 0, 17, 450, - 448, 0, 442, 444, 436, 0, 454, 95, 93, 382, - 377, 0, 599, 601, 0, 549, 550, 552, 547, 565, - 0, 0, 257, 0, 162, 375, 0, 0, 0, 0, - 301, 236, 372, 0, 238, 259, 0, 0, 0, 0, - 0, 0, 0, 487, 0, 0, 0, 520, 0, 505, - 0, 0, 568, 0, 0, 559, 573, 418, 0, 416, - 38, 0, 417, 406, 0, 0, 0, 412, 408, 82, - 35, 0, 426, 35, 422, 85, 578, 0, 126, 0, - 35, 0, 451, 452, 35, 443, 445, 434, 448, 0, - 440, 457, 0, 455, 456, 381, 35, 602, 548, 0, - 556, 0, 402, 301, 20, 31, 22, 31, 242, 373, - 385, 388, 390, 492, 494, 0, 31, 104, 31, 106, - 514, 0, 0, 0, 525, 0, 575, 570, 0, 419, - 0, 301, 490, 411, 430, 0, 424, 589, 18, 0, - 35, 35, 464, 35, 0, 0, 449, 0, 0, 35, - 0, 383, 551, 557, 553, 611, 610, 609, 163, 32, - 0, 33, 35, 0, 0, 497, 0, 0, 0, 521, - 517, 523, 0, 0, 0, 0, 415, 420, 0, 537, - 592, 0, 579, 0, 0, 35, 470, 301, 465, 0, - 0, 35, 453, 0, 441, 439, 447, 458, 459, 0, - 0, 0, 57, 0, 495, 0, 0, 0, 515, 0, - 530, 529, 526, 528, 569, 576, 0, 395, 0, 532, - 593, 586, 0, 0, 301, 471, 463, 0, 461, 432, - 35, 467, 0, 35, 0, 554, 24, 34, 35, 26, - 498, 105, 107, 518, 571, 538, 0, 588, 580, 0, - 590, 591, 0, 301, 466, 301, 468, 35, 473, 460, - 0, 58, 533, 0, 0, 472, 462, 0, 301, 474, - 0, 555, 0, 583, 582, 581, 587, 469, 0, 542, - 540, 539, 534, 475, 543, 541 -}; - -/* YYDEFGOTO[NTERM-NUM]. */ -static const yytype_int16 yydefgoto[] = -{ - -1, 60, 61, 423, 63, 696, 698, 697, 699, 64, - 830, 532, 729, 533, 477, 831, 424, 239, 147, 215, - 653, 237, 663, 502, 251, 214, 149, 425, 426, 427, - 708, 940, 210, 212, 66, 173, 174, 175, 70, 176, - 72, 177, 74, 75, 178, 77, 179, 79, 180, 81, - 181, 83, 182, 85, 270, 183, 87, 184, 89, 185, - 91, 186, 93, 94, 298, 187, 188, 189, 98, 99, - 190, 191, 101, 573, 271, 272, 574, 192, 279, 103, - 104, 193, 106, 194, 575, 578, 275, 230, 196, 391, - 197, 198, 199, 110, 200, 112, 113, 114, 115, 116, - 117, 201, 202, 203, 204, 362, 293, 276, 119, 252, - 540, 541, 594, 205, 397, 707, 595, 266, 207, 122, - 208, 124, 125, 152, 153, 555, 236, 450, 508, 509, - 451, 728, 620, 621, 126, 235, 519, 661, 127, 219, - 513, 429, 669, 529, 675, 759, 671, 249, 676, 673, - 754, 751, 762, 897, 898, 752, 753, 129, 130, 131, - 500, 735, 415, 710, 416, 597, 834, 712, 875, 417, - 418, 132, 435, 436, 133, 218, 134, 437, 605, 838, - 718, 879, 438, 606, 791, 720, 135, 721, 842, 136, - 882, 883, 137, 741, 916, 942, 516, 889, 941, 951, - 258, 259, 686, 687, 138, 770, 869, 930, 824, 139, - 443, 444, 445, 140, 260, 141, 615, 795, 845, 616, - 723, 844, 142, 238, 807, 891, 933, 945, 523, 918, - 919, 852, 853, 854, 143, 254, 549, 550, 144, 690, - 827, 430 -}; - -/* YYPACT[STATE-NUM] -- Index in YYTABLE of the portion describing - STATE-NUM. */ #define YYPACT_NINF -659 + +#define yypact_value_is_default(Yystate) \ + (!!((Yystate) == (-659))) + +#define YYTABLE_NINF -608 + +#define yytable_value_is_error(Yytable_value) \ + 0 + + /* YYPACT[STATE-NUM] -- Index in YYTABLE of the portion describing + STATE-NUM. */ static const yytype_int16 yypact[] = { 4762, 275, -659, 312, -659, 35, 54, 527, 478, -69, @@ -1461,7 +972,110 @@ static const yytype_int16 yypact[] = 3282, -659, -659, -659, -659, -659 }; -/* YYPGOTO[NTERM-NUM]. */ + /* YYDEFACT[STATE-NUM] -- Default reduction number in state STATE-NUM. + Performed when YYTABLE does not specify something else to do. Zero + means the default is an error. */ +static const yytype_uint16 yydefact[] = +{ + 0, 0, 120, 78, 145, 139, 140, 397, 399, 0, + 0, 147, 150, 151, 129, 127, 128, 29, 124, 80, + 0, 0, 509, 427, 527, 123, 0, 122, 121, 421, + 125, 403, 83, 577, 73, 0, 153, 0, 166, 167, + 0, 126, 0, 0, 136, 376, 596, 0, 137, 564, + 0, 141, 142, 138, 0, 612, 613, 0, 301, 0, + 0, 0, 8, 6, 0, 7, 164, 310, 312, 313, + 0, 311, 0, 314, 0, 0, 316, 0, 317, 0, + 318, 0, 319, 0, 320, 0, 324, 0, 171, 0, + 172, 0, 323, 0, 0, 321, 322, 325, 0, 237, + 327, 0, 329, 0, 0, 330, 0, 0, 96, 96, + 96, 96, 347, 348, 349, 350, 351, 352, 96, 386, + 315, 326, 0, 328, 0, 86, 87, 88, 5, 96, + 476, 0, 477, 0, 0, 478, 0, 479, 481, 482, + 0, 558, 480, 96, 483, 4, 9, 0, 77, 0, + 144, 143, 0, 0, 0, 130, 132, 129, 127, 128, + 124, 0, 134, 131, 123, 0, 135, 133, 136, 138, + 0, 0, 0, 261, 263, 264, 262, 265, 267, 268, + 270, 271, 272, 294, 275, 276, 323, 273, 274, 277, + 278, 298, 281, 283, 293, 391, 0, 287, 288, 289, + 285, 286, 290, 291, 292, 266, 488, 295, 280, 91, + 0, 116, 0, 118, 75, 0, 334, 335, 0, 0, + 76, 164, 171, 172, 304, 322, 308, 327, 307, 330, + 0, 0, 309, 328, 173, 0, 0, 0, 584, 0, + 72, 171, 172, 596, 0, 433, 0, 35, 0, 0, + 94, 0, 378, 0, 595, 164, 545, 326, 546, 0, + 0, 0, 401, 0, 169, 0, 0, 250, 0, 0, + 0, 251, 244, 374, 302, 243, 0, 255, 256, 254, + 1, 0, 14, 12, 13, 11, 10, 0, 0, 165, + 301, 0, 217, 0, 219, 220, 189, 190, 191, 211, + 146, 218, 195, 148, 221, 196, 198, 152, 223, 197, + 154, 225, 200, 156, 157, 201, 158, 202, 161, 224, + 199, 226, 208, 212, 168, 192, 213, 170, 193, 214, + 301, 64, 229, 0, 0, 189, 176, 0, 180, 0, + 181, 183, 0, 182, 0, 184, 0, 185, 0, 186, + 0, 187, 175, 178, 179, 209, 0, 216, 177, 0, + 188, 210, 227, 62, 228, 235, 203, 240, 61, 232, + 205, 258, 301, 230, 0, 206, 260, 63, 231, 207, + 0, 331, 332, 0, 0, 0, 0, 0, 0, 0, + 0, 333, 67, 66, 69, 70, 68, 0, 389, 149, + 222, 394, 65, 234, 194, 215, 396, 60, 233, 204, + 59, 0, 493, 501, 500, 0, 0, 484, 499, 103, + 399, 110, 124, 101, 99, 112, 102, 0, 0, 100, + 98, 508, 513, 519, 507, 504, 506, 0, 0, 0, + 0, 563, 562, 0, 560, 561, 71, 0, 97, 35, + 0, 405, 0, 0, 336, 338, 337, 0, 239, 48, + 43, 40, 0, 41, 42, 39, 44, 46, 53, 54, + 50, 0, 51, 52, 49, 55, 269, 47, 296, 279, + 282, 284, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 297, 0, 0, 89, 0, 90, 35, 81, 407, + 409, 510, 35, 0, 536, 535, 0, 174, 35, 425, + 0, 84, 0, 0, 0, 594, 0, 16, 431, 0, + 0, 435, 438, 36, 446, 437, 0, 0, 379, 35, + 0, 380, 598, 164, 298, 604, 293, 0, 295, 597, + 600, 0, 0, 0, 608, 0, 0, 393, 159, 245, + 246, 247, 249, 239, 248, 0, 160, 301, 301, 155, + 15, 19, 21, 0, 241, 302, 299, 300, 371, 0, + 370, 0, 0, 253, 340, 341, 342, 343, 344, 346, + 345, 339, 252, 384, 387, 0, 491, 0, 485, 496, + 0, 486, 0, 0, 113, 0, 0, 516, 502, 0, + 522, 503, 524, 0, 574, 0, 572, 79, 0, 413, + 37, 0, 0, 398, 400, 301, 45, 56, 359, 360, + 361, 366, 367, 364, 365, 358, 369, 362, 363, 368, + 353, 354, 355, 356, 357, 392, 489, 92, 117, 119, + 410, 37, 0, 0, 429, 0, 428, 531, 423, 0, + 0, 0, 404, 0, 585, 0, 74, 0, 17, 450, + 448, 0, 442, 444, 436, 0, 454, 95, 93, 382, + 377, 0, 599, 601, 0, 549, 550, 552, 547, 565, + 0, 0, 257, 0, 162, 375, 0, 0, 0, 0, + 301, 236, 372, 0, 238, 259, 0, 0, 0, 0, + 0, 0, 0, 487, 0, 0, 0, 520, 0, 505, + 0, 0, 568, 0, 0, 559, 573, 418, 0, 416, + 38, 0, 417, 406, 0, 0, 0, 412, 408, 82, + 35, 0, 426, 35, 422, 85, 578, 0, 126, 0, + 35, 0, 451, 452, 35, 443, 445, 434, 448, 0, + 440, 457, 0, 455, 456, 381, 35, 602, 548, 0, + 556, 0, 402, 301, 20, 31, 22, 31, 242, 373, + 385, 388, 390, 492, 494, 0, 31, 104, 31, 106, + 514, 0, 0, 0, 525, 0, 575, 570, 0, 419, + 0, 301, 490, 411, 430, 0, 424, 589, 18, 0, + 35, 35, 464, 35, 0, 0, 449, 0, 0, 35, + 0, 383, 551, 557, 553, 611, 610, 609, 163, 32, + 0, 33, 35, 0, 0, 497, 0, 0, 0, 521, + 517, 523, 0, 0, 0, 0, 415, 420, 0, 537, + 592, 0, 579, 0, 0, 35, 470, 301, 465, 0, + 0, 35, 453, 0, 441, 439, 447, 458, 459, 0, + 0, 0, 57, 0, 495, 0, 0, 0, 515, 0, + 530, 529, 526, 528, 569, 576, 0, 395, 0, 532, + 593, 586, 0, 0, 301, 471, 463, 0, 461, 432, + 35, 467, 0, 35, 0, 554, 24, 34, 35, 26, + 498, 105, 107, 518, 571, 538, 0, 588, 580, 0, + 590, 591, 0, 301, 466, 301, 468, 35, 473, 460, + 0, 58, 533, 0, 0, 472, 462, 0, 301, 474, + 0, 555, 0, 583, 582, 581, 587, 469, 0, 542, + 540, 539, 534, 475, 543, 541 +}; + + /* YYPGOTO[NTERM-NUM]. */ static const yytype_int16 yypgoto[] = { -659, -659, -659, 64, 567, -659, -659, -659, -659, -659, @@ -1491,10 +1105,39 @@ static const yytype_int16 yypgoto[] = -659, 3511 }; -/* YYTABLE[YYPACT[STATE-NUM]]. What to do in state STATE-NUM. If - positive, shift that token. If negative, reduce the rule which - number is the opposite. If YYTABLE_NINF, syntax error. */ -#define YYTABLE_NINF -608 + /* YYDEFGOTO[NTERM-NUM]. */ +static const yytype_int16 yydefgoto[] = +{ + -1, 60, 61, 423, 63, 696, 698, 697, 699, 64, + 830, 532, 729, 533, 477, 831, 424, 239, 147, 215, + 653, 237, 663, 502, 251, 214, 149, 425, 426, 427, + 708, 940, 210, 212, 66, 173, 174, 175, 70, 176, + 72, 177, 74, 75, 178, 77, 179, 79, 180, 81, + 181, 83, 182, 85, 270, 183, 87, 184, 89, 185, + 91, 186, 93, 94, 298, 187, 188, 189, 98, 99, + 190, 191, 101, 573, 271, 272, 574, 192, 279, 103, + 104, 193, 106, 194, 575, 578, 275, 230, 196, 391, + 197, 198, 199, 110, 200, 112, 113, 114, 115, 116, + 117, 201, 202, 203, 204, 362, 293, 276, 119, 252, + 540, 541, 594, 205, 397, 707, 595, 266, 207, 122, + 208, 124, 125, 152, 153, 555, 236, 450, 508, 509, + 451, 728, 620, 621, 126, 235, 519, 661, 127, 219, + 513, 429, 669, 529, 675, 759, 671, 249, 676, 673, + 754, 751, 762, 897, 898, 752, 753, 129, 130, 131, + 500, 735, 415, 710, 416, 597, 834, 712, 875, 417, + 418, 132, 435, 436, 133, 218, 134, 437, 605, 838, + 718, 879, 438, 606, 791, 720, 135, 721, 842, 136, + 882, 883, 137, 741, 916, 942, 516, 889, 941, 951, + 258, 259, 686, 687, 138, 770, 869, 930, 824, 139, + 443, 444, 445, 140, 260, 141, 615, 795, 845, 616, + 723, 844, 142, 238, 807, 891, 933, 945, 523, 918, + 919, 852, 853, 854, 143, 254, 549, 550, 144, 690, + 827, 430 +}; + + /* YYTABLE[YYPACT[STATE-NUM]] -- What to do in state STATE-NUM. If + positive, shift that token. If negative, reduce the rule whose + number is the opposite. If YYTABLE_NINF, syntax error. */ static const yytype_int16 yytable[] = { 88, 273, 452, 458, 734, 206, 510, 544, 545, 546, @@ -2390,12 +2033,6 @@ static const yytype_int16 yytable[] = 0, 938 }; -#define yypact_value_is_default(yystate) \ - ((yystate) == (-659)) - -#define yytable_value_is_error(yytable_value) \ - YYID (0) - static const yytype_int16 yycheck[] = { 0, 58, 153, 172, 625, 10, 215, 253, 253, 253, @@ -3291,8 +2928,8 @@ static const yytype_int16 yycheck[] = -1, 126 }; -/* YYSTOS[STATE-NUM] -- The (internal number of the) accessing - symbol of state STATE-NUM. */ + /* YYSTOS[STATE-NUM] -- The (internal number of the) accessing + symbol of state STATE-NUM. */ static const yytype_uint16 yystos[] = { 0, 1, 5, 6, 7, 8, 10, 11, 12, 13, @@ -3393,94 +3030,175 @@ static const yytype_uint16 yystos[] = 46, 333, 332, 127, 168, 168 }; -#define yyerrok (yyerrstatus = 0) -#define yyclearin (yychar = YYEMPTY) -#define YYEMPTY (-2) -#define YYEOF 0 + /* YYR1[YYN] -- Symbol number of symbol that rule YYN derives. */ +static const yytype_uint16 yyr1[] = +{ + 0, 134, 135, 135, 136, 136, 136, 136, 136, 136, + 136, 136, 136, 136, 136, 136, 137, 137, 137, 139, + 138, 140, 138, 141, 138, 142, 138, 143, 143, 143, + 143, 144, 144, 144, 144, 145, 145, 146, 146, 147, + 147, 147, 147, 147, 147, 147, 147, 147, 148, 148, + 148, 148, 148, 148, 148, 148, 148, 149, 149, 150, + 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, + 150, 150, 150, 151, 150, 150, 150, 150, 152, 150, + 153, 154, 150, 155, 156, 150, 150, 150, 150, 150, + 150, 157, 150, 150, 158, 158, 160, 159, 161, 161, + 161, 161, 161, 161, 162, 162, 162, 162, 163, 163, + 163, 163, 164, 164, 165, 165, 166, 166, 167, 167, + 168, 168, 168, 168, 168, 168, 168, 168, 168, 168, + 168, 168, 168, 168, 168, 168, 168, 168, 168, 169, + 169, 170, 171, 172, 172, 173, 174, 175, 176, 177, + 178, 178, 179, 180, 181, 182, 183, 184, 185, 186, + 186, 187, 188, 188, 189, 190, 191, 191, 192, 193, + 194, 195, 195, 196, 196, 197, 197, 197, 197, 197, + 197, 197, 197, 197, 197, 197, 197, 197, 197, 198, + 198, 199, 199, 199, 199, 199, 199, 199, 199, 199, + 199, 199, 199, 199, 199, 199, 199, 199, 199, 199, + 199, 200, 200, 200, 200, 200, 200, 201, 201, 201, + 201, 201, 201, 201, 201, 201, 201, 201, 201, 201, + 201, 201, 201, 201, 201, 202, 203, 204, 204, 205, + 206, 207, 207, 208, 208, 209, 209, 209, 209, 209, + 210, 210, 211, 211, 211, 212, 212, 213, 214, 215, + 216, 217, 217, 217, 217, 217, 217, 217, 217, 217, + 217, 217, 217, 217, 217, 217, 217, 217, 217, 217, + 217, 217, 217, 217, 217, 217, 217, 217, 217, 217, + 217, 217, 217, 218, 218, 218, 218, 218, 218, 219, + 219, 220, 220, 221, 221, 221, 221, 221, 221, 221, + 222, 222, 222, 222, 222, 222, 222, 222, 222, 222, + 222, 222, 222, 222, 222, 222, 222, 222, 222, 222, + 222, 223, 223, 224, 225, 225, 226, 226, 226, 227, + 228, 229, 230, 231, 232, 233, 234, 235, 235, 235, + 235, 235, 235, 236, 236, 236, 236, 236, 236, 237, + 237, 238, 238, 238, 238, 238, 238, 238, 238, 238, + 239, 240, 240, 240, 241, 241, 243, 242, 244, 244, + 244, 244, 245, 245, 246, 246, 248, 249, 247, 250, + 247, 251, 251, 252, 253, 254, 255, 257, 256, 258, + 256, 259, 256, 260, 256, 261, 261, 262, 262, 263, + 263, 263, 263, 264, 265, 264, 264, 266, 267, 267, + 267, 269, 268, 270, 270, 271, 271, 273, 272, 274, + 274, 276, 275, 277, 275, 275, 275, 275, 278, 275, + 279, 279, 280, 280, 280, 280, 282, 281, 284, 283, + 285, 285, 285, 285, 286, 286, 286, 286, 286, 286, + 286, 287, 287, 288, 289, 289, 289, 289, 289, 289, + 290, 290, 290, 290, 290, 290, 291, 291, 291, 291, + 291, 291, 291, 291, 292, 292, 292, 292, 294, 295, + 293, 297, 296, 299, 300, 298, 301, 302, 298, 303, + 304, 304, 305, 305, 305, 305, 306, 307, 307, 309, + 308, 310, 310, 312, 313, 311, 314, 315, 311, 317, + 318, 316, 319, 316, 321, 322, 320, 323, 324, 325, + 325, 327, 328, 329, 326, 330, 330, 331, 331, 332, + 333, 333, 333, 333, 334, 334, 335, 335, 336, 336, + 337, 337, 339, 340, 341, 338, 342, 342, 344, 343, + 343, 345, 346, 346, 348, 347, 349, 349, 351, 350, + 352, 350, 350, 350, 354, 355, 353, 357, 358, 359, + 360, 356, 361, 361, 362, 362, 363, 363, 364, 365, + 365, 365, 366, 367, 368, 368, 369, 369, 370, 370, + 370, 370, 370, 371, 371, 371, 371, 371, 373, 372, + 374, 374, 375, 375 +}; -#define YYACCEPT goto yyacceptlab -#define YYABORT goto yyabortlab -#define YYERROR goto yyerrorlab + /* YYR2[YYN] -- Number of symbols on the right hand side of rule YYN. */ +static const yytype_uint8 yyr2[] = +{ + 0, 2, 1, 0, 1, 1, 1, 1, 1, 2, + 2, 2, 2, 2, 2, 3, 3, 4, 6, 0, + 5, 0, 5, 0, 8, 0, 8, 0, 1, 1, + 1, 0, 1, 1, 3, 0, 1, 0, 1, 1, + 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 2, 2, 4, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 0, 4, 2, 2, 2, 0, 4, + 0, 0, 5, 0, 0, 5, 1, 1, 1, 3, + 3, 0, 4, 4, 1, 3, 0, 2, 1, 1, + 1, 1, 1, 1, 4, 7, 4, 7, 0, 1, + 1, 1, 1, 2, 0, 1, 1, 3, 1, 3, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 2, 2, 1, 2, 1, 2, 2, + 1, 1, 2, 1, 2, 3, 2, 2, 2, 3, + 3, 2, 3, 5, 1, 2, 1, 1, 2, 2, + 2, 1, 1, 2, 3, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 1, + 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 4, 1, 4, 2, + 2, 1, 3, 1, 1, 2, 2, 2, 2, 2, + 1, 1, 3, 3, 2, 1, 1, 4, 2, 4, + 2, 1, 1, 1, 1, 1, 1, 1, 1, 2, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, + 1, 1, 2, 1, 2, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 2, 2, 1, 1, + 1, 0, 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, 2, 2, 2, 2, 2, 2, 3, + 3, 3, 3, 3, 3, 3, 3, 1, 1, 1, + 1, 1, 1, 3, 3, 3, 3, 3, 3, 3, + 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, + 2, 2, 3, 4, 1, 3, 0, 4, 0, 1, + 1, 3, 2, 4, 1, 3, 0, 0, 5, 0, + 5, 1, 3, 3, 2, 8, 2, 0, 4, 0, + 4, 0, 5, 0, 4, 1, 3, 1, 3, 1, + 2, 4, 3, 2, 0, 5, 3, 2, 2, 3, + 4, 0, 5, 2, 4, 0, 2, 0, 4, 2, + 4, 0, 8, 0, 5, 3, 4, 3, 0, 7, + 1, 3, 1, 2, 1, 2, 0, 6, 0, 3, + 0, 1, 1, 3, 0, 1, 1, 1, 3, 3, + 5, 1, 3, 1, 2, 3, 5, 4, 5, 7, + 3, 4, 6, 5, 6, 8, 1, 1, 1, 1, + 1, 1, 1, 1, 2, 3, 3, 4, 0, 0, + 6, 0, 4, 0, 0, 6, 0, 0, 7, 1, + 1, 1, 3, 3, 2, 4, 1, 1, 1, 0, + 3, 1, 2, 0, 0, 6, 0, 0, 7, 0, + 0, 5, 0, 5, 0, 0, 7, 1, 1, 1, + 1, 0, 0, 0, 12, 1, 1, 0, 2, 2, + 1, 2, 1, 2, 1, 1, 1, 3, 2, 1, + 1, 3, 0, 0, 0, 10, 0, 1, 0, 4, + 2, 1, 1, 1, 0, 4, 1, 2, 0, 5, + 0, 6, 1, 2, 0, 0, 5, 0, 0, 0, + 0, 11, 1, 1, 0, 2, 0, 3, 1, 0, + 3, 3, 1, 2, 3, 2, 0, 2, 1, 2, + 1, 2, 3, 1, 1, 1, 1, 1, 0, 6, + 1, 1, 1, 1 +}; -/* 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. However, - YYFAIL appears to be in use. Nevertheless, it is formally deprecated - in Bison 2.4.2's NEWS entry, where a plan to phase it out is - discussed. */ +#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 yyerrorlab -#define YYFAIL goto yyerrlab -#if defined YYFAIL - /* This is here to suppress warnings from the GCC cpp's - -Wunused-macros. Normally we don't worry about that warning, but - some users do, and we want to make it easy for users to remove - YYFAIL uses, which will produce warnings from Bison 2.5. */ -#endif #define YYRECOVERING() (!!yyerrstatus) -#define YYBACKUP(Token, Value) \ -do \ - if (yychar == YYEMPTY && yylen == 1) \ - { \ - yychar = (Token); \ - yylval = (Value); \ - YYPOPSTACK (1); \ - goto yybackup; \ - } \ - else \ - { \ +#define YYBACKUP(Token, Value) \ +do \ + if (yychar == YYEMPTY) \ + { \ + yychar = (Token); \ + yylval = (Value); \ + YYPOPSTACK (yylen); \ + yystate = *yyssp; \ + goto yybackup; \ + } \ + else \ + { \ yyerror (pComp, YY_("syntax error: cannot back up")); \ - YYERROR; \ - } \ -while (YYID (0)) + YYERROR; \ + } \ +while (0) + +/* Error token number */ +#define YYTERROR 1 +#define YYERRCODE 256 -#define YYTERROR 1 -#define YYERRCODE 256 - - -/* YYLLOC_DEFAULT -- Set CURRENT to span from RHS[1] to RHS[N]. - If N is 0, then set CURRENT to the empty location which ends - the previous symbol: RHS[0] (always defined). */ - -#define YYRHSLOC(Rhs, K) ((Rhs)[K]) -#ifndef YYLLOC_DEFAULT -# define YYLLOC_DEFAULT(Current, Rhs, N) \ - do \ - if (YYID (N)) \ - { \ - (Current).first_line = YYRHSLOC (Rhs, 1).first_line; \ - (Current).first_column = YYRHSLOC (Rhs, 1).first_column; \ - (Current).last_line = YYRHSLOC (Rhs, N).last_line; \ - (Current).last_column = YYRHSLOC (Rhs, N).last_column; \ - } \ - else \ - { \ - (Current).first_line = (Current).last_line = \ - YYRHSLOC (Rhs, 0).last_line; \ - (Current).first_column = (Current).last_column = \ - YYRHSLOC (Rhs, 0).last_column; \ - } \ - while (YYID (0)) -#endif - - -/* This macro is provided for backward compatibility. */ - -#ifndef YY_LOCATION_PRINT -# define YY_LOCATION_PRINT(File, Loc) ((void) 0) -#endif - - -/* YYLEX -- calling `yylex' with the right arguments. */ - -#ifdef YYLEX_PARAM -# define YYLEX yylex (&yylval, YYLEX_PARAM) -#else -# define YYLEX yylex (&yylval, pComp) -#endif /* Enable debugging if requested. */ #if YYDEBUG @@ -3490,56 +3208,47 @@ while (YYID (0)) # define YYFPRINTF fprintf # endif -# define YYDPRINTF(Args) \ -do { \ - if (yydebug) \ - YYFPRINTF Args; \ -} while (YYID (0)) +# define YYDPRINTF(Args) \ +do { \ + if (yydebug) \ + YYFPRINTF Args; \ +} while (0) -# define YY_SYMBOL_PRINT(Title, Type, Value, Location) \ -do { \ - if (yydebug) \ - { \ - YYFPRINTF (stderr, "%s ", Title); \ - yy_symbol_print (stderr, \ - Type, Value, pComp); \ - YYFPRINTF (stderr, "\n"); \ - } \ -} while (YYID (0)) +/* This macro is provided for backward compatibility. */ +#ifndef YY_LOCATION_PRINT +# define YY_LOCATION_PRINT(File, Loc) ((void) 0) +#endif -/*--------------------------------. -| Print this symbol on YYOUTPUT. | -`--------------------------------*/ +# define YY_SYMBOL_PRINT(Title, Type, Value, Location) \ +do { \ + if (yydebug) \ + { \ + YYFPRINTF (stderr, "%s ", Title); \ + yy_symbol_print (stderr, \ + Type, Value, pComp); \ + YYFPRINTF (stderr, "\n"); \ + } \ +} while (0) + + +/*----------------------------------------. +| Print this symbol's value on YYOUTPUT. | +`----------------------------------------*/ -/*ARGSUSED*/ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) static void yy_symbol_value_print (FILE *yyoutput, int yytype, YYSTYPE const * const yyvaluep, PHB_COMP pComp) -#else -static void -yy_symbol_value_print (yyoutput, yytype, yyvaluep, pComp) - FILE *yyoutput; - int yytype; - YYSTYPE const * const yyvaluep; - PHB_COMP pComp; -#endif { + FILE *yyo = yyoutput; + YYUSE (yyo); + YYUSE (pComp); if (!yyvaluep) return; - YYUSE (pComp); # ifdef YYPRINT if (yytype < YYNTOKENS) YYPRINT (yyoutput, yytoknum[yytype], *yyvaluep); -# else - YYUSE (yyoutput); # endif - switch (yytype) - { - default: - break; - } + YYUSE (yytype); } @@ -3547,23 +3256,11 @@ yy_symbol_value_print (yyoutput, yytype, yyvaluep, pComp) | Print this symbol on YYOUTPUT. | `--------------------------------*/ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) static void yy_symbol_print (FILE *yyoutput, int yytype, YYSTYPE const * const yyvaluep, PHB_COMP pComp) -#else -static void -yy_symbol_print (yyoutput, yytype, yyvaluep, pComp) - FILE *yyoutput; - int yytype; - YYSTYPE const * const yyvaluep; - PHB_COMP pComp; -#endif { - if (yytype < YYNTOKENS) - YYFPRINTF (yyoutput, "token %s (", yytname[yytype]); - else - YYFPRINTF (yyoutput, "nterm %s (", yytname[yytype]); + YYFPRINTF (yyoutput, "%s %s (", + yytype < YYNTOKENS ? "token" : "nterm", yytname[yytype]); yy_symbol_value_print (yyoutput, yytype, yyvaluep, pComp); YYFPRINTF (yyoutput, ")"); @@ -3574,16 +3271,8 @@ yy_symbol_print (yyoutput, yytype, yyvaluep, pComp) | TOP (included). | `------------------------------------------------------------------*/ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) static void yy_stack_print (yytype_int16 *yybottom, yytype_int16 *yytop) -#else -static void -yy_stack_print (yybottom, yytop) - yytype_int16 *yybottom; - yytype_int16 *yytop; -#endif { YYFPRINTF (stderr, "Stack now"); for (; yybottom <= yytop; yybottom++) @@ -3594,50 +3283,42 @@ yy_stack_print (yybottom, yytop) YYFPRINTF (stderr, "\n"); } -# define YY_STACK_PRINT(Bottom, Top) \ -do { \ - if (yydebug) \ - yy_stack_print ((Bottom), (Top)); \ -} while (YYID (0)) +# define YY_STACK_PRINT(Bottom, Top) \ +do { \ + if (yydebug) \ + yy_stack_print ((Bottom), (Top)); \ +} while (0) /*------------------------------------------------. | Report that the YYRULE is going to be reduced. | `------------------------------------------------*/ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) static void -yy_reduce_print (YYSTYPE *yyvsp, int yyrule, PHB_COMP pComp) -#else -static void -yy_reduce_print (yyvsp, yyrule, pComp) - YYSTYPE *yyvsp; - int yyrule; - PHB_COMP pComp; -#endif +yy_reduce_print (yytype_int16 *yyssp, YYSTYPE *yyvsp, int yyrule, PHB_COMP pComp) { + unsigned long int yylno = yyrline[yyrule]; int yynrhs = yyr2[yyrule]; int yyi; - unsigned long int yylno = yyrline[yyrule]; YYFPRINTF (stderr, "Reducing stack by rule %d (line %lu):\n", - yyrule - 1, yylno); + yyrule - 1, yylno); /* The symbols being reduced. */ for (yyi = 0; yyi < yynrhs; yyi++) { YYFPRINTF (stderr, " $%d = ", yyi + 1); - yy_symbol_print (stderr, yyrhs[yyprhs[yyrule] + yyi], - &(yyvsp[(yyi + 1) - (yynrhs)]) - , pComp); + yy_symbol_print (stderr, + yystos[yyssp[yyi + 1 - yynrhs]], + &(yyvsp[(yyi + 1) - (yynrhs)]) + , pComp); YYFPRINTF (stderr, "\n"); } } -# define YY_REDUCE_PRINT(Rule) \ -do { \ - if (yydebug) \ - yy_reduce_print (yyvsp, Rule, pComp); \ -} while (YYID (0)) +# define YY_REDUCE_PRINT(Rule) \ +do { \ + if (yydebug) \ + yy_reduce_print (yyssp, yyvsp, Rule, pComp); \ +} while (0) /* Nonzero means print parse trace. It is left uninitialized so that multiple parsers can coexist. */ @@ -3651,7 +3332,7 @@ int yydebug; /* YYINITDEPTH -- initial size of the parser's stacks. */ -#ifndef YYINITDEPTH +#ifndef YYINITDEPTH # define YYINITDEPTH 200 #endif @@ -3674,15 +3355,8 @@ int yydebug; # define yystrlen strlen # else /* Return the length of YYSTR. */ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) static YYSIZE_T yystrlen (const char *yystr) -#else -static YYSIZE_T -yystrlen (yystr) - const char *yystr; -#endif { YYSIZE_T yylen; for (yylen = 0; yystr[yylen]; yylen++) @@ -3698,16 +3372,8 @@ yystrlen (yystr) # else /* Copy YYSRC to YYDEST, returning the address of the terminating '\0' in YYDEST. */ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) static char * yystpcpy (char *yydest, const char *yysrc) -#else -static char * -yystpcpy (yydest, yysrc) - char *yydest; - const char *yysrc; -#endif { char *yyd = yydest; const char *yys = yysrc; @@ -3737,27 +3403,27 @@ yytnamerr (char *yyres, const char *yystr) char const *yyp = yystr; for (;;) - switch (*++yyp) - { - case '\'': - case ',': - goto do_not_strip_quotes; + switch (*++yyp) + { + case '\'': + case ',': + goto do_not_strip_quotes; - case '\\': - if (*++yyp != '\\') - goto do_not_strip_quotes; - /* Fall through. */ - default: - if (yyres) - yyres[yyn] = *yyp; - yyn++; - break; + case '\\': + if (*++yyp != '\\') + goto do_not_strip_quotes; + /* Fall through. */ + default: + if (yyres) + yyres[yyn] = *yyp; + yyn++; + break; - case '"': - if (yyres) - yyres[yyn] = '\0'; - return yyn; - } + case '"': + if (yyres) + yyres[yyn] = '\0'; + return yyn; + } do_not_strip_quotes: ; } @@ -3780,12 +3446,11 @@ static int yysyntax_error (YYSIZE_T *yymsg_alloc, char **yymsg, yytype_int16 *yyssp, int yytoken) { - YYSIZE_T yysize0 = yytnamerr (0, yytname[yytoken]); + YYSIZE_T yysize0 = yytnamerr (YY_NULLPTR, yytname[yytoken]); YYSIZE_T yysize = yysize0; - YYSIZE_T yysize1; enum { YYERROR_VERBOSE_ARGS_MAXIMUM = 5 }; /* Internationalized format string. */ - const char *yyformat = 0; + const char *yyformat = YY_NULLPTR; /* Arguments of yyformat. */ char const *yyarg[YYERROR_VERBOSE_ARGS_MAXIMUM]; /* Number of reported tokens (one for the "unexpected", one per @@ -3793,10 +3458,6 @@ yysyntax_error (YYSIZE_T *yymsg_alloc, char **yymsg, int yycount = 0; /* There are many possibilities here to consider: - - Assume YYFAIL is not used. It's too flawed to consider. See - - for details. YYERROR is fine as it does not invoke this - function. - If this state is a consistent state with a default action, then the only way this function was invoked is if the default action is an error action. In that case, don't check for expected @@ -3845,11 +3506,13 @@ yysyntax_error (YYSIZE_T *yymsg_alloc, char **yymsg, break; } yyarg[yycount++] = yytname[yyx]; - yysize1 = yysize + yytnamerr (0, yytname[yyx]); - if (! (yysize <= yysize1 - && yysize1 <= YYSTACK_ALLOC_MAXIMUM)) - return 2; - yysize = yysize1; + { + YYSIZE_T yysize1 = yysize + yytnamerr (YY_NULLPTR, yytname[yyx]); + if (! (yysize <= yysize1 + && yysize1 <= YYSTACK_ALLOC_MAXIMUM)) + return 2; + yysize = yysize1; + } } } } @@ -3869,10 +3532,12 @@ yysyntax_error (YYSIZE_T *yymsg_alloc, char **yymsg, # undef YYCASE_ } - yysize1 = yysize + yystrlen (yyformat); - if (! (yysize <= yysize1 && yysize1 <= YYSTACK_ALLOC_MAXIMUM)) - return 2; - yysize = yysize1; + { + YYSIZE_T yysize1 = yysize + yystrlen (yyformat); + if (! (yysize <= yysize1 && yysize1 <= YYSTACK_ALLOC_MAXIMUM)) + return 2; + yysize = yysize1; + } if (*yymsg_alloc < yysize) { @@ -3909,101 +3574,56 @@ yysyntax_error (YYSIZE_T *yymsg_alloc, char **yymsg, | Release the memory associated to this symbol. | `-----------------------------------------------*/ -/*ARGSUSED*/ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) static void yydestruct (const char *yymsg, int yytype, YYSTYPE *yyvaluep, PHB_COMP pComp) -#else -static void -yydestruct (yymsg, yytype, yyvaluep, pComp) - const char *yymsg; - int yytype; - YYSTYPE *yyvaluep; - PHB_COMP pComp; -#endif { YYUSE (yyvaluep); YYUSE (pComp); - if (!yymsg) yymsg = "Deleting"; YY_SYMBOL_PRINT (yymsg, yytype, yyvaluep, yylocationp); + YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN switch (yytype) { - case 19: /* "LITERAL" */ + case 19: /* LITERAL */ +#line 283 "harbour.y" /* yacc.c:1257 */ + { if( ((*yyvaluep).valChar).dealloc ) hb_xfree( ((*yyvaluep).valChar).string ); } +#line 3593 "harboury.c" /* yacc.c:1257 */ + break; -/* Line 1391 of yacc.c */ -#line 283 "harbour.y" - { if( (yyvaluep->valChar).dealloc ) hb_xfree( (yyvaluep->valChar).string ); }; + case 96: /* CBSTART */ +#line 282 "harbour.y" /* yacc.c:1257 */ + { if( ((*yyvaluep).asCodeblock).string ) hb_xfree( ((*yyvaluep).asCodeblock).string ); } +#line 3599 "harboury.c" /* yacc.c:1257 */ + break; -/* Line 1391 of yacc.c */ -#line 3943 "harboury.c" - break; - case 96: /* "CBSTART" */ - -/* Line 1391 of yacc.c */ -#line 282 "harbour.y" - { if( (yyvaluep->asCodeblock).string ) hb_xfree( (yyvaluep->asCodeblock).string ); }; - -/* Line 1391 of yacc.c */ -#line 3952 "harboury.c" - break; default: - break; + break; } + YY_IGNORE_MAYBE_UNINITIALIZED_END } -/* Prevent warnings from -Wmissing-prototypes. */ -#ifdef YYPARSE_PARAM -#if defined __STDC__ || defined __cplusplus -int yyparse (void *YYPARSE_PARAM); -#else -int yyparse (); -#endif -#else /* ! YYPARSE_PARAM */ -#if defined __STDC__ || defined __cplusplus -int yyparse (PHB_COMP pComp); -#else -int yyparse (); -#endif -#endif /* ! YYPARSE_PARAM */ /*----------. | yyparse. | `----------*/ -#ifdef YYPARSE_PARAM -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -int -yyparse (void *YYPARSE_PARAM) -#else -int -yyparse (YYPARSE_PARAM) - void *YYPARSE_PARAM; -#endif -#else /* ! YYPARSE_PARAM */ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) int yyparse (PHB_COMP pComp) -#else -int -yyparse (pComp) - PHB_COMP pComp; -#endif -#endif { /* The lookahead symbol. */ int yychar; + /* The semantic value of the lookahead symbol. */ -YYSTYPE yylval; +/* Default value used for initialization, for pacifying older GCCs + or non-GCC compilers. */ +YY_INITIAL_VALUE (static YYSTYPE yyval_default;) +YYSTYPE yylval YY_INITIAL_VALUE (= yyval_default); /* Number of syntax errors so far. */ int yynerrs; @@ -4013,10 +3633,10 @@ YYSTYPE yylval; int yyerrstatus; /* The stacks and their tools: - `yyss': related to states. - `yyvs': related to semantic values. + 'yyss': related to states. + 'yyvs': related to semantic values. - Refer to the stacks thru separate pointers, to allow yyoverflow + Refer to the stacks through separate pointers, to allow yyoverflow to reallocate them elsewhere. */ /* The state stack. */ @@ -4034,7 +3654,7 @@ YYSTYPE yylval; int yyn; int yyresult; /* Lookahead token as an internal (translated) token number. */ - int yytoken; + int yytoken = 0; /* The variables used to return semantic value and location from the action routines. */ YYSTYPE yyval; @@ -4052,9 +3672,8 @@ YYSTYPE yylval; Keep to zero when no symbol should be popped. */ int yylen = 0; - yytoken = 0; - yyss = yyssa; - yyvs = yyvsa; + yyssp = yyss = yyssa; + yyvsp = yyvs = yyvsa; yystacksize = YYINITDEPTH; YYDPRINTF ((stderr, "Starting parse\n")); @@ -4063,14 +3682,6 @@ YYSTYPE yylval; 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; - yyvsp = yyvs; - goto yysetstate; /*------------------------------------------------------------. @@ -4091,23 +3702,23 @@ YYSTYPE yylval; #ifdef yyoverflow { - /* 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; - yytype_int16 *yyss1 = yyss; + /* 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; + yytype_int16 *yyss1 = yyss; - /* Each stack pointer address is followed by the size of the - data in use in that stack, in bytes. This used to be a - conditional around just the two extra args, but that might - be undefined if yyoverflow is a macro. */ - yyoverflow (YY_("memory exhausted"), - &yyss1, yysize * sizeof (*yyssp), - &yyvs1, yysize * sizeof (*yyvsp), - &yystacksize); + /* Each stack pointer address is followed by the size of the + data in use in that stack, in bytes. This used to be a + conditional around just the two extra args, but that might + be undefined if yyoverflow is a macro. */ + yyoverflow (YY_("memory exhausted"), + &yyss1, yysize * sizeof (*yyssp), + &yyvs1, yysize * sizeof (*yyvsp), + &yystacksize); - yyss = yyss1; - yyvs = yyvs1; + yyss = yyss1; + yyvs = yyvs1; } #else /* no yyoverflow */ # ifndef YYSTACK_RELOCATE @@ -4115,22 +3726,22 @@ YYSTYPE yylval; # else /* Extend the stack our own way. */ if (YYMAXDEPTH <= yystacksize) - goto yyexhaustedlab; + goto yyexhaustedlab; yystacksize *= 2; if (YYMAXDEPTH < yystacksize) - yystacksize = YYMAXDEPTH; + yystacksize = YYMAXDEPTH; { - yytype_int16 *yyss1 = yyss; - union yyalloc *yyptr = - (union yyalloc *) YYSTACK_ALLOC (YYSTACK_BYTES (yystacksize)); - if (! yyptr) - goto yyexhaustedlab; - YYSTACK_RELOCATE (yyss_alloc, yyss); - YYSTACK_RELOCATE (yyvs_alloc, yyvs); + yytype_int16 *yyss1 = yyss; + union yyalloc *yyptr = + (union yyalloc *) YYSTACK_ALLOC (YYSTACK_BYTES (yystacksize)); + if (! yyptr) + goto yyexhaustedlab; + YYSTACK_RELOCATE (yyss_alloc, yyss); + YYSTACK_RELOCATE (yyvs_alloc, yyvs); # undef YYSTACK_RELOCATE - if (yyss1 != yyssa) - YYSTACK_FREE (yyss1); + if (yyss1 != yyssa) + YYSTACK_FREE (yyss1); } # endif #endif /* no yyoverflow */ @@ -4139,10 +3750,10 @@ YYSTYPE yylval; yyvsp = yyvs + yysize - 1; YYDPRINTF ((stderr, "Stack size increased to %lu\n", - (unsigned long int) yystacksize)); + (unsigned long int) yystacksize)); if (yyss + yystacksize - 1 <= yyssp) - YYABORT; + YYABORT; } YYDPRINTF ((stderr, "Entering state %d\n", yystate)); @@ -4171,7 +3782,7 @@ yybackup: if (yychar == YYEMPTY) { YYDPRINTF ((stderr, "Reading a token: ")); - yychar = YYLEX; + yychar = yylex (&yylval, pComp); } if (yychar <= YYEOF) @@ -4211,7 +3822,9 @@ yybackup: yychar = YYEMPTY; yystate = yyn; + YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN *++yyvsp = yylval; + YY_IGNORE_MAYBE_UNINITIALIZED_END goto yynewstate; @@ -4234,7 +3847,7 @@ yyreduce: yylen = yyr2[yyn]; /* If YYLEN is nonzero, implement the default value of the action: - `$$ = $1'. + '$$ = $1'. Otherwise, the following line sets YYVAL to garbage. This behavior is undocumented and Bison @@ -4248,405 +3861,349 @@ yyreduce: switch (yyn) { case 9: - -/* Line 1806 of yacc.c */ -#line 296 "harbour.y" +#line 296 "harbour.y" /* yacc.c:1646 */ { yyclearin; yyerrok; } +#line 3867 "harboury.c" /* yacc.c:1646 */ break; case 15: - -/* Line 1806 of yacc.c */ -#line 302 "harbour.y" +#line 302 "harbour.y" /* yacc.c:1646 */ { yyclearin; yyerrok; } +#line 3873 "harboury.c" /* yacc.c:1646 */ break; case 16: - -/* Line 1806 of yacc.c */ -#line 306 "harbour.y" - { HB_COMP_PARAM->currLine = ( int ) (yyvsp[(2) - (3)].valLong).lNumber; +#line 306 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_PARAM->currLine = ( int ) (yyvsp[-1].valLong).lNumber; HB_COMP_PARAM->pLex->fEol = HB_FALSE; } +#line 3880 "harboury.c" /* yacc.c:1646 */ break; case 17: - -/* Line 1806 of yacc.c */ -#line 309 "harbour.y" - { HB_COMP_PARAM->currModule = hb_compIdentifierNew( HB_COMP_PARAM, (yyvsp[(3) - (4)].valChar).string, (yyvsp[(3) - (4)].valChar).dealloc ? HB_IDENT_FREE : HB_IDENT_STATIC ); - HB_COMP_PARAM->currLine = ( int ) (yyvsp[(2) - (4)].valLong).lNumber; +#line 309 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_PARAM->currModule = hb_compIdentifierNew( HB_COMP_PARAM, (yyvsp[-1].valChar).string, (yyvsp[-1].valChar).dealloc ? HB_IDENT_FREE : HB_IDENT_STATIC ); + HB_COMP_PARAM->currLine = ( int ) (yyvsp[-2].valLong).lNumber; HB_COMP_PARAM->pLex->fEol = HB_FALSE; - (yyvsp[(3) - (4)].valChar).dealloc = HB_FALSE; } + (yyvsp[-1].valChar).dealloc = HB_FALSE; } +#line 3889 "harboury.c" /* yacc.c:1646 */ break; case 18: - -/* Line 1806 of yacc.c */ -#line 314 "harbour.y" - { HB_COMP_PARAM->currModule = hb_compIdentifierNew( HB_COMP_PARAM, (yyvsp[(5) - (6)].valChar).string, (yyvsp[(5) - (6)].valChar).dealloc ? HB_IDENT_FREE : HB_IDENT_STATIC ); - HB_COMP_PARAM->currLine = ( int ) (yyvsp[(2) - (6)].valLong).lNumber; +#line 314 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_PARAM->currModule = hb_compIdentifierNew( HB_COMP_PARAM, (yyvsp[-1].valChar).string, (yyvsp[-1].valChar).dealloc ? HB_IDENT_FREE : HB_IDENT_STATIC ); + HB_COMP_PARAM->currLine = ( int ) (yyvsp[-4].valLong).lNumber; HB_COMP_PARAM->pLex->fEol = HB_FALSE; - if( (yyvsp[(3) - (6)].valChar).dealloc ) { hb_xfree( (yyvsp[(3) - (6)].valChar).string ); (yyvsp[(3) - (6)].valChar).dealloc = HB_FALSE; } - (yyvsp[(5) - (6)].valChar).dealloc = HB_FALSE; } + if( (yyvsp[-3].valChar).dealloc ) { hb_xfree( (yyvsp[-3].valChar).string ); (yyvsp[-3].valChar).dealloc = HB_FALSE; } + (yyvsp[-1].valChar).dealloc = HB_FALSE; } +#line 3899 "harboury.c" /* yacc.c:1646 */ break; case 19: - -/* Line 1806 of yacc.c */ -#line 321 "harbour.y" - { hb_compFunctionAdd( HB_COMP_PARAM, (yyvsp[(3) - (3)].string), ( HB_SYMBOLSCOPE ) (yyvsp[(1) - (3)].iNumber), 0 ); } +#line 321 "harbour.y" /* yacc.c:1646 */ + { hb_compFunctionAdd( HB_COMP_PARAM, (yyvsp[0].string), ( HB_SYMBOLSCOPE ) (yyvsp[-2].iNumber), 0 ); } +#line 3905 "harboury.c" /* yacc.c:1646 */ break; case 21: - -/* Line 1806 of yacc.c */ -#line 322 "harbour.y" - { hb_compFunctionAdd( HB_COMP_PARAM, (yyvsp[(3) - (3)].string), ( HB_SYMBOLSCOPE ) (yyvsp[(1) - (3)].iNumber), HB_FUNF_PROCEDURE ); } +#line 322 "harbour.y" /* yacc.c:1646 */ + { hb_compFunctionAdd( HB_COMP_PARAM, (yyvsp[0].string), ( HB_SYMBOLSCOPE ) (yyvsp[-2].iNumber), HB_FUNF_PROCEDURE ); } +#line 3911 "harboury.c" /* yacc.c:1646 */ break; case 23: - -/* Line 1806 of yacc.c */ -#line 323 "harbour.y" - { hb_compFunctionAdd( HB_COMP_PARAM, (yyvsp[(3) - (3)].string), ( HB_SYMBOLSCOPE ) (yyvsp[(1) - (3)].iNumber), 0 ); HB_COMP_PARAM->iVarScope = HB_VSCOMP_PARAMETER; } +#line 323 "harbour.y" /* yacc.c:1646 */ + { hb_compFunctionAdd( HB_COMP_PARAM, (yyvsp[0].string), ( HB_SYMBOLSCOPE ) (yyvsp[-2].iNumber), 0 ); HB_COMP_PARAM->iVarScope = HB_VSCOMP_PARAMETER; } +#line 3917 "harboury.c" /* yacc.c:1646 */ break; case 25: - -/* Line 1806 of yacc.c */ -#line 324 "harbour.y" - { hb_compFunctionAdd( HB_COMP_PARAM, (yyvsp[(3) - (3)].string), ( HB_SYMBOLSCOPE ) (yyvsp[(1) - (3)].iNumber), HB_FUNF_PROCEDURE ); HB_COMP_PARAM->iVarScope = HB_VSCOMP_PARAMETER;} +#line 324 "harbour.y" /* yacc.c:1646 */ + { hb_compFunctionAdd( HB_COMP_PARAM, (yyvsp[0].string), ( HB_SYMBOLSCOPE ) (yyvsp[-2].iNumber), HB_FUNF_PROCEDURE ); HB_COMP_PARAM->iVarScope = HB_VSCOMP_PARAMETER;} +#line 3923 "harboury.c" /* yacc.c:1646 */ break; case 27: - -/* Line 1806 of yacc.c */ -#line 327 "harbour.y" +#line 327 "harbour.y" /* yacc.c:1646 */ { (yyval.iNumber) = HB_FS_PUBLIC; } +#line 3929 "harboury.c" /* yacc.c:1646 */ break; case 28: - -/* Line 1806 of yacc.c */ -#line 328 "harbour.y" +#line 328 "harbour.y" /* yacc.c:1646 */ { (yyval.iNumber) = HB_FS_STATIC; } +#line 3935 "harboury.c" /* yacc.c:1646 */ break; case 29: - -/* Line 1806 of yacc.c */ -#line 329 "harbour.y" +#line 329 "harbour.y" /* yacc.c:1646 */ { (yyval.iNumber) = HB_FS_INIT; } +#line 3941 "harboury.c" /* yacc.c:1646 */ break; case 30: - -/* Line 1806 of yacc.c */ -#line 330 "harbour.y" +#line 330 "harbour.y" /* yacc.c:1646 */ { (yyval.iNumber) = HB_FS_EXIT; } +#line 3947 "harboury.c" /* yacc.c:1646 */ break; case 31: - -/* Line 1806 of yacc.c */ -#line 333 "harbour.y" +#line 333 "harbour.y" /* yacc.c:1646 */ { (yyval.iNumber) = 0; } +#line 3953 "harboury.c" /* yacc.c:1646 */ break; case 32: - -/* Line 1806 of yacc.c */ -#line 334 "harbour.y" +#line 334 "harbour.y" /* yacc.c:1646 */ { HB_COMP_PARAM->functions.pLast->fVParams = HB_TRUE; (yyval.iNumber) = 0; } +#line 3959 "harboury.c" /* yacc.c:1646 */ break; case 34: - -/* Line 1806 of yacc.c */ -#line 336 "harbour.y" - { HB_COMP_PARAM->functions.pLast->fVParams = HB_TRUE; (yyval.iNumber) = (yyvsp[(1) - (3)].iNumber); } +#line 336 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_PARAM->functions.pLast->fVParams = HB_TRUE; (yyval.iNumber) = (yyvsp[-2].iNumber); } +#line 3965 "harboury.c" /* yacc.c:1646 */ break; case 35: - -/* Line 1806 of yacc.c */ -#line 339 "harbour.y" +#line 339 "harbour.y" /* yacc.c:1646 */ { (yyval.asVarType) = hb_compVarTypeNew( HB_COMP_PARAM, ' ', NULL ); } +#line 3971 "harboury.c" /* yacc.c:1646 */ break; case 37: - -/* Line 1806 of yacc.c */ -#line 343 "harbour.y" +#line 343 "harbour.y" /* yacc.c:1646 */ { (yyval.asVarType) = hb_compVarTypeNew( HB_COMP_PARAM, ' ', NULL ); } +#line 3977 "harboury.c" /* yacc.c:1646 */ break; case 39: - -/* Line 1806 of yacc.c */ -#line 347 "harbour.y" +#line 347 "harbour.y" /* yacc.c:1646 */ { (yyval.asVarType) = hb_compVarTypeNew( HB_COMP_PARAM, 'N', NULL ); } +#line 3983 "harboury.c" /* yacc.c:1646 */ break; case 40: - -/* Line 1806 of yacc.c */ -#line 348 "harbour.y" +#line 348 "harbour.y" /* yacc.c:1646 */ { (yyval.asVarType) = hb_compVarTypeNew( HB_COMP_PARAM, 'C', NULL ); } +#line 3989 "harboury.c" /* yacc.c:1646 */ break; case 41: - -/* Line 1806 of yacc.c */ -#line 349 "harbour.y" +#line 349 "harbour.y" /* yacc.c:1646 */ { (yyval.asVarType) = hb_compVarTypeNew( HB_COMP_PARAM, 'D', NULL ); } +#line 3995 "harboury.c" /* yacc.c:1646 */ break; case 42: - -/* Line 1806 of yacc.c */ -#line 350 "harbour.y" +#line 350 "harbour.y" /* yacc.c:1646 */ { (yyval.asVarType) = hb_compVarTypeNew( HB_COMP_PARAM, 'L', NULL ); } +#line 4001 "harboury.c" /* yacc.c:1646 */ break; case 43: - -/* Line 1806 of yacc.c */ -#line 351 "harbour.y" +#line 351 "harbour.y" /* yacc.c:1646 */ { (yyval.asVarType) = hb_compVarTypeNew( HB_COMP_PARAM, 'B', NULL ); } +#line 4007 "harboury.c" /* yacc.c:1646 */ break; case 44: - -/* Line 1806 of yacc.c */ -#line 352 "harbour.y" +#line 352 "harbour.y" /* yacc.c:1646 */ { (yyval.asVarType) = hb_compVarTypeNew( HB_COMP_PARAM, 'O', NULL ); } +#line 4013 "harboury.c" /* yacc.c:1646 */ break; case 45: - -/* Line 1806 of yacc.c */ -#line 353 "harbour.y" - { (yyval.asVarType) = hb_compVarTypeNew( HB_COMP_PARAM, 'S', (yyvsp[(2) - (2)].string) ); } +#line 353 "harbour.y" /* yacc.c:1646 */ + { (yyval.asVarType) = hb_compVarTypeNew( HB_COMP_PARAM, 'S', (yyvsp[0].string) ); } +#line 4019 "harboury.c" /* yacc.c:1646 */ break; case 46: - -/* Line 1806 of yacc.c */ -#line 354 "harbour.y" +#line 354 "harbour.y" /* yacc.c:1646 */ { (yyval.asVarType) = hb_compVarTypeNew( HB_COMP_PARAM, ' ', NULL ); } +#line 4025 "harboury.c" /* yacc.c:1646 */ break; case 48: - -/* Line 1806 of yacc.c */ -#line 358 "harbour.y" +#line 358 "harbour.y" /* yacc.c:1646 */ { (yyval.asVarType) = hb_compVarTypeNew( HB_COMP_PARAM, 'A', NULL ); } +#line 4031 "harboury.c" /* yacc.c:1646 */ break; case 49: - -/* Line 1806 of yacc.c */ -#line 359 "harbour.y" +#line 359 "harbour.y" /* yacc.c:1646 */ { (yyval.asVarType) = hb_compVarTypeNew( HB_COMP_PARAM, 'n', NULL ); } +#line 4037 "harboury.c" /* yacc.c:1646 */ break; case 50: - -/* Line 1806 of yacc.c */ -#line 360 "harbour.y" +#line 360 "harbour.y" /* yacc.c:1646 */ { (yyval.asVarType) = hb_compVarTypeNew( HB_COMP_PARAM, 'c', NULL ); } +#line 4043 "harboury.c" /* yacc.c:1646 */ break; case 51: - -/* Line 1806 of yacc.c */ -#line 361 "harbour.y" +#line 361 "harbour.y" /* yacc.c:1646 */ { (yyval.asVarType) = hb_compVarTypeNew( HB_COMP_PARAM, 'd', NULL ); } +#line 4049 "harboury.c" /* yacc.c:1646 */ break; case 52: - -/* Line 1806 of yacc.c */ -#line 362 "harbour.y" +#line 362 "harbour.y" /* yacc.c:1646 */ { (yyval.asVarType) = hb_compVarTypeNew( HB_COMP_PARAM, 'l', NULL ); } +#line 4055 "harboury.c" /* yacc.c:1646 */ break; case 53: - -/* Line 1806 of yacc.c */ -#line 363 "harbour.y" +#line 363 "harbour.y" /* yacc.c:1646 */ { (yyval.asVarType) = hb_compVarTypeNew( HB_COMP_PARAM, 'a', NULL ); } +#line 4061 "harboury.c" /* yacc.c:1646 */ break; case 54: - -/* Line 1806 of yacc.c */ -#line 364 "harbour.y" +#line 364 "harbour.y" /* yacc.c:1646 */ { (yyval.asVarType) = hb_compVarTypeNew( HB_COMP_PARAM, 'b', NULL ); } +#line 4067 "harboury.c" /* yacc.c:1646 */ break; case 55: - -/* Line 1806 of yacc.c */ -#line 365 "harbour.y" +#line 365 "harbour.y" /* yacc.c:1646 */ { (yyval.asVarType) = hb_compVarTypeNew( HB_COMP_PARAM, 'o', NULL ); } +#line 4073 "harboury.c" /* yacc.c:1646 */ break; case 56: - -/* Line 1806 of yacc.c */ -#line 366 "harbour.y" - { (yyval.asVarType) = hb_compVarTypeNew( HB_COMP_PARAM, 's', (yyvsp[(2) - (2)].string) ); } +#line 366 "harbour.y" /* yacc.c:1646 */ + { (yyval.asVarType) = hb_compVarTypeNew( HB_COMP_PARAM, 's', (yyvsp[0].string) ); } +#line 4079 "harboury.c" /* yacc.c:1646 */ break; case 57: - -/* Line 1806 of yacc.c */ -#line 369 "harbour.y" - { hb_compVariableAdd( HB_COMP_PARAM, (yyvsp[(1) - (2)].string), (yyvsp[(2) - (2)].asVarType) ); (yyval.iNumber) = 1; } +#line 369 "harbour.y" /* yacc.c:1646 */ + { hb_compVariableAdd( HB_COMP_PARAM, (yyvsp[-1].string), (yyvsp[0].asVarType) ); (yyval.iNumber) = 1; } +#line 4085 "harboury.c" /* yacc.c:1646 */ break; case 58: - -/* Line 1806 of yacc.c */ -#line 370 "harbour.y" - { hb_compVariableAdd( HB_COMP_PARAM, (yyvsp[(3) - (4)].string), (yyvsp[(4) - (4)].asVarType) ); (yyval.iNumber)++; } +#line 370 "harbour.y" /* yacc.c:1646 */ + { hb_compVariableAdd( HB_COMP_PARAM, (yyvsp[-1].string), (yyvsp[0].asVarType) ); (yyval.iNumber)++; } +#line 4091 "harboury.c" /* yacc.c:1646 */ break; case 60: - -/* Line 1806 of yacc.c */ -#line 379 "harbour.y" - { HB_COMP_EXPR_FREE( hb_compExprGenStatement( (yyvsp[(1) - (2)].asExpr), HB_COMP_PARAM ) ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 379 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( hb_compExprGenStatement( (yyvsp[-1].asExpr), HB_COMP_PARAM ) ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 4097 "harboury.c" /* yacc.c:1646 */ break; case 61: - -/* Line 1806 of yacc.c */ -#line 380 "harbour.y" - { HB_COMP_EXPR_FREE( hb_compExprGenStatement( (yyvsp[(1) - (2)].asExpr), HB_COMP_PARAM ) ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 380 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( hb_compExprGenStatement( (yyvsp[-1].asExpr), HB_COMP_PARAM ) ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 4103 "harboury.c" /* yacc.c:1646 */ break; case 62: - -/* Line 1806 of yacc.c */ -#line 381 "harbour.y" - { HB_COMP_EXPR_FREE( hb_compExprGenStatement( (yyvsp[(1) - (2)].asExpr), HB_COMP_PARAM ) ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 381 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( hb_compExprGenStatement( (yyvsp[-1].asExpr), HB_COMP_PARAM ) ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 4109 "harboury.c" /* yacc.c:1646 */ break; case 63: - -/* Line 1806 of yacc.c */ -#line 382 "harbour.y" - { HB_COMP_EXPR_FREE( hb_compExprGenStatement( (yyvsp[(1) - (2)].asExpr), HB_COMP_PARAM ) ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 382 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( hb_compExprGenStatement( (yyvsp[-1].asExpr), HB_COMP_PARAM ) ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 4115 "harboury.c" /* yacc.c:1646 */ break; case 64: - -/* Line 1806 of yacc.c */ -#line 383 "harbour.y" +#line 383 "harbour.y" /* yacc.c:1646 */ { if( HB_COMP_ISSUPPORTED( HB_COMPFLAG_XBASE ) ) - HB_COMP_EXPR_FREE( hb_compExprGenStatement( (yyvsp[(1) - (2)].asExpr), HB_COMP_PARAM ) ); + HB_COMP_EXPR_FREE( hb_compExprGenStatement( (yyvsp[-1].asExpr), HB_COMP_PARAM ) ); else - HB_COMP_EXPR_FREE( HB_COMP_ERROR_SYNTAX( (yyvsp[(1) - (2)].asExpr) ) ); + HB_COMP_EXPR_FREE( HB_COMP_ERROR_SYNTAX( (yyvsp[-1].asExpr) ) ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 4126 "harboury.c" /* yacc.c:1646 */ break; case 65: - -/* Line 1806 of yacc.c */ -#line 389 "harbour.y" - { HB_COMP_EXPR_FREE( hb_compExprGenStatement( (yyvsp[(1) - (2)].asExpr), HB_COMP_PARAM ) ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 389 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( hb_compExprGenStatement( (yyvsp[-1].asExpr), HB_COMP_PARAM ) ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 4132 "harboury.c" /* yacc.c:1646 */ break; case 66: - -/* Line 1806 of yacc.c */ -#line 390 "harbour.y" - { HB_COMP_EXPR_FREE( hb_compExprGenStatement( (yyvsp[(1) - (2)].asExpr), HB_COMP_PARAM ) ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 390 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( hb_compExprGenStatement( (yyvsp[-1].asExpr), HB_COMP_PARAM ) ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 4138 "harboury.c" /* yacc.c:1646 */ break; case 67: - -/* Line 1806 of yacc.c */ -#line 391 "harbour.y" - { HB_COMP_EXPR_FREE( hb_compExprGenStatement( (yyvsp[(1) - (2)].asExpr), HB_COMP_PARAM ) ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 391 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( hb_compExprGenStatement( (yyvsp[-1].asExpr), HB_COMP_PARAM ) ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 4144 "harboury.c" /* yacc.c:1646 */ break; case 68: - -/* Line 1806 of yacc.c */ -#line 392 "harbour.y" - { HB_COMP_EXPR_FREE( hb_compExprGenStatement( (yyvsp[(1) - (2)].asExpr), HB_COMP_PARAM ) ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 392 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( hb_compExprGenStatement( (yyvsp[-1].asExpr), HB_COMP_PARAM ) ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 4150 "harboury.c" /* yacc.c:1646 */ break; case 69: - -/* Line 1806 of yacc.c */ -#line 393 "harbour.y" - { HB_COMP_EXPR_FREE( hb_compExprGenStatement( (yyvsp[(1) - (2)].asExpr), HB_COMP_PARAM ) ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 393 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( hb_compExprGenStatement( (yyvsp[-1].asExpr), HB_COMP_PARAM ) ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 4156 "harboury.c" /* yacc.c:1646 */ break; case 70: - -/* Line 1806 of yacc.c */ -#line 394 "harbour.y" - { HB_COMP_EXPR_FREE( hb_compExprGenStatement( (yyvsp[(1) - (2)].asExpr), HB_COMP_PARAM ) ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 394 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( hb_compExprGenStatement( (yyvsp[-1].asExpr), HB_COMP_PARAM ) ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 4162 "harboury.c" /* yacc.c:1646 */ break; case 71: - -/* Line 1806 of yacc.c */ -#line 395 "harbour.y" - { HB_COMP_EXPR_FREE( hb_compExprGenStatement( (yyvsp[(1) - (2)].asExpr), HB_COMP_PARAM ) ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 395 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( hb_compExprGenStatement( (yyvsp[-1].asExpr), HB_COMP_PARAM ) ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 4168 "harboury.c" /* yacc.c:1646 */ break; case 72: - -/* Line 1806 of yacc.c */ -#line 396 "harbour.y" +#line 396 "harbour.y" /* yacc.c:1646 */ { hb_compGenBreak( HB_COMP_PARAM ); hb_compGenPCode2( HB_P_DOSHORT, 0, HB_COMP_PARAM ); HB_COMP_PARAM->functions.pLast->funFlags |= HB_FUNF_BREAK_CODE; } +#line 4175 "harboury.c" /* yacc.c:1646 */ break; case 73: - -/* Line 1806 of yacc.c */ -#line 398 "harbour.y" +#line 398 "harbour.y" /* yacc.c:1646 */ { hb_compLinePushIfInside( HB_COMP_PARAM ); } +#line 4181 "harboury.c" /* yacc.c:1646 */ break; case 74: - -/* Line 1806 of yacc.c */ -#line 399 "harbour.y" +#line 399 "harbour.y" /* yacc.c:1646 */ { - hb_compGenBreak( HB_COMP_PARAM ); HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[(3) - (4)].asExpr), HB_COMP_PARAM ) ); + hb_compGenBreak( HB_COMP_PARAM ); HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[-1].asExpr), HB_COMP_PARAM ) ); hb_compGenPCode2( HB_P_DOSHORT, 1, HB_COMP_PARAM ); HB_COMP_PARAM->functions.pLast->funFlags |= HB_FUNF_BREAK_CODE; } +#line 4191 "harboury.c" /* yacc.c:1646 */ break; case 75: - -/* Line 1806 of yacc.c */ -#line 404 "harbour.y" +#line 404 "harbour.y" /* yacc.c:1646 */ { hb_compLoopExit( HB_COMP_PARAM ); HB_COMP_PARAM->functions.pLast->funFlags |= HB_FUNF_BREAK_CODE; } +#line 4197 "harboury.c" /* yacc.c:1646 */ break; case 76: - -/* Line 1806 of yacc.c */ -#line 405 "harbour.y" +#line 405 "harbour.y" /* yacc.c:1646 */ { hb_compLoopLoop( HB_COMP_PARAM ); HB_COMP_PARAM->functions.pLast->funFlags |= HB_FUNF_BREAK_CODE; } +#line 4203 "harboury.c" /* yacc.c:1646 */ break; case 77: - -/* Line 1806 of yacc.c */ -#line 406 "harbour.y" +#line 406 "harbour.y" /* yacc.c:1646 */ { if( HB_COMP_PARAM->functions.pLast->wSeqCounter ) { @@ -4660,26 +4217,24 @@ yyreduce: } HB_COMP_PARAM->functions.pLast->funFlags |= HB_FUNF_WITH_RETURN | HB_FUNF_BREAK_CODE; } +#line 4221 "harboury.c" /* yacc.c:1646 */ break; case 78: - -/* Line 1806 of yacc.c */ -#line 419 "harbour.y" +#line 419 "harbour.y" /* yacc.c:1646 */ { hb_compLinePushIfInside( HB_COMP_PARAM ); } +#line 4227 "harboury.c" /* yacc.c:1646 */ break; case 79: - -/* Line 1806 of yacc.c */ -#line 421 "harbour.y" +#line 421 "harbour.y" /* yacc.c:1646 */ { if( HB_COMP_PARAM->functions.pLast->wSeqCounter ) { hb_compGenError( HB_COMP_PARAM, hb_comp_szErrors, 'E', HB_COMP_ERR_EXIT_IN_SEQUENCE, "RETURN", NULL ); } /* TODO: check if return value agree with declared value */ - HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[(3) - (4)].asExpr), HB_COMP_PARAM ) ); + HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[-1].asExpr), HB_COMP_PARAM ) ); if( HB_COMP_PARAM->functions.pLast->funFlags & HB_FUNF_EXTBLOCK ) /* extended clodeblock, use HB_P_ENDBLOCK to return value and stop execution */ hb_compGenPCode1( HB_P_ENDBLOCK, HB_COMP_PARAM ); @@ -4692,137 +4247,123 @@ yyreduce: } HB_COMP_PARAM->functions.pLast->funFlags |= HB_FUNF_WITH_RETURN | HB_FUNF_BREAK_CODE; } +#line 4251 "harboury.c" /* yacc.c:1646 */ break; case 80: - -/* Line 1806 of yacc.c */ -#line 440 "harbour.y" +#line 440 "harbour.y" /* yacc.c:1646 */ { hb_compLinePushIfInside( HB_COMP_PARAM ); HB_COMP_PARAM->iVarScope = HB_VSCOMP_PUBLIC; } +#line 4257 "harboury.c" /* yacc.c:1646 */ break; case 81: - -/* Line 1806 of yacc.c */ -#line 442 "harbour.y" +#line 442 "harbour.y" /* yacc.c:1646 */ { hb_compRTVariableGen( HB_COMP_PARAM, "__MVPUBLIC" ); HB_COMP_PARAM->iVarScope = HB_VSCOMP_NONE; HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 4266 "harboury.c" /* yacc.c:1646 */ break; case 83: - -/* Line 1806 of yacc.c */ -#line 446 "harbour.y" +#line 446 "harbour.y" /* yacc.c:1646 */ { hb_compLinePushIfInside( HB_COMP_PARAM ); HB_COMP_PARAM->iVarScope = HB_VSCOMP_PRIVATE; } +#line 4272 "harboury.c" /* yacc.c:1646 */ break; case 84: - -/* Line 1806 of yacc.c */ -#line 448 "harbour.y" +#line 448 "harbour.y" /* yacc.c:1646 */ { hb_compRTVariableGen( HB_COMP_PARAM, "__MVPRIVATE" ); HB_COMP_PARAM->iVarScope = HB_VSCOMP_NONE; HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 4281 "harboury.c" /* yacc.c:1646 */ break; case 91: - -/* Line 1806 of yacc.c */ -#line 457 "harbour.y" +#line 457 "harbour.y" /* yacc.c:1646 */ { if( HB_COMP_PARAM->szAnnounce == NULL ) - HB_COMP_PARAM->szAnnounce = (yyvsp[(2) - (2)].string); + HB_COMP_PARAM->szAnnounce = (yyvsp[0].string); else - hb_compGenWarning( HB_COMP_PARAM, hb_comp_szWarnings, 'W', HB_COMP_WARN_DUPL_ANNOUNCE, (yyvsp[(2) - (2)].string), NULL ); + hb_compGenWarning( HB_COMP_PARAM, hb_comp_szWarnings, 'W', HB_COMP_WARN_DUPL_ANNOUNCE, (yyvsp[0].string), NULL ); } +#line 4292 "harboury.c" /* yacc.c:1646 */ break; case 94: - -/* Line 1806 of yacc.c */ -#line 466 "harbour.y" +#line 466 "harbour.y" /* yacc.c:1646 */ { - if( (yyvsp[(1) - (1)].valChar).dealloc ) + if( (yyvsp[0].valChar).dealloc ) { - (yyvsp[(1) - (1)].valChar).string = ( char * ) hb_compIdentifierNew( HB_COMP_PARAM, (yyvsp[(1) - (1)].valChar).string, HB_IDENT_FREE ); - (yyvsp[(1) - (1)].valChar).dealloc = HB_FALSE; + (yyvsp[0].valChar).string = ( char * ) hb_compIdentifierNew( HB_COMP_PARAM, (yyvsp[0].valChar).string, HB_IDENT_FREE ); + (yyvsp[0].valChar).dealloc = HB_FALSE; } - hb_compModuleAdd( HB_COMP_PARAM, (yyvsp[(1) - (1)].valChar).string, HB_FALSE ); + hb_compModuleAdd( HB_COMP_PARAM, (yyvsp[0].valChar).string, HB_FALSE ); } +#line 4305 "harboury.c" /* yacc.c:1646 */ break; case 95: - -/* Line 1806 of yacc.c */ -#line 474 "harbour.y" +#line 474 "harbour.y" /* yacc.c:1646 */ { { char szFileName[ HB_PATH_MAX ]; - hb_strncat( hb_strncpy( szFileName, (yyvsp[(1) - (3)].valChar).string, sizeof( szFileName ) - 1 ), (yyvsp[(3) - (3)].valChar).string, sizeof( szFileName ) - 1 ); + hb_strncat( hb_strncpy( szFileName, (yyvsp[-2].valChar).string, sizeof( szFileName ) - 1 ), (yyvsp[0].valChar).string, sizeof( szFileName ) - 1 ); hb_compModuleAdd( HB_COMP_PARAM, hb_compIdentifierNew( HB_COMP_PARAM, szFileName, HB_IDENT_COPY ), HB_FALSE ); - if( (yyvsp[(1) - (3)].valChar).dealloc ) + if( (yyvsp[-2].valChar).dealloc ) { - hb_xfree( (yyvsp[(1) - (3)].valChar).string ); - (yyvsp[(1) - (3)].valChar).dealloc = HB_FALSE; + hb_xfree( (yyvsp[-2].valChar).string ); + (yyvsp[-2].valChar).dealloc = HB_FALSE; } - if( (yyvsp[(3) - (3)].valChar).dealloc ) + if( (yyvsp[0].valChar).dealloc ) { - hb_xfree( (yyvsp[(3) - (3)].valChar).string ); - (yyvsp[(3) - (3)].valChar).dealloc = HB_FALSE; + hb_xfree( (yyvsp[0].valChar).string ); + (yyvsp[0].valChar).dealloc = HB_FALSE; } } } +#line 4327 "harboury.c" /* yacc.c:1646 */ break; case 96: - -/* Line 1806 of yacc.c */ -#line 493 "harbour.y" +#line 493 "harbour.y" /* yacc.c:1646 */ { hb_compLinePushIfInside( HB_COMP_PARAM ); } +#line 4333 "harboury.c" /* yacc.c:1646 */ break; case 98: - -/* Line 1806 of yacc.c */ -#line 496 "harbour.y" +#line 496 "harbour.y" /* yacc.c:1646 */ { (yyval.lNumber) = 0; } +#line 4339 "harboury.c" /* yacc.c:1646 */ break; case 99: - -/* Line 1806 of yacc.c */ -#line 497 "harbour.y" +#line 497 "harbour.y" /* yacc.c:1646 */ { (yyval.lNumber) = 1; } +#line 4345 "harboury.c" /* yacc.c:1646 */ break; case 100: - -/* Line 1806 of yacc.c */ -#line 498 "harbour.y" +#line 498 "harbour.y" /* yacc.c:1646 */ { (yyval.lNumber) = 1; } +#line 4351 "harboury.c" /* yacc.c:1646 */ break; case 101: - -/* Line 1806 of yacc.c */ -#line 499 "harbour.y" +#line 499 "harbour.y" /* yacc.c:1646 */ { (yyval.lNumber) = 0; } +#line 4357 "harboury.c" /* yacc.c:1646 */ break; case 102: - -/* Line 1806 of yacc.c */ -#line 500 "harbour.y" +#line 500 "harbour.y" /* yacc.c:1646 */ { (yyval.lNumber) = 0; hb_compCheckUnclosedStru( HB_COMP_PARAM, HB_COMP_PARAM->functions.pLast ); } +#line 4363 "harboury.c" /* yacc.c:1646 */ break; case 103: - -/* Line 1806 of yacc.c */ -#line 501 "harbour.y" +#line 501 "harbour.y" /* yacc.c:1646 */ { if( HB_COMP_PARAM->ilastLineErr && HB_COMP_PARAM->ilastLineErr == HB_COMP_PARAM->currLine ) { yyclearin; @@ -4834,1408 +4375,1213 @@ yyreduce: } (yyval.lNumber) = 0; } +#line 4379 "harboury.c" /* yacc.c:1646 */ break; case 113: - -/* Line 1806 of yacc.c */ -#line 527 "harbour.y" - { (yyval.lNumber) += (yyvsp[(2) - (2)].lNumber); } +#line 527 "harbour.y" /* yacc.c:1646 */ + { (yyval.lNumber) += (yyvsp[0].lNumber); } +#line 4385 "harboury.c" /* yacc.c:1646 */ break; case 114: - -/* Line 1806 of yacc.c */ -#line 530 "harbour.y" +#line 530 "harbour.y" /* yacc.c:1646 */ { (yyval.lNumber) = 0; } +#line 4391 "harboury.c" /* yacc.c:1646 */ break; case 116: - -/* Line 1806 of yacc.c */ -#line 534 "harbour.y" - { hb_compExternAdd( HB_COMP_PARAM, (yyvsp[(1) - (1)].string), 0 ); } +#line 534 "harbour.y" /* yacc.c:1646 */ + { hb_compExternAdd( HB_COMP_PARAM, (yyvsp[0].string), 0 ); } +#line 4397 "harboury.c" /* yacc.c:1646 */ break; case 117: - -/* Line 1806 of yacc.c */ -#line 535 "harbour.y" - { hb_compExternAdd( HB_COMP_PARAM, (yyvsp[(3) - (3)].string), 0 ); } +#line 535 "harbour.y" /* yacc.c:1646 */ + { hb_compExternAdd( HB_COMP_PARAM, (yyvsp[0].string), 0 ); } +#line 4403 "harboury.c" /* yacc.c:1646 */ break; case 118: - -/* Line 1806 of yacc.c */ -#line 538 "harbour.y" - { hb_compExternAdd( HB_COMP_PARAM, (yyvsp[(1) - (1)].string), HB_FS_DEFERRED ); } +#line 538 "harbour.y" /* yacc.c:1646 */ + { hb_compExternAdd( HB_COMP_PARAM, (yyvsp[0].string), HB_FS_DEFERRED ); } +#line 4409 "harboury.c" /* yacc.c:1646 */ break; case 119: - -/* Line 1806 of yacc.c */ -#line 539 "harbour.y" - { hb_compExternAdd( HB_COMP_PARAM, (yyvsp[(3) - (3)].string), HB_FS_DEFERRED ); } +#line 539 "harbour.y" /* yacc.c:1646 */ + { hb_compExternAdd( HB_COMP_PARAM, (yyvsp[0].string), HB_FS_DEFERRED ); } +#line 4415 "harboury.c" /* yacc.c:1646 */ break; case 121: - -/* Line 1806 of yacc.c */ -#line 543 "harbour.y" +#line 543 "harbour.y" /* yacc.c:1646 */ { (yyval.string) = "STEP"; } +#line 4421 "harboury.c" /* yacc.c:1646 */ break; case 122: - -/* Line 1806 of yacc.c */ -#line 544 "harbour.y" +#line 544 "harbour.y" /* yacc.c:1646 */ { (yyval.string) = "TO"; } +#line 4427 "harboury.c" /* yacc.c:1646 */ break; case 123: - -/* Line 1806 of yacc.c */ -#line 545 "harbour.y" +#line 545 "harbour.y" /* yacc.c:1646 */ { (yyval.string) = "LOOP"; } +#line 4433 "harboury.c" /* yacc.c:1646 */ break; case 124: - -/* Line 1806 of yacc.c */ -#line 546 "harbour.y" +#line 546 "harbour.y" /* yacc.c:1646 */ { (yyval.string) = "EXIT"; } +#line 4439 "harboury.c" /* yacc.c:1646 */ break; case 125: - -/* Line 1806 of yacc.c */ -#line 547 "harbour.y" +#line 547 "harbour.y" /* yacc.c:1646 */ { (yyval.string) = "IN"; } +#line 4445 "harboury.c" /* yacc.c:1646 */ break; case 126: - -/* Line 1806 of yacc.c */ -#line 548 "harbour.y" - { (yyval.string) = (yyvsp[(1) - (1)].string); } +#line 548 "harbour.y" /* yacc.c:1646 */ + { (yyval.string) = (yyvsp[0].string); } +#line 4451 "harboury.c" /* yacc.c:1646 */ break; case 127: - -/* Line 1806 of yacc.c */ -#line 549 "harbour.y" - { (yyval.string) = (yyvsp[(1) - (1)].string); } +#line 549 "harbour.y" /* yacc.c:1646 */ + { (yyval.string) = (yyvsp[0].string); } +#line 4457 "harboury.c" /* yacc.c:1646 */ break; case 128: - -/* Line 1806 of yacc.c */ -#line 550 "harbour.y" - { (yyval.string) = (yyvsp[(1) - (1)].string); } +#line 550 "harbour.y" /* yacc.c:1646 */ + { (yyval.string) = (yyvsp[0].string); } +#line 4463 "harboury.c" /* yacc.c:1646 */ break; case 129: - -/* Line 1806 of yacc.c */ -#line 551 "harbour.y" - { (yyval.string) = (yyvsp[(1) - (1)].string); } +#line 551 "harbour.y" /* yacc.c:1646 */ + { (yyval.string) = (yyvsp[0].string); } +#line 4469 "harboury.c" /* yacc.c:1646 */ break; case 130: - -/* Line 1806 of yacc.c */ -#line 552 "harbour.y" - { (yyval.string) = (yyvsp[(1) - (1)].string); } +#line 552 "harbour.y" /* yacc.c:1646 */ + { (yyval.string) = (yyvsp[0].string); } +#line 4475 "harboury.c" /* yacc.c:1646 */ break; case 131: - -/* Line 1806 of yacc.c */ -#line 553 "harbour.y" - { (yyval.string) = (yyvsp[(1) - (1)].string); } +#line 553 "harbour.y" /* yacc.c:1646 */ + { (yyval.string) = (yyvsp[0].string); } +#line 4481 "harboury.c" /* yacc.c:1646 */ break; case 132: - -/* Line 1806 of yacc.c */ -#line 554 "harbour.y" - { (yyval.string) = (yyvsp[(1) - (1)].string); } +#line 554 "harbour.y" /* yacc.c:1646 */ + { (yyval.string) = (yyvsp[0].string); } +#line 4487 "harboury.c" /* yacc.c:1646 */ break; case 133: - -/* Line 1806 of yacc.c */ -#line 555 "harbour.y" - { (yyval.string) = (yyvsp[(1) - (1)].string); } +#line 555 "harbour.y" /* yacc.c:1646 */ + { (yyval.string) = (yyvsp[0].string); } +#line 4493 "harboury.c" /* yacc.c:1646 */ break; case 134: - -/* Line 1806 of yacc.c */ -#line 556 "harbour.y" - { (yyval.string) = (yyvsp[(1) - (1)].string); } +#line 556 "harbour.y" /* yacc.c:1646 */ + { (yyval.string) = (yyvsp[0].string); } +#line 4499 "harboury.c" /* yacc.c:1646 */ break; case 135: - -/* Line 1806 of yacc.c */ -#line 557 "harbour.y" - { (yyval.string) = (yyvsp[(1) - (1)].string); } +#line 557 "harbour.y" /* yacc.c:1646 */ + { (yyval.string) = (yyvsp[0].string); } +#line 4505 "harboury.c" /* yacc.c:1646 */ break; case 136: - -/* Line 1806 of yacc.c */ -#line 558 "harbour.y" - { (yyval.string) = (yyvsp[(1) - (1)].string); } +#line 558 "harbour.y" /* yacc.c:1646 */ + { (yyval.string) = (yyvsp[0].string); } +#line 4511 "harboury.c" /* yacc.c:1646 */ break; case 137: - -/* Line 1806 of yacc.c */ -#line 559 "harbour.y" - { (yyval.string) = (yyvsp[(1) - (1)].string); } +#line 559 "harbour.y" /* yacc.c:1646 */ + { (yyval.string) = (yyvsp[0].string); } +#line 4517 "harboury.c" /* yacc.c:1646 */ break; case 138: - -/* Line 1806 of yacc.c */ -#line 560 "harbour.y" - { (yyval.string) = (yyvsp[(1) - (1)].string); } +#line 560 "harbour.y" /* yacc.c:1646 */ + { (yyval.string) = (yyvsp[0].string); } +#line 4523 "harboury.c" /* yacc.c:1646 */ break; case 139: - -/* Line 1806 of yacc.c */ -#line 565 "harbour.y" - { (yyval.asExpr) = hb_compExprNewDouble( (yyvsp[(1) - (1)].valDouble).dNumber, (yyvsp[(1) - (1)].valDouble).bWidth, (yyvsp[(1) - (1)].valDouble).bDec, HB_COMP_PARAM ); } +#line 565 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewDouble( (yyvsp[0].valDouble).dNumber, (yyvsp[0].valDouble).bWidth, (yyvsp[0].valDouble).bDec, HB_COMP_PARAM ); } +#line 4529 "harboury.c" /* yacc.c:1646 */ break; case 140: - -/* Line 1806 of yacc.c */ -#line 566 "harbour.y" - { (yyval.asExpr) = hb_compExprNewLong( (yyvsp[(1) - (1)].valLong).lNumber, HB_COMP_PARAM ); } +#line 566 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewLong( (yyvsp[0].valLong).lNumber, HB_COMP_PARAM ); } +#line 4535 "harboury.c" /* yacc.c:1646 */ break; case 141: - -/* Line 1806 of yacc.c */ -#line 569 "harbour.y" - { (yyval.asExpr) = hb_compExprNewDate( ( long ) (yyvsp[(1) - (1)].valLong).lNumber, HB_COMP_PARAM ); } +#line 569 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewDate( ( long ) (yyvsp[0].valLong).lNumber, HB_COMP_PARAM ); } +#line 4541 "harboury.c" /* yacc.c:1646 */ break; case 142: - -/* Line 1806 of yacc.c */ -#line 572 "harbour.y" - { (yyval.asExpr) = hb_compExprNewTimeStamp( (yyvsp[(1) - (1)].valTimeStamp).date, (yyvsp[(1) - (1)].valTimeStamp).time, HB_COMP_PARAM ); } +#line 572 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewTimeStamp( (yyvsp[0].valTimeStamp).date, (yyvsp[0].valTimeStamp).time, HB_COMP_PARAM ); } +#line 4547 "harboury.c" /* yacc.c:1646 */ break; case 143: - -/* Line 1806 of yacc.c */ -#line 575 "harbour.y" - { (yyval.asExpr) = hb_compExprNewLong( (yyvsp[(1) - (2)].valLong).lNumber, HB_COMP_PARAM ); } +#line 575 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewLong( (yyvsp[-1].valLong).lNumber, HB_COMP_PARAM ); } +#line 4553 "harboury.c" /* yacc.c:1646 */ break; case 144: - -/* Line 1806 of yacc.c */ -#line 576 "harbour.y" - { (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, hb_compExprNewDouble( (yyvsp[(1) - (2)].valDouble).dNumber, (yyvsp[(1) - (2)].valDouble).bWidth, (yyvsp[(1) - (2)].valDouble).bDec, HB_COMP_PARAM ) ); } +#line 576 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, hb_compExprNewDouble( (yyvsp[-1].valDouble).dNumber, (yyvsp[-1].valDouble).bWidth, (yyvsp[-1].valDouble).bDec, HB_COMP_PARAM ) ); } +#line 4559 "harboury.c" /* yacc.c:1646 */ break; case 145: - -/* Line 1806 of yacc.c */ -#line 581 "harbour.y" +#line 581 "harbour.y" /* yacc.c:1646 */ { (yyval.asExpr) = hb_compExprNewNil( HB_COMP_PARAM ); } +#line 4565 "harboury.c" /* yacc.c:1646 */ break; case 147: - -/* Line 1806 of yacc.c */ -#line 589 "harbour.y" +#line 589 "harbour.y" /* yacc.c:1646 */ { - (yyval.asExpr) = hb_compExprNewString( (yyvsp[(1) - (1)].valChar).string, (yyvsp[(1) - (1)].valChar).length, (yyvsp[(1) - (1)].valChar).dealloc, HB_COMP_PARAM ); - (yyvsp[(1) - (1)].valChar).dealloc = HB_FALSE; + (yyval.asExpr) = hb_compExprNewString( (yyvsp[0].valChar).string, (yyvsp[0].valChar).length, (yyvsp[0].valChar).dealloc, HB_COMP_PARAM ); + (yyvsp[0].valChar).dealloc = HB_FALSE; } +#line 4574 "harboury.c" /* yacc.c:1646 */ break; case 150: - -/* Line 1806 of yacc.c */ -#line 605 "harbour.y" +#line 605 "harbour.y" /* yacc.c:1646 */ { (yyval.asExpr) = hb_compExprNewLogical( HB_TRUE, HB_COMP_PARAM ); } +#line 4580 "harboury.c" /* yacc.c:1646 */ break; case 151: - -/* Line 1806 of yacc.c */ -#line 606 "harbour.y" +#line 606 "harbour.y" /* yacc.c:1646 */ { (yyval.asExpr) = hb_compExprNewLogical( HB_FALSE, HB_COMP_PARAM ); } +#line 4586 "harboury.c" /* yacc.c:1646 */ break; case 153: - -/* Line 1806 of yacc.c */ -#line 614 "harbour.y" +#line 614 "harbour.y" /* yacc.c:1646 */ { (yyval.asExpr) = hb_compExprNewSelf( HB_COMP_PARAM ); } +#line 4592 "harboury.c" /* yacc.c:1646 */ break; case 155: - -/* Line 1806 of yacc.c */ -#line 628 "harbour.y" - { (yyval.asExpr) = hb_compExprNewArray( (yyvsp[(2) - (3)].asExpr), HB_COMP_PARAM ); } +#line 628 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewArray( (yyvsp[-1].asExpr), HB_COMP_PARAM ); } +#line 4598 "harboury.c" /* yacc.c:1646 */ break; case 157: - -/* Line 1806 of yacc.c */ -#line 636 "harbour.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 636 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 4604 "harboury.c" /* yacc.c:1646 */ break; case 159: - -/* Line 1806 of yacc.c */ -#line 642 "harbour.y" +#line 642 "harbour.y" /* yacc.c:1646 */ { (yyval.asExpr) = hb_compExprNewHash( NULL, HB_COMP_PARAM ); } +#line 4610 "harboury.c" /* yacc.c:1646 */ break; case 160: - -/* Line 1806 of yacc.c */ -#line 643 "harbour.y" - { (yyval.asExpr) = hb_compExprNewHash( (yyvsp[(2) - (3)].asExpr), HB_COMP_PARAM ); } +#line 643 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewHash( (yyvsp[-1].asExpr), HB_COMP_PARAM ); } +#line 4616 "harboury.c" /* yacc.c:1646 */ break; case 162: - -/* Line 1806 of yacc.c */ -#line 649 "harbour.y" - { (yyval.asExpr) = hb_compExprAddListExpr( hb_compExprNewList( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr) ); } +#line 649 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprAddListExpr( hb_compExprNewList( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr) ); } +#line 4622 "harboury.c" /* yacc.c:1646 */ break; case 163: - -/* Line 1806 of yacc.c */ -#line 650 "harbour.y" - { (yyval.asExpr) = hb_compExprAddListExpr( hb_compExprAddListExpr( (yyvsp[(1) - (5)].asExpr), (yyvsp[(3) - (5)].asExpr) ), (yyvsp[(5) - (5)].asExpr) ); } +#line 650 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprAddListExpr( hb_compExprAddListExpr( (yyvsp[-4].asExpr), (yyvsp[-2].asExpr) ), (yyvsp[0].asExpr) ); } +#line 4628 "harboury.c" /* yacc.c:1646 */ break; case 164: - -/* Line 1806 of yacc.c */ -#line 655 "harbour.y" - { (yyval.asExpr) = hb_compExprNewVar( (yyvsp[(1) - (1)].string), HB_COMP_PARAM ); } +#line 655 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewVar( (yyvsp[0].string), HB_COMP_PARAM ); } +#line 4634 "harboury.c" /* yacc.c:1646 */ break; case 165: - -/* Line 1806 of yacc.c */ -#line 658 "harbour.y" - { (yyval.asExpr) = hb_compExprNewAlias( (yyvsp[(1) - (2)].string), HB_COMP_PARAM ); } +#line 658 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAlias( (yyvsp[-1].string), HB_COMP_PARAM ); } +#line 4640 "harboury.c" /* yacc.c:1646 */ break; case 166: - -/* Line 1806 of yacc.c */ -#line 663 "harbour.y" - { (yyval.asExpr) = hb_compExprNewMacro( NULL, '&', (yyvsp[(1) - (1)].string), HB_COMP_PARAM ); } +#line 663 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewMacro( NULL, '&', (yyvsp[0].string), HB_COMP_PARAM ); } +#line 4646 "harboury.c" /* yacc.c:1646 */ break; case 167: - -/* Line 1806 of yacc.c */ -#line 664 "harbour.y" - { (yyval.asExpr) = hb_compExprNewMacro( NULL, 0, (yyvsp[(1) - (1)].string), HB_COMP_PARAM ); } +#line 664 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewMacro( NULL, 0, (yyvsp[0].string), HB_COMP_PARAM ); } +#line 4652 "harboury.c" /* yacc.c:1646 */ break; case 169: - -/* Line 1806 of yacc.c */ -#line 672 "harbour.y" - { (yyval.asExpr) = hb_compExprNewMacro( (yyvsp[(2) - (2)].asExpr), 0, NULL, HB_COMP_PARAM ); } +#line 672 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewMacro( (yyvsp[0].asExpr), 0, NULL, HB_COMP_PARAM ); } +#line 4658 "harboury.c" /* yacc.c:1646 */ break; case 173: - -/* Line 1806 of yacc.c */ -#line 686 "harbour.y" +#line 686 "harbour.y" /* yacc.c:1646 */ { (yyval.asExpr) = hb_compExprNewAlias( "FIELD", HB_COMP_PARAM ); } +#line 4664 "harboury.c" /* yacc.c:1646 */ break; case 174: - -/* Line 1806 of yacc.c */ -#line 687 "harbour.y" - { (yyval.asExpr) = (yyvsp[(3) - (3)].asExpr); } +#line 687 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 4670 "harboury.c" /* yacc.c:1646 */ break; case 175: - -/* Line 1806 of yacc.c */ -#line 692 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(1) - (2)].asExpr) ); (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 692 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[-1].asExpr) ); (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 4676 "harboury.c" /* yacc.c:1646 */ break; case 176: - -/* Line 1806 of yacc.c */ -#line 693 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(1) - (2)].asExpr) ); (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 693 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[-1].asExpr) ); (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 4682 "harboury.c" /* yacc.c:1646 */ break; case 177: - -/* Line 1806 of yacc.c */ -#line 694 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(1) - (2)].asExpr) ); (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 694 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[-1].asExpr) ); (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 4688 "harboury.c" /* yacc.c:1646 */ break; case 178: - -/* Line 1806 of yacc.c */ -#line 695 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(1) - (2)].asExpr) ); (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 695 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[-1].asExpr) ); (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 4694 "harboury.c" /* yacc.c:1646 */ break; case 179: - -/* Line 1806 of yacc.c */ -#line 696 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(1) - (2)].asExpr) ); (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 696 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[-1].asExpr) ); (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 4700 "harboury.c" /* yacc.c:1646 */ break; case 180: - -/* Line 1806 of yacc.c */ -#line 697 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(1) - (2)].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[(2) - (2)].asExpr) ); } +#line 697 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[-1].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[0].asExpr) ); } +#line 4706 "harboury.c" /* yacc.c:1646 */ break; case 181: - -/* Line 1806 of yacc.c */ -#line 698 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(1) - (2)].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[(2) - (2)].asExpr) ); } +#line 698 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[-1].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[0].asExpr) ); } +#line 4712 "harboury.c" /* yacc.c:1646 */ break; case 182: - -/* Line 1806 of yacc.c */ -#line 699 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(1) - (2)].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[(2) - (2)].asExpr) ); } +#line 699 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[-1].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[0].asExpr) ); } +#line 4718 "harboury.c" /* yacc.c:1646 */ break; case 183: - -/* Line 1806 of yacc.c */ -#line 700 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(1) - (2)].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[(2) - (2)].asExpr) ); } +#line 700 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[-1].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[0].asExpr) ); } +#line 4724 "harboury.c" /* yacc.c:1646 */ break; case 184: - -/* Line 1806 of yacc.c */ -#line 701 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(1) - (2)].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[(2) - (2)].asExpr) ); } +#line 701 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[-1].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[0].asExpr) ); } +#line 4730 "harboury.c" /* yacc.c:1646 */ break; case 185: - -/* Line 1806 of yacc.c */ -#line 702 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(1) - (2)].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[(2) - (2)].asExpr) ); } +#line 702 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[-1].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[0].asExpr) ); } +#line 4736 "harboury.c" /* yacc.c:1646 */ break; case 186: - -/* Line 1806 of yacc.c */ -#line 703 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(1) - (2)].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[(2) - (2)].asExpr) ); } +#line 703 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[-1].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[0].asExpr) ); } +#line 4742 "harboury.c" /* yacc.c:1646 */ break; case 187: - -/* Line 1806 of yacc.c */ -#line 704 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(1) - (2)].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[(2) - (2)].asExpr) ); } +#line 704 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[-1].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[0].asExpr) ); } +#line 4748 "harboury.c" /* yacc.c:1646 */ break; case 188: - -/* Line 1806 of yacc.c */ -#line 705 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(1) - (2)].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[(2) - (2)].asExpr) ); } +#line 705 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[-1].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[0].asExpr) ); } +#line 4754 "harboury.c" /* yacc.c:1646 */ break; case 189: - -/* Line 1806 of yacc.c */ -#line 708 "harbour.y" - { (yyval.asExpr) = hb_compExprNewVar( (yyvsp[(1) - (1)].string), HB_COMP_PARAM ); } +#line 708 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewVar( (yyvsp[0].string), HB_COMP_PARAM ); } +#line 4760 "harboury.c" /* yacc.c:1646 */ break; case 191: - -/* Line 1806 of yacc.c */ -#line 712 "harbour.y" - { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[(1) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 712 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[-1].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 4766 "harboury.c" /* yacc.c:1646 */ break; case 192: - -/* Line 1806 of yacc.c */ -#line 713 "harbour.y" - { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[(1) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 713 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[-1].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 4772 "harboury.c" /* yacc.c:1646 */ break; case 193: - -/* Line 1806 of yacc.c */ -#line 714 "harbour.y" - { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[(1) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 714 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[-1].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 4778 "harboury.c" /* yacc.c:1646 */ break; case 194: - -/* Line 1806 of yacc.c */ -#line 715 "harbour.y" - { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[(1) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 715 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[-1].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 4784 "harboury.c" /* yacc.c:1646 */ break; case 195: - -/* Line 1806 of yacc.c */ -#line 716 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(2) - (2)].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[(1) - (2)].asExpr) ); } +#line 716 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[0].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[-1].asExpr) ); } +#line 4790 "harboury.c" /* yacc.c:1646 */ break; case 196: - -/* Line 1806 of yacc.c */ -#line 717 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(2) - (2)].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[(1) - (2)].asExpr) ); } +#line 717 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[0].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[-1].asExpr) ); } +#line 4796 "harboury.c" /* yacc.c:1646 */ break; case 197: - -/* Line 1806 of yacc.c */ -#line 718 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(2) - (2)].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[(1) - (2)].asExpr) ); } +#line 718 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[0].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[-1].asExpr) ); } +#line 4802 "harboury.c" /* yacc.c:1646 */ break; case 198: - -/* Line 1806 of yacc.c */ -#line 719 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(2) - (2)].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[(1) - (2)].asExpr) ); } +#line 719 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[0].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[-1].asExpr) ); } +#line 4808 "harboury.c" /* yacc.c:1646 */ break; case 199: - -/* Line 1806 of yacc.c */ -#line 720 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(2) - (2)].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[(1) - (2)].asExpr) ); } +#line 720 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[0].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[-1].asExpr) ); } +#line 4814 "harboury.c" /* yacc.c:1646 */ break; case 200: - -/* Line 1806 of yacc.c */ -#line 721 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(2) - (2)].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[(1) - (2)].asExpr) ); } +#line 721 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[0].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[-1].asExpr) ); } +#line 4820 "harboury.c" /* yacc.c:1646 */ break; case 201: - -/* Line 1806 of yacc.c */ -#line 722 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(2) - (2)].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[(1) - (2)].asExpr) ); } +#line 722 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[0].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[-1].asExpr) ); } +#line 4826 "harboury.c" /* yacc.c:1646 */ break; case 202: - -/* Line 1806 of yacc.c */ -#line 723 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(2) - (2)].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[(1) - (2)].asExpr) ); } +#line 723 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[0].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[-1].asExpr) ); } +#line 4832 "harboury.c" /* yacc.c:1646 */ break; case 203: - -/* Line 1806 of yacc.c */ -#line 724 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(2) - (2)].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[(1) - (2)].asExpr) ); } +#line 724 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[0].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[-1].asExpr) ); } +#line 4838 "harboury.c" /* yacc.c:1646 */ break; case 204: - -/* Line 1806 of yacc.c */ -#line 725 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(2) - (2)].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[(1) - (2)].asExpr) ); } +#line 725 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[0].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[-1].asExpr) ); } +#line 4844 "harboury.c" /* yacc.c:1646 */ break; case 205: - -/* Line 1806 of yacc.c */ -#line 726 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(2) - (2)].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[(1) - (2)].asExpr) ); } +#line 726 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[0].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[-1].asExpr) ); } +#line 4850 "harboury.c" /* yacc.c:1646 */ break; case 206: - -/* Line 1806 of yacc.c */ -#line 727 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(2) - (2)].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[(1) - (2)].asExpr) ); } +#line 727 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[0].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[-1].asExpr) ); } +#line 4856 "harboury.c" /* yacc.c:1646 */ break; case 207: - -/* Line 1806 of yacc.c */ -#line 728 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(2) - (2)].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[(1) - (2)].asExpr) ); } +#line 728 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[0].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[-1].asExpr) ); } +#line 4862 "harboury.c" /* yacc.c:1646 */ break; case 208: - -/* Line 1806 of yacc.c */ -#line 729 "harbour.y" - { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[(1) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 729 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[-1].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 4868 "harboury.c" /* yacc.c:1646 */ break; case 209: - -/* Line 1806 of yacc.c */ -#line 730 "harbour.y" - { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[(1) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 730 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[-1].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 4874 "harboury.c" /* yacc.c:1646 */ break; case 210: - -/* Line 1806 of yacc.c */ -#line 731 "harbour.y" - { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[(1) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 731 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[-1].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 4880 "harboury.c" /* yacc.c:1646 */ break; case 211: - -/* Line 1806 of yacc.c */ -#line 740 "harbour.y" - { (yyval.asExpr) = hb_compExprNewAliasExpr( (yyvsp[(1) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 740 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAliasExpr( (yyvsp[-1].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 4886 "harboury.c" /* yacc.c:1646 */ break; case 212: - -/* Line 1806 of yacc.c */ -#line 741 "harbour.y" - { (yyval.asExpr) = hb_compExprNewAliasExpr( (yyvsp[(1) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 741 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAliasExpr( (yyvsp[-1].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 4892 "harboury.c" /* yacc.c:1646 */ break; case 213: - -/* Line 1806 of yacc.c */ -#line 742 "harbour.y" - { (yyval.asExpr) = hb_compExprNewAliasExpr( (yyvsp[(1) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 742 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAliasExpr( (yyvsp[-1].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 4898 "harboury.c" /* yacc.c:1646 */ break; case 214: - -/* Line 1806 of yacc.c */ -#line 743 "harbour.y" - { (yyval.asExpr) = hb_compExprNewAliasExpr( (yyvsp[(1) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 743 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAliasExpr( (yyvsp[-1].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 4904 "harboury.c" /* yacc.c:1646 */ break; case 215: - -/* Line 1806 of yacc.c */ -#line 744 "harbour.y" - { (yyval.asExpr) = hb_compExprNewAliasExpr( (yyvsp[(1) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 744 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAliasExpr( (yyvsp[-1].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 4910 "harboury.c" /* yacc.c:1646 */ break; case 216: - -/* Line 1806 of yacc.c */ -#line 745 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(1) - (2)].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[(2) - (2)].asExpr) ); } +#line 745 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[-1].asExpr) ); (yyval.asExpr) = hb_compErrorAlias( HB_COMP_PARAM, (yyvsp[0].asExpr) ); } +#line 4916 "harboury.c" /* yacc.c:1646 */ break; case 217: - -/* Line 1806 of yacc.c */ -#line 750 "harbour.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 750 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 4922 "harboury.c" /* yacc.c:1646 */ break; case 218: - -/* Line 1806 of yacc.c */ -#line 751 "harbour.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 751 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 4928 "harboury.c" /* yacc.c:1646 */ break; case 219: - -/* Line 1806 of yacc.c */ -#line 752 "harbour.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 752 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 4934 "harboury.c" /* yacc.c:1646 */ break; case 220: - -/* Line 1806 of yacc.c */ -#line 753 "harbour.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 753 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 4940 "harboury.c" /* yacc.c:1646 */ break; case 221: - -/* Line 1806 of yacc.c */ -#line 754 "harbour.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 754 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 4946 "harboury.c" /* yacc.c:1646 */ break; case 222: - -/* Line 1806 of yacc.c */ -#line 755 "harbour.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 755 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 4952 "harboury.c" /* yacc.c:1646 */ break; case 223: - -/* Line 1806 of yacc.c */ -#line 756 "harbour.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 756 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 4958 "harboury.c" /* yacc.c:1646 */ break; case 224: - -/* Line 1806 of yacc.c */ -#line 757 "harbour.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 757 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 4964 "harboury.c" /* yacc.c:1646 */ break; case 225: - -/* Line 1806 of yacc.c */ -#line 758 "harbour.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 758 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 4970 "harboury.c" /* yacc.c:1646 */ break; case 226: - -/* Line 1806 of yacc.c */ -#line 759 "harbour.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 759 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 4976 "harboury.c" /* yacc.c:1646 */ break; case 227: - -/* Line 1806 of yacc.c */ -#line 760 "harbour.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 760 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 4982 "harboury.c" /* yacc.c:1646 */ break; case 228: - -/* Line 1806 of yacc.c */ -#line 761 "harbour.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 761 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 4988 "harboury.c" /* yacc.c:1646 */ break; case 229: - -/* Line 1806 of yacc.c */ -#line 762 "harbour.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 762 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 4994 "harboury.c" /* yacc.c:1646 */ break; case 230: - -/* Line 1806 of yacc.c */ -#line 763 "harbour.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 763 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 5000 "harboury.c" /* yacc.c:1646 */ break; case 231: - -/* Line 1806 of yacc.c */ -#line 764 "harbour.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 764 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 5006 "harboury.c" /* yacc.c:1646 */ break; case 232: - -/* Line 1806 of yacc.c */ -#line 765 "harbour.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 765 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 5012 "harboury.c" /* yacc.c:1646 */ break; case 233: - -/* Line 1806 of yacc.c */ -#line 766 "harbour.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 766 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 5018 "harboury.c" /* yacc.c:1646 */ break; case 234: - -/* Line 1806 of yacc.c */ -#line 767 "harbour.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 767 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 5024 "harboury.c" /* yacc.c:1646 */ break; case 236: - -/* Line 1806 of yacc.c */ -#line 774 "harbour.y" - { (yyval.asExpr) = hb_compExprNewFunCall( hb_compExprNewFunName( (yyvsp[(1) - (4)].string), HB_COMP_PARAM ), (yyvsp[(3) - (4)].asExpr), HB_COMP_PARAM ); } +#line 774 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewFunCall( hb_compExprNewFunName( (yyvsp[-3].string), HB_COMP_PARAM ), (yyvsp[-1].asExpr), HB_COMP_PARAM ); } +#line 5030 "harboury.c" /* yacc.c:1646 */ break; case 238: - -/* Line 1806 of yacc.c */ -#line 778 "harbour.y" - { (yyval.asExpr) = hb_compExprNewFunCall( (yyvsp[(1) - (4)].asExpr), (yyvsp[(3) - (4)].asExpr), HB_COMP_PARAM ); } +#line 778 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewFunCall( (yyvsp[-3].asExpr), (yyvsp[-1].asExpr), HB_COMP_PARAM ); } +#line 5036 "harboury.c" /* yacc.c:1646 */ break; case 239: - -/* Line 1806 of yacc.c */ -#line 782 "harbour.y" - { (yyval.asExpr) = hb_compCheckPassByRef( HB_COMP_PARAM, (yyvsp[(2) - (2)].asExpr) ); } +#line 782 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compCheckPassByRef( HB_COMP_PARAM, (yyvsp[0].asExpr) ); } +#line 5042 "harboury.c" /* yacc.c:1646 */ break; case 241: - -/* Line 1806 of yacc.c */ -#line 788 "harbour.y" - { (yyval.asExpr) = hb_compExprNewArgList( (yyvsp[(1) - (1)].asExpr), HB_COMP_PARAM ); } +#line 788 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewArgList( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5048 "harboury.c" /* yacc.c:1646 */ break; case 242: - -/* Line 1806 of yacc.c */ -#line 789 "harbour.y" - { (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[(1) - (3)].asExpr), (yyvsp[(3) - (3)].asExpr) ); } +#line 789 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[-2].asExpr), (yyvsp[0].asExpr) ); } +#line 5054 "harboury.c" /* yacc.c:1646 */ break; case 245: - -/* Line 1806 of yacc.c */ -#line 796 "harbour.y" - { (yyval.asExpr) = hb_compCheckPassByRef( HB_COMP_PARAM, hb_compExprNewVarRef( (yyvsp[(2) - (2)].string), HB_COMP_PARAM ) ); } +#line 796 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compCheckPassByRef( HB_COMP_PARAM, hb_compExprNewVarRef( (yyvsp[0].string), HB_COMP_PARAM ) ); } +#line 5060 "harboury.c" /* yacc.c:1646 */ break; case 246: - -/* Line 1806 of yacc.c */ -#line 797 "harbour.y" - { (yyval.asExpr) = hb_compCheckPassByRef( HB_COMP_PARAM, hb_compExprNewRef( (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ) ); } +#line 797 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compCheckPassByRef( HB_COMP_PARAM, hb_compExprNewRef( (yyvsp[0].asExpr), HB_COMP_PARAM ) ); } +#line 5066 "harboury.c" /* yacc.c:1646 */ break; case 247: - -/* Line 1806 of yacc.c */ -#line 798 "harbour.y" - { (yyval.asExpr) = hb_compCheckPassByRef( HB_COMP_PARAM, hb_compExprNewRef( (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ) ); } +#line 798 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compCheckPassByRef( HB_COMP_PARAM, hb_compExprNewRef( (yyvsp[0].asExpr), HB_COMP_PARAM ) ); } +#line 5072 "harboury.c" /* yacc.c:1646 */ break; case 248: - -/* Line 1806 of yacc.c */ -#line 799 "harbour.y" - { (yyval.asExpr) = hb_compCheckPassByRef( HB_COMP_PARAM, hb_compExprNewRef( (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ) ); } +#line 799 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compCheckPassByRef( HB_COMP_PARAM, hb_compExprNewRef( (yyvsp[0].asExpr), HB_COMP_PARAM ) ); } +#line 5078 "harboury.c" /* yacc.c:1646 */ break; case 249: - -/* Line 1806 of yacc.c */ -#line 800 "harbour.y" - { (yyval.asExpr) = hb_compCheckPassByRef( HB_COMP_PARAM, (yyvsp[(2) - (2)].asExpr) ); (yyval.asExpr)->value.asList.reference = HB_TRUE; } +#line 800 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compCheckPassByRef( HB_COMP_PARAM, (yyvsp[0].asExpr) ); (yyval.asExpr)->value.asList.reference = HB_TRUE; } +#line 5084 "harboury.c" /* yacc.c:1646 */ break; case 250: - -/* Line 1806 of yacc.c */ -#line 803 "harbour.y" +#line 803 "harbour.y" /* yacc.c:1646 */ { (yyval.asExpr) = hb_compExprNewArgRef( HB_COMP_PARAM ); } +#line 5090 "harboury.c" /* yacc.c:1646 */ break; case 252: - -/* Line 1806 of yacc.c */ -#line 809 "harbour.y" - { (yyval.asExpr) = hb_compCheckMethod( HB_COMP_PARAM, hb_compExprNewMethodObject( (yyvsp[(3) - (3)].asExpr), (yyvsp[(1) - (3)].asExpr) ) ); } +#line 809 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compCheckMethod( HB_COMP_PARAM, hb_compExprNewMethodObject( (yyvsp[0].asExpr), (yyvsp[-2].asExpr) ) ); } +#line 5096 "harboury.c" /* yacc.c:1646 */ break; case 253: - -/* Line 1806 of yacc.c */ -#line 810 "harbour.y" - { (yyval.asExpr) = hb_compExprNewMethodObject( (yyvsp[(3) - (3)].asExpr), (yyvsp[(1) - (3)].asExpr) ); } +#line 810 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewMethodObject( (yyvsp[0].asExpr), (yyvsp[-2].asExpr) ); } +#line 5102 "harboury.c" /* yacc.c:1646 */ break; case 254: - -/* Line 1806 of yacc.c */ -#line 811 "harbour.y" +#line 811 "harbour.y" /* yacc.c:1646 */ { if( HB_COMP_PARAM->functions.pLast->wWithObjectCnt == 0 ) hb_compGenError( HB_COMP_PARAM, hb_comp_szErrors, 'E', HB_COMP_ERR_WITHOBJECT, NULL, NULL ); - (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); + (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 5111 "harboury.c" /* yacc.c:1646 */ break; case 255: - -/* Line 1806 of yacc.c */ -#line 817 "harbour.y" - { (yyval.asExpr) = hb_compExprNewSend( (yyvsp[(1) - (1)].string), HB_COMP_PARAM ); } +#line 817 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewSend( (yyvsp[0].string), HB_COMP_PARAM ); } +#line 5117 "harboury.c" /* yacc.c:1646 */ break; case 256: - -/* Line 1806 of yacc.c */ -#line 818 "harbour.y" - { (yyval.asExpr) = hb_compExprNewMacroSend( (yyvsp[(1) - (1)].asExpr), HB_COMP_PARAM ); } +#line 818 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewMacroSend( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5123 "harboury.c" /* yacc.c:1646 */ break; case 257: - -/* Line 1806 of yacc.c */ -#line 821 "harbour.y" - { (yyval.asExpr) = hb_compExprNewVarRef( (yyvsp[(3) - (4)].string), HB_COMP_PARAM ); } +#line 821 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewVarRef( (yyvsp[-1].string), HB_COMP_PARAM ); } +#line 5129 "harboury.c" /* yacc.c:1646 */ break; case 259: - -/* Line 1806 of yacc.c */ -#line 829 "harbour.y" - { (yyval.asExpr) = hb_compExprNewMethodCall( (yyvsp[(1) - (4)].asExpr), (yyvsp[(3) - (4)].asExpr) ); } +#line 829 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewMethodCall( (yyvsp[-3].asExpr), (yyvsp[-1].asExpr) ); } +#line 5135 "harboury.c" /* yacc.c:1646 */ break; case 269: - -/* Line 1806 of yacc.c */ -#line 849 "harbour.y" - { (yyval.asExpr) = (yyvsp[(1) - (2)].asExpr); } +#line 849 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[-1].asExpr); } +#line 5141 "harboury.c" /* yacc.c:1646 */ break; case 279: - -/* Line 1806 of yacc.c */ -#line 859 "harbour.y" - { (yyval.asExpr) = (yyvsp[(1) - (2)].asExpr); } +#line 859 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[-1].asExpr); } +#line 5147 "harboury.c" /* yacc.c:1646 */ break; case 282: - -/* Line 1806 of yacc.c */ -#line 862 "harbour.y" - { (yyval.asExpr) = (yyvsp[(1) - (2)].asExpr); } +#line 862 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[-1].asExpr); } +#line 5153 "harboury.c" /* yacc.c:1646 */ break; case 284: - -/* Line 1806 of yacc.c */ -#line 864 "harbour.y" - { (yyval.asExpr) = (yyvsp[(1) - (2)].asExpr); } +#line 864 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[-1].asExpr); } +#line 5159 "harboury.c" /* yacc.c:1646 */ break; case 296: - -/* Line 1806 of yacc.c */ -#line 878 "harbour.y" - { (yyval.asExpr) = (yyvsp[(1) - (2)].asExpr); } +#line 878 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[-1].asExpr); } +#line 5165 "harboury.c" /* yacc.c:1646 */ break; case 297: - -/* Line 1806 of yacc.c */ -#line 879 "harbour.y" - { (yyval.asExpr) = (yyvsp[(1) - (2)].asExpr); } +#line 879 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[-1].asExpr); } +#line 5171 "harboury.c" /* yacc.c:1646 */ break; case 299: - -/* Line 1806 of yacc.c */ -#line 883 "harbour.y" +#line 883 "harbour.y" /* yacc.c:1646 */ { (yyval.asExpr) = hb_compExprNewArgRef( HB_COMP_PARAM ); } +#line 5177 "harboury.c" /* yacc.c:1646 */ break; case 301: - -/* Line 1806 of yacc.c */ -#line 887 "harbour.y" +#line 887 "harbour.y" /* yacc.c:1646 */ { (yyval.asExpr) = hb_compExprNewEmpty( HB_COMP_PARAM ); } +#line 5183 "harboury.c" /* yacc.c:1646 */ break; case 303: - -/* Line 1806 of yacc.c */ -#line 891 "harbour.y" - { (yyval.asExpr) = hb_compExprNewVar( (yyvsp[(1) - (1)].string), HB_COMP_PARAM ); } +#line 891 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewVar( (yyvsp[0].string), HB_COMP_PARAM ); } +#line 5189 "harboury.c" /* yacc.c:1646 */ break; case 309: - -/* Line 1806 of yacc.c */ -#line 897 "harbour.y" - { (yyval.asExpr) = hb_compExprListStrip( (yyvsp[(1) - (1)].asExpr), HB_COMP_PARAM ); } +#line 897 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprListStrip( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5195 "harboury.c" /* yacc.c:1646 */ break; case 331: - -/* Line 1806 of yacc.c */ -#line 930 "harbour.y" - { (yyval.asExpr) = hb_compExprNewPostInc( (yyvsp[(0) - (1)].asExpr), HB_COMP_PARAM ); } +#line 930 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewPostInc( (yyvsp[-1].asExpr), HB_COMP_PARAM ); } +#line 5201 "harboury.c" /* yacc.c:1646 */ break; case 332: - -/* Line 1806 of yacc.c */ -#line 931 "harbour.y" - { (yyval.asExpr) = hb_compExprNewPostDec( (yyvsp[(0) - (1)].asExpr), HB_COMP_PARAM ); } +#line 931 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewPostDec( (yyvsp[-1].asExpr), HB_COMP_PARAM ); } +#line 5207 "harboury.c" /* yacc.c:1646 */ break; case 333: - -/* Line 1806 of yacc.c */ -#line 934 "harbour.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 934 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 5213 "harboury.c" /* yacc.c:1646 */ break; case 334: - -/* Line 1806 of yacc.c */ -#line 937 "harbour.y" - { (yyval.asExpr) = hb_compExprNewPreInc( (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 937 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewPreInc( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5219 "harboury.c" /* yacc.c:1646 */ break; case 335: - -/* Line 1806 of yacc.c */ -#line 938 "harbour.y" - { (yyval.asExpr) = hb_compExprNewPreDec( (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 938 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewPreDec( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5225 "harboury.c" /* yacc.c:1646 */ break; case 336: - -/* Line 1806 of yacc.c */ -#line 941 "harbour.y" - { (yyval.asExpr) = hb_compExprNewNot( (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 941 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewNot( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5231 "harboury.c" /* yacc.c:1646 */ break; case 337: - -/* Line 1806 of yacc.c */ -#line 942 "harbour.y" - { (yyval.asExpr) = hb_compExprNewNegate( (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 942 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewNegate( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5237 "harboury.c" /* yacc.c:1646 */ break; case 338: - -/* Line 1806 of yacc.c */ -#line 943 "harbour.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 943 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 5243 "harboury.c" /* yacc.c:1646 */ break; case 339: - -/* Line 1806 of yacc.c */ -#line 946 "harbour.y" - { (yyval.asExpr) = hb_compExprAssign( (yyvsp[(1) - (3)].asExpr), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 946 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprAssign( (yyvsp[-2].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5249 "harboury.c" /* yacc.c:1646 */ break; case 340: - -/* Line 1806 of yacc.c */ -#line 949 "harbour.y" - { (yyval.asExpr) = hb_compExprAssign( (yyvsp[(1) - (3)].asExpr), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 949 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprAssign( (yyvsp[-2].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5255 "harboury.c" /* yacc.c:1646 */ break; case 341: - -/* Line 1806 of yacc.c */ -#line 952 "harbour.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewPlusEq( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 952 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewPlusEq( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5261 "harboury.c" /* yacc.c:1646 */ break; case 342: - -/* Line 1806 of yacc.c */ -#line 955 "harbour.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewMinusEq( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 955 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewMinusEq( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5267 "harboury.c" /* yacc.c:1646 */ break; case 343: - -/* Line 1806 of yacc.c */ -#line 958 "harbour.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewMultEq( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 958 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewMultEq( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5273 "harboury.c" /* yacc.c:1646 */ break; case 344: - -/* Line 1806 of yacc.c */ -#line 961 "harbour.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewDivEq( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 961 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewDivEq( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5279 "harboury.c" /* yacc.c:1646 */ break; case 345: - -/* Line 1806 of yacc.c */ -#line 964 "harbour.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewModEq( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 964 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewModEq( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5285 "harboury.c" /* yacc.c:1646 */ break; case 346: - -/* Line 1806 of yacc.c */ -#line 967 "harbour.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewExpEq( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 967 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewExpEq( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5291 "harboury.c" /* yacc.c:1646 */ break; case 353: - -/* Line 1806 of yacc.c */ -#line 978 "harbour.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewPlus( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 978 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewPlus( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5297 "harboury.c" /* yacc.c:1646 */ break; case 354: - -/* Line 1806 of yacc.c */ -#line 979 "harbour.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewMinus( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 979 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewMinus( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5303 "harboury.c" /* yacc.c:1646 */ break; case 355: - -/* Line 1806 of yacc.c */ -#line 980 "harbour.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewMult( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 980 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewMult( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5309 "harboury.c" /* yacc.c:1646 */ break; case 356: - -/* Line 1806 of yacc.c */ -#line 981 "harbour.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewDiv( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 981 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewDiv( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5315 "harboury.c" /* yacc.c:1646 */ break; case 357: - -/* Line 1806 of yacc.c */ -#line 982 "harbour.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewMod( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 982 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewMod( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5321 "harboury.c" /* yacc.c:1646 */ break; case 358: - -/* Line 1806 of yacc.c */ -#line 983 "harbour.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewPower( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 983 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewPower( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5327 "harboury.c" /* yacc.c:1646 */ break; case 359: - -/* Line 1806 of yacc.c */ -#line 986 "harbour.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewAnd( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 986 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewAnd( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5333 "harboury.c" /* yacc.c:1646 */ break; case 360: - -/* Line 1806 of yacc.c */ -#line 987 "harbour.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewOr( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 987 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewOr( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5339 "harboury.c" /* yacc.c:1646 */ break; case 361: - -/* Line 1806 of yacc.c */ -#line 990 "harbour.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewEQ( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 990 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewEQ( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5345 "harboury.c" /* yacc.c:1646 */ break; case 362: - -/* Line 1806 of yacc.c */ -#line 991 "harbour.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewLT( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 991 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewLT( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5351 "harboury.c" /* yacc.c:1646 */ break; case 363: - -/* Line 1806 of yacc.c */ -#line 992 "harbour.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewGT( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 992 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewGT( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5357 "harboury.c" /* yacc.c:1646 */ break; case 364: - -/* Line 1806 of yacc.c */ -#line 993 "harbour.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewLE( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 993 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewLE( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5363 "harboury.c" /* yacc.c:1646 */ break; case 365: - -/* Line 1806 of yacc.c */ -#line 994 "harbour.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewGE( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 994 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewGE( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5369 "harboury.c" /* yacc.c:1646 */ break; case 366: - -/* Line 1806 of yacc.c */ -#line 995 "harbour.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewNE( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 995 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewNE( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5375 "harboury.c" /* yacc.c:1646 */ break; case 367: - -/* Line 1806 of yacc.c */ -#line 996 "harbour.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewNE( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 996 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewNE( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5381 "harboury.c" /* yacc.c:1646 */ break; case 368: - -/* Line 1806 of yacc.c */ -#line 997 "harbour.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewIN( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 997 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewIN( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5387 "harboury.c" /* yacc.c:1646 */ break; case 369: - -/* Line 1806 of yacc.c */ -#line 998 "harbour.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewEqual( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 998 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewEqual( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5393 "harboury.c" /* yacc.c:1646 */ break; case 371: - -/* Line 1806 of yacc.c */ -#line 1007 "harbour.y" - { (yyval.asExpr) = hb_compExprNewArrayAt( (yyvsp[(0) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 1007 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewArrayAt( (yyvsp[-2].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5399 "harboury.c" /* yacc.c:1646 */ break; case 372: - -/* Line 1806 of yacc.c */ -#line 1008 "harbour.y" - { (yyval.asExpr) = hb_compExprNewArrayAt( (yyvsp[(1) - (3)].asExpr), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 1008 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewArrayAt( (yyvsp[-2].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5405 "harboury.c" /* yacc.c:1646 */ break; case 373: - -/* Line 1806 of yacc.c */ -#line 1009 "harbour.y" - { (yyval.asExpr) = hb_compExprNewArrayAt( (yyvsp[(1) - (4)].asExpr), (yyvsp[(4) - (4)].asExpr), HB_COMP_PARAM ); } +#line 1009 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewArrayAt( (yyvsp[-3].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5411 "harboury.c" /* yacc.c:1646 */ break; case 374: - -/* Line 1806 of yacc.c */ -#line 1012 "harbour.y" - { (yyval.asExpr) = hb_compExprNewList( (yyvsp[(1) - (1)].asExpr), HB_COMP_PARAM ); } +#line 1012 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewList( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5417 "harboury.c" /* yacc.c:1646 */ break; case 375: - -/* Line 1806 of yacc.c */ -#line 1013 "harbour.y" - { (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[(1) - (3)].asExpr), (yyvsp[(3) - (3)].asExpr) ); } +#line 1013 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[-2].asExpr), (yyvsp[0].asExpr) ); } +#line 5423 "harboury.c" /* yacc.c:1646 */ break; case 376: - -/* Line 1806 of yacc.c */ -#line 1016 "harbour.y" - { (yyval.asExpr) = hb_compExprNewCodeBlock( (yyvsp[(1) - (1)].asCodeblock).string, (yyvsp[(1) - (1)].asCodeblock).length, (yyvsp[(1) - (1)].asCodeblock).flags, HB_COMP_PARAM ); (yyvsp[(1) - (1)].asCodeblock).string = NULL; } +#line 1016 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewCodeBlock( (yyvsp[0].asCodeblock).string, (yyvsp[0].asCodeblock).length, (yyvsp[0].asCodeblock).flags, HB_COMP_PARAM ); (yyvsp[0].asCodeblock).string = NULL; } +#line 5429 "harboury.c" /* yacc.c:1646 */ break; case 377: - -/* Line 1806 of yacc.c */ -#line 1017 "harbour.y" - { (yyval.asExpr) = (yyvsp[(2) - (4)].asExpr); } +#line 1017 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[-2].asExpr); } +#line 5435 "harboury.c" /* yacc.c:1646 */ break; case 378: - -/* Line 1806 of yacc.c */ -#line 1022 "harbour.y" +#line 1022 "harbour.y" /* yacc.c:1646 */ { (yyval.asExpr) = NULL; } +#line 5441 "harboury.c" /* yacc.c:1646 */ break; case 379: - -/* Line 1806 of yacc.c */ -#line 1023 "harbour.y" - { (yyval.asExpr) = NULL; (yyvsp[(0) - (1)].asExpr)->value.asCodeblock.flags |= HB_BLOCK_VPARAMS; } +#line 1023 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = NULL; (yyvsp[-1].asExpr)->value.asCodeblock.flags |= HB_BLOCK_VPARAMS; } +#line 5447 "harboury.c" /* yacc.c:1646 */ break; case 380: - -/* Line 1806 of yacc.c */ -#line 1024 "harbour.y" - { (yyval.asExpr) = (yyvsp[(1) - (1)].asExpr); } +#line 1024 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 5453 "harboury.c" /* yacc.c:1646 */ break; case 381: - -/* Line 1806 of yacc.c */ -#line 1025 "harbour.y" - { (yyval.asExpr) = (yyvsp[(1) - (3)].asExpr); (yyvsp[(0) - (3)].asExpr)->value.asCodeblock.flags |= HB_BLOCK_VPARAMS; } +#line 1025 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[-2].asExpr); (yyvsp[-3].asExpr)->value.asCodeblock.flags |= HB_BLOCK_VPARAMS; } +#line 5459 "harboury.c" /* yacc.c:1646 */ break; case 382: - -/* Line 1806 of yacc.c */ -#line 1028 "harbour.y" - { HB_COMP_PARAM->iVarScope = HB_VSCOMP_LOCAL; (yyval.asExpr) = hb_compExprCBVarAdd( (yyvsp[(0) - (2)].asExpr), (yyvsp[(1) - (2)].string), (yyvsp[(2) - (2)].asVarType)->cVarType, HB_COMP_PARAM ); } +#line 1028 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_PARAM->iVarScope = HB_VSCOMP_LOCAL; (yyval.asExpr) = hb_compExprCBVarAdd( (yyvsp[-2].asExpr), (yyvsp[-1].string), (yyvsp[0].asVarType)->cVarType, HB_COMP_PARAM ); } +#line 5465 "harboury.c" /* yacc.c:1646 */ break; case 383: - -/* Line 1806 of yacc.c */ -#line 1029 "harbour.y" - { HB_COMP_PARAM->iVarScope = HB_VSCOMP_LOCAL; (yyval.asExpr) = hb_compExprCBVarAdd( (yyvsp[(0) - (4)].asExpr), (yyvsp[(3) - (4)].string), (yyvsp[(4) - (4)].asVarType)->cVarType, HB_COMP_PARAM ); } +#line 1029 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_PARAM->iVarScope = HB_VSCOMP_LOCAL; (yyval.asExpr) = hb_compExprCBVarAdd( (yyvsp[-4].asExpr), (yyvsp[-1].string), (yyvsp[0].asVarType)->cVarType, HB_COMP_PARAM ); } +#line 5471 "harboury.c" /* yacc.c:1646 */ break; case 384: - -/* Line 1806 of yacc.c */ -#line 1032 "harbour.y" - { (yyval.asExpr) = hb_compExprAddCodeblockExpr( (yyvsp[(-1) - (1)].asExpr), (yyvsp[(1) - (1)].asExpr) ); } +#line 1032 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprAddCodeblockExpr( (yyvsp[(-1) - (1)].asExpr), (yyvsp[0].asExpr) ); } +#line 5477 "harboury.c" /* yacc.c:1646 */ break; case 385: - -/* Line 1806 of yacc.c */ -#line 1033 "harbour.y" - { (yyval.asExpr) = hb_compExprAddCodeblockExpr( (yyvsp[(-1) - (3)].asExpr), (yyvsp[(3) - (3)].asExpr) ); } +#line 1033 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprAddCodeblockExpr( (yyvsp[(-1) - (3)].asExpr), (yyvsp[0].asExpr) ); } +#line 5483 "harboury.c" /* yacc.c:1646 */ break; case 386: - -/* Line 1806 of yacc.c */ -#line 1037 "harbour.y" +#line 1037 "harbour.y" /* yacc.c:1646 */ { (yyval.bTrue) = HB_COMP_PARAM->functions.pLast->bBlock; HB_COMP_PARAM->functions.pLast->bBlock = HB_TRUE; } +#line 5490 "harboury.c" /* yacc.c:1646 */ break; case 387: - -/* Line 1806 of yacc.c */ -#line 1040 "harbour.y" - { HB_COMP_PARAM->functions.pLast->bBlock = (yyvsp[(2) - (3)].bTrue); } +#line 1040 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_PARAM->functions.pLast->bBlock = (yyvsp[-1].bTrue); } +#line 5496 "harboury.c" /* yacc.c:1646 */ break; case 389: - -/* Line 1806 of yacc.c */ -#line 1043 "harbour.y" +#line 1043 "harbour.y" /* yacc.c:1646 */ { /* 3 */ PHB_CBVAR pVar; (yyval.sNumber) = HB_COMP_PARAM->functions.pLast->nPCodePos; - (yyvsp[(2) - (2)].sNumber) = HB_COMP_PARAM->lastLine; + (yyvsp[0].sNumber) = HB_COMP_PARAM->lastLine; hb_compCodeBlockStart( HB_COMP_PARAM, 0 ); HB_COMP_PARAM->functions.pLast->funFlags |= HB_FUNF_EXTBLOCK; HB_COMP_PARAM->functions.pLast->fVParams = - ( (yyvsp[(1) - (2)].asExpr)->value.asCodeblock.flags & HB_BLOCK_VPARAMS ) != 0; + ( (yyvsp[-1].asExpr)->value.asCodeblock.flags & HB_BLOCK_VPARAMS ) != 0; - (yyvsp[(1) - (2)].asExpr)->value.asCodeblock.flags |= HB_BLOCK_EXT; - if( (yyvsp[(1) - (2)].asExpr)->value.asCodeblock.string ) + (yyvsp[-1].asExpr)->value.asCodeblock.flags |= HB_BLOCK_EXT; + if( (yyvsp[-1].asExpr)->value.asCodeblock.string ) { - hb_xfree( (yyvsp[(1) - (2)].asExpr)->value.asCodeblock.string ); - (yyvsp[(1) - (2)].asExpr)->value.asCodeblock.string = NULL; - (yyvsp[(1) - (2)].asExpr)->nLength = 0; + hb_xfree( (yyvsp[-1].asExpr)->value.asCodeblock.string ); + (yyvsp[-1].asExpr)->value.asCodeblock.string = NULL; + (yyvsp[-1].asExpr)->nLength = 0; } HB_COMP_PARAM->iVarScope = HB_VSCOMP_PARAMETER; - pVar = (yyvsp[(1) - (2)].asExpr)->value.asCodeblock.pLocals; + pVar = (yyvsp[-1].asExpr)->value.asCodeblock.pLocals; while( pVar ) { hb_compVariableAdd( HB_COMP_PARAM, pVar->szName, hb_compVarTypeNew( HB_COMP_PARAM, pVar->bType, NULL ) ); pVar =pVar->pNext; } } +#line 5526 "harboury.c" /* yacc.c:1646 */ break; case 390: - -/* Line 1806 of yacc.c */ -#line 1069 "harbour.y" +#line 1069 "harbour.y" /* yacc.c:1646 */ { /* 6 */ hb_compCodeBlockEnd( HB_COMP_PARAM ); - (yyval.asExpr) = hb_compExprSetCodeblockBody( (yyvsp[(1) - (5)].asExpr), - HB_COMP_PARAM->functions.pLast->pCode + (yyvsp[(3) - (5)].sNumber), - HB_COMP_PARAM->functions.pLast->nPCodePos - (yyvsp[(3) - (5)].sNumber) ); - HB_COMP_PARAM->functions.pLast->nPCodePos = (yyvsp[(3) - (5)].sNumber); - HB_COMP_PARAM->lastLine = (yyvsp[(2) - (5)].sNumber); + (yyval.asExpr) = hb_compExprSetCodeblockBody( (yyvsp[-4].asExpr), + HB_COMP_PARAM->functions.pLast->pCode + (yyvsp[-2].sNumber), + HB_COMP_PARAM->functions.pLast->nPCodePos - (yyvsp[-2].sNumber) ); + HB_COMP_PARAM->functions.pLast->nPCodePos = (yyvsp[-2].sNumber); + HB_COMP_PARAM->lastLine = (yyvsp[-3].sNumber); } +#line 5539 "harboury.c" /* yacc.c:1646 */ break; case 391: - -/* Line 1806 of yacc.c */ -#line 1079 "harbour.y" - { (yyval.asExpr) = hb_compExprNewList( (yyvsp[(1) - (1)].asExpr), HB_COMP_PARAM ); } +#line 1079 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewList( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5545 "harboury.c" /* yacc.c:1646 */ break; case 392: - -/* Line 1806 of yacc.c */ -#line 1080 "harbour.y" - { (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[(1) - (3)].asExpr), (yyvsp[(3) - (3)].asExpr) ); } +#line 1080 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[-2].asExpr), (yyvsp[0].asExpr) ); } +#line 5551 "harboury.c" /* yacc.c:1646 */ break; case 393: - -/* Line 1806 of yacc.c */ -#line 1082 "harbour.y" - { (yyval.asExpr) = (yyvsp[(2) - (3)].asExpr); } +#line 1082 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[-1].asExpr); } +#line 5557 "harboury.c" /* yacc.c:1646 */ break; case 395: - -/* Line 1806 of yacc.c */ -#line 1095 "harbour.y" - { (yyval.asExpr) = hb_compExprNewIIF( hb_compExprAddListExpr( hb_compExprAddListExpr( hb_compExprNewList( (yyvsp[(3) - (8)].asExpr), HB_COMP_PARAM ), (yyvsp[(5) - (8)].asExpr) ), (yyvsp[(7) - (8)].asExpr) ) ); } +#line 1095 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewIIF( hb_compExprAddListExpr( hb_compExprAddListExpr( hb_compExprNewList( (yyvsp[-5].asExpr), HB_COMP_PARAM ), (yyvsp[-3].asExpr) ), (yyvsp[-1].asExpr) ) ); } +#line 5563 "harboury.c" /* yacc.c:1646 */ break; case 397: - -/* Line 1806 of yacc.c */ -#line 1101 "harbour.y" +#line 1101 "harbour.y" /* yacc.c:1646 */ { HB_COMP_PARAM->iVarScope = HB_VSCOMP_LOCAL; hb_compLinePush( HB_COMP_PARAM ); } +#line 5569 "harboury.c" /* yacc.c:1646 */ break; case 399: - -/* Line 1806 of yacc.c */ -#line 1103 "harbour.y" +#line 1103 "harbour.y" /* yacc.c:1646 */ { HB_COMP_PARAM->iVarScope = HB_VSCOMP_STATIC; hb_compLinePush( HB_COMP_PARAM ); } +#line 5575 "harboury.c" /* yacc.c:1646 */ break; case 401: - -/* Line 1806 of yacc.c */ -#line 1105 "harbour.y" +#line 1105 "harbour.y" /* yacc.c:1646 */ { HB_COMP_PARAM->iVarScope = HB_VSCOMP_TH_STATIC; hb_compLinePush( HB_COMP_PARAM ); } +#line 5581 "harboury.c" /* yacc.c:1646 */ break; case 403: - -/* Line 1806 of yacc.c */ -#line 1107 "harbour.y" +#line 1107 "harbour.y" /* yacc.c:1646 */ { if( HB_COMP_PARAM->functions.pLast->funFlags & HB_FUNF_USES_LOCAL_PARAMS ) hb_compGenError( HB_COMP_PARAM, hb_comp_szErrors, 'E', HB_COMP_ERR_PARAMETERS_NOT_ALLOWED, NULL, NULL ); else @@ -6244,83 +5590,74 @@ yyreduce: HB_COMP_PARAM->iVarScope = ( HB_VSCOMP_PRIVATE | HB_VSCOMP_PARAMETER ); } } +#line 5594 "harboury.c" /* yacc.c:1646 */ break; case 404: - -/* Line 1806 of yacc.c */ -#line 1114 "harbour.y" +#line 1114 "harbour.y" /* yacc.c:1646 */ { HB_COMP_PARAM->iVarScope = HB_VSCOMP_NONE; } +#line 5600 "harboury.c" /* yacc.c:1646 */ break; case 405: - -/* Line 1806 of yacc.c */ -#line 1117 "harbour.y" +#line 1117 "harbour.y" /* yacc.c:1646 */ { (yyval.iNumber) = 1; } +#line 5606 "harboury.c" /* yacc.c:1646 */ break; case 406: - -/* Line 1806 of yacc.c */ -#line 1118 "harbour.y" +#line 1118 "harbour.y" /* yacc.c:1646 */ { (yyval.iNumber)++; } +#line 5612 "harboury.c" /* yacc.c:1646 */ break; case 407: - -/* Line 1806 of yacc.c */ -#line 1121 "harbour.y" +#line 1121 "harbour.y" /* yacc.c:1646 */ { (yyval.iNumber) = 1; } +#line 5618 "harboury.c" /* yacc.c:1646 */ break; case 408: - -/* Line 1806 of yacc.c */ -#line 1122 "harbour.y" +#line 1122 "harbour.y" /* yacc.c:1646 */ { (yyval.iNumber)++; } +#line 5624 "harboury.c" /* yacc.c:1646 */ break; case 410: - -/* Line 1806 of yacc.c */ -#line 1132 "harbour.y" - { hb_compRTVariableAdd( HB_COMP_PARAM, hb_compExprNewRTVar( NULL, (yyvsp[(1) - (2)].asExpr), HB_COMP_PARAM ), HB_FALSE ); } +#line 1132 "harbour.y" /* yacc.c:1646 */ + { hb_compRTVariableAdd( HB_COMP_PARAM, hb_compExprNewRTVar( NULL, (yyvsp[-1].asExpr), HB_COMP_PARAM ), HB_FALSE ); } +#line 5630 "harboury.c" /* yacc.c:1646 */ break; case 411: - -/* Line 1806 of yacc.c */ -#line 1134 "harbour.y" - { HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[(4) - (4)].asExpr), HB_COMP_PARAM ) ); - hb_compRTVariableAdd( HB_COMP_PARAM, hb_compExprNewRTVar( NULL, (yyvsp[(1) - (4)].asExpr), HB_COMP_PARAM ), HB_TRUE ); +#line 1134 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[0].asExpr), HB_COMP_PARAM ) ); + hb_compRTVariableAdd( HB_COMP_PARAM, hb_compExprNewRTVar( NULL, (yyvsp[-3].asExpr), HB_COMP_PARAM ), HB_TRUE ); } +#line 5638 "harboury.c" /* yacc.c:1646 */ break; case 412: - -/* Line 1806 of yacc.c */ -#line 1138 "harbour.y" +#line 1138 "harbour.y" /* yacc.c:1646 */ { - HB_COMP_EXPR_FREE( hb_compArrayDimPush( (yyvsp[(2) - (3)].asExpr), HB_COMP_PARAM ) ); - hb_compRTVariableAdd( HB_COMP_PARAM, hb_compExprNewRTVar( NULL, (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), HB_TRUE ); + HB_COMP_EXPR_FREE( hb_compArrayDimPush( (yyvsp[-1].asExpr), HB_COMP_PARAM ) ); + hb_compRTVariableAdd( HB_COMP_PARAM, hb_compExprNewRTVar( NULL, (yyvsp[-2].asExpr), HB_COMP_PARAM ), HB_TRUE ); } +#line 5647 "harboury.c" /* yacc.c:1646 */ break; case 413: - -/* Line 1806 of yacc.c */ -#line 1145 "harbour.y" +#line 1145 "harbour.y" /* yacc.c:1646 */ { - hb_compVariableAdd( HB_COMP_PARAM, (yyvsp[(1) - (2)].string), (yyvsp[(2) - (2)].asVarType) ); + hb_compVariableAdd( HB_COMP_PARAM, (yyvsp[-1].string), (yyvsp[0].asVarType) ); if( HB_COMP_PARAM->iVarScope & HB_VSCOMP_STATIC ) { hb_compStaticDefStart( HB_COMP_PARAM ); /* switch to statics pcode buffer */ - hb_compStaticDefEnd( HB_COMP_PARAM, (yyvsp[(1) - (2)].string) ); + hb_compStaticDefEnd( HB_COMP_PARAM, (yyvsp[-1].string) ); } else if( HB_COMP_PARAM->iVarScope == HB_VSCOMP_PUBLIC || HB_COMP_PARAM->iVarScope == HB_VSCOMP_PRIVATE ) { - hb_compRTVariableAdd( HB_COMP_PARAM, hb_compExprNewRTVar( (yyvsp[(1) - (2)].string), NULL, HB_COMP_PARAM ), HB_FALSE ); + hb_compRTVariableAdd( HB_COMP_PARAM, hb_compExprNewRTVar( (yyvsp[-1].string), NULL, HB_COMP_PARAM ), HB_FALSE ); } else if( HB_COMP_PARAM->iVarScope == HB_VSCOMP_LOCAL && ( HB_COMP_PARAM->functions.pLast->funFlags & HB_FUNF_EXTBLOCK ) ) @@ -6328,267 +5665,239 @@ yyreduce: HB_COMP_EXPR_FREE( hb_compExprGenPush( hb_compExprNewNil( HB_COMP_PARAM ), HB_COMP_PARAM ) ); } } +#line 5669 "harboury.c" /* yacc.c:1646 */ break; case 414: - -/* Line 1806 of yacc.c */ -#line 1162 "harbour.y" +#line 1162 "harbour.y" /* yacc.c:1646 */ { (yyval.iNumber) = HB_COMP_PARAM->iVarScope; - hb_compVariableAdd( HB_COMP_PARAM, (yyvsp[(1) - (2)].string), (yyvsp[(2) - (2)].asVarType) ); + hb_compVariableAdd( HB_COMP_PARAM, (yyvsp[-1].string), (yyvsp[0].asVarType) ); } +#line 5677 "harboury.c" /* yacc.c:1646 */ break; case 415: - -/* Line 1806 of yacc.c */ -#line 1166 "harbour.y" +#line 1166 "harbour.y" /* yacc.c:1646 */ { - HB_COMP_PARAM->iVarScope = (yyvsp[(3) - (5)].iNumber); + HB_COMP_PARAM->iVarScope = (yyvsp[-2].iNumber); if( HB_COMP_PARAM->iVarScope & HB_VSCOMP_STATIC ) { hb_compStaticDefStart( HB_COMP_PARAM ); /* switch to statics pcode buffer */ - HB_COMP_EXPR_FREE( hb_compExprGenStatement( hb_compExprAssignStatic( hb_compExprNewVar( (yyvsp[(1) - (5)].string), HB_COMP_PARAM ), (yyvsp[(5) - (5)].asExpr), HB_COMP_PARAM ), HB_COMP_PARAM ) ); - hb_compStaticDefEnd( HB_COMP_PARAM, (yyvsp[(1) - (5)].string) ); + HB_COMP_EXPR_FREE( hb_compExprGenStatement( hb_compExprAssignStatic( hb_compExprNewVar( (yyvsp[-4].string), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ), HB_COMP_PARAM ) ); + hb_compStaticDefEnd( HB_COMP_PARAM, (yyvsp[-4].string) ); } else if( HB_COMP_PARAM->iVarScope == HB_VSCOMP_PUBLIC || HB_COMP_PARAM->iVarScope == HB_VSCOMP_PRIVATE ) { - HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[(5) - (5)].asExpr), HB_COMP_PARAM ) ); - hb_compRTVariableAdd( HB_COMP_PARAM, hb_compExprNewRTVar( (yyvsp[(1) - (5)].string), NULL, HB_COMP_PARAM ), HB_TRUE ); + HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[0].asExpr), HB_COMP_PARAM ) ); + hb_compRTVariableAdd( HB_COMP_PARAM, hb_compExprNewRTVar( (yyvsp[-4].string), NULL, HB_COMP_PARAM ), HB_TRUE ); } else if( HB_COMP_PARAM->iVarScope == HB_VSCOMP_LOCAL && ( HB_COMP_PARAM->functions.pLast->funFlags & HB_FUNF_EXTBLOCK ) ) { - HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[(5) - (5)].asExpr), HB_COMP_PARAM ) ); + HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[0].asExpr), HB_COMP_PARAM ) ); } else { - HB_COMP_EXPR_FREE( hb_compExprGenStatement( hb_compExprAssign( hb_compExprNewVar( (yyvsp[(1) - (5)].string), HB_COMP_PARAM ), (yyvsp[(5) - (5)].asExpr), HB_COMP_PARAM ), HB_COMP_PARAM ) ); + HB_COMP_EXPR_FREE( hb_compExprGenStatement( hb_compExprAssign( hb_compExprNewVar( (yyvsp[-4].string), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ), HB_COMP_PARAM ) ); } - HB_COMP_PARAM->iVarScope = (yyvsp[(3) - (5)].iNumber); + HB_COMP_PARAM->iVarScope = (yyvsp[-2].iNumber); } +#line 5706 "harboury.c" /* yacc.c:1646 */ break; case 416: - -/* Line 1806 of yacc.c */ -#line 1191 "harbour.y" - { hb_compVariableDim( (yyvsp[(1) - (3)].string), (yyvsp[(2) - (3)].asExpr), HB_COMP_PARAM ); } +#line 1191 "harbour.y" /* yacc.c:1646 */ + { hb_compVariableDim( (yyvsp[-2].string), (yyvsp[-1].asExpr), HB_COMP_PARAM ); } +#line 5712 "harboury.c" /* yacc.c:1646 */ break; case 418: - -/* Line 1806 of yacc.c */ -#line 1200 "harbour.y" - { (yyval.asExpr) = hb_compExprNewArgList( (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 1200 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewArgList( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 5718 "harboury.c" /* yacc.c:1646 */ break; case 419: - -/* Line 1806 of yacc.c */ -#line 1201 "harbour.y" - { (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[(1) - (3)].asExpr), (yyvsp[(3) - (3)].asExpr) ); } +#line 1201 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[-2].asExpr), (yyvsp[0].asExpr) ); } +#line 5724 "harboury.c" /* yacc.c:1646 */ break; case 420: - -/* Line 1806 of yacc.c */ -#line 1202 "harbour.y" - { (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[(1) - (4)].asExpr), (yyvsp[(4) - (4)].asExpr) ); } +#line 1202 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[-3].asExpr), (yyvsp[0].asExpr) ); } +#line 5730 "harboury.c" /* yacc.c:1646 */ break; case 421: - -/* Line 1806 of yacc.c */ -#line 1205 "harbour.y" +#line 1205 "harbour.y" /* yacc.c:1646 */ { HB_COMP_PARAM->iVarScope = HB_VSCOMP_FIELD; } +#line 5736 "harboury.c" /* yacc.c:1646 */ break; case 422: - -/* Line 1806 of yacc.c */ -#line 1207 "harbour.y" +#line 1207 "harbour.y" /* yacc.c:1646 */ { - if( (yyvsp[(4) - (5)].string) ) hb_compFieldSetAlias( HB_COMP_PARAM, (yyvsp[(4) - (5)].string), (yyvsp[(3) - (5)].iNumber) ); + if( (yyvsp[-1].string) ) hb_compFieldSetAlias( HB_COMP_PARAM, (yyvsp[-1].string), (yyvsp[-2].iNumber) ); } +#line 5744 "harboury.c" /* yacc.c:1646 */ break; case 423: - -/* Line 1806 of yacc.c */ -#line 1212 "harbour.y" - { (yyval.iNumber) = hb_compFieldsCount( HB_COMP_PARAM ); hb_compVariableAdd( HB_COMP_PARAM, (yyvsp[(1) - (2)].string), (yyvsp[(2) - (2)].asVarType) ); } +#line 1212 "harbour.y" /* yacc.c:1646 */ + { (yyval.iNumber) = hb_compFieldsCount( HB_COMP_PARAM ); hb_compVariableAdd( HB_COMP_PARAM, (yyvsp[-1].string), (yyvsp[0].asVarType) ); } +#line 5750 "harboury.c" /* yacc.c:1646 */ break; case 424: - -/* Line 1806 of yacc.c */ -#line 1213 "harbour.y" - { hb_compVariableAdd( HB_COMP_PARAM, (yyvsp[(3) - (4)].string), (yyvsp[(4) - (4)].asVarType) ); } +#line 1213 "harbour.y" /* yacc.c:1646 */ + { hb_compVariableAdd( HB_COMP_PARAM, (yyvsp[-1].string), (yyvsp[0].asVarType) ); } +#line 5756 "harboury.c" /* yacc.c:1646 */ break; case 425: - -/* Line 1806 of yacc.c */ -#line 1216 "harbour.y" +#line 1216 "harbour.y" /* yacc.c:1646 */ { (yyval.string) = NULL; } +#line 5762 "harboury.c" /* yacc.c:1646 */ break; case 426: - -/* Line 1806 of yacc.c */ -#line 1217 "harbour.y" - { (yyval.string) = (yyvsp[(2) - (2)].string); } +#line 1217 "harbour.y" /* yacc.c:1646 */ + { (yyval.string) = (yyvsp[0].string); } +#line 5768 "harboury.c" /* yacc.c:1646 */ break; case 427: - -/* Line 1806 of yacc.c */ -#line 1220 "harbour.y" +#line 1220 "harbour.y" /* yacc.c:1646 */ { HB_COMP_PARAM->iVarScope = HB_VSCOMP_MEMVAR; } +#line 5774 "harboury.c" /* yacc.c:1646 */ break; case 429: - -/* Line 1806 of yacc.c */ -#line 1223 "harbour.y" - { hb_compVariableAdd( HB_COMP_PARAM, (yyvsp[(1) - (2)].string), (yyvsp[(2) - (2)].asVarType) ); } +#line 1223 "harbour.y" /* yacc.c:1646 */ + { hb_compVariableAdd( HB_COMP_PARAM, (yyvsp[-1].string), (yyvsp[0].asVarType) ); } +#line 5780 "harboury.c" /* yacc.c:1646 */ break; case 430: - -/* Line 1806 of yacc.c */ -#line 1224 "harbour.y" - { hb_compVariableAdd( HB_COMP_PARAM, (yyvsp[(3) - (4)].string), (yyvsp[(4) - (4)].asVarType) ); } +#line 1224 "harbour.y" /* yacc.c:1646 */ + { hb_compVariableAdd( HB_COMP_PARAM, (yyvsp[-1].string), (yyvsp[0].asVarType) ); } +#line 5786 "harboury.c" /* yacc.c:1646 */ break; case 431: - -/* Line 1806 of yacc.c */ -#line 1227 "harbour.y" - { hb_compDeclaredAdd( HB_COMP_PARAM, (yyvsp[(2) - (3)].string) ); HB_COMP_PARAM->szDeclaredFun = (yyvsp[(2) - (3)].string); } +#line 1227 "harbour.y" /* yacc.c:1646 */ + { hb_compDeclaredAdd( HB_COMP_PARAM, (yyvsp[-1].string) ); HB_COMP_PARAM->szDeclaredFun = (yyvsp[-1].string); } +#line 5792 "harboury.c" /* yacc.c:1646 */ break; case 432: - -/* Line 1806 of yacc.c */ -#line 1228 "harbour.y" +#line 1228 "harbour.y" /* yacc.c:1646 */ { if( HB_COMP_PARAM->pLastDeclared ) { - HB_COMP_PARAM->pLastDeclared->cType = (yyvsp[(7) - (8)].asVarType)->cVarType; + HB_COMP_PARAM->pLastDeclared->cType = (yyvsp[-1].asVarType)->cVarType; - if( HB_TOUPPER( (yyvsp[(7) - (8)].asVarType)->cVarType ) == 'S' ) + if( HB_TOUPPER( (yyvsp[-1].asVarType)->cVarType ) == 'S' ) { - HB_COMP_PARAM->pLastDeclared->pClass = hb_compClassFind( HB_COMP_PARAM, (yyvsp[(7) - (8)].asVarType)->szFromClass ); + HB_COMP_PARAM->pLastDeclared->pClass = hb_compClassFind( HB_COMP_PARAM, (yyvsp[-1].asVarType)->szFromClass ); if( ! HB_COMP_PARAM->pLastDeclared->pClass ) { - hb_compGenWarning( HB_COMP_PARAM, hb_comp_szWarnings, 'W', HB_COMP_WARN_CLASS_NOT_FOUND, (yyvsp[(7) - (8)].asVarType)->szFromClass, HB_COMP_PARAM->pLastDeclared->szName ); - HB_COMP_PARAM->pLastDeclared->cType = ( HB_ISUPPER( ( HB_UCHAR ) (yyvsp[(7) - (8)].asVarType)->cVarType ) ? 'O' : 'o' ); + hb_compGenWarning( HB_COMP_PARAM, hb_comp_szWarnings, 'W', HB_COMP_WARN_CLASS_NOT_FOUND, (yyvsp[-1].asVarType)->szFromClass, HB_COMP_PARAM->pLastDeclared->szName ); + HB_COMP_PARAM->pLastDeclared->cType = ( HB_ISUPPER( ( HB_UCHAR ) (yyvsp[-1].asVarType)->cVarType ) ? 'O' : 'o' ); } } } HB_COMP_PARAM->szDeclaredFun = NULL; HB_COMP_PARAM->iVarScope = HB_VSCOMP_NONE; } +#line 5815 "harboury.c" /* yacc.c:1646 */ break; case 433: - -/* Line 1806 of yacc.c */ -#line 1246 "harbour.y" - { HB_COMP_PARAM->pLastClass = hb_compClassAdd( HB_COMP_PARAM, (yyvsp[(2) - (2)].string), NULL ); } +#line 1246 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_PARAM->pLastClass = hb_compClassAdd( HB_COMP_PARAM, (yyvsp[0].string), NULL ); } +#line 5821 "harboury.c" /* yacc.c:1646 */ break; case 434: - -/* Line 1806 of yacc.c */ -#line 1246 "harbour.y" +#line 1246 "harbour.y" /* yacc.c:1646 */ { HB_COMP_PARAM->iVarScope = HB_VSCOMP_NONE; } +#line 5827 "harboury.c" /* yacc.c:1646 */ break; case 435: - -/* Line 1806 of yacc.c */ -#line 1247 "harbour.y" - { HB_COMP_PARAM->pLastClass = hb_compClassAdd( HB_COMP_PARAM, (yyvsp[(2) - (3)].string), NULL ); HB_COMP_PARAM->iVarScope = HB_VSCOMP_NONE; } +#line 1247 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_PARAM->pLastClass = hb_compClassAdd( HB_COMP_PARAM, (yyvsp[-1].string), NULL ); HB_COMP_PARAM->iVarScope = HB_VSCOMP_NONE; } +#line 5833 "harboury.c" /* yacc.c:1646 */ break; case 436: - -/* Line 1806 of yacc.c */ -#line 1248 "harbour.y" - { HB_COMP_PARAM->pLastClass = hb_compClassAdd( HB_COMP_PARAM, (yyvsp[(2) - (4)].string), (yyvsp[(3) - (4)].string) ); HB_COMP_PARAM->iVarScope = HB_VSCOMP_NONE; } +#line 1248 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_PARAM->pLastClass = hb_compClassAdd( HB_COMP_PARAM, (yyvsp[-2].string), (yyvsp[-1].string) ); HB_COMP_PARAM->iVarScope = HB_VSCOMP_NONE; } +#line 5839 "harboury.c" /* yacc.c:1646 */ break; case 437: - -/* Line 1806 of yacc.c */ -#line 1249 "harbour.y" +#line 1249 "harbour.y" /* yacc.c:1646 */ { HB_COMP_PARAM->iVarScope = HB_VSCOMP_NONE; } +#line 5845 "harboury.c" /* yacc.c:1646 */ break; case 438: - -/* Line 1806 of yacc.c */ -#line 1250 "harbour.y" - { HB_COMP_PARAM->cDataListType = (yyvsp[(3) - (3)].asVarType)->cVarType; } +#line 1250 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_PARAM->cDataListType = (yyvsp[0].asVarType)->cVarType; } +#line 5851 "harboury.c" /* yacc.c:1646 */ break; case 439: - -/* Line 1806 of yacc.c */ -#line 1250 "harbour.y" +#line 1250 "harbour.y" /* yacc.c:1646 */ { HB_COMP_PARAM->cDataListType = 0; HB_COMP_PARAM->iVarScope = HB_VSCOMP_NONE; } +#line 5857 "harboury.c" /* yacc.c:1646 */ break; case 446: - -/* Line 1806 of yacc.c */ -#line 1263 "harbour.y" - { HB_COMP_PARAM->pLastMethod = hb_compMethodAdd( HB_COMP_PARAM, HB_COMP_PARAM->pLastClass, (yyvsp[(1) - (2)].string) ); } +#line 1263 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_PARAM->pLastMethod = hb_compMethodAdd( HB_COMP_PARAM, HB_COMP_PARAM->pLastClass, (yyvsp[-1].string) ); } +#line 5863 "harboury.c" /* yacc.c:1646 */ break; case 447: - -/* Line 1806 of yacc.c */ -#line 1264 "harbour.y" +#line 1264 "harbour.y" /* yacc.c:1646 */ { if( HB_COMP_PARAM->pLastMethod ) { - HB_COMP_PARAM->pLastMethod->cType = (yyvsp[(6) - (6)].asVarType)->cVarType; - if( HB_TOUPPER( (yyvsp[(6) - (6)].asVarType)->cVarType ) == 'S' ) + HB_COMP_PARAM->pLastMethod->cType = (yyvsp[0].asVarType)->cVarType; + if( HB_TOUPPER( (yyvsp[0].asVarType)->cVarType ) == 'S' ) { - HB_COMP_PARAM->pLastMethod->pClass = hb_compClassFind( HB_COMP_PARAM, (yyvsp[(6) - (6)].asVarType)->szFromClass ); + HB_COMP_PARAM->pLastMethod->pClass = hb_compClassFind( HB_COMP_PARAM, (yyvsp[0].asVarType)->szFromClass ); if( ! HB_COMP_PARAM->pLastMethod->pClass ) { - hb_compGenWarning( HB_COMP_PARAM, hb_comp_szWarnings, 'W', HB_COMP_WARN_CLASS_NOT_FOUND, (yyvsp[(6) - (6)].asVarType)->szFromClass, HB_COMP_PARAM->pLastMethod->szName ); - HB_COMP_PARAM->pLastMethod->cType = ( HB_ISUPPER( ( HB_UCHAR ) (yyvsp[(6) - (6)].asVarType)->cVarType ) ? 'O' : 'o' ); + hb_compGenWarning( HB_COMP_PARAM, hb_comp_szWarnings, 'W', HB_COMP_WARN_CLASS_NOT_FOUND, (yyvsp[0].asVarType)->szFromClass, HB_COMP_PARAM->pLastMethod->szName ); + HB_COMP_PARAM->pLastMethod->cType = ( HB_ISUPPER( ( HB_UCHAR ) (yyvsp[0].asVarType)->cVarType ) ? 'O' : 'o' ); } } } HB_COMP_PARAM->pLastMethod = NULL; } +#line 5884 "harboury.c" /* yacc.c:1646 */ break; case 448: - -/* Line 1806 of yacc.c */ -#line 1282 "harbour.y" - { HB_COMP_PARAM->pLastMethod = hb_compMethodAdd( HB_COMP_PARAM, HB_COMP_PARAM->pLastClass, (yyvsp[(1) - (1)].string) ); } +#line 1282 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_PARAM->pLastMethod = hb_compMethodAdd( HB_COMP_PARAM, HB_COMP_PARAM->pLastClass, (yyvsp[0].string) ); } +#line 5890 "harboury.c" /* yacc.c:1646 */ break; case 449: - -/* Line 1806 of yacc.c */ -#line 1283 "harbour.y" +#line 1283 "harbour.y" /* yacc.c:1646 */ { if( HB_COMP_PARAM->pLastMethod ) { PHB_HCLASS pClass; char szSetData[ HB_SYMBOL_NAME_LEN + 1 ]; int iLen; - char cVarType = (yyvsp[(3) - (3)].asVarType)->cVarType; + char cVarType = (yyvsp[0].asVarType)->cVarType; /* List Type overrides if exists. */ if( HB_COMP_PARAM->cDataListType ) @@ -6597,22 +5906,22 @@ yyreduce: HB_COMP_PARAM->pLastMethod->cType = cVarType; if( HB_TOUPPER( cVarType ) == 'S' ) { - pClass = hb_compClassFind( HB_COMP_PARAM, (yyvsp[(3) - (3)].asVarType)->szFromClass ); + pClass = hb_compClassFind( HB_COMP_PARAM, (yyvsp[0].asVarType)->szFromClass ); HB_COMP_PARAM->pLastMethod->pClass = pClass; if( ! HB_COMP_PARAM->pLastMethod->pClass ) { - hb_compGenWarning( HB_COMP_PARAM, hb_comp_szWarnings, 'W', HB_COMP_WARN_CLASS_NOT_FOUND, (yyvsp[(3) - (3)].asVarType)->szFromClass, HB_COMP_PARAM->pLastMethod->szName ); + hb_compGenWarning( HB_COMP_PARAM, hb_comp_szWarnings, 'W', HB_COMP_WARN_CLASS_NOT_FOUND, (yyvsp[0].asVarType)->szFromClass, HB_COMP_PARAM->pLastMethod->szName ); HB_COMP_PARAM->pLastMethod->cType = ( HB_ISUPPER( ( HB_UCHAR ) cVarType ) ? 'O' :'o' ); } } else pClass = NULL; - iLen = ( int ) strlen( (yyvsp[(1) - (3)].string) ); + iLen = ( int ) strlen( (yyvsp[-2].string) ); if( iLen >= HB_SYMBOL_NAME_LEN ) iLen = HB_SYMBOL_NAME_LEN - 1; szSetData[ 0 ] = '_'; - memcpy( szSetData + 1, (yyvsp[(1) - (3)].string), iLen ); + memcpy( szSetData + 1, (yyvsp[-2].string), iLen ); szSetData[ iLen + 1 ] = '\0'; HB_COMP_PARAM->pLastMethod = hb_compMethodAdd( HB_COMP_PARAM, HB_COMP_PARAM->pLastClass, @@ -6634,767 +5943,685 @@ yyreduce: HB_COMP_PARAM->pLastMethod = NULL; } +#line 5947 "harboury.c" /* yacc.c:1646 */ break; case 463: - -/* Line 1806 of yacc.c */ -#line 1356 "harbour.y" - { HB_COMP_EXPR_FREE( (yyvsp[(1) - (1)].asExpr) ); } +#line 1356 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( (yyvsp[0].asExpr) ); } +#line 5953 "harboury.c" /* yacc.c:1646 */ break; case 464: - -/* Line 1806 of yacc.c */ -#line 1359 "harbour.y" - { hb_compDeclaredParameterAdd( HB_COMP_PARAM, (yyvsp[(1) - (2)].string), (yyvsp[(2) - (2)].asVarType) ); } +#line 1359 "harbour.y" /* yacc.c:1646 */ + { hb_compDeclaredParameterAdd( HB_COMP_PARAM, (yyvsp[-1].string), (yyvsp[0].asVarType) ); } +#line 5959 "harboury.c" /* yacc.c:1646 */ break; case 465: - -/* Line 1806 of yacc.c */ -#line 1360 "harbour.y" - { hb_compDeclaredParameterAdd( HB_COMP_PARAM, (yyvsp[(2) - (3)].string), hb_compVarTypeNew( HB_COMP_PARAM, (yyvsp[(3) - (3)].asVarType)->cVarType + HB_VT_OFFSET_BYREF, NULL ) ); } +#line 1360 "harbour.y" /* yacc.c:1646 */ + { hb_compDeclaredParameterAdd( HB_COMP_PARAM, (yyvsp[-1].string), hb_compVarTypeNew( HB_COMP_PARAM, (yyvsp[0].asVarType)->cVarType + HB_VT_OFFSET_BYREF, NULL ) ); } +#line 5965 "harboury.c" /* yacc.c:1646 */ break; case 466: - -/* Line 1806 of yacc.c */ -#line 1361 "harbour.y" - { hb_compDeclaredParameterAdd( HB_COMP_PARAM, (yyvsp[(2) - (5)].string), hb_compVarTypeNew( HB_COMP_PARAM, 'F', NULL ) ); } +#line 1361 "harbour.y" /* yacc.c:1646 */ + { hb_compDeclaredParameterAdd( HB_COMP_PARAM, (yyvsp[-3].string), hb_compVarTypeNew( HB_COMP_PARAM, 'F', NULL ) ); } +#line 5971 "harboury.c" /* yacc.c:1646 */ break; case 467: - -/* Line 1806 of yacc.c */ -#line 1362 "harbour.y" - { hb_compDeclaredParameterAdd( HB_COMP_PARAM, (yyvsp[(3) - (4)].string), (yyvsp[(4) - (4)].asVarType) ); } +#line 1362 "harbour.y" /* yacc.c:1646 */ + { hb_compDeclaredParameterAdd( HB_COMP_PARAM, (yyvsp[-1].string), (yyvsp[0].asVarType) ); } +#line 5977 "harboury.c" /* yacc.c:1646 */ break; case 468: - -/* Line 1806 of yacc.c */ -#line 1363 "harbour.y" - { hb_compDeclaredParameterAdd( HB_COMP_PARAM, (yyvsp[(4) - (5)].string), hb_compVarTypeNew( HB_COMP_PARAM, (yyvsp[(5) - (5)].asVarType)->cVarType + HB_VT_OFFSET_BYREF, NULL ) ); } +#line 1363 "harbour.y" /* yacc.c:1646 */ + { hb_compDeclaredParameterAdd( HB_COMP_PARAM, (yyvsp[-1].string), hb_compVarTypeNew( HB_COMP_PARAM, (yyvsp[0].asVarType)->cVarType + HB_VT_OFFSET_BYREF, NULL ) ); } +#line 5983 "harboury.c" /* yacc.c:1646 */ break; case 469: - -/* Line 1806 of yacc.c */ -#line 1364 "harbour.y" - { hb_compDeclaredParameterAdd( HB_COMP_PARAM, (yyvsp[(4) - (7)].string), hb_compVarTypeNew( HB_COMP_PARAM, 'F', NULL ) ); } +#line 1364 "harbour.y" /* yacc.c:1646 */ + { hb_compDeclaredParameterAdd( HB_COMP_PARAM, (yyvsp[-3].string), hb_compVarTypeNew( HB_COMP_PARAM, 'F', NULL ) ); } +#line 5989 "harboury.c" /* yacc.c:1646 */ break; case 470: - -/* Line 1806 of yacc.c */ -#line 1367 "harbour.y" - { hb_compDeclaredParameterAdd( HB_COMP_PARAM, (yyvsp[(2) - (3)].string), hb_compVarTypeNew( HB_COMP_PARAM, (yyvsp[(3) - (3)].asVarType)->cVarType + HB_VT_OFFSET_OPTIONAL, NULL ) ); } +#line 1367 "harbour.y" /* yacc.c:1646 */ + { hb_compDeclaredParameterAdd( HB_COMP_PARAM, (yyvsp[-1].string), hb_compVarTypeNew( HB_COMP_PARAM, (yyvsp[0].asVarType)->cVarType + HB_VT_OFFSET_OPTIONAL, NULL ) ); } +#line 5995 "harboury.c" /* yacc.c:1646 */ break; case 471: - -/* Line 1806 of yacc.c */ -#line 1368 "harbour.y" - { hb_compDeclaredParameterAdd( HB_COMP_PARAM, (yyvsp[(3) - (4)].string), hb_compVarTypeNew( HB_COMP_PARAM, (yyvsp[(4) - (4)].asVarType)->cVarType + HB_VT_OFFSET_OPTIONAL + HB_VT_OFFSET_BYREF, NULL ) ); } +#line 1368 "harbour.y" /* yacc.c:1646 */ + { hb_compDeclaredParameterAdd( HB_COMP_PARAM, (yyvsp[-1].string), hb_compVarTypeNew( HB_COMP_PARAM, (yyvsp[0].asVarType)->cVarType + HB_VT_OFFSET_OPTIONAL + HB_VT_OFFSET_BYREF, NULL ) ); } +#line 6001 "harboury.c" /* yacc.c:1646 */ break; case 472: - -/* Line 1806 of yacc.c */ -#line 1369 "harbour.y" - { hb_compDeclaredParameterAdd( HB_COMP_PARAM, (yyvsp[(3) - (6)].string), hb_compVarTypeNew( HB_COMP_PARAM, 'F' + HB_VT_OFFSET_OPTIONAL + HB_VT_OFFSET_BYREF, NULL ) ); } +#line 1369 "harbour.y" /* yacc.c:1646 */ + { hb_compDeclaredParameterAdd( HB_COMP_PARAM, (yyvsp[-3].string), hb_compVarTypeNew( HB_COMP_PARAM, 'F' + HB_VT_OFFSET_OPTIONAL + HB_VT_OFFSET_BYREF, NULL ) ); } +#line 6007 "harboury.c" /* yacc.c:1646 */ break; case 473: - -/* Line 1806 of yacc.c */ -#line 1370 "harbour.y" - { hb_compDeclaredParameterAdd( HB_COMP_PARAM, (yyvsp[(4) - (5)].string), hb_compVarTypeNew( HB_COMP_PARAM, (yyvsp[(5) - (5)].asVarType)->cVarType + HB_VT_OFFSET_OPTIONAL, NULL ) ); } +#line 1370 "harbour.y" /* yacc.c:1646 */ + { hb_compDeclaredParameterAdd( HB_COMP_PARAM, (yyvsp[-1].string), hb_compVarTypeNew( HB_COMP_PARAM, (yyvsp[0].asVarType)->cVarType + HB_VT_OFFSET_OPTIONAL, NULL ) ); } +#line 6013 "harboury.c" /* yacc.c:1646 */ break; case 474: - -/* Line 1806 of yacc.c */ -#line 1371 "harbour.y" - { hb_compDeclaredParameterAdd( HB_COMP_PARAM, (yyvsp[(5) - (6)].string), hb_compVarTypeNew( HB_COMP_PARAM, (yyvsp[(6) - (6)].asVarType)->cVarType + HB_VT_OFFSET_OPTIONAL + HB_VT_OFFSET_BYREF, NULL ) ); } +#line 1371 "harbour.y" /* yacc.c:1646 */ + { hb_compDeclaredParameterAdd( HB_COMP_PARAM, (yyvsp[-1].string), hb_compVarTypeNew( HB_COMP_PARAM, (yyvsp[0].asVarType)->cVarType + HB_VT_OFFSET_OPTIONAL + HB_VT_OFFSET_BYREF, NULL ) ); } +#line 6019 "harboury.c" /* yacc.c:1646 */ break; case 475: - -/* Line 1806 of yacc.c */ -#line 1372 "harbour.y" - { hb_compDeclaredParameterAdd( HB_COMP_PARAM, (yyvsp[(5) - (8)].string), hb_compVarTypeNew( HB_COMP_PARAM, 'F' + HB_VT_OFFSET_OPTIONAL + HB_VT_OFFSET_BYREF, NULL ) ); } +#line 1372 "harbour.y" /* yacc.c:1646 */ + { hb_compDeclaredParameterAdd( HB_COMP_PARAM, (yyvsp[-3].string), hb_compVarTypeNew( HB_COMP_PARAM, 'F' + HB_VT_OFFSET_OPTIONAL + HB_VT_OFFSET_BYREF, NULL ) ); } +#line 6025 "harboury.c" /* yacc.c:1646 */ break; case 484: - -/* Line 1806 of yacc.c */ -#line 1385 "harbour.y" - { hb_compGenJumpHere( (yyvsp[(1) - (2)].sNumber), HB_COMP_PARAM ); } +#line 1385 "harbour.y" /* yacc.c:1646 */ + { hb_compGenJumpHere( (yyvsp[-1].sNumber), HB_COMP_PARAM ); } +#line 6031 "harboury.c" /* yacc.c:1646 */ break; case 485: - -/* Line 1806 of yacc.c */ -#line 1386 "harbour.y" - { hb_compGenJumpHere( (yyvsp[(1) - (3)].sNumber), HB_COMP_PARAM ); } +#line 1386 "harbour.y" /* yacc.c:1646 */ + { hb_compGenJumpHere( (yyvsp[-2].sNumber), HB_COMP_PARAM ); } +#line 6037 "harboury.c" /* yacc.c:1646 */ break; case 486: - -/* Line 1806 of yacc.c */ -#line 1387 "harbour.y" - { hb_compGenJumpHere( (yyvsp[(1) - (3)].sNumber), HB_COMP_PARAM ); hb_compElseIfFix( HB_COMP_PARAM, (yyvsp[(2) - (3)].pVoid) ); } +#line 1387 "harbour.y" /* yacc.c:1646 */ + { hb_compGenJumpHere( (yyvsp[-2].sNumber), HB_COMP_PARAM ); hb_compElseIfFix( HB_COMP_PARAM, (yyvsp[-1].pVoid) ); } +#line 6043 "harboury.c" /* yacc.c:1646 */ break; case 487: - -/* Line 1806 of yacc.c */ -#line 1388 "harbour.y" - { hb_compGenJumpHere( (yyvsp[(1) - (4)].sNumber), HB_COMP_PARAM ); hb_compElseIfFix( HB_COMP_PARAM, (yyvsp[(2) - (4)].pVoid) ); } +#line 1388 "harbour.y" /* yacc.c:1646 */ + { hb_compGenJumpHere( (yyvsp[-3].sNumber), HB_COMP_PARAM ); hb_compElseIfFix( HB_COMP_PARAM, (yyvsp[-2].pVoid) ); } +#line 6049 "harboury.c" /* yacc.c:1646 */ break; case 488: - -/* Line 1806 of yacc.c */ -#line 1392 "harbour.y" +#line 1392 "harbour.y" /* yacc.c:1646 */ { ++HB_COMP_PARAM->functions.pLast->wIfCounter; hb_compLinePushIfInside( HB_COMP_PARAM ); } +#line 6055 "harboury.c" /* yacc.c:1646 */ break; case 489: - -/* Line 1806 of yacc.c */ -#line 1394 "harbour.y" - { HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[(2) - (4)].asExpr), HB_COMP_PARAM ) ); (yyval.sNumber) = hb_compGenJumpFalse( 0, HB_COMP_PARAM ); } +#line 1394 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[-2].asExpr), HB_COMP_PARAM ) ); (yyval.sNumber) = hb_compGenJumpFalse( 0, HB_COMP_PARAM ); } +#line 6061 "harboury.c" /* yacc.c:1646 */ break; case 490: - -/* Line 1806 of yacc.c */ -#line 1396 "harbour.y" - { (yyval.sNumber) = hb_compGenJump( 0, HB_COMP_PARAM ); hb_compGenJumpHere( (yyvsp[(5) - (6)].sNumber), HB_COMP_PARAM ); } +#line 1396 "harbour.y" /* yacc.c:1646 */ + { (yyval.sNumber) = hb_compGenJump( 0, HB_COMP_PARAM ); hb_compGenJumpHere( (yyvsp[-1].sNumber), HB_COMP_PARAM ); } +#line 6067 "harboury.c" /* yacc.c:1646 */ break; case 491: - -/* Line 1806 of yacc.c */ -#line 1399 "harbour.y" +#line 1399 "harbour.y" /* yacc.c:1646 */ { HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_BREAK_CODE; } +#line 6073 "harboury.c" /* yacc.c:1646 */ break; case 493: - -/* Line 1806 of yacc.c */ -#line 1403 "harbour.y" +#line 1403 "harbour.y" /* yacc.c:1646 */ { HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_BREAK_CODE; hb_compLinePush( HB_COMP_PARAM ); } +#line 6079 "harboury.c" /* yacc.c:1646 */ break; case 494: - -/* Line 1806 of yacc.c */ -#line 1405 "harbour.y" - { HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[(3) - (4)].asExpr), HB_COMP_PARAM ) ); +#line 1405 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[-1].asExpr), HB_COMP_PARAM ) ); (yyval.sNumber) = hb_compGenJumpFalse( 0, HB_COMP_PARAM ); } +#line 6087 "harboury.c" /* yacc.c:1646 */ break; case 495: - -/* Line 1806 of yacc.c */ -#line 1409 "harbour.y" +#line 1409 "harbour.y" /* yacc.c:1646 */ { (yyval.pVoid) = hb_compElseIfGen( HB_COMP_PARAM, NULL, hb_compGenJump( 0, HB_COMP_PARAM ) ); - hb_compGenJumpHere( (yyvsp[(5) - (6)].sNumber), HB_COMP_PARAM ); + hb_compGenJumpHere( (yyvsp[-1].sNumber), HB_COMP_PARAM ); } +#line 6095 "harboury.c" /* yacc.c:1646 */ break; case 496: - -/* Line 1806 of yacc.c */ -#line 1413 "harbour.y" +#line 1413 "harbour.y" /* yacc.c:1646 */ { HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_BREAK_CODE; hb_compLinePush( HB_COMP_PARAM ); } +#line 6101 "harboury.c" /* yacc.c:1646 */ break; case 497: - -/* Line 1806 of yacc.c */ -#line 1415 "harbour.y" - { HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[(4) - (5)].asExpr), HB_COMP_PARAM ) ); +#line 1415 "harbour.y" /* yacc.c:1646 */ + { HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[-1].asExpr), HB_COMP_PARAM ) ); (yyval.sNumber) = hb_compGenJumpFalse( 0, HB_COMP_PARAM ); } +#line 6109 "harboury.c" /* yacc.c:1646 */ break; case 498: - -/* Line 1806 of yacc.c */ -#line 1419 "harbour.y" - { (yyval.pVoid) = hb_compElseIfGen( HB_COMP_PARAM, (yyvsp[(1) - (7)].pVoid), hb_compGenJump( 0, HB_COMP_PARAM ) ); - hb_compGenJumpHere( (yyvsp[(6) - (7)].sNumber), HB_COMP_PARAM ); +#line 1419 "harbour.y" /* yacc.c:1646 */ + { (yyval.pVoid) = hb_compElseIfGen( HB_COMP_PARAM, (yyvsp[-6].pVoid), hb_compGenJump( 0, HB_COMP_PARAM ) ); + hb_compGenJumpHere( (yyvsp[-1].sNumber), HB_COMP_PARAM ); } +#line 6117 "harboury.c" /* yacc.c:1646 */ break; case 499: - -/* Line 1806 of yacc.c */ -#line 1425 "harbour.y" +#line 1425 "harbour.y" /* yacc.c:1646 */ { if( HB_COMP_PARAM->functions.pLast->wIfCounter ) --HB_COMP_PARAM->functions.pLast->wIfCounter; HB_COMP_PARAM->functions.pLast->funFlags &= ~ ( HB_FUNF_WITH_RETURN | HB_FUNF_BREAK_CODE ); } +#line 6127 "harboury.c" /* yacc.c:1646 */ break; case 502: - -/* Line 1806 of yacc.c */ -#line 1438 "harbour.y" - { hb_compElseIfFix( HB_COMP_PARAM, (yyvsp[(2) - (3)].pVoid) ); } +#line 1438 "harbour.y" /* yacc.c:1646 */ + { hb_compElseIfFix( HB_COMP_PARAM, (yyvsp[-1].pVoid) ); } +#line 6133 "harboury.c" /* yacc.c:1646 */ break; case 505: - -/* Line 1806 of yacc.c */ -#line 1450 "harbour.y" - { hb_compElseIfFix( HB_COMP_PARAM, (yyvsp[(2) - (4)].pVoid) ); } +#line 1450 "harbour.y" /* yacc.c:1646 */ + { hb_compElseIfFix( HB_COMP_PARAM, (yyvsp[-2].pVoid) ); } +#line 6139 "harboury.c" /* yacc.c:1646 */ break; case 506: - -/* Line 1806 of yacc.c */ -#line 1454 "harbour.y" +#line 1454 "harbour.y" /* yacc.c:1646 */ { if( HB_COMP_PARAM->functions.pLast->wCaseCounter ) --HB_COMP_PARAM->functions.pLast->wCaseCounter; HB_COMP_PARAM->functions.pLast->funFlags &= ~ ( HB_FUNF_WITH_RETURN | HB_FUNF_BREAK_CODE ); } +#line 6148 "harboury.c" /* yacc.c:1646 */ break; case 509: - -/* Line 1806 of yacc.c */ -#line 1464 "harbour.y" +#line 1464 "harbour.y" /* yacc.c:1646 */ { ++HB_COMP_PARAM->functions.pLast->wCaseCounter; hb_compLinePushIfDebugger( HB_COMP_PARAM );} +#line 6154 "harboury.c" /* yacc.c:1646 */ break; case 512: - -/* Line 1806 of yacc.c */ -#line 1468 "harbour.y" +#line 1468 "harbour.y" /* yacc.c:1646 */ { - if( (yyvsp[(2) - (2)].lNumber) > 0 ) + if( (yyvsp[0].lNumber) > 0 ) { hb_compGenError( HB_COMP_PARAM, hb_comp_szErrors, 'E', HB_COMP_ERR_MAYHEM_IN_CASE, NULL, NULL ); } } +#line 6165 "harboury.c" /* yacc.c:1646 */ break; case 513: - -/* Line 1806 of yacc.c */ -#line 1476 "harbour.y" +#line 1476 "harbour.y" /* yacc.c:1646 */ { hb_compLinePushIfInside( HB_COMP_PARAM ); } +#line 6171 "harboury.c" /* yacc.c:1646 */ break; case 514: - -/* Line 1806 of yacc.c */ -#line 1477 "harbour.y" +#line 1477 "harbour.y" /* yacc.c:1646 */ { - HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[(3) - (4)].asExpr), HB_COMP_PARAM ) ); + HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[-1].asExpr), HB_COMP_PARAM ) ); (yyval.sNumber) = hb_compGenJumpFalse( 0, HB_COMP_PARAM ); } +#line 6180 "harboury.c" /* yacc.c:1646 */ break; case 515: - -/* Line 1806 of yacc.c */ -#line 1482 "harbour.y" +#line 1482 "harbour.y" /* yacc.c:1646 */ { HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_BREAK_CODE; (yyval.pVoid) = hb_compElseIfGen( HB_COMP_PARAM, NULL, hb_compGenJump( 0, HB_COMP_PARAM ) ); - hb_compGenJumpHere( (yyvsp[(5) - (6)].sNumber), HB_COMP_PARAM ); + hb_compGenJumpHere( (yyvsp[-1].sNumber), HB_COMP_PARAM ); } +#line 6190 "harboury.c" /* yacc.c:1646 */ break; case 516: - -/* Line 1806 of yacc.c */ -#line 1488 "harbour.y" +#line 1488 "harbour.y" /* yacc.c:1646 */ { hb_compLinePushIfInside( HB_COMP_PARAM ); } +#line 6196 "harboury.c" /* yacc.c:1646 */ break; case 517: - -/* Line 1806 of yacc.c */ -#line 1489 "harbour.y" +#line 1489 "harbour.y" /* yacc.c:1646 */ { - HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[(4) - (5)].asExpr), HB_COMP_PARAM ) ); + HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[-1].asExpr), HB_COMP_PARAM ) ); (yyval.sNumber) = hb_compGenJumpFalse( 0, HB_COMP_PARAM ); } +#line 6205 "harboury.c" /* yacc.c:1646 */ break; case 518: - -/* Line 1806 of yacc.c */ -#line 1494 "harbour.y" +#line 1494 "harbour.y" /* yacc.c:1646 */ { HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_BREAK_CODE; - (yyval.pVoid) = hb_compElseIfGen( HB_COMP_PARAM, (yyvsp[(1) - (7)].pVoid), hb_compGenJump( 0, HB_COMP_PARAM ) ); - hb_compGenJumpHere( (yyvsp[(6) - (7)].sNumber), HB_COMP_PARAM ); + (yyval.pVoid) = hb_compElseIfGen( HB_COMP_PARAM, (yyvsp[-6].pVoid), hb_compGenJump( 0, HB_COMP_PARAM ) ); + hb_compGenJumpHere( (yyvsp[-1].sNumber), HB_COMP_PARAM ); } +#line 6215 "harboury.c" /* yacc.c:1646 */ break; case 519: - -/* Line 1806 of yacc.c */ -#line 1501 "harbour.y" +#line 1501 "harbour.y" /* yacc.c:1646 */ {hb_compLinePushIfDebugger( HB_COMP_PARAM ); } +#line 6221 "harboury.c" /* yacc.c:1646 */ break; case 520: - -/* Line 1806 of yacc.c */ -#line 1501 "harbour.y" +#line 1501 "harbour.y" /* yacc.c:1646 */ { HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_BREAK_CODE; } +#line 6227 "harboury.c" /* yacc.c:1646 */ break; case 522: - -/* Line 1806 of yacc.c */ -#line 1503 "harbour.y" +#line 1503 "harbour.y" /* yacc.c:1646 */ { hb_compGenError( HB_COMP_PARAM, hb_comp_szErrors, 'E', HB_COMP_ERR_MAYHEM_IN_CASE, NULL, NULL ); } +#line 6233 "harboury.c" /* yacc.c:1646 */ break; case 524: - -/* Line 1806 of yacc.c */ -#line 1508 "harbour.y" +#line 1508 "harbour.y" /* yacc.c:1646 */ { - HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[(2) - (3)].asExpr), HB_COMP_PARAM ) ); + HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[-1].asExpr), HB_COMP_PARAM ) ); (yyval.sNumber) = hb_compGenJumpFalse( 0, HB_COMP_PARAM ); } +#line 6242 "harboury.c" /* yacc.c:1646 */ break; case 525: - -/* Line 1806 of yacc.c */ -#line 1513 "harbour.y" +#line 1513 "harbour.y" /* yacc.c:1646 */ { hb_compLoopHere( HB_COMP_PARAM ); - hb_compGenJump( (yyvsp[(1) - (5)].sNumber) - HB_COMP_PARAM->functions.pLast->nPCodePos, HB_COMP_PARAM ); + hb_compGenJump( (yyvsp[-4].sNumber) - HB_COMP_PARAM->functions.pLast->nPCodePos, HB_COMP_PARAM ); } +#line 6251 "harboury.c" /* yacc.c:1646 */ break; case 526: - -/* Line 1806 of yacc.c */ -#line 1518 "harbour.y" +#line 1518 "harbour.y" /* yacc.c:1646 */ { - hb_compGenJumpHere( (yyvsp[(4) - (7)].sNumber), HB_COMP_PARAM ); + hb_compGenJumpHere( (yyvsp[-3].sNumber), HB_COMP_PARAM ); if( HB_COMP_PARAM->functions.pLast->wWhileCounter ) --HB_COMP_PARAM->functions.pLast->wWhileCounter; hb_compLoopEnd( HB_COMP_PARAM ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_WITH_RETURN; } +#line 6263 "harboury.c" /* yacc.c:1646 */ break; case 527: - -/* Line 1806 of yacc.c */ -#line 1528 "harbour.y" +#line 1528 "harbour.y" /* yacc.c:1646 */ { (yyval.sNumber) = HB_COMP_PARAM->functions.pLast->nPCodePos; hb_compLinePushIfInside( HB_COMP_PARAM ); ++HB_COMP_PARAM->functions.pLast->wWhileCounter; hb_compLoopStart( HB_COMP_PARAM, HB_TRUE ); } +#line 6274 "harboury.c" /* yacc.c:1646 */ break; case 528: - -/* Line 1806 of yacc.c */ -#line 1537 "harbour.y" +#line 1537 "harbour.y" /* yacc.c:1646 */ { HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_BREAK_CODE; } +#line 6280 "harboury.c" /* yacc.c:1646 */ break; case 531: - -/* Line 1806 of yacc.c */ -#line 1545 "harbour.y" +#line 1545 "harbour.y" /* yacc.c:1646 */ { /* 5 */ hb_compLinePushIfInside( HB_COMP_PARAM ); - (yyvsp[(1) - (4)].iNumber) = HB_COMP_PARAM->currLine; + (yyvsp[-3].iNumber) = HB_COMP_PARAM->currLine; hb_compDebugStart(); ++HB_COMP_PARAM->functions.pLast->wForCounter; - (yyvsp[(2) - (4)].asExpr) = hb_compExprReduce( (yyvsp[(2) - (4)].asExpr), HB_COMP_PARAM ); - (yyval.asExpr) = hb_compExprGenPush( hb_compExprAssign( (yyvsp[(2) - (4)].asExpr), (yyvsp[(4) - (4)].asExpr), HB_COMP_PARAM ), HB_COMP_PARAM ); - if( hb_compExprAsSymbol( (yyvsp[(2) - (4)].asExpr) ) ) + (yyvsp[-2].asExpr) = hb_compExprReduce( (yyvsp[-2].asExpr), HB_COMP_PARAM ); + (yyval.asExpr) = hb_compExprGenPush( hb_compExprAssign( (yyvsp[-2].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ), HB_COMP_PARAM ); + if( hb_compExprAsSymbol( (yyvsp[-2].asExpr) ) ) { - hb_compForStart( HB_COMP_PARAM, hb_compExprAsSymbol( (yyvsp[(2) - (4)].asExpr) ), 0 ); + hb_compForStart( HB_COMP_PARAM, hb_compExprAsSymbol( (yyvsp[-2].asExpr) ), 0 ); } } +#line 6297 "harboury.c" /* yacc.c:1646 */ break; case 532: - -/* Line 1806 of yacc.c */ -#line 1558 "harbour.y" +#line 1558 "harbour.y" /* yacc.c:1646 */ { /* 9 */ hb_compLoopStart( HB_COMP_PARAM, HB_TRUE ); (yyval.sNumber) = hb_compGenJump( 0, HB_COMP_PARAM ); } +#line 6306 "harboury.c" /* yacc.c:1646 */ break; case 533: - -/* Line 1806 of yacc.c */ -#line 1563 "harbour.y" +#line 1563 "harbour.y" /* yacc.c:1646 */ { /* 11 */ (yyval.sNumber) = HB_COMP_PARAM->functions.pLast->nPCodePos; } +#line 6314 "harboury.c" /* yacc.c:1646 */ break; case 534: - -/* Line 1806 of yacc.c */ -#line 1567 "harbour.y" +#line 1567 "harbour.y" /* yacc.c:1646 */ { int iSign, iLine; hb_compLoopHere( HB_COMP_PARAM ); iLine = HB_COMP_PARAM->currLine; - HB_COMP_PARAM->currLine = (yyvsp[(1) - (12)].iNumber); + HB_COMP_PARAM->currLine = (yyvsp[-11].iNumber); hb_compLinePush( HB_COMP_PARAM ); HB_COMP_PARAM->currLine = iLine; - if( (yyvsp[(8) - (12)].asExpr) ) + if( (yyvsp[-4].asExpr) ) { - (yyvsp[(8) - (12)].asExpr) = hb_compExprReduce( (yyvsp[(8) - (12)].asExpr), HB_COMP_PARAM ); - iSign = hb_compExprAsNumSign( (yyvsp[(8) - (12)].asExpr) ); - HB_COMP_EXPR_CLEAR( hb_compExprGenPush( hb_compExprSetOperand( hb_compExprNewPlusEq( (yyvsp[(2) - (12)].asExpr), HB_COMP_PARAM ), (yyvsp[(8) - (12)].asExpr), HB_COMP_PARAM ), HB_COMP_PARAM ) ); + (yyvsp[-4].asExpr) = hb_compExprReduce( (yyvsp[-4].asExpr), HB_COMP_PARAM ); + iSign = hb_compExprAsNumSign( (yyvsp[-4].asExpr) ); + HB_COMP_EXPR_CLEAR( hb_compExprGenPush( hb_compExprSetOperand( hb_compExprNewPlusEq( (yyvsp[-10].asExpr), HB_COMP_PARAM ), (yyvsp[-4].asExpr), HB_COMP_PARAM ), HB_COMP_PARAM ) ); } else { iSign = 1; - HB_COMP_EXPR_CLEAR( hb_compExprGenPush( hb_compExprNewPreInc( (yyvsp[(2) - (12)].asExpr), HB_COMP_PARAM ), HB_COMP_PARAM ) ); + HB_COMP_EXPR_CLEAR( hb_compExprGenPush( hb_compExprNewPreInc( (yyvsp[-10].asExpr), HB_COMP_PARAM ), HB_COMP_PARAM ) ); } - hb_compGenJumpHere( (yyvsp[(9) - (12)].sNumber), HB_COMP_PARAM ); - HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[(7) - (12)].asExpr), HB_COMP_PARAM ) ); /* end */ + hb_compGenJumpHere( (yyvsp[-3].sNumber), HB_COMP_PARAM ); + HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[-5].asExpr), HB_COMP_PARAM ) ); /* end */ if( iSign ) { hb_compGenPCode1( ( HB_BYTE ) ( iSign > 0 ? HB_P_GREATER : HB_P_LESS ), HB_COMP_PARAM ); - if( (yyvsp[(8) - (12)].asExpr) ) - HB_COMP_EXPR_FREE( (yyvsp[(8) - (12)].asExpr) ); + if( (yyvsp[-4].asExpr) ) + HB_COMP_EXPR_FREE( (yyvsp[-4].asExpr) ); } else { - HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[(8) - (12)].asExpr), HB_COMP_PARAM ) ); /* step */ + HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[-4].asExpr), HB_COMP_PARAM ) ); /* step */ hb_compGenPCode1( HB_P_FORTEST, HB_COMP_PARAM ); } - hb_compGenJumpFalse( (yyvsp[(11) - (12)].sNumber) - HB_COMP_PARAM->functions.pLast->nPCodePos, HB_COMP_PARAM ); + hb_compGenJumpFalse( (yyvsp[-1].sNumber) - HB_COMP_PARAM->functions.pLast->nPCodePos, HB_COMP_PARAM ); hb_compLoopEnd( HB_COMP_PARAM ); - if( hb_compExprAsSymbol( (yyvsp[(2) - (12)].asExpr) ) ) - hb_compForEnd( HB_COMP_PARAM, hb_compExprAsSymbol( (yyvsp[(2) - (12)].asExpr) ) ); - HB_COMP_EXPR_FREE( (yyvsp[(5) - (12)].asExpr) ); /* deletes $5, $2, $4 */ + if( hb_compExprAsSymbol( (yyvsp[-10].asExpr) ) ) + hb_compForEnd( HB_COMP_PARAM, hb_compExprAsSymbol( (yyvsp[-10].asExpr) ) ); + HB_COMP_EXPR_FREE( (yyvsp[-7].asExpr) ); /* deletes $5, $2, $4 */ HB_COMP_PARAM->functions.pLast->funFlags &= ~ ( HB_FUNF_WITH_RETURN | HB_FUNF_BREAK_CODE ); } +#line 6361 "harboury.c" /* yacc.c:1646 */ break; case 537: - -/* Line 1806 of yacc.c */ -#line 1615 "harbour.y" +#line 1615 "harbour.y" /* yacc.c:1646 */ { (yyval.asExpr) = NULL; } +#line 6367 "harboury.c" /* yacc.c:1646 */ break; case 538: - -/* Line 1806 of yacc.c */ -#line 1616 "harbour.y" - { (yyval.asExpr) = hb_compExprReduce( (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 1616 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprReduce( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 6373 "harboury.c" /* yacc.c:1646 */ break; case 539: - -/* Line 1806 of yacc.c */ -#line 1620 "harbour.y" +#line 1620 "harbour.y" /* yacc.c:1646 */ { hb_compLinePush( HB_COMP_PARAM ); if( HB_COMP_PARAM->functions.pLast->wForCounter ) --HB_COMP_PARAM->functions.pLast->wForCounter; } +#line 6383 "harboury.c" /* yacc.c:1646 */ break; case 544: - -/* Line 1806 of yacc.c */ -#line 1633 "harbour.y" - { (yyval.asExpr) = hb_compExprNewVarRef( (yyvsp[(1) - (1)].string), HB_COMP_PARAM ); } +#line 1633 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewVarRef( (yyvsp[0].string), HB_COMP_PARAM ); } +#line 6389 "harboury.c" /* yacc.c:1646 */ break; case 545: - -/* Line 1806 of yacc.c */ -#line 1634 "harbour.y" - { (yyval.asExpr) = hb_compExprNewRef( (yyvsp[(1) - (1)].asExpr), HB_COMP_PARAM ); } +#line 1634 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewRef( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 6395 "harboury.c" /* yacc.c:1646 */ break; case 546: - -/* Line 1806 of yacc.c */ -#line 1637 "harbour.y" - { (yyval.asExpr) = hb_compExprNewArgList( (yyvsp[(1) - (1)].asExpr), HB_COMP_PARAM ); } +#line 1637 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewArgList( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 6401 "harboury.c" /* yacc.c:1646 */ break; case 547: - -/* Line 1806 of yacc.c */ -#line 1638 "harbour.y" - { (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[(1) - (3)].asExpr), (yyvsp[(3) - (3)].asExpr) ); } +#line 1638 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[-2].asExpr), (yyvsp[0].asExpr) ); } +#line 6407 "harboury.c" /* yacc.c:1646 */ break; case 548: - -/* Line 1806 of yacc.c */ -#line 1641 "harbour.y" - { (yyval.asExpr) = hb_compExprNewVarRef( (yyvsp[(2) - (2)].string), HB_COMP_PARAM ); } +#line 1641 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewVarRef( (yyvsp[0].string), HB_COMP_PARAM ); } +#line 6413 "harboury.c" /* yacc.c:1646 */ break; case 550: - -/* Line 1806 of yacc.c */ -#line 1645 "harbour.y" - { (yyval.asExpr) = hb_compExprNewArgList( (yyvsp[(1) - (1)].asExpr), HB_COMP_PARAM ); } +#line 1645 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewArgList( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 6419 "harboury.c" /* yacc.c:1646 */ break; case 551: - -/* Line 1806 of yacc.c */ -#line 1646 "harbour.y" - { (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[(1) - (3)].asExpr), (yyvsp[(3) - (3)].asExpr) ); } +#line 1646 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[-2].asExpr), (yyvsp[0].asExpr) ); } +#line 6425 "harboury.c" /* yacc.c:1646 */ break; case 552: - -/* Line 1806 of yacc.c */ -#line 1651 "harbour.y" +#line 1651 "harbour.y" /* yacc.c:1646 */ { ++HB_COMP_PARAM->functions.pLast->wForCounter; /* 5 */ hb_compLinePushIfInside( HB_COMP_PARAM ); hb_compDebugStart(); } +#line 6435 "harboury.c" /* yacc.c:1646 */ break; case 553: - -/* Line 1806 of yacc.c */ -#line 1657 "harbour.y" +#line 1657 "harbour.y" /* yacc.c:1646 */ { /* 7 */ - (yyvsp[(2) - (6)].asExpr) = hb_compExprReduce( (yyvsp[(2) - (6)].asExpr), HB_COMP_PARAM ); - (yyvsp[(4) - (6)].asExpr) = hb_compExprReduce( (yyvsp[(4) - (6)].asExpr), HB_COMP_PARAM ); - hb_compEnumStart( HB_COMP_PARAM, (yyvsp[(2) - (6)].asExpr), (yyvsp[(4) - (6)].asExpr), (yyvsp[(6) - (6)].iNumber) ); + (yyvsp[-4].asExpr) = hb_compExprReduce( (yyvsp[-4].asExpr), HB_COMP_PARAM ); + (yyvsp[-2].asExpr) = hb_compExprReduce( (yyvsp[-2].asExpr), HB_COMP_PARAM ); + hb_compEnumStart( HB_COMP_PARAM, (yyvsp[-4].asExpr), (yyvsp[-2].asExpr), (yyvsp[0].iNumber) ); hb_compLoopStart( HB_COMP_PARAM, HB_TRUE ); (yyval.sNumber) = HB_COMP_PARAM->functions.pLast->nPCodePos; } +#line 6449 "harboury.c" /* yacc.c:1646 */ break; case 554: - -/* Line 1806 of yacc.c */ -#line 1667 "harbour.y" +#line 1667 "harbour.y" /* yacc.c:1646 */ { /* 9 */ (yyval.sNumber) = hb_compGenJumpFalse( 0, HB_COMP_PARAM ); } +#line 6458 "harboury.c" /* yacc.c:1646 */ break; case 555: - -/* Line 1806 of yacc.c */ -#line 1672 "harbour.y" +#line 1672 "harbour.y" /* yacc.c:1646 */ { hb_compLoopHere( HB_COMP_PARAM ); - hb_compEnumNext( HB_COMP_PARAM, (yyvsp[(2) - (10)].asExpr), (yyvsp[(6) - (10)].iNumber) ); - hb_compGenJump( (yyvsp[(7) - (10)].sNumber) - HB_COMP_PARAM->functions.pLast->nPCodePos, HB_COMP_PARAM ); + hb_compEnumNext( HB_COMP_PARAM, (yyvsp[-8].asExpr), (yyvsp[-4].iNumber) ); + hb_compGenJump( (yyvsp[-3].sNumber) - HB_COMP_PARAM->functions.pLast->nPCodePos, HB_COMP_PARAM ); - hb_compGenJumpHere( (yyvsp[(9) - (10)].sNumber), HB_COMP_PARAM ); + hb_compGenJumpHere( (yyvsp[-1].sNumber), HB_COMP_PARAM ); hb_compLoopEnd( HB_COMP_PARAM ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ ( HB_FUNF_WITH_RETURN | HB_FUNF_BREAK_CODE ); - hb_compEnumEnd( HB_COMP_PARAM, (yyvsp[(2) - (10)].asExpr) ); - HB_COMP_EXPR_FREE( (yyvsp[(2) - (10)].asExpr) ); - HB_COMP_EXPR_FREE( (yyvsp[(4) - (10)].asExpr) ); + hb_compEnumEnd( HB_COMP_PARAM, (yyvsp[-8].asExpr) ); + HB_COMP_EXPR_FREE( (yyvsp[-8].asExpr) ); + HB_COMP_EXPR_FREE( (yyvsp[-6].asExpr) ); } +#line 6475 "harboury.c" /* yacc.c:1646 */ break; case 556: - -/* Line 1806 of yacc.c */ -#line 1686 "harbour.y" +#line 1686 "harbour.y" /* yacc.c:1646 */ { (yyval.iNumber) = 1; } +#line 6481 "harboury.c" /* yacc.c:1646 */ break; case 557: - -/* Line 1806 of yacc.c */ -#line 1687 "harbour.y" +#line 1687 "harbour.y" /* yacc.c:1646 */ { (yyval.iNumber) = -1; } +#line 6487 "harboury.c" /* yacc.c:1646 */ break; case 558: - -/* Line 1806 of yacc.c */ -#line 1691 "harbour.y" +#line 1691 "harbour.y" /* yacc.c:1646 */ { hb_compLoopStart( HB_COMP_PARAM, HB_FALSE ); - hb_compSwitchStart( HB_COMP_PARAM, (yyvsp[(1) - (1)].asExpr) ); + hb_compSwitchStart( HB_COMP_PARAM, (yyvsp[0].asExpr) ); hb_compGenJump( 0, HB_COMP_PARAM ); } +#line 6497 "harboury.c" /* yacc.c:1646 */ break; case 559: - -/* Line 1806 of yacc.c */ -#line 1698 "harbour.y" +#line 1698 "harbour.y" /* yacc.c:1646 */ { hb_compSwitchEnd( HB_COMP_PARAM ); hb_compLoopEnd( HB_COMP_PARAM ); } +#line 6506 "harboury.c" /* yacc.c:1646 */ break; case 560: - -/* Line 1806 of yacc.c */ -#line 1705 "harbour.y" +#line 1705 "harbour.y" /* yacc.c:1646 */ { - HB_COMP_EXPR_FREE( (yyvsp[(1) - (2)].asExpr) ); + HB_COMP_EXPR_FREE( (yyvsp[-1].asExpr) ); } +#line 6514 "harboury.c" /* yacc.c:1646 */ break; case 561: - -/* Line 1806 of yacc.c */ -#line 1711 "harbour.y" +#line 1711 "harbour.y" /* yacc.c:1646 */ { if( HB_COMP_PARAM->functions.pLast->wSwitchCounter ) --HB_COMP_PARAM->functions.pLast->wSwitchCounter; HB_COMP_PARAM->functions.pLast->funFlags &= ~ ( HB_FUNF_WITH_RETURN | HB_FUNF_BREAK_CODE ); } +#line 6524 "harboury.c" /* yacc.c:1646 */ break; case 564: - -/* Line 1806 of yacc.c */ -#line 1723 "harbour.y" +#line 1723 "harbour.y" /* yacc.c:1646 */ { ++HB_COMP_PARAM->functions.pLast->wSwitchCounter; hb_compLinePushIfInside( HB_COMP_PARAM ); } +#line 6533 "harboury.c" /* yacc.c:1646 */ break; case 565: - -/* Line 1806 of yacc.c */ -#line 1728 "harbour.y" +#line 1728 "harbour.y" /* yacc.c:1646 */ { - (yyval.asExpr) = hb_compExprReduce( (yyvsp[(3) - (4)].asExpr), HB_COMP_PARAM ); + (yyval.asExpr) = hb_compExprReduce( (yyvsp[-1].asExpr), HB_COMP_PARAM ); } +#line 6541 "harboury.c" /* yacc.c:1646 */ break; case 567: - -/* Line 1806 of yacc.c */ -#line 1735 "harbour.y" +#line 1735 "harbour.y" /* yacc.c:1646 */ { - if( (yyvsp[(2) - (2)].lNumber) > 0 ) + if( (yyvsp[0].lNumber) > 0 ) { hb_compGenError( HB_COMP_PARAM, hb_comp_szErrors, 'E', HB_COMP_ERR_MAYHEM_IN_CASE, NULL, NULL ); } } +#line 6552 "harboury.c" /* yacc.c:1646 */ break; case 568: - -/* Line 1806 of yacc.c */ -#line 1743 "harbour.y" - { hb_compSwitchAdd( HB_COMP_PARAM, (yyvsp[(2) - (2)].asExpr) ); hb_compLinePush( HB_COMP_PARAM ); } +#line 1743 "harbour.y" /* yacc.c:1646 */ + { hb_compSwitchAdd( HB_COMP_PARAM, (yyvsp[0].asExpr) ); hb_compLinePush( HB_COMP_PARAM ); } +#line 6558 "harboury.c" /* yacc.c:1646 */ break; case 570: - -/* Line 1806 of yacc.c */ -#line 1746 "harbour.y" - { hb_compSwitchAdd( HB_COMP_PARAM, (yyvsp[(3) - (3)].asExpr) ); hb_compLinePush( HB_COMP_PARAM ); } +#line 1746 "harbour.y" /* yacc.c:1646 */ + { hb_compSwitchAdd( HB_COMP_PARAM, (yyvsp[0].asExpr) ); hb_compLinePush( HB_COMP_PARAM ); } +#line 6564 "harboury.c" /* yacc.c:1646 */ break; case 574: - -/* Line 1806 of yacc.c */ -#line 1754 "harbour.y" +#line 1754 "harbour.y" /* yacc.c:1646 */ { hb_compSwitchAdd( HB_COMP_PARAM, NULL ); hb_compLinePush( HB_COMP_PARAM ); } +#line 6570 "harboury.c" /* yacc.c:1646 */ break; case 575: - -/* Line 1806 of yacc.c */ -#line 1754 "harbour.y" +#line 1754 "harbour.y" /* yacc.c:1646 */ { HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_BREAK_CODE; } +#line 6576 "harboury.c" /* yacc.c:1646 */ break; case 577: - -/* Line 1806 of yacc.c */ -#line 1759 "harbour.y" +#line 1759 "harbour.y" /* yacc.c:1646 */ { /* 2 */ hb_compLinePushIfInside( HB_COMP_PARAM ); ++HB_COMP_PARAM->functions.pLast->wSeqCounter; (yyval.sNumber) = hb_compSequenceBegin( HB_COMP_PARAM ); } +#line 6586 "harboury.c" /* yacc.c:1646 */ break; case 578: - -/* Line 1806 of yacc.c */ -#line 1767 "harbour.y" +#line 1767 "harbour.y" /* yacc.c:1646 */ { /* 6 */ /* Set jump address for HB_P_SEQBEGIN opcode - this address * will be used in BREAK code if there is no RECOVER clause */ - if( (yyvsp[(3) - (5)].sNumber) ) + if( (yyvsp[-2].sNumber) ) hb_compGenPCode1( HB_P_POP, HB_COMP_PARAM ); - hb_compGenJumpHere( (yyvsp[(2) - (5)].sNumber), HB_COMP_PARAM ); + hb_compGenJumpHere( (yyvsp[-3].sNumber), HB_COMP_PARAM ); (yyval.sNumber) = hb_compSequenceEnd( HB_COMP_PARAM ); - (yyvsp[(4) - (5)].lNumber) = hb_compLoopCount( HB_COMP_PARAM ); + (yyvsp[-1].lNumber) = hb_compLoopCount( HB_COMP_PARAM ); } +#line 6601 "harboury.c" /* yacc.c:1646 */ break; case 579: - -/* Line 1806 of yacc.c */ -#line 1778 "harbour.y" +#line 1778 "harbour.y" /* yacc.c:1646 */ { /* 8 */ /* Replace END address with RECOVER address in * HB_P_SEQBEGIN opcode if there is RECOVER clause */ - if( (yyvsp[(7) - (7)].sNumber) ) - hb_compGenJumpThere( (yyvsp[(2) - (7)].sNumber), (yyvsp[(7) - (7)].sNumber), HB_COMP_PARAM ); + if( (yyvsp[0].sNumber) ) + hb_compGenJumpThere( (yyvsp[-5].sNumber), (yyvsp[0].sNumber), HB_COMP_PARAM ); else if( HB_COMP_PARAM->functions.pLast->wSeqCounter ) --HB_COMP_PARAM->functions.pLast->wSeqCounter; } +#line 6615 "harboury.c" /* yacc.c:1646 */ break; case 580: - -/* Line 1806 of yacc.c */ -#line 1788 "harbour.y" +#line 1788 "harbour.y" /* yacc.c:1646 */ { /* 10 */ long lLoopCount = hb_compLoopCount( HB_COMP_PARAM ); HB_COMP_PARAM->functions.pLast->funFlags &= ~ ( HB_FUNF_WITH_RETURN | HB_FUNF_BREAK_CODE ); - if( (yyvsp[(9) - (9)].sNumber) ) + if( (yyvsp[0].sNumber) ) { - if( (yyvsp[(4) - (9)].lNumber) != lLoopCount ) + if( (yyvsp[-5].lNumber) != lLoopCount ) { /* ALWAYS statement after RECOVER with EXIT/LOOP statments */ hb_compGenError( HB_COMP_PARAM, hb_comp_szErrors, 'E', HB_COMP_ERR_ALWAYS_AFTER_EXIT, "EXIT/LOOP", NULL ); @@ -7402,71 +6629,65 @@ yyreduce: --HB_COMP_PARAM->functions.pLast->wAlwaysCounter; /* replace END address with ALWAYS address in HB_P_SEQEND opcode */ - hb_compGenJumpThere( (yyvsp[(6) - (9)].sNumber), (yyvsp[(9) - (9)].sNumber), HB_COMP_PARAM ); + hb_compGenJumpThere( (yyvsp[-3].sNumber), (yyvsp[0].sNumber), HB_COMP_PARAM ); /* Fix ALWAYS address in HB_P_SEQALWAYS opcode */ - hb_compGenJumpThere( (yyvsp[(2) - (9)].sNumber) - 4, (yyvsp[(9) - (9)].sNumber), HB_COMP_PARAM ); + hb_compGenJumpThere( (yyvsp[-7].sNumber) - 4, (yyvsp[0].sNumber), HB_COMP_PARAM ); /* Fix ALWAYSEND address in HB_P_ALWAYSBEGIN opcode */ - hb_compGenJumpHere( (yyvsp[(9) - (9)].sNumber) + 1, HB_COMP_PARAM ); + hb_compGenJumpHere( (yyvsp[0].sNumber) + 1, HB_COMP_PARAM ); hb_compGenPCode1( HB_P_ALWAYSEND, HB_COMP_PARAM ); } else { /* Fix END address in HB_P_SEQEND opcode */ - hb_compGenJumpHere( (yyvsp[(6) - (9)].sNumber), HB_COMP_PARAM ); + hb_compGenJumpHere( (yyvsp[-3].sNumber), HB_COMP_PARAM ); } - hb_compSequenceFinish( HB_COMP_PARAM, (yyvsp[(2) - (9)].sNumber), (yyvsp[(6) - (9)].sNumber), (yyvsp[(9) - (9)].sNumber), - (yyvsp[(5) - (9)].lNumber) != 0, (yyvsp[(7) - (9)].sNumber) != 0, (yyvsp[(4) - (9)].lNumber) == lLoopCount ); + hb_compSequenceFinish( HB_COMP_PARAM, (yyvsp[-7].sNumber), (yyvsp[-3].sNumber), (yyvsp[0].sNumber), + (yyvsp[-4].lNumber) != 0, (yyvsp[-2].sNumber) != 0, (yyvsp[-5].lNumber) == lLoopCount ); } +#line 6648 "harboury.c" /* yacc.c:1646 */ break; case 584: - -/* Line 1806 of yacc.c */ -#line 1823 "harbour.y" +#line 1823 "harbour.y" /* yacc.c:1646 */ { (yyval.sNumber) = 0; } +#line 6654 "harboury.c" /* yacc.c:1646 */ break; case 585: - -/* Line 1806 of yacc.c */ -#line 1825 "harbour.y" +#line 1825 "harbour.y" /* yacc.c:1646 */ { - HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ) ); + HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[0].asExpr), HB_COMP_PARAM ) ); hb_compGenPCode1( HB_P_SEQBLOCK, HB_COMP_PARAM ); (yyval.sNumber) = HB_COMP_PARAM->functions.pLast->nPCodePos; } +#line 6664 "harboury.c" /* yacc.c:1646 */ break; case 586: - -/* Line 1806 of yacc.c */ -#line 1832 "harbour.y" +#line 1832 "harbour.y" /* yacc.c:1646 */ { (yyval.sNumber) = 0; } +#line 6670 "harboury.c" /* yacc.c:1646 */ break; case 588: - -/* Line 1806 of yacc.c */ -#line 1837 "harbour.y" +#line 1837 "harbour.y" /* yacc.c:1646 */ { HB_COMP_PARAM->functions.pLast->funFlags &= ~ ( HB_FUNF_WITH_RETURN | HB_FUNF_BREAK_CODE ); (yyval.sNumber) = HB_COMP_PARAM->functions.pLast->nPCodePos; ++HB_COMP_PARAM->functions.pLast->wAlwaysCounter; hb_compSequenceAlways( HB_COMP_PARAM ); } +#line 6681 "harboury.c" /* yacc.c:1646 */ break; case 589: - -/* Line 1806 of yacc.c */ -#line 1845 "harbour.y" +#line 1845 "harbour.y" /* yacc.c:1646 */ { (yyval.sNumber) = 0; HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_BREAK_CODE; } +#line 6687 "harboury.c" /* yacc.c:1646 */ break; case 592: - -/* Line 1806 of yacc.c */ -#line 1851 "harbour.y" +#line 1851 "harbour.y" /* yacc.c:1646 */ { HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_BREAK_CODE; (yyval.sNumber) = HB_COMP_PARAM->functions.pLast->nPCodePos; @@ -7475,12 +6696,11 @@ yyreduce: hb_compLinePushIfInside( HB_COMP_PARAM ); hb_compGenPCode2( HB_P_SEQRECOVER, HB_P_POP, HB_COMP_PARAM ); } +#line 6700 "harboury.c" /* yacc.c:1646 */ break; case 593: - -/* Line 1806 of yacc.c */ -#line 1862 "harbour.y" +#line 1862 "harbour.y" /* yacc.c:1646 */ { HB_COMP_PARAM->functions.pLast->funFlags &= ~ HB_FUNF_BREAK_CODE; (yyval.sNumber) = HB_COMP_PARAM->functions.pLast->nPCodePos; @@ -7488,127 +6708,113 @@ yyreduce: --HB_COMP_PARAM->functions.pLast->wSeqCounter; hb_compLinePushIfInside( HB_COMP_PARAM ); hb_compGenPCode1( HB_P_SEQRECOVER, HB_COMP_PARAM ); - hb_compGenPopVar( (yyvsp[(2) - (2)].string), HB_COMP_PARAM ); + hb_compGenPopVar( (yyvsp[0].string), HB_COMP_PARAM ); } +#line 6714 "harboury.c" /* yacc.c:1646 */ break; case 594: - -/* Line 1806 of yacc.c */ -#line 1880 "harbour.y" +#line 1880 "harbour.y" /* yacc.c:1646 */ { - (yyval.asExpr) = hb_compExprNewFunCall( (yyvsp[(2) - (3)].asExpr), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); + (yyval.asExpr) = hb_compExprNewFunCall( (yyvsp[-1].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 6722 "harboury.c" /* yacc.c:1646 */ break; case 595: - -/* Line 1806 of yacc.c */ -#line 1884 "harbour.y" +#line 1884 "harbour.y" /* yacc.c:1646 */ { - hb_compModuleAdd( HB_COMP_PARAM, (yyvsp[(1) - (2)].string), HB_FALSE ); + hb_compModuleAdd( HB_COMP_PARAM, (yyvsp[-1].string), HB_FALSE ); /* DOIDENT is the only one identifier which can be returned in lower letters */ - (yyval.asExpr) = hb_compExprNewFunCall( hb_compExprNewFunName( hb_compIdentifierNew( HB_COMP_PARAM, hb_strupr( hb_strdup( (yyvsp[(1) - (2)].string) ) ), HB_IDENT_FREE ), HB_COMP_PARAM ), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); + (yyval.asExpr) = hb_compExprNewFunCall( hb_compExprNewFunName( hb_compIdentifierNew( HB_COMP_PARAM, hb_strupr( hb_strdup( (yyvsp[-1].string) ) ), HB_IDENT_FREE ), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 6732 "harboury.c" /* yacc.c:1646 */ break; case 596: - -/* Line 1806 of yacc.c */ -#line 1891 "harbour.y" +#line 1891 "harbour.y" /* yacc.c:1646 */ { (yyval.asExpr) = NULL; } +#line 6738 "harboury.c" /* yacc.c:1646 */ break; case 597: - -/* Line 1806 of yacc.c */ -#line 1892 "harbour.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 1892 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 6744 "harboury.c" /* yacc.c:1646 */ break; case 598: - -/* Line 1806 of yacc.c */ -#line 1895 "harbour.y" +#line 1895 "harbour.y" /* yacc.c:1646 */ { (yyval.asExpr) = hb_compExprAddListExpr( hb_compExprNewArgList( hb_compExprNewNil( HB_COMP_PARAM ), HB_COMP_PARAM ), hb_compExprNewNil( HB_COMP_PARAM ) ); } +#line 6750 "harboury.c" /* yacc.c:1646 */ break; case 599: - -/* Line 1806 of yacc.c */ -#line 1896 "harbour.y" - { (yyval.asExpr) = hb_compExprAddListExpr( hb_compExprNewArgList( hb_compExprNewNil( HB_COMP_PARAM ), HB_COMP_PARAM ), (yyvsp[(2) - (2)].asExpr) ); } +#line 1896 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprAddListExpr( hb_compExprNewArgList( hb_compExprNewNil( HB_COMP_PARAM ), HB_COMP_PARAM ), (yyvsp[0].asExpr) ); } +#line 6756 "harboury.c" /* yacc.c:1646 */ break; case 600: - -/* Line 1806 of yacc.c */ -#line 1897 "harbour.y" - { (yyval.asExpr) = hb_compExprNewArgList( (yyvsp[(1) - (1)].asExpr), HB_COMP_PARAM ); } +#line 1897 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewArgList( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 6762 "harboury.c" /* yacc.c:1646 */ break; case 601: - -/* Line 1806 of yacc.c */ -#line 1898 "harbour.y" - { (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[(1) - (2)].asExpr), hb_compExprNewNil( HB_COMP_PARAM ) ); } +#line 1898 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[-1].asExpr), hb_compExprNewNil( HB_COMP_PARAM ) ); } +#line 6768 "harboury.c" /* yacc.c:1646 */ break; case 602: - -/* Line 1806 of yacc.c */ -#line 1899 "harbour.y" - { (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[(1) - (3)].asExpr), (yyvsp[(3) - (3)].asExpr) ); } +#line 1899 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[-2].asExpr), (yyvsp[0].asExpr) ); } +#line 6774 "harboury.c" /* yacc.c:1646 */ break; case 603: - -/* Line 1806 of yacc.c */ -#line 1902 "harbour.y" - { (yyval.asExpr) = hb_compExprNewVarRef( (yyvsp[(1) - (1)].string), HB_COMP_PARAM ); } +#line 1902 "harbour.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewVarRef( (yyvsp[0].string), HB_COMP_PARAM ); } +#line 6780 "harboury.c" /* yacc.c:1646 */ break; case 608: - -/* Line 1806 of yacc.c */ -#line 1910 "harbour.y" +#line 1910 "harbour.y" /* yacc.c:1646 */ { hb_compLinePushIfInside( HB_COMP_PARAM ); - HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[(2) - (3)].asExpr), HB_COMP_PARAM ) ); + HB_COMP_EXPR_FREE( hb_compExprGenPush( (yyvsp[-1].asExpr), HB_COMP_PARAM ) ); (yyval.sNumber) = HB_COMP_PARAM->functions.pLast->nPCodePos; hb_compGenPCode1( HB_P_WITHOBJECTSTART, HB_COMP_PARAM ); HB_COMP_PARAM->functions.pLast->wWithObjectCnt++; } +#line 6792 "harboury.c" /* yacc.c:1646 */ break; case 609: - -/* Line 1806 of yacc.c */ -#line 1919 "harbour.y" +#line 1919 "harbour.y" /* yacc.c:1646 */ { if( HB_COMP_PARAM->functions.pLast->wWithObjectCnt ) --HB_COMP_PARAM->functions.pLast->wWithObjectCnt; - if( (yyvsp[(5) - (6)].lNumber) ) + if( (yyvsp[-1].lNumber) ) hb_compGenPCode1( HB_P_WITHOBJECTEND, HB_COMP_PARAM ); else { hb_compNOOPfill( HB_COMP_PARAM->functions.pLast, - (yyvsp[(4) - (6)].sNumber), 1, HB_FALSE, HB_TRUE ); + (yyvsp[-2].sNumber), 1, HB_FALSE, HB_TRUE ); hb_compGenPCode1( HB_P_POP, HB_COMP_PARAM ); } } +#line 6808 "harboury.c" /* yacc.c:1646 */ break; case 612: - -/* Line 1806 of yacc.c */ -#line 1936 "harbour.y" +#line 1936 "harbour.y" /* yacc.c:1646 */ { HB_COMP_PARAM->fError = HB_FALSE; } +#line 6814 "harboury.c" /* yacc.c:1646 */ break; - -/* Line 1806 of yacc.c */ -#line 7612 "harboury.c" +#line 6818 "harboury.c" /* yacc.c:1646 */ default: break; } /* User semantic actions sometimes alter yychar, and that requires @@ -7630,7 +6836,7 @@ yyreduce: *++yyvsp = yyval; - /* Now `shift' the result of the reduction. Determine what state + /* 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. */ @@ -7645,9 +6851,9 @@ yyreduce: goto yynewstate; -/*------------------------------------. -| yyerrlab -- here on detecting error | -`------------------------------------*/ +/*--------------------------------------. +| yyerrlab -- here on detecting error. | +`--------------------------------------*/ yyerrlab: /* Make sure we have latest lookahead translation. See comments at user semantic actions for why this is necessary. */ @@ -7698,20 +6904,20 @@ yyerrlab: if (yyerrstatus == 3) { /* If just tried and failed to reuse lookahead token after an - error, discard it. */ + error, discard it. */ if (yychar <= YYEOF) - { - /* Return failure if at end of input. */ - if (yychar == YYEOF) - YYABORT; - } + { + /* Return failure if at end of input. */ + if (yychar == YYEOF) + YYABORT; + } else - { - yydestruct ("Error: discarding", - yytoken, &yylval, pComp); - yychar = YYEMPTY; - } + { + yydestruct ("Error: discarding", + yytoken, &yylval, pComp); + yychar = YYEMPTY; + } } /* Else will try to reuse lookahead token after shifting the error @@ -7730,7 +6936,7 @@ yyerrorlab: if (/*CONSTCOND*/ 0) goto yyerrorlab; - /* Do not reclaim the symbols of the rule which action triggered + /* Do not reclaim the symbols of the rule whose action triggered this YYERROR. */ YYPOPSTACK (yylen); yylen = 0; @@ -7743,35 +6949,37 @@ yyerrorlab: | yyerrlab1 -- common code for both syntax error and YYERROR. | `-------------------------------------------------------------*/ yyerrlab1: - yyerrstatus = 3; /* Each real token shifted decrements this. */ + yyerrstatus = 3; /* Each real token shifted decrements this. */ for (;;) { yyn = yypact[yystate]; if (!yypact_value_is_default (yyn)) - { - yyn += YYTERROR; - if (0 <= yyn && yyn <= YYLAST && yycheck[yyn] == YYTERROR) - { - yyn = yytable[yyn]; - if (0 < yyn) - break; - } - } + { + yyn += YYTERROR; + if (0 <= yyn && yyn <= YYLAST && yycheck[yyn] == YYTERROR) + { + yyn = yytable[yyn]; + if (0 < yyn) + break; + } + } /* Pop the current state because it cannot handle the error token. */ if (yyssp == yyss) - YYABORT; + YYABORT; yydestruct ("Error: popping", - yystos[yystate], yyvsp, pComp); + yystos[yystate], yyvsp, pComp); YYPOPSTACK (1); yystate = *yyssp; YY_STACK_PRINT (yyss, yyssp); } + YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN *++yyvsp = yylval; + YY_IGNORE_MAYBE_UNINITIALIZED_END /* Shift the error token. */ @@ -7795,7 +7003,7 @@ yyabortlab: yyresult = 1; goto yyreturn; -#if !defined(yyoverflow) || YYERROR_VERBOSE +#if !defined yyoverflow || YYERROR_VERBOSE /*-------------------------------------------------. | yyexhaustedlab -- memory exhaustion comes here. | `-------------------------------------------------*/ @@ -7814,14 +7022,14 @@ yyreturn: yydestruct ("Cleanup: discarding lookahead", yytoken, &yylval, pComp); } - /* Do not reclaim the symbols of the rule which action triggered + /* Do not reclaim the symbols of the rule whose action triggered this YYABORT or YYACCEPT. */ YYPOPSTACK (yylen); YY_STACK_PRINT (yyss, yyssp); while (yyssp != yyss) { yydestruct ("Cleanup: popping", - yystos[*yyssp], yyvsp, pComp); + yystos[*yyssp], yyvsp, pComp); YYPOPSTACK (1); } #ifndef yyoverflow @@ -7832,14 +7040,9 @@ yyreturn: if (yymsg != yymsgbuf) YYSTACK_FREE (yymsg); #endif - /* Make sure YYID is used. */ - return YYID (yyresult); + return yyresult; } - - - -/* Line 2067 of yacc.c */ -#line 1940 "harbour.y" +#line 1940 "harbour.y" /* yacc.c:1906 */ /* diff --git a/src/compiler/harbour.yyh b/src/compiler/harbour.yyh index 71d21be230..c9251b530d 100644 --- a/src/compiler/harbour.yyh +++ b/src/compiler/harbour.yyh @@ -1,8 +1,8 @@ -/* A Bison parser, made by GNU Bison 2.5. */ +/* A Bison parser, made by GNU Bison 3.0.2. */ /* Bison interface for Yacc-like parsers in C - Copyright (C) 1984, 1989-1990, 2000-2011 Free Software Foundation, Inc. + Copyright (C) 1984, 1989-1990, 2000-2013 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 @@ -30,133 +30,139 @@ This special exception was added by the Free Software Foundation in version 2.2 of Bison. */ - -/* Tokens. */ -#ifndef YYTOKENTYPE -# define YYTOKENTYPE - /* Put the tokens into the symbol table, so that GDB and other debuggers - know about them. */ - enum yytokentype { - FUNCTION = 258, - PROCEDURE = 259, - IDENTIFIER = 260, - RETURN = 261, - NIL = 262, - NUM_DOUBLE = 263, - INASSIGN = 264, - NUM_LONG = 265, - LOCAL = 266, - STATIC = 267, - IIF = 268, - IF = 269, - ELSE = 270, - ELSEIF = 271, - END = 272, - ENDIF = 273, - LITERAL = 274, - TRUEVALUE = 275, - FALSEVALUE = 276, - ANNOUNCE = 277, - EXTERN = 278, - DYNAMIC = 279, - INIT = 280, - EXIT = 281, - AND = 282, - OR = 283, - NOT = 284, - PUBLIC = 285, - EQ = 286, - NE1 = 287, - NE2 = 288, - INC = 289, - DEC = 290, - ALIASOP = 291, - DOCASE = 292, - CASE = 293, - OTHERWISE = 294, - ENDCASE = 295, - ENDDO = 296, - MEMVAR = 297, - WHILE = 298, - LOOP = 299, - FOR = 300, - NEXT = 301, - TO = 302, - STEP = 303, - LE = 304, - GE = 305, - FIELD = 306, - IN = 307, - PARAMETERS = 308, - PLUSEQ = 309, - MINUSEQ = 310, - MULTEQ = 311, - DIVEQ = 312, - POWER = 313, - EXPEQ = 314, - MODEQ = 315, - PRIVATE = 316, - BEGINSEQ = 317, - BREAK = 318, - RECOVER = 319, - RECOVERUSING = 320, - ALWAYS = 321, - ENDSEQ = 322, - DO = 323, - WITH = 324, - SELF = 325, - LINE = 326, - MACROVAR = 327, - MACROTEXT = 328, - AS_ARRAY = 329, - AS_BLOCK = 330, - AS_CHARACTER = 331, - AS_CLASS = 332, - AS_DATE = 333, - AS_LOGICAL = 334, - AS_NUMERIC = 335, - AS_OBJECT = 336, - AS_VARIANT = 337, - DECLARE = 338, - OPTIONAL = 339, - DECLARE_CLASS = 340, - DECLARE_MEMBER = 341, - AS_ARRAY_ARRAY = 342, - AS_BLOCK_ARRAY = 343, - AS_CHARACTER_ARRAY = 344, - AS_CLASS_ARRAY = 345, - AS_DATE_ARRAY = 346, - AS_LOGICAL_ARRAY = 347, - AS_NUMERIC_ARRAY = 348, - AS_OBJECT_ARRAY = 349, - PROCREQ = 350, - CBSTART = 351, - DOIDENT = 352, - FOREACH = 353, - DESCEND = 354, - DOSWITCH = 355, - ENDSWITCH = 356, - WITHOBJECT = 357, - ENDWITH = 358, - NUM_DATE = 359, - TIMESTAMP = 360, - EPSILON = 361, - HASHOP = 362, - THREAD = 363, - POST = 364, - UNARY = 365, - PRE = 366 - }; +#ifndef YY_HB_COMP_YY_HARBOURY_H_INCLUDED +# define YY_HB_COMP_YY_HARBOURY_H_INCLUDED +/* Debug traces. */ +#ifndef YYDEBUG +# define YYDEBUG 0 +#endif +#if YYDEBUG +extern int hb_comp_yydebug; #endif +/* Token type. */ +#ifndef YYTOKENTYPE +# define YYTOKENTYPE + enum yytokentype + { + FUNCTION = 258, + PROCEDURE = 259, + IDENTIFIER = 260, + RETURN = 261, + NIL = 262, + NUM_DOUBLE = 263, + INASSIGN = 264, + NUM_LONG = 265, + LOCAL = 266, + STATIC = 267, + IIF = 268, + IF = 269, + ELSE = 270, + ELSEIF = 271, + END = 272, + ENDIF = 273, + LITERAL = 274, + TRUEVALUE = 275, + FALSEVALUE = 276, + ANNOUNCE = 277, + EXTERN = 278, + DYNAMIC = 279, + INIT = 280, + EXIT = 281, + AND = 282, + OR = 283, + NOT = 284, + PUBLIC = 285, + EQ = 286, + NE1 = 287, + NE2 = 288, + INC = 289, + DEC = 290, + ALIASOP = 291, + DOCASE = 292, + CASE = 293, + OTHERWISE = 294, + ENDCASE = 295, + ENDDO = 296, + MEMVAR = 297, + WHILE = 298, + LOOP = 299, + FOR = 300, + NEXT = 301, + TO = 302, + STEP = 303, + LE = 304, + GE = 305, + FIELD = 306, + IN = 307, + PARAMETERS = 308, + PLUSEQ = 309, + MINUSEQ = 310, + MULTEQ = 311, + DIVEQ = 312, + POWER = 313, + EXPEQ = 314, + MODEQ = 315, + PRIVATE = 316, + BEGINSEQ = 317, + BREAK = 318, + RECOVER = 319, + RECOVERUSING = 320, + ALWAYS = 321, + ENDSEQ = 322, + DO = 323, + WITH = 324, + SELF = 325, + LINE = 326, + MACROVAR = 327, + MACROTEXT = 328, + AS_ARRAY = 329, + AS_BLOCK = 330, + AS_CHARACTER = 331, + AS_CLASS = 332, + AS_DATE = 333, + AS_LOGICAL = 334, + AS_NUMERIC = 335, + AS_OBJECT = 336, + AS_VARIANT = 337, + DECLARE = 338, + OPTIONAL = 339, + DECLARE_CLASS = 340, + DECLARE_MEMBER = 341, + AS_ARRAY_ARRAY = 342, + AS_BLOCK_ARRAY = 343, + AS_CHARACTER_ARRAY = 344, + AS_CLASS_ARRAY = 345, + AS_DATE_ARRAY = 346, + AS_LOGICAL_ARRAY = 347, + AS_NUMERIC_ARRAY = 348, + AS_OBJECT_ARRAY = 349, + PROCREQ = 350, + CBSTART = 351, + DOIDENT = 352, + FOREACH = 353, + DESCEND = 354, + DOSWITCH = 355, + ENDSWITCH = 356, + WITHOBJECT = 357, + ENDWITH = 358, + NUM_DATE = 359, + TIMESTAMP = 360, + EPSILON = 361, + HASHOP = 362, + THREAD = 363, + POST = 364, + UNARY = 365, + PRE = 366 + }; +#endif - +/* Value type. */ #if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED -typedef union YYSTYPE +typedef union YYSTYPE YYSTYPE; +union YYSTYPE { - -/* Line 2068 of yacc.c */ -#line 121 "harbour.y" +#line 121 "harbour.y" /* yacc.c:1909 */ const char * string; /* to hold a string returned by lex */ int iNumber; /* to hold a temporary integer number */ @@ -195,12 +201,14 @@ typedef union YYSTYPE } asCodeblock; PHB_VARTYPE asVarType; - - -/* Line 2068 of yacc.c */ -#line 202 "harboury.h" -} YYSTYPE; +#line 205 "harboury.h" /* yacc.c:1909 */ +}; # define YYSTYPE_IS_TRIVIAL 1 -# define yystype YYSTYPE /* obsolescent; will be withdrawn */ # define YYSTYPE_IS_DECLARED 1 #endif + + + +int hb_comp_yyparse (PHB_COMP pComp); + +#endif /* !YY_HB_COMP_YY_HARBOURY_H_INCLUDED */ diff --git a/src/macro/macro.yyc b/src/macro/macro.yyc index ac2efe9a7c..255e47a79f 100644 --- a/src/macro/macro.yyc +++ b/src/macro/macro.yyc @@ -1,8 +1,8 @@ -/* A Bison parser, made by GNU Bison 2.5. */ +/* A Bison parser, made by GNU Bison 3.0.2. */ /* Bison implementation for Yacc-like parsers in C - Copyright (C) 1984, 1989-1990, 2000-2011 Free Software Foundation, Inc. + Copyright (C) 1984, 1989-1990, 2000-2013 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 @@ -44,7 +44,7 @@ #define YYBISON 1 /* Bison version. */ -#define YYBISON_VERSION "2.5" +#define YYBISON_VERSION "3.0.2" /* Skeleton name. */ #define YYSKELETON_NAME "yacc.c" @@ -58,23 +58,17 @@ /* Pull parsers. */ #define YYPULL 1 -/* Using locations. */ -#define YYLSP_NEEDED 0 /* Substitute the variable and function names. */ #define yyparse hb_macro_yyparse #define yylex hb_macro_yylex #define yyerror hb_macro_yyerror -#define yylval hb_macro_yylval -#define yychar hb_macro_yychar #define yydebug hb_macro_yydebug #define yynerrs hb_macro_yynerrs /* Copy the first part of user declarations. */ - -/* Line 268 of yacc.c */ -#line 6 "macro.y" +#line 6 "macro.y" /* yacc.c:339 */ /* * Harbour Project source code: @@ -206,14 +200,15 @@ #endif +#line 204 "macroy.c" /* yacc.c:339 */ -/* Line 268 of yacc.c */ -#line 212 "macroy.c" - -/* Enabling traces. */ -#ifndef YYDEBUG -# define YYDEBUG 0 -#endif +# ifndef YY_NULLPTR +# if defined __cplusplus && 201103L <= __cplusplus +# define YY_NULLPTR nullptr +# else +# define YY_NULLPTR 0 +# endif +# endif /* Enabling verbose error messages. */ #ifdef YYERROR_VERBOSE @@ -223,67 +218,70 @@ # define YYERROR_VERBOSE 0 #endif -/* Enabling the token table. */ -#ifndef YYTOKEN_TABLE -# define YYTOKEN_TABLE 0 +/* In a future release of Bison, this section will be replaced + by #include "macroy.h". */ +#ifndef YY_HB_MACRO_YY_MACROY_H_INCLUDED +# define YY_HB_MACRO_YY_MACROY_H_INCLUDED +/* Debug traces. */ +#ifndef YYDEBUG +# define YYDEBUG 0 +#endif +#if YYDEBUG +extern int hb_macro_yydebug; #endif - -/* Tokens. */ +/* Token type. */ #ifndef YYTOKENTYPE # define YYTOKENTYPE - /* Put the tokens into the symbol table, so that GDB and other debuggers - know about them. */ - enum yytokentype { - IDENTIFIER = 258, - NIL = 259, - NUM_DOUBLE = 260, - INASSIGN = 261, - NUM_LONG = 262, - NUM_DATE = 263, - TIMESTAMP = 264, - IIF = 265, - LITERAL = 266, - TRUEVALUE = 267, - FALSEVALUE = 268, - AND = 269, - OR = 270, - NOT = 271, - EQ = 272, - NE1 = 273, - NE2 = 274, - INC = 275, - DEC = 276, - ALIASOP = 277, - HASHOP = 278, - SELF = 279, - LE = 280, - GE = 281, - FIELD = 282, - MACROVAR = 283, - MACROTEXT = 284, - PLUSEQ = 285, - MINUSEQ = 286, - MULTEQ = 287, - DIVEQ = 288, - POWER = 289, - EXPEQ = 290, - MODEQ = 291, - EPSILON = 292, - POST = 293, - UNARY = 294, - PRE = 295 - }; + enum yytokentype + { + IDENTIFIER = 258, + NIL = 259, + NUM_DOUBLE = 260, + INASSIGN = 261, + NUM_LONG = 262, + NUM_DATE = 263, + TIMESTAMP = 264, + IIF = 265, + LITERAL = 266, + TRUEVALUE = 267, + FALSEVALUE = 268, + AND = 269, + OR = 270, + NOT = 271, + EQ = 272, + NE1 = 273, + NE2 = 274, + INC = 275, + DEC = 276, + ALIASOP = 277, + HASHOP = 278, + SELF = 279, + LE = 280, + GE = 281, + FIELD = 282, + MACROVAR = 283, + MACROTEXT = 284, + PLUSEQ = 285, + MINUSEQ = 286, + MULTEQ = 287, + DIVEQ = 288, + POWER = 289, + EXPEQ = 290, + MODEQ = 291, + EPSILON = 292, + POST = 293, + UNARY = 294, + PRE = 295 + }; #endif - - +/* Value type. */ #if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED -typedef union YYSTYPE +typedef union YYSTYPE YYSTYPE; +union YYSTYPE { - -/* Line 293 of yacc.c */ -#line 139 "macro.y" +#line 139 "macro.y" /* yacc.c:355 */ const char * string; /* to hold a string returned by lex */ int iNumber; /* to hold a temporary integer number */ @@ -316,21 +314,20 @@ typedef union YYSTYPE long time; /* to hold milliseconds */ } valTimeStamp; - - -/* Line 293 of yacc.c */ -#line 323 "macroy.c" -} YYSTYPE; +#line 318 "macroy.c" /* yacc.c:355 */ +}; # define YYSTYPE_IS_TRIVIAL 1 -# define yystype YYSTYPE /* obsolescent; will be withdrawn */ # define YYSTYPE_IS_DECLARED 1 #endif -/* Copy the second part of user declarations. */ -/* Line 343 of yacc.c */ -#line 172 "macro.y" +int hb_macro_yyparse (PHB_MACRO pMacro); + +#endif /* !YY_HB_MACRO_YY_MACROY_H_INCLUDED */ + +/* Copy the second part of user declarations. */ +#line 172 "macro.y" /* yacc.c:358 */ /* This must be placed after the above union - the union is * typedef-ined to YYSTYPE @@ -340,9 +337,7 @@ extern int yyparse( PHB_MACRO ); /* main yacc parsing function */ extern void yyerror( PHB_MACRO, const char * ); /* parsing error management function */ - -/* Line 343 of yacc.c */ -#line 346 "macroy.c" +#line 341 "macroy.c" /* yacc.c:358 */ #ifdef short # undef short @@ -356,11 +351,8 @@ typedef unsigned char yytype_uint8; #ifdef YYTYPE_INT8 typedef YYTYPE_INT8 yytype_int8; -#elif (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -typedef signed char yytype_int8; #else -typedef short int yytype_int8; +typedef signed char yytype_int8; #endif #ifdef YYTYPE_UINT16 @@ -380,8 +372,7 @@ typedef short int yytype_int16; # define YYSIZE_T __SIZE_TYPE__ # elif defined size_t # define YYSIZE_T size_t -# elif ! defined YYSIZE_T && (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) +# elif ! defined YYSIZE_T # include /* INFRINGES ON USER NAME SPACE */ # define YYSIZE_T size_t # else @@ -395,38 +386,67 @@ typedef short int yytype_int16; # if defined YYENABLE_NLS && YYENABLE_NLS # if ENABLE_NLS # include /* INFRINGES ON USER NAME SPACE */ -# define YY_(msgid) dgettext ("bison-runtime", msgid) +# define YY_(Msgid) dgettext ("bison-runtime", Msgid) # endif # endif # ifndef YY_ -# define YY_(msgid) msgid +# define YY_(Msgid) Msgid +# endif +#endif + +#ifndef YY_ATTRIBUTE +# if (defined __GNUC__ \ + && (2 < __GNUC__ || (__GNUC__ == 2 && 96 <= __GNUC_MINOR__))) \ + || defined __SUNPRO_C && 0x5110 <= __SUNPRO_C +# define YY_ATTRIBUTE(Spec) __attribute__(Spec) +# else +# define YY_ATTRIBUTE(Spec) /* empty */ +# endif +#endif + +#ifndef YY_ATTRIBUTE_PURE +# define YY_ATTRIBUTE_PURE YY_ATTRIBUTE ((__pure__)) +#endif + +#ifndef YY_ATTRIBUTE_UNUSED +# define YY_ATTRIBUTE_UNUSED YY_ATTRIBUTE ((__unused__)) +#endif + +#if !defined _Noreturn \ + && (!defined __STDC_VERSION__ || __STDC_VERSION__ < 201112) +# if defined _MSC_VER && 1200 <= _MSC_VER +# define _Noreturn __declspec (noreturn) +# else +# define _Noreturn YY_ATTRIBUTE ((__noreturn__)) # endif #endif /* Suppress unused-variable warnings by "using" E. */ #if ! defined lint || defined __GNUC__ -# define YYUSE(e) ((void) (e)) +# define YYUSE(E) ((void) (E)) #else -# define YYUSE(e) /* empty */ +# define YYUSE(E) /* empty */ #endif -/* Identity function, used to suppress warnings about constant conditions. */ -#ifndef lint -# define YYID(n) (n) +#if defined __GNUC__ && 407 <= __GNUC__ * 100 + __GNUC_MINOR__ +/* Suppress an incorrect diagnostic about yylval being uninitialized. */ +# define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN \ + _Pragma ("GCC diagnostic push") \ + _Pragma ("GCC diagnostic ignored \"-Wuninitialized\"")\ + _Pragma ("GCC diagnostic ignored \"-Wmaybe-uninitialized\"") +# define YY_IGNORE_MAYBE_UNINITIALIZED_END \ + _Pragma ("GCC diagnostic pop") #else -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -static int -YYID (int yyi) -#else -static int -YYID (yyi) - int yyi; +# define YY_INITIAL_VALUE(Value) Value #endif -{ - return yyi; -} +#ifndef YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN +# define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN +# define YY_IGNORE_MAYBE_UNINITIALIZED_END #endif +#ifndef YY_INITIAL_VALUE +# define YY_INITIAL_VALUE(Value) /* Nothing. */ +#endif + #if ! defined yyoverflow || YYERROR_VERBOSE @@ -445,9 +465,9 @@ YYID (yyi) # define alloca _alloca # else # define YYSTACK_ALLOC alloca -# if ! defined _ALLOCA_H && ! defined EXIT_SUCCESS && (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) +# if ! defined _ALLOCA_H && ! defined EXIT_SUCCESS # include /* INFRINGES ON USER NAME SPACE */ + /* Use EXIT_SUCCESS as a witness for stdlib.h. */ # ifndef EXIT_SUCCESS # define EXIT_SUCCESS 0 # endif @@ -457,8 +477,8 @@ YYID (yyi) # endif # ifdef YYSTACK_ALLOC - /* Pacify GCC's `empty if-body' warning. */ -# define YYSTACK_FREE(Ptr) do { /* empty */; } while (YYID (0)) + /* Pacify GCC's 'empty if-body' warning. */ +# define YYSTACK_FREE(Ptr) do { /* empty */; } while (0) # ifndef YYSTACK_ALLOC_MAXIMUM /* The OS might guarantee only one guard page at the bottom of the stack, and a page size can be as small as 4096 bytes. So we cannot safely @@ -474,7 +494,7 @@ YYID (yyi) # endif # if (defined __cplusplus && ! defined EXIT_SUCCESS \ && ! ((defined YYMALLOC || defined malloc) \ - && (defined YYFREE || defined free))) + && (defined YYFREE || defined free))) # include /* INFRINGES ON USER NAME SPACE */ # ifndef EXIT_SUCCESS # define EXIT_SUCCESS 0 @@ -482,15 +502,13 @@ YYID (yyi) # endif # ifndef YYMALLOC # define YYMALLOC malloc -# if ! defined malloc && ! defined EXIT_SUCCESS && (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) +# if ! defined malloc && ! defined EXIT_SUCCESS void *malloc (YYSIZE_T); /* INFRINGES ON USER NAME SPACE */ # endif # endif # ifndef YYFREE # define YYFREE free -# if ! defined free && ! defined EXIT_SUCCESS && (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) +# if ! defined free && ! defined EXIT_SUCCESS void free (void *); /* INFRINGES ON USER NAME SPACE */ # endif # endif @@ -500,7 +518,7 @@ void free (void *); /* INFRINGES ON USER NAME SPACE */ #if (! defined yyoverflow \ && (! defined __cplusplus \ - || (defined YYSTYPE_IS_TRIVIAL && YYSTYPE_IS_TRIVIAL))) + || (defined YYSTYPE_IS_TRIVIAL && YYSTYPE_IS_TRIVIAL))) /* A type that is properly aligned for any stack member. */ union yyalloc @@ -525,35 +543,35 @@ union yyalloc elements in the stack, and YYPTR gives the new location of the stack. Advance YYPTR to a properly aligned location for the next stack. */ -# define YYSTACK_RELOCATE(Stack_alloc, Stack) \ - do \ - { \ - YYSIZE_T yynewbytes; \ - YYCOPY (&yyptr->Stack_alloc, Stack, yysize); \ - Stack = &yyptr->Stack_alloc; \ - yynewbytes = yystacksize * sizeof (*Stack) + YYSTACK_GAP_MAXIMUM; \ - yyptr += yynewbytes / sizeof (*yyptr); \ - } \ - while (YYID (0)) +# define YYSTACK_RELOCATE(Stack_alloc, Stack) \ + do \ + { \ + YYSIZE_T yynewbytes; \ + YYCOPY (&yyptr->Stack_alloc, Stack, yysize); \ + Stack = &yyptr->Stack_alloc; \ + yynewbytes = yystacksize * sizeof (*Stack) + YYSTACK_GAP_MAXIMUM; \ + yyptr += yynewbytes / sizeof (*yyptr); \ + } \ + while (0) #endif #if defined YYCOPY_NEEDED && YYCOPY_NEEDED -/* Copy COUNT objects from FROM to TO. The source and destination do +/* Copy COUNT objects from SRC to DST. The source and destination do not overlap. */ # ifndef YYCOPY # if defined __GNUC__ && 1 < __GNUC__ -# define YYCOPY(To, From, Count) \ - __builtin_memcpy (To, From, (Count) * sizeof (*(From))) +# define YYCOPY(Dst, Src, Count) \ + __builtin_memcpy (Dst, Src, (Count) * sizeof (*(Src))) # else -# define YYCOPY(To, From, Count) \ - do \ - { \ - YYSIZE_T yyi; \ - for (yyi = 0; yyi < (Count); yyi++) \ - (To)[yyi] = (From)[yyi]; \ - } \ - while (YYID (0)) +# define YYCOPY(Dst, Src, Count) \ + do \ + { \ + YYSIZE_T yyi; \ + for (yyi = 0; yyi < (Count); yyi++) \ + (Dst)[yyi] = (Src)[yyi]; \ + } \ + while (0) # endif # endif #endif /* !YYCOPY_NEEDED */ @@ -569,17 +587,19 @@ union yyalloc #define YYNNTS 70 /* YYNRULES -- Number of rules. */ #define YYNRULES 208 -/* YYNRULES -- Number of states. */ +/* YYNSTATES -- Number of states. */ #define YYNSTATES 298 -/* YYTRANSLATE(YYLEX) -- Bison symbol number corresponding to YYLEX. */ +/* YYTRANSLATE[YYX] -- Symbol number corresponding to YYX as returned + by yylex, with out-of-bounds checking. */ #define YYUNDEFTOK 2 #define YYMAXUTOK 295 -#define YYTRANSLATE(YYX) \ +#define YYTRANSLATE(YYX) \ ((unsigned int) (YYX) <= YYMAXUTOK ? yytranslate[YYX] : YYUNDEFTOK) -/* YYTRANSLATE[YYLEX] -- Bison symbol number corresponding to YYLEX. */ +/* YYTRANSLATE[TOKEN-NUM] -- Symbol number corresponding to TOKEN-NUM + as returned by yylex, without out-of-bounds checking. */ static const yytype_uint8 yytranslate[] = { 0, 2, 2, 2, 2, 2, 2, 2, 2, 2, @@ -615,98 +635,7 @@ static const yytype_uint8 yytranslate[] = }; #if YYDEBUG -/* YYPRHS[YYN] -- Index of the first RHS symbol of rule number YYN in - YYRHS. */ -static const yytype_uint16 yyprhs[] = -{ - 0, 0, 3, 5, 7, 9, 11, 13, 15, 17, - 20, 22, 24, 26, 28, 30, 34, 37, 41, 45, - 49, 55, 57, 60, 62, 64, 67, 70, 73, 76, - 80, 83, 86, 89, 92, 95, 97, 99, 101, 104, - 107, 110, 113, 116, 119, 122, 125, 128, 131, 134, - 137, 140, 143, 146, 149, 152, 155, 158, 161, 164, - 167, 170, 173, 176, 179, 182, 185, 188, 191, 194, - 199, 204, 210, 212, 216, 218, 220, 223, 226, 229, - 232, 235, 237, 239, 243, 245, 247, 249, 254, 256, - 258, 260, 262, 264, 266, 268, 270, 272, 274, 276, - 278, 280, 282, 284, 286, 288, 290, 292, 294, 296, - 298, 300, 302, 304, 306, 308, 310, 312, 314, 316, - 318, 320, 322, 323, 328, 330, 334, 335, 337, 339, - 341, 343, 345, 347, 349, 351, 353, 355, 357, 359, - 361, 363, 365, 367, 369, 371, 373, 375, 377, 379, - 381, 383, 385, 388, 391, 394, 397, 400, 403, 407, - 411, 415, 419, 423, 427, 431, 433, 435, 437, 439, - 441, 443, 447, 451, 455, 459, 463, 467, 471, 475, - 479, 483, 487, 491, 495, 499, 503, 507, 511, 514, - 517, 521, 526, 528, 532, 533, 541, 543, 547, 548, - 550, 552, 556, 558, 562, 565, 569, 572, 575 -}; - -/* YYRHS -- A `-1'-separated list of the rules' RHS. */ -static const yytype_int16 yyrhs[] = -{ - 62, 0, -1, 97, -1, 101, -1, 1, -1, 5, - -1, 7, -1, 8, -1, 9, -1, 7, 22, -1, - 4, -1, 11, -1, 12, -1, 13, -1, 24, -1, - 53, 121, 54, -1, 71, 119, -1, 53, 23, 54, - -1, 53, 74, 54, -1, 97, 23, 102, -1, 74, - 52, 97, 23, 102, -1, 3, -1, 3, 22, -1, - 28, -1, 29, -1, 77, 22, -1, 50, 128, -1, - 79, 22, -1, 27, 22, -1, 27, 22, 81, -1, - 81, 76, -1, 81, 66, -1, 81, 129, -1, 81, - 78, -1, 81, 80, -1, 3, -1, 77, -1, 79, - -1, 66, 83, -1, 78, 83, -1, 80, 83, -1, - 129, 83, -1, 76, 83, -1, 81, 83, -1, 82, - 83, -1, 66, 128, -1, 76, 128, -1, 78, 128, - -1, 80, 128, -1, 129, 128, -1, 63, 119, -1, - 67, 119, -1, 64, 119, -1, 65, 119, -1, 68, - 119, -1, 122, 119, -1, 69, 119, -1, 73, 119, - -1, 70, 119, -1, 75, 119, -1, 84, 119, -1, - 85, 119, -1, 77, 119, -1, 79, 119, -1, 93, - 119, -1, 95, 119, -1, 87, 119, -1, 130, 119, - -1, 128, 119, -1, 3, 55, 89, 56, -1, 77, - 55, 89, 56, -1, 51, 3, 55, 89, 56, -1, - 92, -1, 89, 52, 92, -1, 102, -1, 91, -1, - 51, 3, -1, 51, 77, -1, 51, 84, -1, 51, - 93, -1, 51, 86, -1, 37, -1, 90, -1, 103, - 57, 94, -1, 3, -1, 77, -1, 79, -1, 93, - 55, 89, 56, -1, 63, -1, 67, -1, 64, -1, - 65, -1, 68, -1, 122, -1, 69, -1, 70, -1, - 71, -1, 72, -1, 73, -1, 84, -1, 85, -1, - 77, -1, 79, -1, 75, -1, 86, -1, 87, -1, - 130, -1, 93, -1, 95, -1, 108, -1, 115, -1, - 105, -1, 106, -1, 107, -1, 116, -1, 117, -1, - 118, -1, 88, -1, 96, -1, 128, -1, 37, -1, - 97, -1, -1, 102, 52, 100, 102, -1, 99, -1, - 101, 52, 102, -1, -1, 97, -1, 63, -1, 67, - -1, 64, -1, 65, -1, 68, -1, 122, -1, 69, - -1, 70, -1, 71, -1, 72, -1, 73, -1, 84, - -1, 85, -1, 77, -1, 79, -1, 75, -1, 86, - -1, 128, -1, 87, -1, 130, -1, 93, -1, 95, - -1, 20, -1, 21, -1, 103, 104, -1, 20, 97, - -1, 21, 97, -1, 16, 97, -1, 44, 97, -1, - 43, 97, -1, 103, 6, 97, -1, 103, 30, 97, - -1, 103, 31, 97, -1, 103, 32, 97, -1, 103, - 33, 97, -1, 103, 36, 97, -1, 103, 35, 97, - -1, 109, -1, 110, -1, 111, -1, 112, -1, 113, - -1, 114, -1, 97, 43, 97, -1, 97, 44, 97, - -1, 97, 45, 97, -1, 97, 46, 97, -1, 97, - 47, 97, -1, 97, 34, 97, -1, 97, 14, 97, - -1, 97, 15, 97, -1, 97, 17, 97, -1, 97, - 40, 97, -1, 97, 41, 97, -1, 97, 25, 97, - -1, 97, 26, 97, -1, 97, 18, 97, -1, 97, - 19, 97, -1, 97, 42, 97, -1, 97, 39, 97, - -1, 120, 58, -1, 59, 98, -1, 120, 52, 98, - -1, 120, 58, 59, 98, -1, 92, -1, 121, 52, - 92, -1, -1, 53, 60, 123, 125, 60, 124, 54, - -1, 97, -1, 124, 52, 97, -1, -1, 37, -1, - 126, -1, 126, 52, 37, -1, 3, -1, 126, 52, - 3, -1, 55, 102, -1, 127, 52, 102, -1, 127, - 56, -1, 128, 22, -1, 10, 55, 97, 52, 90, - 52, 90, 56, -1 -}; - -/* YYRLINE[YYN] -- source line where rule number YYN was defined. */ + /* YYRLINE[YYN] -- Source line where rule number YYN was defined. */ static const yytype_uint16 yyrline[] = { 0, 256, 256, 266, 274, 283, 284, 287, 290, 293, @@ -733,7 +662,7 @@ static const yytype_uint16 yyrline[] = }; #endif -#if YYDEBUG || YYERROR_VERBOSE || YYTOKEN_TABLE +#if YYDEBUG || YYERROR_VERBOSE || 0 /* YYTNAME[SYMBOL-NUM] -- String name of the symbol SYMBOL-NUM. First, the terminals, then, starting at YYNTOKENS, nonterminals. */ static const char *const yytname[] = @@ -758,13 +687,13 @@ static const char *const yytname[] = "ExprMinusEq", "ExprMultEq", "ExprDivEq", "ExprModEq", "ExprExpEq", "ExprOperEq", "ExprMath", "ExprBool", "ExprRelation", "ArrayIndex", "IndexList", "ElemList", "CodeBlock", "@2", "BlockExpList", "BlockVars", - "BlockVarList", "ExpList", "PareExpList", "PareExpListAlias", "IfInline", 0 + "BlockVarList", "ExpList", "PareExpList", "PareExpListAlias", "IfInline", YY_NULLPTR }; #endif # ifdef YYPRINT -/* YYTOKNUM[YYLEX-NUM] -- Internal token number corresponding to - token YYLEX-NUM. */ +/* YYTOKNUM[NUM] -- (External) token number corresponding to the + (internal) symbol number NUM (which must be that of a token). */ static const yytype_uint16 yytoknum[] = { 0, 256, 257, 258, 259, 260, 261, 262, 263, 264, @@ -777,110 +706,18 @@ static const yytype_uint16 yytoknum[] = }; # endif -/* YYR1[YYN] -- Symbol number of symbol that rule YYN derives. */ -static const yytype_uint8 yyr1[] = -{ - 0, 61, 62, 62, 62, 63, 63, 64, 65, 66, - 67, 68, 69, 69, 70, 71, 72, 73, 73, 74, - 74, 75, 76, 77, 77, 78, 79, 80, 81, 81, - 82, 82, 82, 82, 82, 83, 83, 83, 84, 84, - 84, 84, 84, 84, 84, 85, 85, 85, 85, 85, - 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, - 86, 86, 86, 86, 86, 86, 86, 86, 86, 87, - 87, 88, 89, 89, 90, 90, 91, 91, 91, 91, - 91, 92, 92, 93, 94, 94, 94, 95, 96, 96, - 96, 96, 96, 96, 96, 96, 96, 96, 96, 96, - 96, 96, 96, 96, 96, 96, 96, 96, 96, 96, - 96, 96, 96, 96, 96, 96, 96, 96, 97, 97, - 98, 98, 100, 99, 101, 101, 102, 102, 103, 103, - 103, 103, 103, 103, 103, 103, 103, 103, 103, 103, - 103, 103, 103, 103, 103, 103, 103, 103, 103, 103, - 104, 104, 105, 106, 106, 107, 107, 107, 108, 109, - 110, 111, 112, 113, 114, 115, 115, 115, 115, 115, - 115, 116, 116, 116, 116, 116, 116, 117, 117, 118, - 118, 118, 118, 118, 118, 118, 118, 118, 119, 120, - 120, 120, 121, 121, 123, 122, 124, 124, 125, 125, - 125, 125, 126, 126, 127, 127, 128, 129, 130 -}; - -/* YYR2[YYN] -- Number of symbols composing right hand side of rule YYN. */ -static const yytype_uint8 yyr2[] = -{ - 0, 2, 1, 1, 1, 1, 1, 1, 1, 2, - 1, 1, 1, 1, 1, 3, 2, 3, 3, 3, - 5, 1, 2, 1, 1, 2, 2, 2, 2, 3, - 2, 2, 2, 2, 2, 1, 1, 1, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 4, - 4, 5, 1, 3, 1, 1, 2, 2, 2, 2, - 2, 1, 1, 3, 1, 1, 1, 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, 0, 4, 1, 3, 0, 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, 2, 2, 2, 2, 2, 2, 3, 3, - 3, 3, 3, 3, 3, 1, 1, 1, 1, 1, - 1, 3, 3, 3, 3, 3, 3, 3, 3, 3, - 3, 3, 3, 3, 3, 3, 3, 3, 2, 2, - 3, 4, 1, 3, 0, 7, 1, 3, 0, 1, - 1, 3, 1, 3, 2, 3, 2, 2, 8 -}; - -/* YYDEFACT[STATE-NAME] -- Default reduction number in state STATE-NUM. - Performed when YYTABLE doesn't specify something else to do. Zero - means the default is an error. */ -static const yytype_uint8 yydefact[] = -{ - 0, 4, 21, 10, 5, 6, 7, 8, 0, 11, - 12, 13, 0, 0, 0, 14, 0, 23, 24, 0, - 0, 0, 0, 126, 126, 0, 88, 90, 91, 0, - 89, 92, 94, 95, 96, 97, 98, 103, 0, 101, - 0, 102, 0, 0, 0, 99, 100, 104, 105, 117, - 107, 108, 118, 2, 124, 3, 0, 0, 111, 112, - 113, 109, 165, 166, 167, 168, 169, 170, 110, 114, - 115, 116, 93, 0, 119, 0, 106, 22, 126, 9, - 0, 155, 153, 154, 28, 157, 156, 26, 0, 0, - 81, 0, 194, 0, 82, 75, 192, 127, 74, 0, - 127, 204, 1, 0, 50, 0, 52, 53, 35, 36, - 37, 38, 45, 51, 54, 56, 58, 16, 57, 59, - 42, 46, 25, 126, 62, 39, 47, 27, 63, 40, - 48, 35, 0, 31, 30, 36, 33, 37, 34, 43, - 0, 32, 44, 60, 61, 66, 126, 64, 65, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 126, 122, 0, 150, - 151, 0, 0, 0, 0, 0, 0, 0, 152, 55, - 126, 206, 207, 68, 41, 49, 67, 0, 72, 0, - 29, 126, 17, 76, 128, 130, 131, 129, 132, 134, - 135, 136, 137, 138, 143, 77, 142, 78, 140, 80, - 146, 79, 149, 0, 133, 145, 147, 198, 0, 18, - 126, 126, 15, 120, 121, 189, 0, 188, 0, 0, - 177, 178, 179, 184, 185, 182, 183, 176, 187, 180, - 181, 186, 171, 172, 173, 174, 175, 125, 126, 158, - 159, 160, 161, 162, 164, 163, 84, 85, 86, 83, - 205, 126, 69, 126, 0, 126, 202, 199, 0, 200, - 0, 19, 193, 190, 0, 70, 87, 123, 73, 0, - 71, 0, 0, 0, 126, 191, 126, 71, 196, 0, - 203, 201, 20, 0, 0, 195, 208, 197 -}; - -/* YYDEFGOTO[NTERM-NUM]. */ -static const yytype_int16 yydefgoto[] = -{ - -1, 25, 26, 27, 28, 29, 30, 31, 32, 33, - 34, 35, 36, 93, 37, 38, 39, 40, 41, 42, - 43, 44, 111, 45, 46, 47, 48, 49, 187, 94, - 95, 188, 50, 259, 51, 52, 100, 225, 54, 248, - 55, 98, 57, 178, 58, 59, 60, 61, 62, 63, - 64, 65, 66, 67, 68, 69, 70, 71, 104, 105, - 99, 72, 217, 289, 268, 269, 73, 74, 75, 76 -}; - -/* YYPACT[STATE-NUM] -- Index in YYTABLE of the portion describing - STATE-NUM. */ #define YYPACT_NINF -260 + +#define yypact_value_is_default(Yystate) \ + (!!((Yystate) == (-260))) + +#define YYTABLE_NINF -150 + +#define yytable_value_is_error(Yytable_value) \ + 0 + + /* YYPACT[STATE-NUM] -- Index in YYTABLE of the portion describing + STATE-NUM. */ static const yytype_int16 yypact[] = { 346, -260, -15, -260, -260, -12, -260, -260, -38, -260, @@ -915,7 +752,44 @@ static const yytype_int16 yypact[] = -260, -260, -260, 126, 843, -260, -260, 1160 }; -/* YYPGOTO[NTERM-NUM]. */ + /* YYDEFACT[STATE-NUM] -- Default reduction number in state STATE-NUM. + Performed when YYTABLE does not specify something else to do. Zero + means the default is an error. */ +static const yytype_uint8 yydefact[] = +{ + 0, 4, 21, 10, 5, 6, 7, 8, 0, 11, + 12, 13, 0, 0, 0, 14, 0, 23, 24, 0, + 0, 0, 0, 126, 126, 0, 88, 90, 91, 0, + 89, 92, 94, 95, 96, 97, 98, 103, 0, 101, + 0, 102, 0, 0, 0, 99, 100, 104, 105, 117, + 107, 108, 118, 2, 124, 3, 0, 0, 111, 112, + 113, 109, 165, 166, 167, 168, 169, 170, 110, 114, + 115, 116, 93, 0, 119, 0, 106, 22, 126, 9, + 0, 155, 153, 154, 28, 157, 156, 26, 0, 0, + 81, 0, 194, 0, 82, 75, 192, 127, 74, 0, + 127, 204, 1, 0, 50, 0, 52, 53, 35, 36, + 37, 38, 45, 51, 54, 56, 58, 16, 57, 59, + 42, 46, 25, 126, 62, 39, 47, 27, 63, 40, + 48, 35, 0, 31, 30, 36, 33, 37, 34, 43, + 0, 32, 44, 60, 61, 66, 126, 64, 65, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 126, 122, 0, 150, + 151, 0, 0, 0, 0, 0, 0, 0, 152, 55, + 126, 206, 207, 68, 41, 49, 67, 0, 72, 0, + 29, 126, 17, 76, 128, 130, 131, 129, 132, 134, + 135, 136, 137, 138, 143, 77, 142, 78, 140, 80, + 146, 79, 149, 0, 133, 145, 147, 198, 0, 18, + 126, 126, 15, 120, 121, 189, 0, 188, 0, 0, + 177, 178, 179, 184, 185, 182, 183, 176, 187, 180, + 181, 186, 171, 172, 173, 174, 175, 125, 126, 158, + 159, 160, 161, 162, 164, 163, 84, 85, 86, 83, + 205, 126, 69, 126, 0, 126, 202, 199, 0, 200, + 0, 19, 193, 190, 0, 70, 87, 123, 73, 0, + 71, 0, 0, 0, 126, 191, 126, 71, 196, 0, + 203, 201, 20, 0, 0, 195, 208, 197 +}; + + /* YYPGOTO[NTERM-NUM]. */ static const yytype_int16 yypgoto[] = { -260, -260, 96, 99, 105, 148, 115, 119, 121, 122, @@ -927,10 +801,21 @@ static const yytype_int16 yypgoto[] = -260, 147, -260, -260, -260, -260, -260, 95, 181, 150 }; -/* YYTABLE[YYPACT[STATE-NUM]]. What to do in state STATE-NUM. If - positive, shift that token. If negative, reduce the rule which - number is the opposite. If YYTABLE_NINF, syntax error. */ -#define YYTABLE_NINF -150 + /* YYDEFGOTO[NTERM-NUM]. */ +static const yytype_int16 yydefgoto[] = +{ + -1, 25, 26, 27, 28, 29, 30, 31, 32, 33, + 34, 35, 36, 93, 37, 38, 39, 40, 41, 42, + 43, 44, 111, 45, 46, 47, 48, 49, 187, 94, + 95, 188, 50, 259, 51, 52, 100, 225, 54, 248, + 55, 98, 57, 178, 58, 59, 60, 61, 62, 63, + 64, 65, 66, 67, 68, 69, 70, 71, 104, 105, + 99, 72, 217, 289, 268, 269, 73, 74, 75, 76 +}; + + /* YYTABLE[YYPACT[STATE-NUM]] -- What to do in state STATE-NUM. If + positive, shift that token. If negative, reduce the rule whose + number is the opposite. If YYTABLE_NINF, syntax error. */ static const yytype_int16 yytable[] = { 53, 56, 96, 228, 279, 131, 273, 77, 108, 132, @@ -1063,12 +948,6 @@ static const yytype_int16 yytable[] = 163, 164, 165 }; -#define yypact_value_is_default(yystate) \ - ((yystate) == (-260)) - -#define yytable_value_is_error(yytable_value) \ - YYID (0) - static const yytype_int16 yycheck[] = { 0, 0, 23, 123, 263, 3, 226, 22, 3, 7, @@ -1201,8 +1080,8 @@ static const yytype_int16 yycheck[] = 45, 46, 47 }; -/* YYSTOS[STATE-NUM] -- The (internal number of the) accessing - symbol of state STATE-NUM. */ + /* YYSTOS[STATE-NUM] -- The (internal number of the) accessing + symbol of state STATE-NUM. */ static const yytype_uint8 yystos[] = { 0, 1, 3, 4, 5, 7, 8, 9, 10, 11, @@ -1237,94 +1116,93 @@ static const yytype_uint8 yystos[] = 3, 37, 102, 90, 52, 54, 56, 97 }; -#define yyerrok (yyerrstatus = 0) -#define yyclearin (yychar = YYEMPTY) -#define YYEMPTY (-2) -#define YYEOF 0 + /* YYR1[YYN] -- Symbol number of symbol that rule YYN derives. */ +static const yytype_uint8 yyr1[] = +{ + 0, 61, 62, 62, 62, 63, 63, 64, 65, 66, + 67, 68, 69, 69, 70, 71, 72, 73, 73, 74, + 74, 75, 76, 77, 77, 78, 79, 80, 81, 81, + 82, 82, 82, 82, 82, 83, 83, 83, 84, 84, + 84, 84, 84, 84, 84, 85, 85, 85, 85, 85, + 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, + 86, 86, 86, 86, 86, 86, 86, 86, 86, 87, + 87, 88, 89, 89, 90, 90, 91, 91, 91, 91, + 91, 92, 92, 93, 94, 94, 94, 95, 96, 96, + 96, 96, 96, 96, 96, 96, 96, 96, 96, 96, + 96, 96, 96, 96, 96, 96, 96, 96, 96, 96, + 96, 96, 96, 96, 96, 96, 96, 96, 97, 97, + 98, 98, 100, 99, 101, 101, 102, 102, 103, 103, + 103, 103, 103, 103, 103, 103, 103, 103, 103, 103, + 103, 103, 103, 103, 103, 103, 103, 103, 103, 103, + 104, 104, 105, 106, 106, 107, 107, 107, 108, 109, + 110, 111, 112, 113, 114, 115, 115, 115, 115, 115, + 115, 116, 116, 116, 116, 116, 116, 117, 117, 118, + 118, 118, 118, 118, 118, 118, 118, 118, 119, 120, + 120, 120, 121, 121, 123, 122, 124, 124, 125, 125, + 125, 125, 126, 126, 127, 127, 128, 129, 130 +}; -#define YYACCEPT goto yyacceptlab -#define YYABORT goto yyabortlab -#define YYERROR goto yyerrorlab + /* YYR2[YYN] -- Number of symbols on the right hand side of rule YYN. */ +static const yytype_uint8 yyr2[] = +{ + 0, 2, 1, 1, 1, 1, 1, 1, 1, 2, + 1, 1, 1, 1, 1, 3, 2, 3, 3, 3, + 5, 1, 2, 1, 1, 2, 2, 2, 2, 3, + 2, 2, 2, 2, 2, 1, 1, 1, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 4, + 4, 5, 1, 3, 1, 1, 2, 2, 2, 2, + 2, 1, 1, 3, 1, 1, 1, 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, 0, 4, 1, 3, 0, 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, 2, 2, 2, 2, 2, 2, 3, 3, + 3, 3, 3, 3, 3, 1, 1, 1, 1, 1, + 1, 3, 3, 3, 3, 3, 3, 3, 3, 3, + 3, 3, 3, 3, 3, 3, 3, 3, 2, 2, + 3, 4, 1, 3, 0, 7, 1, 3, 0, 1, + 1, 3, 1, 3, 2, 3, 2, 2, 8 +}; -/* 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. However, - YYFAIL appears to be in use. Nevertheless, it is formally deprecated - in Bison 2.4.2's NEWS entry, where a plan to phase it out is - discussed. */ +#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 yyerrorlab -#define YYFAIL goto yyerrlab -#if defined YYFAIL - /* This is here to suppress warnings from the GCC cpp's - -Wunused-macros. Normally we don't worry about that warning, but - some users do, and we want to make it easy for users to remove - YYFAIL uses, which will produce warnings from Bison 2.5. */ -#endif #define YYRECOVERING() (!!yyerrstatus) -#define YYBACKUP(Token, Value) \ -do \ - if (yychar == YYEMPTY && yylen == 1) \ - { \ - yychar = (Token); \ - yylval = (Value); \ - YYPOPSTACK (1); \ - goto yybackup; \ - } \ - else \ - { \ +#define YYBACKUP(Token, Value) \ +do \ + if (yychar == YYEMPTY) \ + { \ + yychar = (Token); \ + yylval = (Value); \ + YYPOPSTACK (yylen); \ + yystate = *yyssp; \ + goto yybackup; \ + } \ + else \ + { \ yyerror (pMacro, YY_("syntax error: cannot back up")); \ - YYERROR; \ - } \ -while (YYID (0)) + YYERROR; \ + } \ +while (0) + +/* Error token number */ +#define YYTERROR 1 +#define YYERRCODE 256 -#define YYTERROR 1 -#define YYERRCODE 256 - - -/* YYLLOC_DEFAULT -- Set CURRENT to span from RHS[1] to RHS[N]. - If N is 0, then set CURRENT to the empty location which ends - the previous symbol: RHS[0] (always defined). */ - -#define YYRHSLOC(Rhs, K) ((Rhs)[K]) -#ifndef YYLLOC_DEFAULT -# define YYLLOC_DEFAULT(Current, Rhs, N) \ - do \ - if (YYID (N)) \ - { \ - (Current).first_line = YYRHSLOC (Rhs, 1).first_line; \ - (Current).first_column = YYRHSLOC (Rhs, 1).first_column; \ - (Current).last_line = YYRHSLOC (Rhs, N).last_line; \ - (Current).last_column = YYRHSLOC (Rhs, N).last_column; \ - } \ - else \ - { \ - (Current).first_line = (Current).last_line = \ - YYRHSLOC (Rhs, 0).last_line; \ - (Current).first_column = (Current).last_column = \ - YYRHSLOC (Rhs, 0).last_column; \ - } \ - while (YYID (0)) -#endif - - -/* This macro is provided for backward compatibility. */ - -#ifndef YY_LOCATION_PRINT -# define YY_LOCATION_PRINT(File, Loc) ((void) 0) -#endif - - -/* YYLEX -- calling `yylex' with the right arguments. */ - -#ifdef YYLEX_PARAM -# define YYLEX yylex (&yylval, YYLEX_PARAM) -#else -# define YYLEX yylex (&yylval, pMacro) -#endif /* Enable debugging if requested. */ #if YYDEBUG @@ -1334,56 +1212,47 @@ while (YYID (0)) # define YYFPRINTF fprintf # endif -# define YYDPRINTF(Args) \ -do { \ - if (yydebug) \ - YYFPRINTF Args; \ -} while (YYID (0)) +# define YYDPRINTF(Args) \ +do { \ + if (yydebug) \ + YYFPRINTF Args; \ +} while (0) -# define YY_SYMBOL_PRINT(Title, Type, Value, Location) \ -do { \ - if (yydebug) \ - { \ - YYFPRINTF (stderr, "%s ", Title); \ - yy_symbol_print (stderr, \ - Type, Value, pMacro); \ - YYFPRINTF (stderr, "\n"); \ - } \ -} while (YYID (0)) +/* This macro is provided for backward compatibility. */ +#ifndef YY_LOCATION_PRINT +# define YY_LOCATION_PRINT(File, Loc) ((void) 0) +#endif -/*--------------------------------. -| Print this symbol on YYOUTPUT. | -`--------------------------------*/ +# define YY_SYMBOL_PRINT(Title, Type, Value, Location) \ +do { \ + if (yydebug) \ + { \ + YYFPRINTF (stderr, "%s ", Title); \ + yy_symbol_print (stderr, \ + Type, Value, pMacro); \ + YYFPRINTF (stderr, "\n"); \ + } \ +} while (0) + + +/*----------------------------------------. +| Print this symbol's value on YYOUTPUT. | +`----------------------------------------*/ -/*ARGSUSED*/ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) static void yy_symbol_value_print (FILE *yyoutput, int yytype, YYSTYPE const * const yyvaluep, PHB_MACRO pMacro) -#else -static void -yy_symbol_value_print (yyoutput, yytype, yyvaluep, pMacro) - FILE *yyoutput; - int yytype; - YYSTYPE const * const yyvaluep; - PHB_MACRO pMacro; -#endif { + FILE *yyo = yyoutput; + YYUSE (yyo); + YYUSE (pMacro); if (!yyvaluep) return; - YYUSE (pMacro); # ifdef YYPRINT if (yytype < YYNTOKENS) YYPRINT (yyoutput, yytoknum[yytype], *yyvaluep); -# else - YYUSE (yyoutput); # endif - switch (yytype) - { - default: - break; - } + YYUSE (yytype); } @@ -1391,23 +1260,11 @@ yy_symbol_value_print (yyoutput, yytype, yyvaluep, pMacro) | Print this symbol on YYOUTPUT. | `--------------------------------*/ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) static void yy_symbol_print (FILE *yyoutput, int yytype, YYSTYPE const * const yyvaluep, PHB_MACRO pMacro) -#else -static void -yy_symbol_print (yyoutput, yytype, yyvaluep, pMacro) - FILE *yyoutput; - int yytype; - YYSTYPE const * const yyvaluep; - PHB_MACRO pMacro; -#endif { - if (yytype < YYNTOKENS) - YYFPRINTF (yyoutput, "token %s (", yytname[yytype]); - else - YYFPRINTF (yyoutput, "nterm %s (", yytname[yytype]); + YYFPRINTF (yyoutput, "%s %s (", + yytype < YYNTOKENS ? "token" : "nterm", yytname[yytype]); yy_symbol_value_print (yyoutput, yytype, yyvaluep, pMacro); YYFPRINTF (yyoutput, ")"); @@ -1418,16 +1275,8 @@ yy_symbol_print (yyoutput, yytype, yyvaluep, pMacro) | TOP (included). | `------------------------------------------------------------------*/ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) static void yy_stack_print (yytype_int16 *yybottom, yytype_int16 *yytop) -#else -static void -yy_stack_print (yybottom, yytop) - yytype_int16 *yybottom; - yytype_int16 *yytop; -#endif { YYFPRINTF (stderr, "Stack now"); for (; yybottom <= yytop; yybottom++) @@ -1438,50 +1287,42 @@ yy_stack_print (yybottom, yytop) YYFPRINTF (stderr, "\n"); } -# define YY_STACK_PRINT(Bottom, Top) \ -do { \ - if (yydebug) \ - yy_stack_print ((Bottom), (Top)); \ -} while (YYID (0)) +# define YY_STACK_PRINT(Bottom, Top) \ +do { \ + if (yydebug) \ + yy_stack_print ((Bottom), (Top)); \ +} while (0) /*------------------------------------------------. | Report that the YYRULE is going to be reduced. | `------------------------------------------------*/ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) static void -yy_reduce_print (YYSTYPE *yyvsp, int yyrule, PHB_MACRO pMacro) -#else -static void -yy_reduce_print (yyvsp, yyrule, pMacro) - YYSTYPE *yyvsp; - int yyrule; - PHB_MACRO pMacro; -#endif +yy_reduce_print (yytype_int16 *yyssp, YYSTYPE *yyvsp, int yyrule, PHB_MACRO pMacro) { + unsigned long int yylno = yyrline[yyrule]; int yynrhs = yyr2[yyrule]; int yyi; - unsigned long int yylno = yyrline[yyrule]; YYFPRINTF (stderr, "Reducing stack by rule %d (line %lu):\n", - yyrule - 1, yylno); + yyrule - 1, yylno); /* The symbols being reduced. */ for (yyi = 0; yyi < yynrhs; yyi++) { YYFPRINTF (stderr, " $%d = ", yyi + 1); - yy_symbol_print (stderr, yyrhs[yyprhs[yyrule] + yyi], - &(yyvsp[(yyi + 1) - (yynrhs)]) - , pMacro); + yy_symbol_print (stderr, + yystos[yyssp[yyi + 1 - yynrhs]], + &(yyvsp[(yyi + 1) - (yynrhs)]) + , pMacro); YYFPRINTF (stderr, "\n"); } } -# define YY_REDUCE_PRINT(Rule) \ -do { \ - if (yydebug) \ - yy_reduce_print (yyvsp, Rule, pMacro); \ -} while (YYID (0)) +# define YY_REDUCE_PRINT(Rule) \ +do { \ + if (yydebug) \ + yy_reduce_print (yyssp, yyvsp, Rule, pMacro); \ +} while (0) /* Nonzero means print parse trace. It is left uninitialized so that multiple parsers can coexist. */ @@ -1495,7 +1336,7 @@ int yydebug; /* YYINITDEPTH -- initial size of the parser's stacks. */ -#ifndef YYINITDEPTH +#ifndef YYINITDEPTH # define YYINITDEPTH 200 #endif @@ -1518,15 +1359,8 @@ int yydebug; # define yystrlen strlen # else /* Return the length of YYSTR. */ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) static YYSIZE_T yystrlen (const char *yystr) -#else -static YYSIZE_T -yystrlen (yystr) - const char *yystr; -#endif { YYSIZE_T yylen; for (yylen = 0; yystr[yylen]; yylen++) @@ -1542,16 +1376,8 @@ yystrlen (yystr) # else /* Copy YYSRC to YYDEST, returning the address of the terminating '\0' in YYDEST. */ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) static char * yystpcpy (char *yydest, const char *yysrc) -#else -static char * -yystpcpy (yydest, yysrc) - char *yydest; - const char *yysrc; -#endif { char *yyd = yydest; const char *yys = yysrc; @@ -1581,27 +1407,27 @@ yytnamerr (char *yyres, const char *yystr) char const *yyp = yystr; for (;;) - switch (*++yyp) - { - case '\'': - case ',': - goto do_not_strip_quotes; + switch (*++yyp) + { + case '\'': + case ',': + goto do_not_strip_quotes; - case '\\': - if (*++yyp != '\\') - goto do_not_strip_quotes; - /* Fall through. */ - default: - if (yyres) - yyres[yyn] = *yyp; - yyn++; - break; + case '\\': + if (*++yyp != '\\') + goto do_not_strip_quotes; + /* Fall through. */ + default: + if (yyres) + yyres[yyn] = *yyp; + yyn++; + break; - case '"': - if (yyres) - yyres[yyn] = '\0'; - return yyn; - } + case '"': + if (yyres) + yyres[yyn] = '\0'; + return yyn; + } do_not_strip_quotes: ; } @@ -1624,12 +1450,11 @@ static int yysyntax_error (YYSIZE_T *yymsg_alloc, char **yymsg, yytype_int16 *yyssp, int yytoken) { - YYSIZE_T yysize0 = yytnamerr (0, yytname[yytoken]); + YYSIZE_T yysize0 = yytnamerr (YY_NULLPTR, yytname[yytoken]); YYSIZE_T yysize = yysize0; - YYSIZE_T yysize1; enum { YYERROR_VERBOSE_ARGS_MAXIMUM = 5 }; /* Internationalized format string. */ - const char *yyformat = 0; + const char *yyformat = YY_NULLPTR; /* Arguments of yyformat. */ char const *yyarg[YYERROR_VERBOSE_ARGS_MAXIMUM]; /* Number of reported tokens (one for the "unexpected", one per @@ -1637,10 +1462,6 @@ yysyntax_error (YYSIZE_T *yymsg_alloc, char **yymsg, int yycount = 0; /* There are many possibilities here to consider: - - Assume YYFAIL is not used. It's too flawed to consider. See - - for details. YYERROR is fine as it does not invoke this - function. - If this state is a consistent state with a default action, then the only way this function was invoked is if the default action is an error action. In that case, don't check for expected @@ -1689,11 +1510,13 @@ yysyntax_error (YYSIZE_T *yymsg_alloc, char **yymsg, break; } yyarg[yycount++] = yytname[yyx]; - yysize1 = yysize + yytnamerr (0, yytname[yyx]); - if (! (yysize <= yysize1 - && yysize1 <= YYSTACK_ALLOC_MAXIMUM)) - return 2; - yysize = yysize1; + { + YYSIZE_T yysize1 = yysize + yytnamerr (YY_NULLPTR, yytname[yyx]); + if (! (yysize <= yysize1 + && yysize1 <= YYSTACK_ALLOC_MAXIMUM)) + return 2; + yysize = yysize1; + } } } } @@ -1713,10 +1536,12 @@ yysyntax_error (YYSIZE_T *yymsg_alloc, char **yymsg, # undef YYCASE_ } - yysize1 = yysize + yystrlen (yyformat); - if (! (yysize <= yysize1 && yysize1 <= YYSTACK_ALLOC_MAXIMUM)) - return 2; - yysize = yysize1; + { + YYSIZE_T yysize1 = yysize + yystrlen (yyformat); + if (! (yysize <= yysize1 && yysize1 <= YYSTACK_ALLOC_MAXIMUM)) + return 2; + yysize = yysize1; + } if (*yymsg_alloc < yysize) { @@ -1753,83 +1578,39 @@ yysyntax_error (YYSIZE_T *yymsg_alloc, char **yymsg, | Release the memory associated to this symbol. | `-----------------------------------------------*/ -/*ARGSUSED*/ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) static void yydestruct (const char *yymsg, int yytype, YYSTYPE *yyvaluep, PHB_MACRO pMacro) -#else -static void -yydestruct (yymsg, yytype, yyvaluep, pMacro) - const char *yymsg; - int yytype; - YYSTYPE *yyvaluep; - PHB_MACRO pMacro; -#endif { YYUSE (yyvaluep); YYUSE (pMacro); - if (!yymsg) yymsg = "Deleting"; YY_SYMBOL_PRINT (yymsg, yytype, yyvaluep, yylocationp); - switch (yytype) - { - - default: - break; - } + YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN + YYUSE (yytype); + YY_IGNORE_MAYBE_UNINITIALIZED_END } -/* Prevent warnings from -Wmissing-prototypes. */ -#ifdef YYPARSE_PARAM -#if defined __STDC__ || defined __cplusplus -int yyparse (void *YYPARSE_PARAM); -#else -int yyparse (); -#endif -#else /* ! YYPARSE_PARAM */ -#if defined __STDC__ || defined __cplusplus -int yyparse (PHB_MACRO pMacro); -#else -int yyparse (); -#endif -#endif /* ! YYPARSE_PARAM */ /*----------. | yyparse. | `----------*/ -#ifdef YYPARSE_PARAM -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -int -yyparse (void *YYPARSE_PARAM) -#else -int -yyparse (YYPARSE_PARAM) - void *YYPARSE_PARAM; -#endif -#else /* ! YYPARSE_PARAM */ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) int yyparse (PHB_MACRO pMacro) -#else -int -yyparse (pMacro) - PHB_MACRO pMacro; -#endif -#endif { /* The lookahead symbol. */ int yychar; + /* The semantic value of the lookahead symbol. */ -YYSTYPE yylval; +/* Default value used for initialization, for pacifying older GCCs + or non-GCC compilers. */ +YY_INITIAL_VALUE (static YYSTYPE yyval_default;) +YYSTYPE yylval YY_INITIAL_VALUE (= yyval_default); /* Number of syntax errors so far. */ int yynerrs; @@ -1839,10 +1620,10 @@ YYSTYPE yylval; int yyerrstatus; /* The stacks and their tools: - `yyss': related to states. - `yyvs': related to semantic values. + 'yyss': related to states. + 'yyvs': related to semantic values. - Refer to the stacks thru separate pointers, to allow yyoverflow + Refer to the stacks through separate pointers, to allow yyoverflow to reallocate them elsewhere. */ /* The state stack. */ @@ -1860,7 +1641,7 @@ YYSTYPE yylval; int yyn; int yyresult; /* Lookahead token as an internal (translated) token number. */ - int yytoken; + int yytoken = 0; /* The variables used to return semantic value and location from the action routines. */ YYSTYPE yyval; @@ -1878,9 +1659,8 @@ YYSTYPE yylval; Keep to zero when no symbol should be popped. */ int yylen = 0; - yytoken = 0; - yyss = yyssa; - yyvs = yyvsa; + yyssp = yyss = yyssa; + yyvsp = yyvs = yyvsa; yystacksize = YYINITDEPTH; YYDPRINTF ((stderr, "Starting parse\n")); @@ -1889,14 +1669,6 @@ YYSTYPE yylval; 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; - yyvsp = yyvs; - goto yysetstate; /*------------------------------------------------------------. @@ -1917,23 +1689,23 @@ YYSTYPE yylval; #ifdef yyoverflow { - /* 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; - yytype_int16 *yyss1 = yyss; + /* 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; + yytype_int16 *yyss1 = yyss; - /* Each stack pointer address is followed by the size of the - data in use in that stack, in bytes. This used to be a - conditional around just the two extra args, but that might - be undefined if yyoverflow is a macro. */ - yyoverflow (YY_("memory exhausted"), - &yyss1, yysize * sizeof (*yyssp), - &yyvs1, yysize * sizeof (*yyvsp), - &yystacksize); + /* Each stack pointer address is followed by the size of the + data in use in that stack, in bytes. This used to be a + conditional around just the two extra args, but that might + be undefined if yyoverflow is a macro. */ + yyoverflow (YY_("memory exhausted"), + &yyss1, yysize * sizeof (*yyssp), + &yyvs1, yysize * sizeof (*yyvsp), + &yystacksize); - yyss = yyss1; - yyvs = yyvs1; + yyss = yyss1; + yyvs = yyvs1; } #else /* no yyoverflow */ # ifndef YYSTACK_RELOCATE @@ -1941,22 +1713,22 @@ YYSTYPE yylval; # else /* Extend the stack our own way. */ if (YYMAXDEPTH <= yystacksize) - goto yyexhaustedlab; + goto yyexhaustedlab; yystacksize *= 2; if (YYMAXDEPTH < yystacksize) - yystacksize = YYMAXDEPTH; + yystacksize = YYMAXDEPTH; { - yytype_int16 *yyss1 = yyss; - union yyalloc *yyptr = - (union yyalloc *) YYSTACK_ALLOC (YYSTACK_BYTES (yystacksize)); - if (! yyptr) - goto yyexhaustedlab; - YYSTACK_RELOCATE (yyss_alloc, yyss); - YYSTACK_RELOCATE (yyvs_alloc, yyvs); + yytype_int16 *yyss1 = yyss; + union yyalloc *yyptr = + (union yyalloc *) YYSTACK_ALLOC (YYSTACK_BYTES (yystacksize)); + if (! yyptr) + goto yyexhaustedlab; + YYSTACK_RELOCATE (yyss_alloc, yyss); + YYSTACK_RELOCATE (yyvs_alloc, yyvs); # undef YYSTACK_RELOCATE - if (yyss1 != yyssa) - YYSTACK_FREE (yyss1); + if (yyss1 != yyssa) + YYSTACK_FREE (yyss1); } # endif #endif /* no yyoverflow */ @@ -1965,10 +1737,10 @@ YYSTYPE yylval; yyvsp = yyvs + yysize - 1; YYDPRINTF ((stderr, "Stack size increased to %lu\n", - (unsigned long int) yystacksize)); + (unsigned long int) yystacksize)); if (yyss + yystacksize - 1 <= yyssp) - YYABORT; + YYABORT; } YYDPRINTF ((stderr, "Entering state %d\n", yystate)); @@ -1997,7 +1769,7 @@ yybackup: if (yychar == YYEMPTY) { YYDPRINTF ((stderr, "Reading a token: ")); - yychar = YYLEX; + yychar = yylex (&yylval, pMacro); } if (yychar <= YYEOF) @@ -2037,7 +1809,9 @@ yybackup: yychar = YYEMPTY; yystate = yyn; + YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN *++yyvsp = yylval; + YY_IGNORE_MAYBE_UNINITIALIZED_END goto yynewstate; @@ -2060,7 +1834,7 @@ yyreduce: yylen = yyr2[yyn]; /* If YYLEN is nonzero, implement the default value of the action: - `$$ = $1'. + '$$ = $1'. Otherwise, the following line sets YYVAL to garbage. This behavior is undocumented and Bison @@ -2074,187 +1848,163 @@ yyreduce: switch (yyn) { case 2: - -/* Line 1806 of yacc.c */ -#line 256 "macro.y" +#line 256 "macro.y" /* yacc.c:1646 */ { - HB_MACRO_DATA->exprType = hb_compExprType( (yyvsp[(1) - (1)].asExpr) ); + HB_MACRO_DATA->exprType = hb_compExprType( (yyvsp[0].asExpr) ); if( HB_MACRO_DATA->Flags & HB_MACRO_GEN_REFER ) - hb_macroExprGenPush( hb_compExprNewRef( (yyvsp[(1) - (1)].asExpr), HB_COMP_PARAM ), HB_COMP_PARAM ); + hb_macroExprGenPush( hb_compExprNewRef( (yyvsp[0].asExpr), HB_COMP_PARAM ), HB_COMP_PARAM ); else if( HB_MACRO_DATA->Flags & HB_MACRO_GEN_PUSH ) - hb_macroExprGenPush( (yyvsp[(1) - (1)].asExpr), HB_COMP_PARAM ); + hb_macroExprGenPush( (yyvsp[0].asExpr), HB_COMP_PARAM ); else - hb_macroExprGenPop( (yyvsp[(1) - (1)].asExpr), HB_COMP_PARAM ); + hb_macroExprGenPop( (yyvsp[0].asExpr), HB_COMP_PARAM ); hb_macroGenPCode1( HB_P_ENDPROC, HB_COMP_PARAM ); } +#line 1863 "macroy.c" /* yacc.c:1646 */ break; case 3: - -/* Line 1806 of yacc.c */ -#line 266 "macro.y" +#line 266 "macro.y" /* yacc.c:1646 */ { - HB_MACRO_DATA->exprType = hb_compExprType( (yyvsp[(1) - (1)].asExpr) ); + HB_MACRO_DATA->exprType = hb_compExprType( (yyvsp[0].asExpr) ); if( HB_MACRO_DATA->Flags & HB_MACRO_GEN_PUSH ) - hb_macroExprGenPush( (yyvsp[(1) - (1)].asExpr), HB_COMP_PARAM ); + hb_macroExprGenPush( (yyvsp[0].asExpr), HB_COMP_PARAM ); else hb_macroError( EG_SYNTAX, HB_COMP_PARAM ); hb_macroGenPCode1( HB_P_ENDPROC, HB_COMP_PARAM ); } +#line 1876 "macroy.c" /* yacc.c:1646 */ break; case 4: - -/* Line 1806 of yacc.c */ -#line 274 "macro.y" +#line 274 "macro.y" /* yacc.c:1646 */ { HB_TRACE( HB_TR_DEBUG, ( "macro -> invalid syntax: %s", HB_MACRO_DATA->string ) ); hb_macroError( EG_SYNTAX, HB_COMP_PARAM ); HB_MACRO_ABORT; } +#line 1886 "macroy.c" /* yacc.c:1646 */ break; case 5: - -/* Line 1806 of yacc.c */ -#line 283 "macro.y" - { (yyval.asExpr) = hb_compExprNewDouble( (yyvsp[(1) - (1)].valDouble).dNumber, (yyvsp[(1) - (1)].valDouble).bWidth, (yyvsp[(1) - (1)].valDouble).bDec, HB_COMP_PARAM ); } +#line 283 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewDouble( (yyvsp[0].valDouble).dNumber, (yyvsp[0].valDouble).bWidth, (yyvsp[0].valDouble).bDec, HB_COMP_PARAM ); } +#line 1892 "macroy.c" /* yacc.c:1646 */ break; case 6: - -/* Line 1806 of yacc.c */ -#line 284 "macro.y" - { (yyval.asExpr) = hb_compExprNewLong( (yyvsp[(1) - (1)].valLong).lNumber, HB_COMP_PARAM ); } +#line 284 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewLong( (yyvsp[0].valLong).lNumber, HB_COMP_PARAM ); } +#line 1898 "macroy.c" /* yacc.c:1646 */ break; case 7: - -/* Line 1806 of yacc.c */ -#line 287 "macro.y" - { (yyval.asExpr) = hb_compExprNewDate( ( long ) (yyvsp[(1) - (1)].valLong).lNumber, HB_COMP_PARAM ); } +#line 287 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewDate( ( long ) (yyvsp[0].valLong).lNumber, HB_COMP_PARAM ); } +#line 1904 "macroy.c" /* yacc.c:1646 */ break; case 8: - -/* Line 1806 of yacc.c */ -#line 290 "macro.y" - { (yyval.asExpr) = hb_compExprNewTimeStamp( (yyvsp[(1) - (1)].valTimeStamp).date, (yyvsp[(1) - (1)].valTimeStamp).time, HB_COMP_PARAM ); } +#line 290 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewTimeStamp( (yyvsp[0].valTimeStamp).date, (yyvsp[0].valTimeStamp).time, HB_COMP_PARAM ); } +#line 1910 "macroy.c" /* yacc.c:1646 */ break; case 9: - -/* Line 1806 of yacc.c */ -#line 293 "macro.y" - { (yyval.asExpr) = hb_compExprNewLong( (yyvsp[(1) - (2)].valLong).lNumber, HB_COMP_PARAM ); } +#line 293 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewLong( (yyvsp[-1].valLong).lNumber, HB_COMP_PARAM ); } +#line 1916 "macroy.c" /* yacc.c:1646 */ break; case 10: - -/* Line 1806 of yacc.c */ -#line 298 "macro.y" +#line 298 "macro.y" /* yacc.c:1646 */ { (yyval.asExpr) = hb_compExprNewNil( HB_COMP_PARAM ); } +#line 1922 "macroy.c" /* yacc.c:1646 */ break; case 11: - -/* Line 1806 of yacc.c */ -#line 303 "macro.y" - { (yyval.asExpr) = hb_compExprNewString( (yyvsp[(1) - (1)].valChar).string, (yyvsp[(1) - (1)].valChar).length, HB_FALSE, HB_COMP_PARAM ); } +#line 303 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewString( (yyvsp[0].valChar).string, (yyvsp[0].valChar).length, HB_FALSE, HB_COMP_PARAM ); } +#line 1928 "macroy.c" /* yacc.c:1646 */ break; case 12: - -/* Line 1806 of yacc.c */ -#line 308 "macro.y" +#line 308 "macro.y" /* yacc.c:1646 */ { (yyval.asExpr) = hb_compExprNewLogical( HB_TRUE, HB_COMP_PARAM ); } +#line 1934 "macroy.c" /* yacc.c:1646 */ break; case 13: - -/* Line 1806 of yacc.c */ -#line 309 "macro.y" +#line 309 "macro.y" /* yacc.c:1646 */ { (yyval.asExpr) = hb_compExprNewLogical( HB_FALSE, HB_COMP_PARAM ); } +#line 1940 "macroy.c" /* yacc.c:1646 */ break; case 14: - -/* Line 1806 of yacc.c */ -#line 314 "macro.y" +#line 314 "macro.y" /* yacc.c:1646 */ { (yyval.asExpr) = hb_compExprNewSelf( HB_COMP_PARAM ); } +#line 1946 "macroy.c" /* yacc.c:1646 */ break; case 15: - -/* Line 1806 of yacc.c */ -#line 319 "macro.y" - { (yyval.asExpr) = hb_compExprNewArray( (yyvsp[(2) - (3)].asExpr), HB_COMP_PARAM ); } +#line 319 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewArray( (yyvsp[-1].asExpr), HB_COMP_PARAM ); } +#line 1952 "macroy.c" /* yacc.c:1646 */ break; case 16: - -/* Line 1806 of yacc.c */ -#line 324 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 324 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 1958 "macroy.c" /* yacc.c:1646 */ break; case 17: - -/* Line 1806 of yacc.c */ -#line 329 "macro.y" +#line 329 "macro.y" /* yacc.c:1646 */ { (yyval.asExpr) = hb_compExprNewHash( NULL, HB_COMP_PARAM ); } +#line 1964 "macroy.c" /* yacc.c:1646 */ break; case 18: - -/* Line 1806 of yacc.c */ -#line 330 "macro.y" - { (yyval.asExpr) = hb_compExprNewHash( (yyvsp[(2) - (3)].asExpr), HB_COMP_PARAM ); } +#line 330 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewHash( (yyvsp[-1].asExpr), HB_COMP_PARAM ); } +#line 1970 "macroy.c" /* yacc.c:1646 */ break; case 19: - -/* Line 1806 of yacc.c */ -#line 333 "macro.y" - { (yyval.asExpr) = hb_compExprAddListExpr( hb_compExprNewList( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr) ); } +#line 333 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprAddListExpr( hb_compExprNewList( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr) ); } +#line 1976 "macroy.c" /* yacc.c:1646 */ break; case 20: - -/* Line 1806 of yacc.c */ -#line 334 "macro.y" - { (yyval.asExpr) = hb_compExprAddListExpr( hb_compExprAddListExpr( (yyvsp[(1) - (5)].asExpr), (yyvsp[(3) - (5)].asExpr) ), (yyvsp[(5) - (5)].asExpr) ); } +#line 334 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprAddListExpr( hb_compExprAddListExpr( (yyvsp[-4].asExpr), (yyvsp[-2].asExpr) ), (yyvsp[0].asExpr) ); } +#line 1982 "macroy.c" /* yacc.c:1646 */ break; case 21: - -/* Line 1806 of yacc.c */ -#line 340 "macro.y" - { (yyval.asExpr) = hb_compExprNewVar( (yyvsp[(1) - (1)].string), HB_COMP_PARAM ); } +#line 340 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewVar( (yyvsp[0].string), HB_COMP_PARAM ); } +#line 1988 "macroy.c" /* yacc.c:1646 */ break; case 22: - -/* Line 1806 of yacc.c */ -#line 343 "macro.y" - { (yyval.asExpr) = hb_compExprNewAlias( (yyvsp[(1) - (2)].string), HB_COMP_PARAM ); } +#line 343 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAlias( (yyvsp[-1].string), HB_COMP_PARAM ); } +#line 1994 "macroy.c" /* yacc.c:1646 */ break; case 23: - -/* Line 1806 of yacc.c */ -#line 348 "macro.y" - { (yyval.asExpr) = hb_compExprNewMacro( NULL, '&', (yyvsp[(1) - (1)].string), HB_COMP_PARAM ); +#line 348 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewMacro( NULL, '&', (yyvsp[0].string), HB_COMP_PARAM ); HB_MACRO_CHECK( (yyval.asExpr) ); } +#line 2002 "macroy.c" /* yacc.c:1646 */ break; case 24: - -/* Line 1806 of yacc.c */ -#line 351 "macro.y" +#line 351 "macro.y" /* yacc.c:1646 */ { HB_BOOL fNewString; - char * szVarName = hb_macroTextSymbol( (yyvsp[(1) - (1)].string), strlen( (yyvsp[(1) - (1)].string) ), &fNewString ); + char * szVarName = hb_macroTextSymbol( (yyvsp[0].string), strlen( (yyvsp[0].string) ), &fNewString ); if( szVarName ) { if( fNewString ) @@ -2266,468 +2016,404 @@ yyreduce: { /* invalid variable name */ - HB_TRACE( HB_TR_DEBUG, ( "macro -> invalid variable name: %s", (yyvsp[(1) - (1)].string) ) ); + HB_TRACE( HB_TR_DEBUG, ( "macro -> invalid variable name: %s", (yyvsp[0].string) ) ); YYABORT; } } +#line 2024 "macroy.c" /* yacc.c:1646 */ break; case 25: - -/* Line 1806 of yacc.c */ -#line 370 "macro.y" - { hb_compExprMacroAsAlias( (yyvsp[(1) - (2)].asExpr) ); } +#line 370 "macro.y" /* yacc.c:1646 */ + { hb_compExprMacroAsAlias( (yyvsp[-1].asExpr) ); } +#line 2030 "macroy.c" /* yacc.c:1646 */ break; case 26: - -/* Line 1806 of yacc.c */ -#line 375 "macro.y" - { (yyval.asExpr) = hb_compExprNewMacro( (yyvsp[(2) - (2)].asExpr), 0, NULL, HB_COMP_PARAM ); } +#line 375 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewMacro( (yyvsp[0].asExpr), 0, NULL, HB_COMP_PARAM ); } +#line 2036 "macroy.c" /* yacc.c:1646 */ break; case 28: - -/* Line 1806 of yacc.c */ -#line 385 "macro.y" +#line 385 "macro.y" /* yacc.c:1646 */ { (yyval.asExpr) = hb_compExprNewAlias( "FIELD", HB_COMP_PARAM ); } +#line 2042 "macroy.c" /* yacc.c:1646 */ break; case 29: - -/* Line 1806 of yacc.c */ -#line 386 "macro.y" - { (yyval.asExpr) = (yyvsp[(3) - (3)].asExpr); } +#line 386 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2048 "macroy.c" /* yacc.c:1646 */ break; case 30: - -/* Line 1806 of yacc.c */ -#line 391 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 391 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2054 "macroy.c" /* yacc.c:1646 */ break; case 31: - -/* Line 1806 of yacc.c */ -#line 392 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 392 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2060 "macroy.c" /* yacc.c:1646 */ break; case 32: - -/* Line 1806 of yacc.c */ -#line 393 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 393 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2066 "macroy.c" /* yacc.c:1646 */ break; case 33: - -/* Line 1806 of yacc.c */ -#line 394 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 394 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2072 "macroy.c" /* yacc.c:1646 */ break; case 34: - -/* Line 1806 of yacc.c */ -#line 395 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 395 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2078 "macroy.c" /* yacc.c:1646 */ break; case 35: - -/* Line 1806 of yacc.c */ -#line 398 "macro.y" - { (yyval.asExpr) = hb_compExprNewVar( (yyvsp[(1) - (1)].string), HB_COMP_PARAM ); } +#line 398 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewVar( (yyvsp[0].string), HB_COMP_PARAM ); } +#line 2084 "macroy.c" /* yacc.c:1646 */ break; case 38: - -/* Line 1806 of yacc.c */ -#line 403 "macro.y" - { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[(1) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 403 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[-1].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2090 "macroy.c" /* yacc.c:1646 */ break; case 39: - -/* Line 1806 of yacc.c */ -#line 404 "macro.y" - { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[(1) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 404 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[-1].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2096 "macroy.c" /* yacc.c:1646 */ break; case 40: - -/* Line 1806 of yacc.c */ -#line 405 "macro.y" - { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[(1) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 405 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[-1].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2102 "macroy.c" /* yacc.c:1646 */ break; case 41: - -/* Line 1806 of yacc.c */ -#line 406 "macro.y" - { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[(1) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 406 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[-1].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2108 "macroy.c" /* yacc.c:1646 */ break; case 42: - -/* Line 1806 of yacc.c */ -#line 407 "macro.y" - { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[(1) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 407 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[-1].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2114 "macroy.c" /* yacc.c:1646 */ break; case 43: - -/* Line 1806 of yacc.c */ -#line 408 "macro.y" - { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[(1) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 408 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[-1].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2120 "macroy.c" /* yacc.c:1646 */ break; case 44: - -/* Line 1806 of yacc.c */ -#line 409 "macro.y" - { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[(1) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 409 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAliasVar( (yyvsp[-1].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2126 "macroy.c" /* yacc.c:1646 */ break; case 45: - -/* Line 1806 of yacc.c */ -#line 418 "macro.y" - { (yyval.asExpr) = hb_compExprNewAliasExpr( (yyvsp[(1) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 418 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAliasExpr( (yyvsp[-1].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2132 "macroy.c" /* yacc.c:1646 */ break; case 46: - -/* Line 1806 of yacc.c */ -#line 419 "macro.y" - { (yyval.asExpr) = hb_compExprNewAliasExpr( (yyvsp[(1) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 419 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAliasExpr( (yyvsp[-1].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2138 "macroy.c" /* yacc.c:1646 */ break; case 47: - -/* Line 1806 of yacc.c */ -#line 420 "macro.y" - { (yyval.asExpr) = hb_compExprNewAliasExpr( (yyvsp[(1) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 420 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAliasExpr( (yyvsp[-1].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2144 "macroy.c" /* yacc.c:1646 */ break; case 48: - -/* Line 1806 of yacc.c */ -#line 421 "macro.y" - { (yyval.asExpr) = hb_compExprNewAliasExpr( (yyvsp[(1) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 421 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAliasExpr( (yyvsp[-1].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2150 "macroy.c" /* yacc.c:1646 */ break; case 49: - -/* Line 1806 of yacc.c */ -#line 422 "macro.y" - { (yyval.asExpr) = hb_compExprNewAliasExpr( (yyvsp[(1) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 422 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewAliasExpr( (yyvsp[-1].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2156 "macroy.c" /* yacc.c:1646 */ break; case 50: - -/* Line 1806 of yacc.c */ -#line 427 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 427 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2162 "macroy.c" /* yacc.c:1646 */ break; case 51: - -/* Line 1806 of yacc.c */ -#line 428 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 428 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2168 "macroy.c" /* yacc.c:1646 */ break; case 52: - -/* Line 1806 of yacc.c */ -#line 429 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 429 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2174 "macroy.c" /* yacc.c:1646 */ break; case 53: - -/* Line 1806 of yacc.c */ -#line 430 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 430 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2180 "macroy.c" /* yacc.c:1646 */ break; case 54: - -/* Line 1806 of yacc.c */ -#line 431 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 431 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2186 "macroy.c" /* yacc.c:1646 */ break; case 55: - -/* Line 1806 of yacc.c */ -#line 432 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 432 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2192 "macroy.c" /* yacc.c:1646 */ break; case 56: - -/* Line 1806 of yacc.c */ -#line 433 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 433 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2198 "macroy.c" /* yacc.c:1646 */ break; case 57: - -/* Line 1806 of yacc.c */ -#line 434 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 434 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2204 "macroy.c" /* yacc.c:1646 */ break; case 58: - -/* Line 1806 of yacc.c */ -#line 435 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 435 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2210 "macroy.c" /* yacc.c:1646 */ break; case 59: - -/* Line 1806 of yacc.c */ -#line 436 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 436 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2216 "macroy.c" /* yacc.c:1646 */ break; case 60: - -/* Line 1806 of yacc.c */ -#line 437 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 437 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2222 "macroy.c" /* yacc.c:1646 */ break; case 61: - -/* Line 1806 of yacc.c */ -#line 438 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 438 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2228 "macroy.c" /* yacc.c:1646 */ break; case 62: - -/* Line 1806 of yacc.c */ -#line 439 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 439 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2234 "macroy.c" /* yacc.c:1646 */ break; case 63: - -/* Line 1806 of yacc.c */ -#line 440 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 440 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2240 "macroy.c" /* yacc.c:1646 */ break; case 64: - -/* Line 1806 of yacc.c */ -#line 441 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 441 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2246 "macroy.c" /* yacc.c:1646 */ break; case 65: - -/* Line 1806 of yacc.c */ -#line 442 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 442 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2252 "macroy.c" /* yacc.c:1646 */ break; case 66: - -/* Line 1806 of yacc.c */ -#line 443 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 443 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2258 "macroy.c" /* yacc.c:1646 */ break; case 67: - -/* Line 1806 of yacc.c */ -#line 444 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 444 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2264 "macroy.c" /* yacc.c:1646 */ break; case 68: - -/* Line 1806 of yacc.c */ -#line 445 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 445 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2270 "macroy.c" /* yacc.c:1646 */ break; case 69: - -/* Line 1806 of yacc.c */ -#line 450 "macro.y" - { (yyval.asExpr) = hb_macroExprNewFunCall( hb_compExprNewFunName( (yyvsp[(1) - (4)].string), HB_COMP_PARAM ), (yyvsp[(3) - (4)].asExpr), HB_COMP_PARAM ); +#line 450 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_macroExprNewFunCall( hb_compExprNewFunName( (yyvsp[-3].string), HB_COMP_PARAM ), (yyvsp[-1].asExpr), HB_COMP_PARAM ); HB_MACRO_CHECK( (yyval.asExpr) ); } +#line 2278 "macroy.c" /* yacc.c:1646 */ break; case 70: - -/* Line 1806 of yacc.c */ -#line 453 "macro.y" - { (yyval.asExpr) = hb_macroExprNewFunCall( (yyvsp[(1) - (4)].asExpr), (yyvsp[(3) - (4)].asExpr), HB_COMP_PARAM ); +#line 453 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_macroExprNewFunCall( (yyvsp[-3].asExpr), (yyvsp[-1].asExpr), HB_COMP_PARAM ); HB_MACRO_CHECK( (yyval.asExpr) ); } +#line 2286 "macroy.c" /* yacc.c:1646 */ break; case 71: - -/* Line 1806 of yacc.c */ -#line 458 "macro.y" - { if( hb_compExprParamListLen( (yyvsp[(4) - (5)].asExpr) ) != 0 ) +#line 458 "macro.y" /* yacc.c:1646 */ + { if( hb_compExprParamListLen( (yyvsp[-1].asExpr) ) != 0 ) { hb_macroError( EG_SYNTAX, HB_COMP_PARAM ); YYABORT; } else - (yyval.asExpr) = hb_compExprNewFunRef( (yyvsp[(2) - (5)].string), HB_COMP_PARAM ); + (yyval.asExpr) = hb_compExprNewFunRef( (yyvsp[-3].string), HB_COMP_PARAM ); } +#line 2299 "macroy.c" /* yacc.c:1646 */ break; case 72: - -/* Line 1806 of yacc.c */ -#line 468 "macro.y" - { (yyval.asExpr) = hb_compExprNewArgList( (yyvsp[(1) - (1)].asExpr), HB_COMP_PARAM ); } +#line 468 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewArgList( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2305 "macroy.c" /* yacc.c:1646 */ break; case 73: - -/* Line 1806 of yacc.c */ -#line 469 "macro.y" - { (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[(1) - (3)].asExpr), (yyvsp[(3) - (3)].asExpr) ); } +#line 469 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[-2].asExpr), (yyvsp[0].asExpr) ); } +#line 2311 "macroy.c" /* yacc.c:1646 */ break; case 76: - -/* Line 1806 of yacc.c */ -#line 476 "macro.y" - { (yyval.asExpr) = hb_compExprNewVarRef( (yyvsp[(2) - (2)].string), HB_COMP_PARAM ); } +#line 476 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewVarRef( (yyvsp[0].string), HB_COMP_PARAM ); } +#line 2317 "macroy.c" /* yacc.c:1646 */ break; case 77: - -/* Line 1806 of yacc.c */ -#line 477 "macro.y" - { (yyval.asExpr) = hb_compExprNewRef( (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 477 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewRef( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2323 "macroy.c" /* yacc.c:1646 */ break; case 78: - -/* Line 1806 of yacc.c */ -#line 478 "macro.y" - { (yyval.asExpr) = hb_compExprNewRef( (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 478 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewRef( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2329 "macroy.c" /* yacc.c:1646 */ break; case 79: - -/* Line 1806 of yacc.c */ -#line 479 "macro.y" - { (yyval.asExpr) = hb_compExprNewRef( (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 479 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewRef( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2335 "macroy.c" /* yacc.c:1646 */ break; case 80: - -/* Line 1806 of yacc.c */ -#line 480 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); (yyval.asExpr)->value.asList.reference = HB_TRUE; } +#line 480 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); (yyval.asExpr)->value.asList.reference = HB_TRUE; } +#line 2341 "macroy.c" /* yacc.c:1646 */ break; case 81: - -/* Line 1806 of yacc.c */ -#line 483 "macro.y" +#line 483 "macro.y" /* yacc.c:1646 */ { (yyval.asExpr) = hb_compExprNewArgRef( HB_COMP_PARAM ); } +#line 2347 "macroy.c" /* yacc.c:1646 */ break; case 83: - -/* Line 1806 of yacc.c */ -#line 489 "macro.y" - { (yyval.asExpr) = hb_compExprNewMethodObject( (yyvsp[(3) - (3)].asExpr), (yyvsp[(1) - (3)].asExpr) ); } +#line 489 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewMethodObject( (yyvsp[0].asExpr), (yyvsp[-2].asExpr) ); } +#line 2353 "macroy.c" /* yacc.c:1646 */ break; case 84: - -/* Line 1806 of yacc.c */ -#line 492 "macro.y" - { (yyval.asExpr) = hb_compExprNewSend( (yyvsp[(1) - (1)].string), HB_COMP_PARAM ); } +#line 492 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewSend( (yyvsp[0].string), HB_COMP_PARAM ); } +#line 2359 "macroy.c" /* yacc.c:1646 */ break; case 85: - -/* Line 1806 of yacc.c */ -#line 493 "macro.y" - { (yyval.asExpr) = hb_compExprNewMacroSend( (yyvsp[(1) - (1)].asExpr), HB_COMP_PARAM ); } +#line 493 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewMacroSend( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2365 "macroy.c" /* yacc.c:1646 */ break; case 86: - -/* Line 1806 of yacc.c */ -#line 494 "macro.y" - { (yyval.asExpr) = hb_compExprNewMacroSend( (yyvsp[(1) - (1)].asExpr), HB_COMP_PARAM ); } +#line 494 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewMacroSend( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2371 "macroy.c" /* yacc.c:1646 */ break; case 87: - -/* Line 1806 of yacc.c */ -#line 499 "macro.y" - { (yyval.asExpr) = hb_compExprNewMethodCall( (yyvsp[(1) - (4)].asExpr), (yyvsp[(3) - (4)].asExpr) ); } +#line 499 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewMethodCall( (yyvsp[-3].asExpr), (yyvsp[-1].asExpr) ); } +#line 2377 "macroy.c" /* yacc.c:1646 */ break; case 110: - -/* Line 1806 of yacc.c */ -#line 525 "macro.y" - { HB_MACRO_IFENABLED( (yyval.asExpr), (yyvsp[(1) - (1)].asExpr), HB_SM_HARBOUR ); } +#line 525 "macro.y" /* yacc.c:1646 */ + { HB_MACRO_IFENABLED( (yyval.asExpr), (yyvsp[0].asExpr), HB_SM_HARBOUR ); } +#line 2383 "macroy.c" /* yacc.c:1646 */ break; case 111: - -/* Line 1806 of yacc.c */ -#line 526 "macro.y" - { HB_MACRO_IFENABLED( (yyval.asExpr), (yyvsp[(1) - (1)].asExpr), HB_SM_HARBOUR ); } +#line 526 "macro.y" /* yacc.c:1646 */ + { HB_MACRO_IFENABLED( (yyval.asExpr), (yyvsp[0].asExpr), HB_SM_HARBOUR ); } +#line 2389 "macroy.c" /* yacc.c:1646 */ break; case 112: - -/* Line 1806 of yacc.c */ -#line 527 "macro.y" - { HB_MACRO_IFENABLED( (yyval.asExpr), (yyvsp[(1) - (1)].asExpr), HB_SM_HARBOUR ); } +#line 527 "macro.y" /* yacc.c:1646 */ + { HB_MACRO_IFENABLED( (yyval.asExpr), (yyvsp[0].asExpr), HB_SM_HARBOUR ); } +#line 2395 "macroy.c" /* yacc.c:1646 */ break; case 118: - -/* Line 1806 of yacc.c */ -#line 535 "macro.y" - { (yyval.asExpr) = (yyvsp[(1) - (1)].asExpr); HB_MACRO_CHECK( (yyval.asExpr) ); } +#line 535 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); HB_MACRO_CHECK( (yyval.asExpr) ); } +#line 2401 "macroy.c" /* yacc.c:1646 */ break; case 119: - -/* Line 1806 of yacc.c */ -#line 536 "macro.y" - { (yyval.asExpr) = (yyvsp[(1) - (1)].asExpr); HB_MACRO_CHECK( (yyval.asExpr) ); } +#line 536 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); HB_MACRO_CHECK( (yyval.asExpr) ); } +#line 2407 "macroy.c" /* yacc.c:1646 */ break; case 120: - -/* Line 1806 of yacc.c */ -#line 539 "macro.y" +#line 539 "macro.y" /* yacc.c:1646 */ { (yyval.asExpr) = hb_compExprNewArgRef( HB_COMP_PARAM ); } +#line 2413 "macroy.c" /* yacc.c:1646 */ break; case 122: - -/* Line 1806 of yacc.c */ -#line 543 "macro.y" +#line 543 "macro.y" /* yacc.c:1646 */ { if( !( HB_MACRO_DATA->Flags & HB_MACRO_GEN_LIST ) ) { @@ -2736,394 +2422,339 @@ yyreduce: YYABORT; } } +#line 2426 "macroy.c" /* yacc.c:1646 */ break; case 123: - -/* Line 1806 of yacc.c */ -#line 551 "macro.y" +#line 551 "macro.y" /* yacc.c:1646 */ { HB_MACRO_DATA->uiListElements = 1; - (yyval.asExpr) = hb_compExprAddListExpr( ( HB_MACRO_DATA->Flags & HB_MACRO_GEN_PARE ) ? hb_compExprNewList( (yyvsp[(1) - (4)].asExpr), HB_COMP_PARAM ) : hb_compExprNewArgList( (yyvsp[(1) - (4)].asExpr), HB_COMP_PARAM ), (yyvsp[(4) - (4)].asExpr) ); + (yyval.asExpr) = hb_compExprAddListExpr( ( HB_MACRO_DATA->Flags & HB_MACRO_GEN_PARE ) ? hb_compExprNewList( (yyvsp[-3].asExpr), HB_COMP_PARAM ) : hb_compExprNewArgList( (yyvsp[-3].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr) ); } +#line 2435 "macroy.c" /* yacc.c:1646 */ break; case 125: - -/* Line 1806 of yacc.c */ -#line 558 "macro.y" +#line 558 "macro.y" /* yacc.c:1646 */ { HB_MACRO_DATA->uiListElements++; - (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[(1) - (3)].asExpr), (yyvsp[(3) - (3)].asExpr) ); } + (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[-2].asExpr), (yyvsp[0].asExpr) ); } +#line 2442 "macroy.c" /* yacc.c:1646 */ break; case 126: - -/* Line 1806 of yacc.c */ -#line 562 "macro.y" +#line 562 "macro.y" /* yacc.c:1646 */ { (yyval.asExpr) = hb_compExprNewEmpty( HB_COMP_PARAM ); } +#line 2448 "macroy.c" /* yacc.c:1646 */ break; case 148: - -/* Line 1806 of yacc.c */ -#line 586 "macro.y" - { HB_MACRO_IFENABLED( (yyval.asExpr), (yyvsp[(1) - (1)].asExpr), HB_SM_HARBOUR ); } +#line 586 "macro.y" /* yacc.c:1646 */ + { HB_MACRO_IFENABLED( (yyval.asExpr), (yyvsp[0].asExpr), HB_SM_HARBOUR ); } +#line 2454 "macroy.c" /* yacc.c:1646 */ break; case 150: - -/* Line 1806 of yacc.c */ -#line 593 "macro.y" - { (yyval.asExpr) = hb_compExprNewPostInc( (yyvsp[(0) - (1)].asExpr), HB_COMP_PARAM ); } +#line 593 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewPostInc( (yyvsp[-1].asExpr), HB_COMP_PARAM ); } +#line 2460 "macroy.c" /* yacc.c:1646 */ break; case 151: - -/* Line 1806 of yacc.c */ -#line 594 "macro.y" - { (yyval.asExpr) = hb_compExprNewPostDec( (yyvsp[(0) - (1)].asExpr), HB_COMP_PARAM ); } +#line 594 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewPostDec( (yyvsp[-1].asExpr), HB_COMP_PARAM ); } +#line 2466 "macroy.c" /* yacc.c:1646 */ break; case 152: - -/* Line 1806 of yacc.c */ -#line 600 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 600 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2472 "macroy.c" /* yacc.c:1646 */ break; case 153: - -/* Line 1806 of yacc.c */ -#line 603 "macro.y" - { (yyval.asExpr) = hb_compExprNewPreInc( (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 603 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewPreInc( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2478 "macroy.c" /* yacc.c:1646 */ break; case 154: - -/* Line 1806 of yacc.c */ -#line 604 "macro.y" - { (yyval.asExpr) = hb_compExprNewPreDec( (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 604 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewPreDec( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2484 "macroy.c" /* yacc.c:1646 */ break; case 155: - -/* Line 1806 of yacc.c */ -#line 607 "macro.y" - { (yyval.asExpr) = hb_compExprNewNot( (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 607 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewNot( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2490 "macroy.c" /* yacc.c:1646 */ break; case 156: - -/* Line 1806 of yacc.c */ -#line 608 "macro.y" - { (yyval.asExpr) = hb_compExprNewNegate( (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 608 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewNegate( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2496 "macroy.c" /* yacc.c:1646 */ break; case 157: - -/* Line 1806 of yacc.c */ -#line 609 "macro.y" - { (yyval.asExpr) = (yyvsp[(2) - (2)].asExpr); } +#line 609 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2502 "macroy.c" /* yacc.c:1646 */ break; case 158: - -/* Line 1806 of yacc.c */ -#line 612 "macro.y" - { (yyval.asExpr) = hb_compExprAssign( (yyvsp[(1) - (3)].asExpr), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 612 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprAssign( (yyvsp[-2].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2508 "macroy.c" /* yacc.c:1646 */ break; case 159: - -/* Line 1806 of yacc.c */ -#line 615 "macro.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewPlusEq( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 615 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewPlusEq( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2514 "macroy.c" /* yacc.c:1646 */ break; case 160: - -/* Line 1806 of yacc.c */ -#line 618 "macro.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewMinusEq( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 618 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewMinusEq( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2520 "macroy.c" /* yacc.c:1646 */ break; case 161: - -/* Line 1806 of yacc.c */ -#line 621 "macro.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewMultEq( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 621 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewMultEq( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2526 "macroy.c" /* yacc.c:1646 */ break; case 162: - -/* Line 1806 of yacc.c */ -#line 624 "macro.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewDivEq( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 624 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewDivEq( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2532 "macroy.c" /* yacc.c:1646 */ break; case 163: - -/* Line 1806 of yacc.c */ -#line 627 "macro.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewModEq( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 627 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewModEq( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2538 "macroy.c" /* yacc.c:1646 */ break; case 164: - -/* Line 1806 of yacc.c */ -#line 630 "macro.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewExpEq( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 630 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewExpEq( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2544 "macroy.c" /* yacc.c:1646 */ break; case 171: - -/* Line 1806 of yacc.c */ -#line 641 "macro.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewPlus( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 641 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewPlus( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2550 "macroy.c" /* yacc.c:1646 */ break; case 172: - -/* Line 1806 of yacc.c */ -#line 642 "macro.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewMinus( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 642 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewMinus( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2556 "macroy.c" /* yacc.c:1646 */ break; case 173: - -/* Line 1806 of yacc.c */ -#line 643 "macro.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewMult( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 643 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewMult( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2562 "macroy.c" /* yacc.c:1646 */ break; case 174: - -/* Line 1806 of yacc.c */ -#line 644 "macro.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewDiv( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 644 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewDiv( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2568 "macroy.c" /* yacc.c:1646 */ break; case 175: - -/* Line 1806 of yacc.c */ -#line 645 "macro.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewMod( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 645 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewMod( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2574 "macroy.c" /* yacc.c:1646 */ break; case 176: - -/* Line 1806 of yacc.c */ -#line 646 "macro.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewPower( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 646 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewPower( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2580 "macroy.c" /* yacc.c:1646 */ break; case 177: - -/* Line 1806 of yacc.c */ -#line 649 "macro.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewAnd( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 649 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewAnd( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2586 "macroy.c" /* yacc.c:1646 */ break; case 178: - -/* Line 1806 of yacc.c */ -#line 650 "macro.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewOr( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 650 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewOr( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2592 "macroy.c" /* yacc.c:1646 */ break; case 179: - -/* Line 1806 of yacc.c */ -#line 653 "macro.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewEQ( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 653 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewEQ( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2598 "macroy.c" /* yacc.c:1646 */ break; case 180: - -/* Line 1806 of yacc.c */ -#line 654 "macro.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewLT( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 654 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewLT( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2604 "macroy.c" /* yacc.c:1646 */ break; case 181: - -/* Line 1806 of yacc.c */ -#line 655 "macro.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewGT( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 655 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewGT( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2610 "macroy.c" /* yacc.c:1646 */ break; case 182: - -/* Line 1806 of yacc.c */ -#line 656 "macro.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewLE( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 656 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewLE( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2616 "macroy.c" /* yacc.c:1646 */ break; case 183: - -/* Line 1806 of yacc.c */ -#line 657 "macro.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewGE( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 657 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewGE( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2622 "macroy.c" /* yacc.c:1646 */ break; case 184: - -/* Line 1806 of yacc.c */ -#line 658 "macro.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewNE( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 658 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewNE( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2628 "macroy.c" /* yacc.c:1646 */ break; case 185: - -/* Line 1806 of yacc.c */ -#line 659 "macro.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewNE( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 659 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewNE( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2634 "macroy.c" /* yacc.c:1646 */ break; case 186: - -/* Line 1806 of yacc.c */ -#line 660 "macro.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewIN( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 660 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewIN( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2640 "macroy.c" /* yacc.c:1646 */ break; case 187: - -/* Line 1806 of yacc.c */ -#line 661 "macro.y" - { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewEqual( (yyvsp[(1) - (3)].asExpr), HB_COMP_PARAM ), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 661 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprSetOperand( hb_compExprNewEqual( (yyvsp[-2].asExpr), HB_COMP_PARAM ), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2646 "macroy.c" /* yacc.c:1646 */ break; case 189: - -/* Line 1806 of yacc.c */ -#line 670 "macro.y" - { (yyval.asExpr) = hb_macroExprNewArrayAt( (yyvsp[(0) - (2)].asExpr), (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 670 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_macroExprNewArrayAt( (yyvsp[-2].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2652 "macroy.c" /* yacc.c:1646 */ break; case 190: - -/* Line 1806 of yacc.c */ -#line 671 "macro.y" - { (yyval.asExpr) = hb_macroExprNewArrayAt( (yyvsp[(1) - (3)].asExpr), (yyvsp[(3) - (3)].asExpr), HB_COMP_PARAM ); } +#line 671 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_macroExprNewArrayAt( (yyvsp[-2].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2658 "macroy.c" /* yacc.c:1646 */ break; case 191: - -/* Line 1806 of yacc.c */ -#line 672 "macro.y" - { (yyval.asExpr) = hb_macroExprNewArrayAt( (yyvsp[(1) - (4)].asExpr), (yyvsp[(4) - (4)].asExpr), HB_COMP_PARAM ); } +#line 672 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_macroExprNewArrayAt( (yyvsp[-3].asExpr), (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2664 "macroy.c" /* yacc.c:1646 */ break; case 192: - -/* Line 1806 of yacc.c */ -#line 675 "macro.y" - { (yyval.asExpr) = hb_compExprNewList( (yyvsp[(1) - (1)].asExpr), HB_COMP_PARAM ); } +#line 675 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewList( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2670 "macroy.c" /* yacc.c:1646 */ break; case 193: - -/* Line 1806 of yacc.c */ -#line 676 "macro.y" - { (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[(1) - (3)].asExpr), (yyvsp[(3) - (3)].asExpr) ); } +#line 676 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[-2].asExpr), (yyvsp[0].asExpr) ); } +#line 2676 "macroy.c" /* yacc.c:1646 */ break; case 194: - -/* Line 1806 of yacc.c */ -#line 680 "macro.y" +#line 680 "macro.y" /* yacc.c:1646 */ { (yyval.asExpr) = hb_compExprNewCodeBlock( NULL, 0, 0, HB_COMP_PARAM ); } +#line 2682 "macroy.c" /* yacc.c:1646 */ break; case 195: - -/* Line 1806 of yacc.c */ -#line 682 "macro.y" - { (yyval.asExpr) = (yyvsp[(3) - (7)].asExpr); } +#line 682 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[-4].asExpr); } +#line 2688 "macroy.c" /* yacc.c:1646 */ break; case 196: - -/* Line 1806 of yacc.c */ -#line 687 "macro.y" - { (yyval.asExpr) = hb_compExprAddCodeblockExpr( (yyvsp[(-2) - (1)].asExpr), (yyvsp[(1) - (1)].asExpr) ); } +#line 687 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprAddCodeblockExpr( (yyvsp[(-2) - (1)].asExpr), (yyvsp[0].asExpr) ); } +#line 2694 "macroy.c" /* yacc.c:1646 */ break; case 197: - -/* Line 1806 of yacc.c */ -#line 688 "macro.y" - { (yyval.asExpr) = hb_compExprAddCodeblockExpr( (yyvsp[(-2) - (3)].asExpr), (yyvsp[(3) - (3)].asExpr) ); } +#line 688 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprAddCodeblockExpr( (yyvsp[(-2) - (3)].asExpr), (yyvsp[0].asExpr) ); } +#line 2700 "macroy.c" /* yacc.c:1646 */ break; case 198: - -/* Line 1806 of yacc.c */ -#line 693 "macro.y" +#line 693 "macro.y" /* yacc.c:1646 */ { (yyval.asExpr) = NULL; } +#line 2706 "macroy.c" /* yacc.c:1646 */ break; case 199: - -/* Line 1806 of yacc.c */ -#line 694 "macro.y" - { (yyval.asExpr) = NULL; (yyvsp[(0) - (1)].asExpr)->value.asCodeblock.flags |= HB_BLOCK_VPARAMS; } +#line 694 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = NULL; (yyvsp[-1].asExpr)->value.asCodeblock.flags |= HB_BLOCK_VPARAMS; } +#line 2712 "macroy.c" /* yacc.c:1646 */ break; case 200: - -/* Line 1806 of yacc.c */ -#line 695 "macro.y" - { (yyval.asExpr) = (yyvsp[(1) - (1)].asExpr); } +#line 695 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[0].asExpr); } +#line 2718 "macroy.c" /* yacc.c:1646 */ break; case 201: - -/* Line 1806 of yacc.c */ -#line 696 "macro.y" - { (yyval.asExpr) = (yyvsp[(1) - (3)].asExpr); (yyvsp[(0) - (3)].asExpr)->value.asCodeblock.flags |= HB_BLOCK_VPARAMS; } +#line 696 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = (yyvsp[-2].asExpr); (yyvsp[-3].asExpr)->value.asCodeblock.flags |= HB_BLOCK_VPARAMS; } +#line 2724 "macroy.c" /* yacc.c:1646 */ break; case 202: - -/* Line 1806 of yacc.c */ -#line 699 "macro.y" - { (yyval.asExpr) = hb_compExprCBVarAdd( (yyvsp[(0) - (1)].asExpr), (yyvsp[(1) - (1)].string), ' ', HB_COMP_PARAM ); } +#line 699 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprCBVarAdd( (yyvsp[-1].asExpr), (yyvsp[0].string), ' ', HB_COMP_PARAM ); } +#line 2730 "macroy.c" /* yacc.c:1646 */ break; case 203: - -/* Line 1806 of yacc.c */ -#line 700 "macro.y" - { (yyval.asExpr) = hb_compExprCBVarAdd( (yyvsp[(0) - (3)].asExpr), (yyvsp[(3) - (3)].string), ' ', HB_COMP_PARAM ); HB_MACRO_CHECK( (yyval.asExpr) ); } +#line 700 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprCBVarAdd( (yyvsp[-3].asExpr), (yyvsp[0].string), ' ', HB_COMP_PARAM ); HB_MACRO_CHECK( (yyval.asExpr) ); } +#line 2736 "macroy.c" /* yacc.c:1646 */ break; case 204: - -/* Line 1806 of yacc.c */ -#line 703 "macro.y" - { (yyval.asExpr) = hb_compExprNewList( (yyvsp[(2) - (2)].asExpr), HB_COMP_PARAM ); } +#line 703 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewList( (yyvsp[0].asExpr), HB_COMP_PARAM ); } +#line 2742 "macroy.c" /* yacc.c:1646 */ break; case 205: - -/* Line 1806 of yacc.c */ -#line 704 "macro.y" - { (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[(1) - (3)].asExpr), (yyvsp[(3) - (3)].asExpr) ); } +#line 704 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprAddListExpr( (yyvsp[-2].asExpr), (yyvsp[0].asExpr) ); } +#line 2748 "macroy.c" /* yacc.c:1646 */ break; case 208: - -/* Line 1806 of yacc.c */ -#line 715 "macro.y" - { (yyval.asExpr) = hb_compExprNewIIF( hb_compExprAddListExpr( hb_compExprAddListExpr( hb_compExprNewList( (yyvsp[(3) - (8)].asExpr), HB_COMP_PARAM ), (yyvsp[(5) - (8)].asExpr) ), (yyvsp[(7) - (8)].asExpr) ) ); } +#line 715 "macro.y" /* yacc.c:1646 */ + { (yyval.asExpr) = hb_compExprNewIIF( hb_compExprAddListExpr( hb_compExprAddListExpr( hb_compExprNewList( (yyvsp[-5].asExpr), HB_COMP_PARAM ), (yyvsp[-3].asExpr) ), (yyvsp[-1].asExpr) ) ); } +#line 2754 "macroy.c" /* yacc.c:1646 */ break; - -/* Line 1806 of yacc.c */ -#line 3127 "macroy.c" +#line 2758 "macroy.c" /* yacc.c:1646 */ default: break; } /* User semantic actions sometimes alter yychar, and that requires @@ -3145,7 +2776,7 @@ yyreduce: *++yyvsp = yyval; - /* Now `shift' the result of the reduction. Determine what state + /* 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. */ @@ -3160,9 +2791,9 @@ yyreduce: goto yynewstate; -/*------------------------------------. -| yyerrlab -- here on detecting error | -`------------------------------------*/ +/*--------------------------------------. +| yyerrlab -- here on detecting error. | +`--------------------------------------*/ yyerrlab: /* Make sure we have latest lookahead translation. See comments at user semantic actions for why this is necessary. */ @@ -3213,20 +2844,20 @@ yyerrlab: if (yyerrstatus == 3) { /* If just tried and failed to reuse lookahead token after an - error, discard it. */ + error, discard it. */ if (yychar <= YYEOF) - { - /* Return failure if at end of input. */ - if (yychar == YYEOF) - YYABORT; - } + { + /* Return failure if at end of input. */ + if (yychar == YYEOF) + YYABORT; + } else - { - yydestruct ("Error: discarding", - yytoken, &yylval, pMacro); - yychar = YYEMPTY; - } + { + yydestruct ("Error: discarding", + yytoken, &yylval, pMacro); + yychar = YYEMPTY; + } } /* Else will try to reuse lookahead token after shifting the error @@ -3245,7 +2876,7 @@ yyerrorlab: if (/*CONSTCOND*/ 0) goto yyerrorlab; - /* Do not reclaim the symbols of the rule which action triggered + /* Do not reclaim the symbols of the rule whose action triggered this YYERROR. */ YYPOPSTACK (yylen); yylen = 0; @@ -3258,35 +2889,37 @@ yyerrorlab: | yyerrlab1 -- common code for both syntax error and YYERROR. | `-------------------------------------------------------------*/ yyerrlab1: - yyerrstatus = 3; /* Each real token shifted decrements this. */ + yyerrstatus = 3; /* Each real token shifted decrements this. */ for (;;) { yyn = yypact[yystate]; if (!yypact_value_is_default (yyn)) - { - yyn += YYTERROR; - if (0 <= yyn && yyn <= YYLAST && yycheck[yyn] == YYTERROR) - { - yyn = yytable[yyn]; - if (0 < yyn) - break; - } - } + { + yyn += YYTERROR; + if (0 <= yyn && yyn <= YYLAST && yycheck[yyn] == YYTERROR) + { + yyn = yytable[yyn]; + if (0 < yyn) + break; + } + } /* Pop the current state because it cannot handle the error token. */ if (yyssp == yyss) - YYABORT; + YYABORT; yydestruct ("Error: popping", - yystos[yystate], yyvsp, pMacro); + yystos[yystate], yyvsp, pMacro); YYPOPSTACK (1); yystate = *yyssp; YY_STACK_PRINT (yyss, yyssp); } + YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN *++yyvsp = yylval; + YY_IGNORE_MAYBE_UNINITIALIZED_END /* Shift the error token. */ @@ -3310,7 +2943,7 @@ yyabortlab: yyresult = 1; goto yyreturn; -#if !defined(yyoverflow) || YYERROR_VERBOSE +#if !defined yyoverflow || YYERROR_VERBOSE /*-------------------------------------------------. | yyexhaustedlab -- memory exhaustion comes here. | `-------------------------------------------------*/ @@ -3329,14 +2962,14 @@ yyreturn: yydestruct ("Cleanup: discarding lookahead", yytoken, &yylval, pMacro); } - /* Do not reclaim the symbols of the rule which action triggered + /* Do not reclaim the symbols of the rule whose action triggered this YYABORT or YYACCEPT. */ YYPOPSTACK (yylen); YY_STACK_PRINT (yyss, yyssp); while (yyssp != yyss) { yydestruct ("Cleanup: popping", - yystos[*yyssp], yyvsp, pMacro); + yystos[*yyssp], yyvsp, pMacro); YYPOPSTACK (1); } #ifndef yyoverflow @@ -3347,14 +2980,9 @@ yyreturn: if (yymsg != yymsgbuf) YYSTACK_FREE (yymsg); #endif - /* Make sure YYID is used. */ - return YYID (yyresult); + return yyresult; } - - - -/* Line 2067 of yacc.c */ -#line 718 "macro.y" +#line 718 "macro.y" /* yacc.c:1906 */ diff --git a/src/macro/macro.yyh b/src/macro/macro.yyh index e8c0a4bb61..0240d9aa95 100644 --- a/src/macro/macro.yyh +++ b/src/macro/macro.yyh @@ -1,8 +1,8 @@ -/* A Bison parser, made by GNU Bison 2.5. */ +/* A Bison parser, made by GNU Bison 3.0.2. */ /* Bison interface for Yacc-like parsers in C - Copyright (C) 1984, 1989-1990, 2000-2011 Free Software Foundation, Inc. + Copyright (C) 1984, 1989-1990, 2000-2013 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 @@ -30,62 +30,68 @@ This special exception was added by the Free Software Foundation in version 2.2 of Bison. */ - -/* Tokens. */ -#ifndef YYTOKENTYPE -# define YYTOKENTYPE - /* Put the tokens into the symbol table, so that GDB and other debuggers - know about them. */ - enum yytokentype { - IDENTIFIER = 258, - NIL = 259, - NUM_DOUBLE = 260, - INASSIGN = 261, - NUM_LONG = 262, - NUM_DATE = 263, - TIMESTAMP = 264, - IIF = 265, - LITERAL = 266, - TRUEVALUE = 267, - FALSEVALUE = 268, - AND = 269, - OR = 270, - NOT = 271, - EQ = 272, - NE1 = 273, - NE2 = 274, - INC = 275, - DEC = 276, - ALIASOP = 277, - HASHOP = 278, - SELF = 279, - LE = 280, - GE = 281, - FIELD = 282, - MACROVAR = 283, - MACROTEXT = 284, - PLUSEQ = 285, - MINUSEQ = 286, - MULTEQ = 287, - DIVEQ = 288, - POWER = 289, - EXPEQ = 290, - MODEQ = 291, - EPSILON = 292, - POST = 293, - UNARY = 294, - PRE = 295 - }; +#ifndef YY_HB_MACRO_YY_MACROY_H_INCLUDED +# define YY_HB_MACRO_YY_MACROY_H_INCLUDED +/* Debug traces. */ +#ifndef YYDEBUG +# define YYDEBUG 0 +#endif +#if YYDEBUG +extern int hb_macro_yydebug; #endif +/* Token type. */ +#ifndef YYTOKENTYPE +# define YYTOKENTYPE + enum yytokentype + { + IDENTIFIER = 258, + NIL = 259, + NUM_DOUBLE = 260, + INASSIGN = 261, + NUM_LONG = 262, + NUM_DATE = 263, + TIMESTAMP = 264, + IIF = 265, + LITERAL = 266, + TRUEVALUE = 267, + FALSEVALUE = 268, + AND = 269, + OR = 270, + NOT = 271, + EQ = 272, + NE1 = 273, + NE2 = 274, + INC = 275, + DEC = 276, + ALIASOP = 277, + HASHOP = 278, + SELF = 279, + LE = 280, + GE = 281, + FIELD = 282, + MACROVAR = 283, + MACROTEXT = 284, + PLUSEQ = 285, + MINUSEQ = 286, + MULTEQ = 287, + DIVEQ = 288, + POWER = 289, + EXPEQ = 290, + MODEQ = 291, + EPSILON = 292, + POST = 293, + UNARY = 294, + PRE = 295 + }; +#endif - +/* Value type. */ #if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED -typedef union YYSTYPE +typedef union YYSTYPE YYSTYPE; +union YYSTYPE { - -/* Line 2068 of yacc.c */ -#line 139 "macro.y" +#line 139 "macro.y" /* yacc.c:1909 */ const char * string; /* to hold a string returned by lex */ int iNumber; /* to hold a temporary integer number */ @@ -118,12 +124,14 @@ typedef union YYSTYPE long time; /* to hold milliseconds */ } valTimeStamp; - - -/* Line 2068 of yacc.c */ -#line 125 "macroy.h" -} YYSTYPE; +#line 128 "macroy.h" /* yacc.c:1909 */ +}; # define YYSTYPE_IS_TRIVIAL 1 -# define yystype YYSTYPE /* obsolescent; will be withdrawn */ # define YYSTYPE_IS_DECLARED 1 #endif + + + +int hb_macro_yyparse (PHB_MACRO pMacro); + +#endif /* !YY_HB_MACRO_YY_MACROY_H_INCLUDED */ diff --git a/src/rtl/hbcom.c b/src/rtl/hbcom.c index 67285dd793..83b66b1198 100644 --- a/src/rtl/hbcom.c +++ b/src/rtl/hbcom.c @@ -100,6 +100,8 @@ # define INCL_DOSDEVICES # define INCL_DOSDEVIOCTL # include +#elif defined( HB_OS_LINUX ) && defined( __WATCOMC__ ) && ( __WATCOMC__ <= 1290 ) +# include #endif #include "hbapifs.h" diff --git a/src/rtl/hbjson.c b/src/rtl/hbjson.c index 4a0fe653f1..3fd940800b 100644 --- a/src/rtl/hbjson.c +++ b/src/rtl/hbjson.c @@ -231,10 +231,19 @@ static void _hb_jsonEncode( PHB_ITEM pValue, PHB_JSON_ENCODE_CTX pCtx, } else if( HB_IS_NUMINT( pValue ) ) { - char buf[ 32 ]; + char buf[ 24 ]; + HB_MAXINT nVal = hb_itemGetNInt( pValue ); + HB_BOOL fNeg = nVal < 0; + int i = 0; - hb_snprintf( buf, sizeof( buf ), "%" PFHL "d", hb_itemGetNInt( pValue ) ); - _hb_jsonCtxAdd( pCtx, buf, strlen( buf ) ); + if( fNeg ) + nVal = -nVal; + do + buf[ sizeof( buf ) - ++i ] = ( nVal % 10 ) + '0'; + while( ( nVal /= 10 ) != 0 ); + if( fNeg ) + buf[ sizeof( buf ) - ++i ] = '-'; + _hb_jsonCtxAdd( pCtx, &buf[ sizeof( buf ) - i ], i ); } else if( HB_IS_NUMERIC( pValue ) ) { diff --git a/src/rtl/hbsocket.c b/src/rtl/hbsocket.c index b99b1b7089..99818487cb 100644 --- a/src/rtl/hbsocket.c +++ b/src/rtl/hbsocket.c @@ -2193,7 +2193,11 @@ int hb_socketBind( HB_SOCKET sd, const void * pSockAddr, unsigned uiLen ) { int ret; +#if defined( HB_OS_LINUX ) && defined( __WATCOMC__ ) && ( __WATCOMC__ <= 1290 ) + ret = bind( sd, ( struct sockaddr * ) pSockAddr, ( socklen_t ) uiLen ); +#else ret = bind( sd, ( const struct sockaddr * ) pSockAddr, ( socklen_t ) uiLen ); +#endif hb_socketSetOsError( ret == 0 ? 0 : HB_SOCK_GETERROR() ); return ret;