Changeset 14621
- Timestamp:
- 2021-03-21T19:30:00+01:00 (3 years ago)
- Location:
- vendors/AGRIF/dev_r14608_AGRIF_domcfg/LIB
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
vendors/AGRIF/dev_r14608_AGRIF_domcfg/LIB/fortran.c
r14431 r14621 1 /* A Bison parser, made by GNU Bison 3. 0.4. */1 /* A Bison parser, made by GNU Bison 3.5.1. */ 2 2 3 3 /* Bison implementation for Yacc-like parsers in C 4 4 5 Copyright (C) 1984, 1989-1990, 2000-2015 Free Software Foundation, Inc. 5 Copyright (C) 1984, 1989-1990, 2000-2015, 2018-2020 Free Software Foundation, 6 Inc. 6 7 7 8 This program is free software: you can redistribute it and/or modify … … 41 42 USER NAME SPACE" below. */ 42 43 44 /* Undocumented macros, especially those whose name start with YY_, 45 are private implementation details. Do not rely on them. */ 46 43 47 /* Identify Bison output. */ 44 48 #define YYBISON 1 45 49 46 50 /* Bison version. */ 47 #define YYBISON_VERSION "3. 0.4"51 #define YYBISON_VERSION "3.5.1" 48 52 49 53 /* Skeleton name. */ … … 66 70 #define yydebug fortran_debug 67 71 #define yynerrs fortran_nerrs 68 69 72 #define yylval fortran_lval 70 73 #define yychar fortran_char 71 74 72 /* Copy the first part of user declarations. */73 #line 36 "fortran.y" /* yacc.c:339 */75 /* First part of user prologue. */ 76 #line 36 "fortran.y" 74 77 75 78 #define YYMAXDEPTH 1000 … … 126 129 127 130 128 #line 129 "fortran.tab.c" /* yacc.c:339 */ 129 131 #line 132 "fortran.tab.c" 132 133 # ifndef YY_CAST 134 # ifdef __cplusplus 135 # define YY_CAST(Type, Val) static_cast<Type> (Val) 136 # define YY_REINTERPRET_CAST(Type, Val) reinterpret_cast<Type> (Val) 137 # else 138 # define YY_CAST(Type, Val) ((Type) (Val)) 139 # define YY_REINTERPRET_CAST(Type, Val) ((Type) (Val)) 140 # endif 141 # endif 130 142 # ifndef YY_NULLPTR 131 # if defined __cplusplus && 201103L <= __cplusplus 132 # define YY_NULLPTR nullptr 143 # if defined __cplusplus 144 # if 201103L <= __cplusplus 145 # define YY_NULLPTR nullptr 146 # else 147 # define YY_NULLPTR 0 148 # endif 133 149 # else 134 # define YY_NULLPTR 0150 # define YY_NULLPTR ((void*)0) 135 151 # endif 136 152 # endif … … 348 364 /* Value type. */ 349 365 #if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED 350 351 366 union YYSTYPE 352 367 { 353 #line 91 "fortran.y" /* yacc.c:355 */368 #line 91 "fortran.y" 354 369 355 370 char na[LONG_M]; … … 361 376 variable *v; 362 377 363 #line 364 "fortran.tab.c" /* yacc.c:355 */ 378 #line 379 "fortran.tab.c" 379 364 380 }; 365 366 381 typedef union YYSTYPE YYSTYPE; 367 382 # define YYSTYPE_IS_TRIVIAL 1 … … 376 391 377 392 378 /* Copy the second part of user declarations. */ 379 380 #line 381 "fortran.tab.c" /* yacc.c:358 */ 393 381 394 382 395 #ifdef short … … 384 397 #endif 385 398 386 #ifdef YYTYPE_UINT8 387 typedef YYTYPE_UINT8 yytype_uint8; 388 #else 389 typedef unsigned char yytype_uint8; 399 /* On compilers that do not define __PTRDIFF_MAX__ etc., make sure 400 <limits.h> and (if available) <stdint.h> are included 401 so that the code can choose integer types of a good width. */ 402 403 #ifndef __PTRDIFF_MAX__ 404 # include <limits.h> /* INFRINGES ON USER NAME SPACE */ 405 # if defined __STDC_VERSION__ && 199901 <= __STDC_VERSION__ 406 # include <stdint.h> /* INFRINGES ON USER NAME SPACE */ 407 # define YY_STDINT_H 408 # endif 390 409 #endif 391 410 392 #ifdef YYTYPE_INT8 393 typedef YYTYPE_INT8 yytype_int8; 411 /* Narrow types that promote to a signed type and that can represent a 412 signed or unsigned integer of at least N bits. In tables they can 413 save space and decrease cache pressure. Promoting to a signed type 414 helps avoid bugs in integer arithmetic. */ 415 416 #ifdef __INT_LEAST8_MAX__ 417 typedef __INT_LEAST8_TYPE__ yytype_int8; 418 #elif defined YY_STDINT_H 419 typedef int_least8_t yytype_int8; 394 420 #else 395 421 typedef signed char yytype_int8; 396 422 #endif 397 423 398 #ifdef YYTYPE_UINT16 399 typedef YYTYPE_UINT16 yytype_uint16; 424 #ifdef __INT_LEAST16_MAX__ 425 typedef __INT_LEAST16_TYPE__ yytype_int16; 426 #elif defined YY_STDINT_H 427 typedef int_least16_t yytype_int16; 400 428 #else 401 typedef unsigned short int yytype_uint16;429 typedef short yytype_int16; 402 430 #endif 403 431 404 #ifdef YYTYPE_INT16 405 typedef YYTYPE_INT16 yytype_int16; 432 #if defined __UINT_LEAST8_MAX__ && __UINT_LEAST8_MAX__ <= __INT_MAX__ 433 typedef __UINT_LEAST8_TYPE__ yytype_uint8; 434 #elif (!defined __UINT_LEAST8_MAX__ && defined YY_STDINT_H \ 435 && UINT_LEAST8_MAX <= INT_MAX) 436 typedef uint_least8_t yytype_uint8; 437 #elif !defined __UINT_LEAST8_MAX__ && UCHAR_MAX <= INT_MAX 438 typedef unsigned char yytype_uint8; 406 439 #else 407 typedef short int yytype_int16; 440 typedef short yytype_uint8; 441 #endif 442 443 #if defined __UINT_LEAST16_MAX__ && __UINT_LEAST16_MAX__ <= __INT_MAX__ 444 typedef __UINT_LEAST16_TYPE__ yytype_uint16; 445 #elif (!defined __UINT_LEAST16_MAX__ && defined YY_STDINT_H \ 446 && UINT_LEAST16_MAX <= INT_MAX) 447 typedef uint_least16_t yytype_uint16; 448 #elif !defined __UINT_LEAST16_MAX__ && USHRT_MAX <= INT_MAX 449 typedef unsigned short yytype_uint16; 450 #else 451 typedef int yytype_uint16; 452 #endif 453 454 #ifndef YYPTRDIFF_T 455 # if defined __PTRDIFF_TYPE__ && defined __PTRDIFF_MAX__ 456 # define YYPTRDIFF_T __PTRDIFF_TYPE__ 457 # define YYPTRDIFF_MAXIMUM __PTRDIFF_MAX__ 458 # elif defined PTRDIFF_MAX 459 # ifndef ptrdiff_t 460 # include <stddef.h> /* INFRINGES ON USER NAME SPACE */ 461 # endif 462 # define YYPTRDIFF_T ptrdiff_t 463 # define YYPTRDIFF_MAXIMUM PTRDIFF_MAX 464 # else 465 # define YYPTRDIFF_T long 466 # define YYPTRDIFF_MAXIMUM LONG_MAX 467 # endif 408 468 #endif 409 469 … … 413 473 # elif defined size_t 414 474 # define YYSIZE_T size_t 415 # elif ! defined YYSIZE_T475 # elif defined __STDC_VERSION__ && 199901 <= __STDC_VERSION__ 416 476 # include <stddef.h> /* INFRINGES ON USER NAME SPACE */ 417 477 # define YYSIZE_T size_t 418 478 # else 419 # define YYSIZE_T unsigned int479 # define YYSIZE_T unsigned 420 480 # endif 421 481 #endif 422 482 423 #define YYSIZE_MAXIMUM ((YYSIZE_T) -1) 483 #define YYSIZE_MAXIMUM \ 484 YY_CAST (YYPTRDIFF_T, \ 485 (YYPTRDIFF_MAXIMUM < YY_CAST (YYSIZE_T, -1) \ 486 ? YYPTRDIFF_MAXIMUM \ 487 : YY_CAST (YYSIZE_T, -1))) 488 489 #define YYSIZEOF(X) YY_CAST (YYPTRDIFF_T, sizeof (X)) 490 491 /* Stored state numbers (used for stacks). */ 492 typedef yytype_int16 yy_state_t; 493 494 /* State numbers in computations. */ 495 typedef int yy_state_fast_t; 424 496 425 497 #ifndef YY_ … … 435 507 #endif 436 508 437 #ifndef YY_ATTRIBUTE 438 # if (defined __GNUC__ \ 439 && (2 < __GNUC__ || (__GNUC__ == 2 && 96 <= __GNUC_MINOR__))) \ 440 || defined __SUNPRO_C && 0x5110 <= __SUNPRO_C 441 # define YY_ATTRIBUTE(Spec) __attribute__(Spec) 509 #ifndef YY_ATTRIBUTE_PURE 510 # if defined __GNUC__ && 2 < __GNUC__ + (96 <= __GNUC_MINOR__) 511 # define YY_ATTRIBUTE_PURE __attribute__ ((__pure__)) 442 512 # else 443 # define YY_ATTRIBUTE (Spec) /* empty */513 # define YY_ATTRIBUTE_PURE 444 514 # endif 445 515 #endif 446 516 447 #ifndef YY_ATTRIBUTE_PURE448 # define YY_ATTRIBUTE_PURE YY_ATTRIBUTE ((__pure__))449 #endif450 451 517 #ifndef YY_ATTRIBUTE_UNUSED 452 # define YY_ATTRIBUTE_UNUSED YY_ATTRIBUTE ((__unused__)) 453 #endif 454 455 #if !defined _Noreturn \ 456 && (!defined __STDC_VERSION__ || __STDC_VERSION__ < 201112) 457 # if defined _MSC_VER && 1200 <= _MSC_VER 458 # define _Noreturn __declspec (noreturn) 518 # if defined __GNUC__ && 2 < __GNUC__ + (7 <= __GNUC_MINOR__) 519 # define YY_ATTRIBUTE_UNUSED __attribute__ ((__unused__)) 459 520 # else 460 # define _Noreturn YY_ATTRIBUTE ((__noreturn__))521 # define YY_ATTRIBUTE_UNUSED 461 522 # endif 462 523 #endif … … 469 530 #endif 470 531 471 #if defined __GNUC__ && 407 <= __GNUC__ * 100 + __GNUC_MINOR__532 #if defined __GNUC__ && ! defined __ICC && 407 <= __GNUC__ * 100 + __GNUC_MINOR__ 472 533 /* Suppress an incorrect diagnostic about yylval being uninitialized. */ 473 # define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN \474 _Pragma ("GCC diagnostic push") \475 _Pragma ("GCC diagnostic ignored \"-Wuninitialized\"") \534 # define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN \ 535 _Pragma ("GCC diagnostic push") \ 536 _Pragma ("GCC diagnostic ignored \"-Wuninitialized\"") \ 476 537 _Pragma ("GCC diagnostic ignored \"-Wmaybe-uninitialized\"") 477 # define YY_IGNORE_MAYBE_UNINITIALIZED_END \538 # define YY_IGNORE_MAYBE_UNINITIALIZED_END \ 478 539 _Pragma ("GCC diagnostic pop") 479 540 #else … … 488 549 #endif 489 550 551 #if defined __cplusplus && defined __GNUC__ && ! defined __ICC && 6 <= __GNUC__ 552 # define YY_IGNORE_USELESS_CAST_BEGIN \ 553 _Pragma ("GCC diagnostic push") \ 554 _Pragma ("GCC diagnostic ignored \"-Wuseless-cast\"") 555 # define YY_IGNORE_USELESS_CAST_END \ 556 _Pragma ("GCC diagnostic pop") 557 #endif 558 #ifndef YY_IGNORE_USELESS_CAST_BEGIN 559 # define YY_IGNORE_USELESS_CAST_BEGIN 560 # define YY_IGNORE_USELESS_CAST_END 561 #endif 562 563 564 #define YY_ASSERT(E) ((void) (0 && (E))) 490 565 491 566 #if ! defined yyoverflow || YYERROR_VERBOSE … … 564 639 union yyalloc 565 640 { 566 yy type_int16yyss_alloc;641 yy_state_t yyss_alloc; 567 642 YYSTYPE yyvs_alloc; 568 643 }; 569 644 570 645 /* The size of the maximum gap between one aligned stack and the next. */ 571 # define YYSTACK_GAP_MAXIMUM ( sizeof(union yyalloc) - 1)646 # define YYSTACK_GAP_MAXIMUM (YYSIZEOF (union yyalloc) - 1) 572 647 573 648 /* The size of an array large to enough to hold all stacks, each with 574 649 N elements. */ 575 650 # define YYSTACK_BYTES(N) \ 576 ((N) * ( sizeof (yytype_int16) + sizeof(YYSTYPE)) \651 ((N) * (YYSIZEOF (yy_state_t) + YYSIZEOF (YYSTYPE)) \ 577 652 + YYSTACK_GAP_MAXIMUM) 578 653 … … 587 662 do \ 588 663 { \ 589 YY SIZE_T yynewbytes;\664 YYPTRDIFF_T yynewbytes; \ 590 665 YYCOPY (&yyptr->Stack_alloc, Stack, yysize); \ 591 666 Stack = &yyptr->Stack_alloc; \ 592 yynewbytes = yystacksize * sizeof(*Stack) + YYSTACK_GAP_MAXIMUM; \593 yyptr += yynewbytes / sizeof (*yyptr);\667 yynewbytes = yystacksize * YYSIZEOF (*Stack) + YYSTACK_GAP_MAXIMUM; \ 668 yyptr += yynewbytes / YYSIZEOF (*yyptr); \ 594 669 } \ 595 670 while (0) … … 603 678 # if defined __GNUC__ && 1 < __GNUC__ 604 679 # define YYCOPY(Dst, Src, Count) \ 605 __builtin_memcpy (Dst, Src, (Count) * sizeof (*(Src)))680 __builtin_memcpy (Dst, Src, YY_CAST (YYSIZE_T, (Count)) * sizeof (*(Src))) 606 681 # else 607 682 # define YYCOPY(Dst, Src, Count) \ 608 683 do \ 609 684 { \ 610 YY SIZE_T yyi;\685 YYPTRDIFF_T yyi; \ 611 686 for (yyi = 0; yyi < (Count); yyi++) \ 612 687 (Dst)[yyi] = (Src)[yyi]; \ … … 620 695 #define YYFINAL 2 621 696 /* YYLAST -- Last index in YYTABLE. */ 622 #define YYLAST 4 675697 #define YYLAST 4842 623 698 624 699 /* YYNTOKENS -- Number of terminals. */ … … 627 702 #define YYNNTS 524 628 703 /* YYNRULES -- Number of rules. */ 629 #define YYNRULES 107 2704 #define YYNRULES 1076 630 705 /* YYNSTATES -- Number of states. */ 631 #define YYNSTATES 1736 632 633 /* YYTRANSLATE[YYX] -- Symbol number corresponding to YYX as returned 634 by yylex, with out-of-bounds checking. */ 706 #define YYNSTATES 1744 707 635 708 #define YYUNDEFTOK 2 636 709 #define YYMAXUTOK 442 637 710 711 712 /* YYTRANSLATE(TOKEN-NUM) -- Symbol number corresponding to TOKEN-NUM 713 as returned by yylex, with out-of-bounds checking. */ 638 714 #define YYTRANSLATE(YYX) \ 639 ( (unsigned int)(YYX) <= YYMAXUTOK ? yytranslate[YYX] : YYUNDEFTOK)715 (0 <= (YYX) && (YYX) <= YYMAXUTOK ? yytranslate[YYX] : YYUNDEFTOK) 640 716 641 717 /* YYTRANSLATE[TOKEN-NUM] -- Symbol number corresponding to TOKEN-NUM 642 as returned by yylex , without out-of-bounds checking. */718 as returned by yylex. */ 643 719 static const yytype_uint8 yytranslate[] = 644 720 { … … 692 768 #if YYDEBUG 693 769 /* YYRLINE[YYN] -- Source line where rule number YYN was defined. */ 694 static const yytype_ uint16 yyrline[] =770 static const yytype_int16 yyrline[] = 695 771 { 696 772 0, 515, 515, 516, 518, 519, 520, 522, 524, 525, … … 778 854 3689, 3693, 3694, 3695, 3699, 3703, 3707, 3707, 3707, 3710, 779 855 3711, 3715, 3716, 3717, 3718, 3719, 3720, 3721, 3722, 3723, 780 3724, 3725, 372 9, 3733, 3737, 3737, 3741, 3742, 3746, 3747,781 3748, 3749, 3750, 375 5, 3754, 3760, 3759, 3764, 3765, 3770,782 376 9, 3775, 3774, 3782, 3783, 3785, 3786, 3789, 3793, 3794,783 3795, 3796, 3797, 3798, 3799, 3800, 3801, 3802, 3803, 380 7,784 380 8, 3809, 3812, 3813, 3816, 3817, 3821, 3822, 3826, 3827,785 38 31, 3834, 3835, 3845, 3849, 3850, 3854, 3855, 3859, 3860,786 38 64, 3865, 3866, 3867, 3868, 3872, 3873, 3877, 3878, 3882,787 388 3, 3884, 3885, 3886, 3892, 3891, 3895, 3894, 3899, 3903,788 3 904, 3908, 3909, 3910, 3911, 3912, 3913, 3914, 3915, 3916,789 3917, 3918, 39 22, 3926, 3926, 3929, 3930, 3935, 3934, 3955,790 39 54, 3979, 3980, 3983, 3984, 3987, 3990, 3991, 3994, 3995,791 399 8, 3999, 4002, 4003, 4007, 4012, 4011, 4050, 4049, 4101,792 4 102, 4103, 4107, 4108, 4113, 4116, 4117, 4120, 4121, 4126,793 412 5, 4139, 4140, 4139, 4151, 4152, 4154, 4155, 4158, 4162,794 41 65, 4171, 4175, 4184, 4194, 4196, 4205, 4213, 4221, 4229,795 42 33, 4237, 4238, 4241, 4242, 4245, 4249, 4253, 4254, 4257,796 42 61, 4262, 4262, 4269, 4268, 4282, 4281, 4294, 4295, 4294,797 4 309, 4309, 4333, 4334, 4335, 4339, 4340, 4345, 4353, 4364,798 43 65, 4375, 4378, 4379, 4383, 4384, 4388, 4390, 4392, 4397,799 4 402, 4403, 4401, 4427, 4452, 4457, 4458, 4462, 4479, 4478,800 44 83, 4484, 4488, 4493, 4492, 4507, 4524, 4529, 4573, 4574,801 45 78, 4579, 4579, 4584, 4585, 4590, 4602, 4616, 4618, 4623,802 46 24, 4629, 4628, 4664, 4665, 4772, 4773, 4774, 4775, 4776,803 47 93, 4886, 4887856 3724, 3725, 3726, 3730, 3734, 3738, 3738, 3742, 3743, 3747, 857 3748, 3749, 3750, 3751, 3752, 3757, 3756, 3762, 3761, 3766, 858 3767, 3772, 3771, 3777, 3776, 3784, 3785, 3787, 3788, 3791, 859 3795, 3796, 3797, 3798, 3799, 3800, 3801, 3802, 3803, 3804, 860 3805, 3806, 3810, 3811, 3812, 3815, 3816, 3819, 3820, 3824, 861 3825, 3829, 3830, 3834, 3837, 3838, 3848, 3852, 3853, 3857, 862 3858, 3862, 3863, 3867, 3868, 3869, 3870, 3871, 3875, 3876, 863 3880, 3881, 3885, 3886, 3887, 3888, 3889, 3895, 3894, 3898, 864 3897, 3902, 3906, 3907, 3911, 3912, 3913, 3914, 3915, 3916, 865 3917, 3918, 3919, 3920, 3921, 3922, 3926, 3930, 3930, 3933, 866 3934, 3939, 3938, 3959, 3958, 3983, 3984, 3987, 3988, 3991, 867 3994, 3995, 3998, 3999, 4002, 4003, 4006, 4007, 4011, 4016, 868 4015, 4054, 4053, 4105, 4106, 4107, 4111, 4112, 4117, 4120, 869 4121, 4124, 4125, 4130, 4129, 4143, 4144, 4143, 4155, 4156, 870 4158, 4159, 4162, 4166, 4169, 4175, 4179, 4188, 4198, 4200, 871 4209, 4217, 4225, 4233, 4237, 4241, 4242, 4245, 4246, 4249, 872 4253, 4257, 4258, 4261, 4265, 4266, 4266, 4273, 4272, 4286, 873 4285, 4298, 4299, 4298, 4313, 4313, 4337, 4338, 4339, 4343, 874 4344, 4349, 4357, 4368, 4369, 4379, 4382, 4383, 4387, 4388, 875 4392, 4394, 4396, 4401, 4406, 4407, 4405, 4431, 4456, 4461, 876 4462, 4466, 4483, 4482, 4487, 4488, 4492, 4497, 4496, 4511, 877 4528, 4533, 4577, 4578, 4582, 4583, 4583, 4588, 4589, 4594, 878 4606, 4620, 4622, 4627, 4628, 4633, 4632, 4668, 4669, 4776, 879 4777, 4778, 4779, 4780, 4797, 4890, 4891 804 880 }; 805 881 #endif … … 1004 1080 /* YYTOKNUM[NUM] -- (External) token number corresponding to the 1005 1081 (internal) symbol number NUM (which must be that of a token). */ 1006 static const yytype_ uint16 yytoknum[] =1082 static const yytype_int16 yytoknum[] = 1007 1083 { 1008 1084 0, 256, 257, 44, 58, 61, 258, 259, 260, 261, … … 1030 1106 # endif 1031 1107 1032 #define YYPACT_NINF -14281033 1034 #define yypact_value_is_default(Yy state) \1035 ( !!((Yystate) == (-1428)))1036 1037 #define YYTABLE_NINF -10241038 1039 #define yytable_value_is_error(Yy table_value) \1108 #define YYPACT_NINF (-1417) 1109 1110 #define yypact_value_is_default(Yyn) \ 1111 ((Yyn) == YYPACT_NINF) 1112 1113 #define YYTABLE_NINF (-1028) 1114 1115 #define yytable_value_is_error(Yyn) \ 1040 1116 0 1041 1117 … … 1044 1120 static const yytype_int16 yypact[] = 1045 1121 { 1046 -1428, 1573, -1428, -1428, -1428, -56, -39, -1428, -1428, -1428, 1047 -12, 631, -1428, -1428, 119, 199, -1428, -1428, -1428, -1428, 1048 751, -1428, 88, -1428, 88, 540, 660, -1428, -1428, 88, 1049 -1428, 88, -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, 1050 -1428, -1428, -1428, 140, 152, 183, -1428, -1428, -1428, 877, 1051 -1428, -1428, 4069, 157, 88, -1428, 456, 4369, 233, 315, 1052 -1428, -1428, 4369, 4369, -1428, 128, 128, 78, 78, 78, 1053 78, 82, 78, 1610, -1428, -1428, -1428, -1428, -1428, -1428, 1054 128, 195, -1428, -1428, 107, 236, 362, 400, -1428, -1428, 1055 107, 111, -1428, -1428, 869, -1428, 600, -1428, 423, -1428, 1056 4069, -1428, -1428, 618, 899, 428, -1428, -1428, -1428, 495, 1057 320, -1428, -1428, -1428, 545, -1428, -1428, 573, 577, -1428, 1058 -1428, -1428, -1428, 240, 683, -1428, 534, -1428, -1428, -1428, 1059 -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, 1060 -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, 1061 628, -1428, -1428, -1428, 621, 561, 578, 3546, 405, 248, 1062 332, 602, 604, -1428, 3799, 3846, 606, 623, 3595, 760, 1063 706, -1428, 4256, -1428, 926, -1428, -1428, -1428, -1428, -1428, 1064 -1428, -1428, -1428, -1428, -1428, -1428, -1428, 780, -1428, -1428, 1065 -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, 1066 -1428, -1428, 636, -1428, -1428, 638, -1428, 647, 706, 706, 1067 119, 119, 651, 3661, -1428, -1428, -1428, -1428, -1428, 367, 1068 1394, -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, 1069 -1428, 3870, -1428, -1428, -1428, 645, 654, 3903, -1428, 81, 1070 859, -1428, -1428, -1428, 700, -1428, -1428, 428, -1428, 91, 1071 -1428, -1428, 3870, -1428, -1428, 857, -1428, 613, 234, 1187, 1072 570, -1428, -1428, 878, 882, 724, 914, -1428, -1428, -1428, 1073 -1428, 703, 707, 119, -1428, 109, -1428, -1428, 119, 349, 1074 128, 725, -1428, 118, -1428, -1428, 726, 729, 243, 119, 1075 128, 644, 732, 364, 485, 121, 596, -1428, -1428, -1428, 1076 -1428, 462, -1428, -1428, 3595, 3628, 3903, 128, 912, 927, 1077 3903, 617, 115, -1428, 746, 362, 362, 369, 3940, 3903, 1078 795, 3903, 3903, 743, -1428, 4171, 424, 775, 840, 221, 1079 -1428, -1428, -1428, 664, -1428, -1428, -1428, 3903, 3903, 238, 1080 423, -1428, -1428, 128, 128, 119, 128, -1428, -1428, -1428, 1081 -1428, -1428, 754, 3476, -1428, 128, 3516, 128, -1428, 763, 1082 119, -1428, -1428, -1428, -1428, -1428, -1428, -1428, 128, 439, 1083 128, -1428, -1428, -1428, 4284, -1428, -1428, -1428, 3903, 764, 1084 3174, 3174, 3628, -1428, 643, 90, 224, -1428, -1428, 762, 1085 128, -1428, -1428, -1428, -1428, -1428, -1428, 954, 767, 1610, 1086 -1428, -1428, 960, 961, 102, 3870, 817, 972, -1428, -1428, 1087 -1428, 610, 610, 450, 801, -1428, 804, 806, 1187, 787, 1088 1610, 1610, -1428, 788, -1428, 1187, -1428, -1428, 1187, -1428, 1089 -1428, 1187, 808, 613, -1428, -1428, -1428, -1428, -1428, -1428, 1090 -1428, -1428, -1428, -1428, -1428, -1428, -1428, 914, 914, -1428, 1091 3903, -1428, 3903, -1428, -1428, 3903, -1428, 793, 798, 937, 1092 195, 119, 799, -1428, -1428, 989, 119, 118, 725, 119, 1093 -1428, 122, -1428, 981, -1428, 815, 816, -1428, 119, 1007, 1094 -1428, -1428, 128, -1428, 818, -1428, 1014, -1428, -1428, -1428, 1095 -1428, -1428, -1428, -1428, 123, 869, 869, 592, 3903, 107, 1096 107, 1107, 119, 128, -1428, 108, -1428, -1428, -1428, 124, 1097 824, 119, 909, 3903, 831, 1026, -1428, 225, 858, 665, 1098 -1428, -1428, 2259, 841, 881, 1039, 128, -1428, 1042, -1428, 1099 -1428, 854, 222, -1428, 864, 125, -1428, -1428, 99, 848, 1100 -1428, -1428, -1428, -1428, 128, 1055, -1428, 103, 106, -1428, 1101 -1428, 937, 128, 867, 763, -1428, -1428, 107, 1064, 955, 1102 1029, -1428, -1428, -1428, -1428, -32, -1428, 267, -1428, 876, 1103 755, -1428, -1428, 938, -1428, 885, 128, 900, -1428, -1428, 1104 -1428, 891, 893, 119, 119, 119, 763, 3247, 3062, 3903, 1105 248, 937, 937, 787, -1428, 138, -1428, 119, 3903, 248, 1106 937, 937, -1428, 141, -1428, 119, 763, -1428, 148, 119, 1107 898, 567, -1428, 915, -1428, 902, -1428, -1428, 1090, 3706, 1108 3628, 913, 248, 248, 248, 937, -1428, -1428, -1428, -1428, 1109 -1428, -1428, 159, -1428, -1428, -1428, 160, 131, 312, 937, 1110 -1428, -1428, -1428, 1062, -1428, -1428, -1428, -1428, 444, 917, 1111 -1428, -1428, -1428, -1428, 3903, 119, 208, 128, 208, 930, 1112 -1428, 931, -1428, 3903, -1428, 922, 1610, 3903, 3903, -1428, 1113 1116, 787, -1428, 3870, -1428, -1428, -1428, -1428, 228, 957, 1114 -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, 613, 234, 1115 1112, -1428, 878, 882, -1428, 3903, 1131, 162, -1428, 438, 1116 1136, -1428, -1428, 946, -1428, -1428, 3903, -1428, 3903, 119, 1117 -1428, 726, 119, 763, 1125, 951, 1147, -1428, 644, 119, 1118 963, 485, 128, 869, -1428, -1428, 959, -1428, 1135, -1428, 1119 -1428, 86, -1428, 966, -1428, -1428, 634, -1428, 1135, -1428, 1120 1140, 327, -1428, 973, 119, 128, 119, 128, 1634, 248, 1121 3903, 95, 174, -1428, -1428, 170, -1428, 119, 3986, 119, 1122 1065, 3903, 128, -1428, 3903, 792, -1428, 763, 474, -1428, 1123 -1428, -1428, -1428, -1428, 976, -1428, 980, -1428, -1428, -1428, 1124 -1428, -1428, -1428, -1428, -1428, 1172, -1428, 984, -1428, 2259, 1125 119, 746, 985, 1177, -1428, -1428, -1428, 1183, -1428, -1428, 1126 -1428, 128, 995, 495, 119, 999, 119, 3903, 3903, -1428, 1127 3903, 1045, -1428, 128, 119, -1428, -1428, 119, 128, 1023, 1128 482, 1000, 3997, 1001, 1206, 937, -1428, -1428, -1428, -1428, 1129 -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, 1130 -1428, -1428, -1428, 775, -1428, -1428, 1063, 3903, 513, -1428, 1131 591, -1428, -1428, -1428, -1428, 1050, 1203, 119, 1093, 472, 1132 -1428, -1428, -1428, -1428, 1207, -1428, 1015, 3903, 3903, 3903, 1133 3903, 3903, 1208, 3903, 248, 3903, 937, -1428, 175, -1428, 1134 3903, 1215, 937, 937, 937, 937, 3903, 937, 248, 937, 1135 937, -1428, 176, -1428, -1428, -1428, -1428, -1428, -1428, -1428, 1136 -1428, -1428, -1428, 3476, 128, -1428, -1428, -1428, -1428, 3516, 1137 128, -1428, 1209, 763, -1428, 3903, -1428, 852, -1428, -1428, 1138 -1428, 1193, 4397, 2649, 3903, -1428, -1428, -1428, -1428, -1428, 1139 -1428, -1428, -1428, -1428, 3174, 3986, 979, 979, 119, -1428, 1140 -1428, 3903, 827, -1428, 1736, 128, 119, -1428, 128, 128, 1141 81, 1219, -1428, -1428, 187, -1428, -1428, -1428, -1428, -1428, 1142 1032, 1226, -1428, 119, 1035, 1204, 1210, 1041, -1428, 191, 1143 197, 1046, 3870, -1428, -1428, -1428, -1428, -1428, 1048, 198, 1144 3903, 798, -1428, 937, 3903, 1052, 1234, -1428, -1428, 1248, 1145 -1428, -1428, -1428, -1428, 816, 701, -1428, -1428, 200, -1428, 1146 205, -1428, 1247, -1428, 119, -1428, 1610, 996, -1428, -1428, 1147 3717, 592, -1428, -1428, -1428, -1428, 1149, 119, 119, 3903, 1148 1252, -1428, -1428, 3754, 1107, -1428, 1868, 3903, -1428, 3986, 1149 -1428, 132, -1428, -1428, 128, 1071, 119, -1428, -1428, -1428, 1150 1066, -1428, 260, -1428, -1428, 1075, 133, -1428, 128, 119, 1151 -1428, -1428, 841, 128, -1428, 1237, -1428, -1428, -1428, 1067, 1152 128, 128, 222, 119, 1250, 202, -1428, -1428, -1428, -1428, 1153 -1428, -1428, 1267, -1428, 1268, -1428, 937, 119, 119, 107, 1154 128, 119, 3903, 2979, 2873, 3336, -1428, 763, 3903, 4482, 1155 -1428, 775, 1080, 128, 119, 515, -1428, -1428, -1428, -1428, 1156 77, -1428, -1428, 1085, 119, -1428, 128, 231, 1084, 3903, 1157 -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, 3903, -1428, 1158 -1428, -1428, -1428, 3247, -1428, -1428, 937, 1087, -1428, -1428, 1159 -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, 3401, -1428, 1160 -1428, 119, -1428, 119, 386, 1089, -1428, 1091, -1428, -1428, 1161 1088, -1428, 1123, 173, 1282, 3903, 248, 937, -1428, 206, 1162 -1428, -1428, -1428, 128, 1285, 3986, -1428, 128, 1287, -1428, 1163 -1428, 134, 1099, 584, 595, -1428, -1428, 643, 3903, -1428, 1164 210, -1428, 1293, 119, 128, 119, 119, 3903, 3903, -1428, 1165 -1428, 208, 1272, -1428, 1085, -1428, 1085, -1428, 1211, -1428, 1166 1231, -1428, -1428, 205, 1113, 1305, -1428, -1428, -1428, -1428, 1167 -1428, -1428, 128, 211, -1428, 1118, -1428, 3903, 763, 151, 1168 1930, -1428, 128, 243, 963, 128, 3903, 228, 469, -1428, 1169 -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, 1170 -1428, 1310, 214, -1428, -1428, 1120, -1428, -1428, -1428, -1428, 1171 128, -1428, 3903, 248, -1428, -1428, 3903, 1314, -1428, 787, 1172 -1428, 1318, -1428, 3986, 119, 119, 1218, -1428, 792, -1428, 1173 2006, 1237, 763, 119, 119, 1930, 603, -1428, 119, 1930, 1174 367, 112, 1930, 1129, 119, 119, -1428, 1133, 995, -1428, 1175 -1428, 3903, 128, 119, 128, 119, 1141, 3903, -1428, -1428, 1176 -1428, -1428, -1428, 353, 410, 768, 785, 836, 508, 547, 1177 1145, 3903, 1126, -1428, 937, 1134, 451, 1138, 949, 2894, 1178 216, 1150, -1428, 1227, 119, 128, 119, 1331, 1195, 1341, 1179 -1428, 128, -1428, -1428, 119, 937, 1343, 1346, -1428, -1428, 1180 -1428, 217, -1428, 3903, 1348, -1428, -1428, 128, -1428, 3986, 1181 -1428, 128, 937, 1351, -1428, 1347, -1428, -1428, -1428, -1428, 1182 -1428, 3903, 248, 3903, -1428, -1428, -1428, 2649, 128, 119, 1183 128, 119, 979, 128, 119, 597, 128, 119, 128, 119, 1184 643, -1428, 1736, -1428, 3903, 119, 423, -1428, -1428, 128, 1185 -1428, 1163, -1428, -1428, -1428, -1428, 1353, 1354, -1428, 3903, 1186 119, 937, -1428, -1428, 1357, -1428, 119, 1342, -1428, 1170, 1187 1363, -1428, 1366, -1428, 1364, -1428, 1368, -1428, -1428, 3903, 1188 1356, 1371, -1428, -1428, 1374, 119, -1428, -1428, 119, 1380, 1189 -1428, -1428, 3940, 3940, -1428, 119, -1428, -1428, -1428, 3903, 1190 3986, -1428, 128, 2006, -1428, -1428, 1190, 1383, 1387, 1368, 1191 220, -1428, 1192, -1428, -1428, -1428, 1198, 1199, -1428, 3903, 1192 530, -1428, -1428, 1200, -1428, -1428, -1428, 119, 119, 727, 1193 -1428, -1428, -1428, -1428, -1428, -1428, 946, -1428, 230, -1428, 1194 -1428, 1202, -1428, -1428, 2456, 3903, 3903, 3903, 3903, 3903, 1195 3903, 3903, 3903, 3903, 3903, 3903, 3903, 3903, 3903, 2363, 1196 3903, 2578, 2615, -1428, -1428, 4482, 607, 119, 1212, 1217, 1197 1220, 119, 128, -1428, -1428, 937, 307, 128, 3903, -1428, 1198 -1428, -1428, 119, 1285, 119, -1428, 937, 336, 128, 128, 1199 128, 1205, 1396, -1428, -1428, 119, 119, -1428, 119, 128, 1200 119, 119, 119, -1428, -1428, 119, 1224, 128, -1428, 128, 1201 3903, 1610, 1407, -1428, 3903, 1225, -1428, 3903, 3788, 2140, 1202 1414, 1422, 1390, -1428, -1428, 3903, 816, 3903, -1428, -1428, 1203 -1428, 1423, -1428, 1236, 119, 1238, -1428, 3903, 3903, 3903, 1204 530, -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, 1205 -1428, 1930, 145, -1428, -1428, -1428, 3903, -1428, -1428, -1428, 1206 -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, 1207 -1428, -1428, -1428, 3903, 3903, -1428, -1428, -1428, 3903, -1428, 1208 3903, -1428, 128, 119, 1195, -1428, -1428, 1429, -1428, -1428, 1209 -1428, -1428, -1428, 119, -1428, -1428, -1428, 119, -1428, 128, 1210 -1428, -1428, 119, 119, 119, 4482, 248, 119, 1239, 119, 1211 128, 119, 1240, 1242, 3903, -1428, 1416, -1428, -1428, -1428, 1212 -1428, 1436, -1428, -1428, -1428, -1428, -1428, 1147, 218, 3903, 1213 -1428, -1428, -1428, -1428, -1428, 1246, 1126, 1254, 2220, 1249, 1214 1251, 1255, -1428, -1428, -1428, -1428, -1428, 119, 128, 1212, 1215 119, 128, -1428, 119, -1428, -1428, 1439, 763, -1428, 3903, 1216 -1428, 1448, -1428, -1428, 2298, 1449, -1428, -1428, 1450, -1428, 1217 937, -1428, 119, -1428, 119, 3903, -1428, 1258, 3903, 3903, 1218 1451, 2220, 3903, -1428, -1428, -1428, 1454, -1428, 3903, -1428, 1219 1455, 3903, -1428, 3903, -1428, -1428 1122 -1417, 1551, -1417, -1417, -1417, -21, 26, -1417, -1417, -1417, 1123 36, 734, -1417, -1417, 81, 230, -1417, -1417, -1417, -1417, 1124 801, -1417, 252, -1417, 252, 338, 602, -1417, -1417, 252, 1125 -1417, 252, -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1417, 1126 -1417, -1417, -1417, 231, 263, 294, -1417, -1417, -1417, 810, 1127 -1417, -1417, 4236, 373, 252, -1417, 523, 4536, 385, 401, 1128 -1417, -1417, 4536, 4536, -1417, 188, 188, 80, 80, 80, 1129 80, 147, 80, 1612, -1417, -1417, -1417, -1417, -1417, -1417, 1130 188, 412, -1417, -1417, 94, 316, 481, 619, -1417, -1417, 1131 94, 112, -1417, -1417, 910, -1417, 645, -1417, 460, -1417, 1132 4236, -1417, -1417, 515, 922, 490, -1417, -1417, -1417, 526, 1133 360, -1417, -1417, -1417, 587, -1417, -1417, 604, 615, -1417, 1134 -1417, -1417, -1417, 370, 763, -1417, 612, -1417, -1417, -1417, 1135 -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1417, 1136 -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1417, 1137 685, -1417, -1417, -1417, 873, 616, 633, 3106, 222, 494, 1138 -44, 660, 662, -1417, 3951, 3996, 674, 678, 3732, 800, 1139 700, -1417, 4423, -1417, 1168, -1417, -1417, -1417, -1417, -1417, 1140 -1417, -1417, -1417, -1417, -1417, -1417, -1417, 830, -1417, -1417, 1141 -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1417, 1142 -1417, -1417, 691, -1417, -1417, 693, -1417, 694, 700, 700, 1143 81, 81, 686, 3806, -1417, -1417, -1417, -1417, -1417, 319, 1144 1072, -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1417, 1145 -1417, 4007, -1417, -1417, -1417, 688, 705, 4062, -1417, 93, 1146 896, -1417, -1417, -1417, 732, -1417, -1417, 490, -1417, 105, 1147 -1417, -1417, 4007, -1417, -1417, 885, -1417, 598, 240, 1001, 1148 878, -1417, -1417, 905, 908, 701, 472, -1417, -1417, -1417, 1149 -1417, 728, 737, 81, -1417, 103, -1417, -1417, 81, 450, 1150 188, 747, -1417, 117, -1417, -1417, 751, 752, 664, 81, 1151 188, 625, 753, 480, 394, 121, 525, -1417, -1417, -1417, 1152 -1417, 323, -1417, -1417, 3732, 3772, 4062, 188, 944, 945, 1153 4062, 560, 221, -1417, 759, 481, 481, 224, 4086, 4062, 1154 805, 4062, 4062, 754, -1417, 4338, 238, 787, 852, 262, 1155 -1417, -1417, -1417, 911, -1417, -1417, -1417, 4062, 4062, 313, 1156 460, -1417, -1417, 188, 188, 81, 188, -1417, -1417, -1417, 1157 -1417, -1417, 765, 3006, -1417, 188, 3682, 188, -1417, 774, 1158 81, -1417, -1417, -1417, -1417, -1417, -1417, -1417, 188, 411, 1159 188, -1417, -1417, -1417, 4451, -1417, -1417, -1417, 4062, 779, 1160 3400, 3400, 3772, -1417, 804, 5, 89, -1417, -1417, 775, 1161 188, -1417, -1417, -1417, -1417, -1417, -1417, 970, 786, 1612, 1162 -1417, -1417, 979, 982, 109, 4007, 842, 991, -1417, -1417, 1163 -1417, 586, 586, 518, 826, -1417, 832, 835, 1001, 817, 1164 1612, 1612, -1417, 802, -1417, 1001, -1417, -1417, 1001, -1417, 1165 -1417, 1001, 840, 598, -1417, -1417, -1417, -1417, -1417, -1417, 1166 -1417, -1417, -1417, -1417, -1417, -1417, -1417, 472, 472, -1417, 1167 4062, -1417, 4062, -1417, -1417, 4062, -1417, 824, 838, 927, 1168 412, 81, 833, -1417, -1417, 1028, 81, 117, 747, 81, 1169 -1417, 122, -1417, 1012, -1417, 844, 845, -1417, 81, 1035, 1170 -1417, -1417, 188, -1417, 851, -1417, 1044, -1417, -1417, -1417, 1171 -1417, -1417, -1417, -1417, 125, 910, 910, 584, 4062, 94, 1172 94, 1581, 81, 188, -1417, 111, -1417, -1417, -1417, 131, 1173 854, 81, 939, 4062, 868, 1061, -1417, 266, 892, 609, 1174 -1417, -1417, 1222, 880, 915, 1070, 188, -1417, 1074, -1417, 1175 -1417, 887, 244, -1417, 891, 159, -1417, -1417, 107, 881, 1176 -1417, -1417, -1417, -1417, 188, 1082, -1417, 123, 127, -1417, 1177 -1417, 927, 188, 893, 774, -1417, -1417, 94, 1083, 985, 1178 1850, -1417, -1417, -1417, -1417, -10, -1417, 432, -1417, 909, 1179 716, -1417, -1417, 974, -1417, 913, 188, 934, -1417, -1417, 1180 -1417, 929, 930, 81, 81, 81, 774, 3542, 3095, 4062, 1181 494, 927, 927, 817, -1417, 129, -1417, 81, 4062, 494, 1182 927, 927, -1417, 130, -1417, 81, 774, -1417, 136, 81, 1183 936, 563, -1417, 949, -1417, 946, -1417, -1417, 1137, 3843, 1184 3772, 954, 494, 494, 494, 927, 927, -1417, -1417, -1417, 1185 -1417, -1417, -1417, 137, -1417, -1417, -1417, 141, 167, 382, 1186 927, -1417, -1417, -1417, 1110, -1417, -1417, -1417, -1417, 363, 1187 962, -1417, -1417, -1417, -1417, 4062, 81, 223, 188, 223, 1188 972, -1417, 981, -1417, 4062, -1417, 975, 1612, 4062, 4062, 1189 -1417, 1162, 817, -1417, 4007, -1417, -1417, -1417, -1417, 84, 1190 994, -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1417, 598, 1191 240, 1153, -1417, 905, 908, -1417, 4062, 1167, 144, -1417, 1192 452, 1171, -1417, -1417, 984, -1417, -1417, 4062, -1417, 4062, 1193 81, -1417, 751, 81, 774, 1158, 988, 1185, -1417, 625, 1194 81, 999, 394, 188, 910, -1417, -1417, 998, -1417, 1175, 1195 -1417, -1417, 215, -1417, 1004, -1417, -1417, 692, -1417, 1175, 1196 -1417, 1178, 542, -1417, 1005, 81, 188, 81, 188, 1741, 1197 494, 4062, 116, 154, -1417, -1417, 115, -1417, 81, 4115, 1198 81, 1097, 4062, 188, -1417, 4062, 958, -1417, 774, 404, 1199 -1417, -1417, -1417, -1417, -1417, 1008, -1417, 1010, -1417, -1417, 1200 -1417, -1417, -1417, -1417, -1417, -1417, 1202, -1417, 1013, -1417, 1201 1222, 81, 759, 1015, 1203, -1417, -1417, -1417, 1207, -1417, 1202 -1417, -1417, 188, 1019, 526, 81, 1020, 81, 4062, 4062, 1203 -1417, 4062, 1068, -1417, 188, 81, -1417, -1417, 81, 188, 1204 1046, 418, 1024, 4145, 1027, 1036, 927, -1417, -1417, -1417, 1205 -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1417, 1206 -1417, -1417, -1417, -1417, 787, -1417, -1417, 1084, 4062, 442, 1207 -1417, 649, -1417, -1417, -1417, -1417, 1071, 1224, 81, 1113, 1208 603, -1417, -1417, -1417, -1417, 1227, -1417, 1031, 4062, 4062, 1209 4062, 4062, 4062, 1226, 4062, 494, 4062, 927, 927, -1417, 1210 166, -1417, 4062, 1228, 927, 927, 927, 927, 4062, 927, 1211 494, 927, 927, 927, -1417, 169, -1417, -1417, -1417, -1417, 1212 -1417, -1417, -1417, -1417, -1417, -1417, 3006, 188, -1417, -1417, 1213 -1417, -1417, 3682, 188, -1417, 1229, 774, -1417, 4062, -1417, 1214 938, -1417, -1417, -1417, 1204, 4564, 2184, 4062, -1417, -1417, 1215 -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1417, 3400, 4115, 1216 943, 943, 81, -1417, -1417, 4062, 783, -1417, 1827, 188, 1217 81, -1417, 188, 188, 93, 1230, -1417, -1417, 171, -1417, 1218 -1417, -1417, -1417, -1417, 1041, 1234, -1417, 81, 1045, 1211, 1219 1214, 1049, -1417, 175, 176, 1050, 4007, -1417, -1417, -1417, 1220 -1417, -1417, 1051, 189, 4062, 838, -1417, 927, 4062, 1055, 1221 1248, -1417, -1417, 1249, -1417, -1417, -1417, -1417, 845, 670, 1222 -1417, -1417, 195, -1417, 132, -1417, 1250, -1417, 81, -1417, 1223 1612, 534, -1417, -1417, 3502, 584, -1417, -1417, -1417, -1417, 1224 1152, 81, 81, 4062, 1255, -1417, -1417, 3872, 1581, -1417, 1225 1873, 4062, -1417, 4115, -1417, 185, -1417, -1417, 188, 1075, 1226 81, -1417, -1417, -1417, 1073, -1417, 269, -1417, -1417, 1078, 1227 187, -1417, 188, 81, -1417, -1417, 880, 188, -1417, 1252, 1228 -1417, -1417, -1417, 1077, 188, 188, 244, 81, 1258, 198, 1229 -1417, -1417, -1417, -1417, -1417, -1417, 1271, -1417, 1279, -1417, 1230 927, 81, 81, 94, 188, 81, 4062, 3336, 3039, 3645, 1231 -1417, 774, 4062, 4649, -1417, 787, 1090, 188, 81, 445, 1232 -1417, -1417, -1417, -1417, 96, -1417, -1417, 1094, 81, -1417, 1233 188, 350, 1098, 4062, -1417, -1417, -1417, -1417, -1417, -1417, 1234 -1417, -1417, 4062, -1417, -1417, -1417, -1417, -1417, 3542, -1417, 1235 -1417, 927, 1101, -1417, -1417, -1417, -1417, -1417, -1417, -1417, 1236 -1417, -1417, -1417, -1417, 3592, -1417, -1417, 81, -1417, 81, 1237 419, 1102, -1417, 1103, -1417, -1417, 1100, -1417, 1365, 258, 1238 1285, 4062, 494, 927, 927, -1417, 201, -1417, -1417, -1417, 1239 188, 1296, 4115, -1417, 188, 1297, -1417, -1417, 191, 1107, 1240 471, 506, -1417, -1417, 804, 4062, -1417, 203, -1417, 1299, 1241 81, 188, 81, 81, 4062, 4062, -1417, -1417, 223, 1278, 1242 -1417, 1094, -1417, 1094, -1417, 1212, -1417, 1232, -1417, -1417, 1243 132, 1112, 1304, -1417, -1417, -1417, -1417, -1417, -1417, 188, 1244 205, -1417, 1116, -1417, 4062, 774, 193, 2068, -1417, 188, 1245 664, 999, 188, 4062, 84, 521, -1417, -1417, -1417, -1417, 1246 -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1417, 1307, 207, 1247 -1417, -1417, 1115, -1417, -1417, -1417, -1417, 188, -1417, 4062, 1248 494, -1417, -1417, 4062, 1312, -1417, 817, -1417, 1317, -1417, 1249 4115, 81, 81, 1223, -1417, 958, -1417, 2169, 1252, 774, 1250 81, 81, 2068, 634, -1417, 81, 2068, 319, 124, 2068, 1251 1132, 81, 81, -1417, 1136, 1019, -1417, -1417, 4062, 188, 1252 81, 188, 81, 1135, 4062, -1417, -1417, -1417, -1417, -1417, 1253 558, 571, 776, 828, 876, 537, 610, 1138, 4062, 1134, 1254 -1417, 927, 1141, 476, 1140, 948, 1676, 210, 1142, -1417, 1255 1236, 81, 188, 81, 1332, 1194, 1340, -1417, 188, -1417, 1256 -1417, 81, 927, 1341, 1342, -1417, -1417, -1417, 211, -1417, 1257 4062, 1345, -1417, -1417, 188, -1417, 4115, -1417, 188, 927, 1258 1346, -1417, 1347, -1417, -1417, -1417, -1417, -1417, 4062, 494, 1259 4062, -1417, -1417, -1417, -1417, 2184, 188, 81, 188, 81, 1260 943, 188, 81, 545, 188, 81, 188, 81, 804, -1417, 1261 1827, -1417, 4062, 81, 460, -1417, -1417, 188, -1417, 1165, 1262 -1417, -1417, -1417, -1417, 1357, 1360, -1417, 4062, 81, 927, 1263 -1417, -1417, 1349, -1417, 81, 1344, -1417, 1172, 1369, -1417, 1264 1370, -1417, 1373, -1417, 1376, -1417, -1417, 4062, 1352, 1377, 1265 -1417, -1417, 1379, 81, -1417, -1417, 81, 1378, -1417, -1417, 1266 4086, 4086, -1417, 81, -1417, -1417, -1417, 4062, 4115, -1417, 1267 188, 2169, -1417, -1417, 1189, 1383, 1384, 1376, 228, -1417, 1268 1192, -1417, -1417, -1417, 1195, 1196, -1417, 4062, 640, -1417, 1269 -1417, 1198, -1417, -1417, -1417, 81, 81, 735, -1417, -1417, 1270 -1417, -1417, -1417, -1417, 984, -1417, 261, -1417, -1417, 1200, 1271 -1417, -1417, 2694, 4062, 4062, 4062, 4062, 4062, 4062, 4062, 1272 4062, 4062, 4062, 4062, 4062, 4062, 4062, 2635, 4062, 2760, 1273 2919, -1417, -1417, 4649, 589, 81, 1197, 1208, 1209, 81, 1274 188, -1417, -1417, 927, 19, 188, 4062, -1417, -1417, -1417, 1275 81, 1296, 81, -1417, 927, 25, 188, 188, 188, 1201, 1276 1392, -1417, -1417, 81, 81, -1417, 81, 188, 81, 81, 1277 81, -1417, -1417, 81, 1213, 188, -1417, 188, 4062, 1612, 1278 1400, -1417, 4062, 1215, -1417, 4062, 3922, 2318, 1402, 1404, 1279 1389, -1417, -1417, 4062, 845, 4062, -1417, -1417, -1417, 1399, 1280 -1417, 1216, 81, 1217, -1417, 4062, 4062, 4062, 640, -1417, 1281 -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1417, 2068, 1282 28, -1417, -1417, -1417, 4062, -1417, -1417, -1417, -1417, -1417, 1283 -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1417, 1284 -1417, 4062, 4062, -1417, -1417, -1417, 4062, -1417, 4062, -1417, 1285 188, 81, 1194, -1417, -1417, 1410, -1417, -1417, -1417, -1417, 1286 -1417, 81, -1417, -1417, -1417, 81, -1417, 188, -1417, -1417, 1287 81, 81, 81, 4649, 494, 81, 1219, 81, 188, 81, 1288 1220, 1221, 4062, -1417, 1395, -1417, -1417, -1417, -1417, 1414, 1289 -1417, -1417, -1417, -1417, -1417, 1185, 216, 4062, -1417, -1417, 1290 -1417, -1417, -1417, 1233, 1134, 1235, 2355, 1237, 1238, 1239, 1291 -1417, -1417, -1417, -1417, -1417, 81, 188, 1197, 81, 188, 1292 -1417, 81, -1417, -1417, 1416, 774, -1417, 4062, -1417, 1417, 1293 -1417, -1417, 2410, 1418, -1417, -1417, 1419, -1417, 927, -1417, 1294 81, -1417, 81, 4062, -1417, 1240, 4062, 4062, 1420, 2355, 1295 4062, -1417, -1417, -1417, 1437, -1417, 4062, -1417, 1438, 4062, 1296 -1417, 4062, -1417, -1417 1220 1297 }; 1221 1298 … … 1223 1300 Performed when YYTABLE does not specify something else to do. Zero 1224 1301 means the default is an error. */ 1225 static const yytype_ uint16 yydefact[] =1302 static const yytype_int16 yydefact[] = 1226 1303 { 1227 2, 0, 1, 6, 8, 0, 0, 17, 9, 10 28,1228 10 27, 0, 18, 3, 4, 5, 12, 15, 20, 1026,1229 0, 21, 106, 19, 106, 0, 202, 102 4, 22, 106,1230 23, 106, 24, 18, 9 69, 937, 208, 206, 216, 210,1304 2, 0, 1, 6, 8, 0, 0, 17, 9, 1032, 1305 1031, 0, 18, 3, 4, 5, 12, 15, 20, 1030, 1306 0, 21, 106, 19, 106, 0, 202, 1028, 22, 106, 1307 23, 106, 24, 18, 973, 941, 208, 206, 216, 210, 1231 1308 214, 212, 88, 306, 0, 0, 7, 11, 18, 202, 1232 203, 9 66, 108, 0, 107, 952, 192, 192, 0, 0,1233 10 27, 1025, 192, 192, 16, 0, 0, 218, 218, 218,1309 203, 970, 108, 0, 107, 956, 192, 192, 0, 0, 1310 1031, 1029, 192, 192, 16, 0, 0, 218, 218, 218, 1234 1311 218, 242, 218, 0, 204, 205, 10, 13, 14, 457, 1235 1312 0, 0, 368, 369, 25, 0, 466, 0, 503, 194, … … 1239 1316 150, 147, 144, 525, 0, 523, 534, 539, 522, 520, 1240 1317 521, 118, 119, 120, 711, 709, 709, 712, 738, 739, 1241 121, 709, 122, 124, 114, 148, 149, 123, 95 4, 953,1242 0, 193, 93 3, 936, 202, 0, 0, 103, 0, 0,1243 0, 0, 0, 9 18, 0, 0, 0, 0, 0, 88,1318 121, 709, 122, 124, 114, 148, 149, 123, 958, 957, 1319 0, 193, 937, 940, 202, 0, 0, 103, 0, 0, 1320 0, 0, 0, 921, 0, 0, 0, 0, 0, 88, 1244 1321 134, 126, 192, 152, 0, 157, 163, 158, 173, 179, 1245 1322 156, 689, 153, 162, 155, 170, 154, 788, 165, 164, 1246 1323 181, 161, 178, 172, 160, 175, 180, 174, 177, 166, 1247 171, 159, 100 3, 176, 1045, 1050, 1033, 0, 134, 134,1248 97 0, 938, 0, 0, 209, 219, 207, 217, 211, 0,1324 171, 159, 1007, 176, 1049, 1054, 1037, 0, 134, 134, 1325 974, 942, 0, 0, 209, 219, 207, 217, 211, 0, 1249 1326 0, 215, 243, 244, 213, 201, 650, 623, 624, 200, 1250 101 3, 0, 258, 259, 1014, 231, 225, 0, 324, 541,1327 1017, 0, 258, 259, 1018, 231, 225, 0, 324, 541, 1251 1328 0, 606, 310, 618, 186, 187, 189, 190, 188, 0, 1252 1329 308, 607, 0, 605, 610, 611, 613, 615, 625, 0, 1253 1330 628, 642, 644, 646, 648, 655, 0, 658, 661, 199, 1254 608, 0, 0, 93 2, 496, 0, 494, 26, 725, 0,1255 0, 0, 99 5, 0, 993, 467, 0, 0, 506, 717,1331 608, 0, 0, 936, 496, 0, 494, 26, 725, 0, 1332 0, 0, 999, 0, 997, 467, 0, 0, 506, 717, 1256 1333 0, 0, 0, 0, 0, 510, 0, 417, 422, 525, 1257 1334 421, 0, 542, 111, 0, 0, 0, 0, 88, 0, 1258 1335 659, 202, 337, 402, 0, 466, 466, 202, 0, 0, 1259 0, 0, 659, 538, 733, 192, 196, 196, 769, 9 59,1260 106 1, 476, 945, 202, 948, 950, 951, 0, 0, 88,1261 541, 167, 104, 0, 0, 812, 0, 106 4, 1063, 169,1336 0, 0, 659, 538, 733, 192, 196, 196, 769, 963, 1337 1065, 476, 949, 202, 952, 954, 955, 0, 0, 88, 1338 541, 167, 104, 0, 0, 812, 0, 1068, 1067, 169, 1262 1339 569, 826, 0, 0, 824, 0, 0, 0, 594, 0, 1263 1340 817, 657, 665, 667, 819, 664, 820, 666, 0, 0, 1264 0, 97 1, 135, 127, 192, 130, 132, 133, 0, 0,1265 0, 0, 0, 101 0, 691, 0, 0, 789, 709, 1007,1266 0, 105 1, 1043, 1030, 476, 476, 222, 0, 0, 0,1341 0, 975, 135, 127, 192, 130, 132, 133, 0, 0, 1342 0, 0, 0, 1014, 691, 0, 0, 789, 709, 1011, 1343 0, 1055, 1047, 1034, 476, 476, 222, 0, 0, 0, 1267 1344 254, 251, 0, 0, 0, 0, 0, 323, 326, 329, 1268 1345 328, 0, 0, 541, 618, 235, 187, 0, 0, 0, … … 1270 1347 223, 0, 186, 616, 632, 634, 633, 635, 630, 631, 1271 1348 627, 636, 637, 639, 641, 638, 640, 0, 0, 651, 1272 0, 652, 0, 653, 654, 0, 643, 100 1, 0, 0,1273 0, 493, 0, 707, 732, 0, 727, 0, 0, 99 1,1274 999, 0, 997, 0, 508, 0, 0, 507, 719, 267,1349 0, 652, 0, 653, 654, 0, 643, 1005, 0, 0, 1350 0, 493, 0, 707, 732, 0, 727, 0, 0, 995, 1351 1003, 0, 1001, 0, 508, 0, 0, 507, 719, 267, 1275 1352 268, 270, 0, 265, 0, 429, 0, 425, 545, 428, 1276 1353 544, 427, 511, 410, 510, 0, 0, 0, 0, 25, 1277 25, 549, 10 59, 0, 881, 225, 880, 657, 879, 0,1354 25, 549, 1063, 0, 884, 225, 883, 657, 882, 0, 1278 1355 0, 816, 0, 0, 0, 0, 660, 282, 0, 202, 1279 1356 278, 280, 0, 0, 0, 340, 0, 408, 405, 406, … … 1282 1359 677, 0, 0, 0, 0, 710, 198, 25, 0, 0, 1283 1360 192, 709, 714, 734, 740, 0, 760, 192, 715, 0, 1284 773, 770, 709, 0, 96 0, 0, 0, 0, 934, 949,1361 773, 770, 709, 0, 964, 0, 0, 0, 938, 953, 1285 1362 700, 0, 0, 767, 813, 814, 0, 0, 0, 0, 1286 0, 0, 0, 658, 909, 0, 907, 905, 0, 0, 1287 0, 0, 900, 0, 898, 896, 0, 1071, 0, 818, 1288 0, 202, 964, 0, 131, 0, 844, 822, 0, 0, 1289 0, 0, 0, 0, 0, 0, 88, 529, 825, 868, 1290 821, 823, 0, 871, 865, 870, 0, 0, 0, 0, 1291 699, 697, 698, 693, 690, 696, 804, 802, 0, 798, 1292 790, 787, 791, 1005, 0, 1004, 1053, 0, 1053, 0, 1293 1029, 0, 1042, 0, 220, 0, 0, 0, 0, 249, 1294 0, 328, 321, 0, 228, 227, 232, 226, 0, 187, 1295 609, 311, 309, 325, 322, 186, 612, 614, 617, 626, 1296 629, 645, 647, 649, 1000, 0, 0, 0, 460, 526, 1297 0, 500, 502, 534, 501, 495, 0, 731, 0, 992, 1298 994, 0, 996, 0, 0, 517, 512, 515, 0, 262, 1299 0, 0, 0, 0, 414, 418, 541, 434, 223, 435, 1300 229, 439, 437, 0, 438, 436, 0, 419, 439, 448, 1301 305, 0, 367, 0, 724, 0, 716, 0, 553, 0, 1302 0, 541, 0, 550, 558, 567, 568, 1060, 0, 863, 1303 0, 0, 0, 536, 659, 0, 283, 0, 0, 261, 1304 279, 353, 344, 345, 0, 348, 0, 351, 352, 354, 1305 355, 356, 341, 343, 361, 335, 357, 370, 338, 0, 1306 403, 0, 0, 451, 360, 472, 464, 469, 470, 473, 1307 474, 0, 0, 202, 477, 0, 672, 679, 0, 674, 1308 0, 0, 681, 0, 668, 535, 540, 721, 0, 0, 1309 0, 0, 0, 0, 0, 193, 742, 746, 743, 757, 1310 741, 751, 748, 735, 753, 745, 755, 758, 754, 756, 1311 747, 752, 744, 761, 709, 759, 0, 0, 0, 771, 1312 0, 774, 709, 772, 978, 0, 979, 1062, 941, 0, 1313 794, 583, 545, 584, 572, 580, 585, 0, 0, 0, 1314 0, 0, 0, 0, 0, 0, 0, 831, 0, 829, 1315 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1316 0, 921, 0, 919, 910, 913, 533, 911, 532, 531, 1317 843, 530, 912, 0, 0, 901, 904, 903, 902, 0, 1318 0, 597, 599, 0, 168, 0, 136, 202, 139, 141, 1319 142, 974, 192, 0, 0, 822, 869, 873, 867, 872, 1320 874, 875, 876, 877, 0, 859, 853, 0, 857, 1012, 1321 1011, 0, 0, 689, 0, 0, 796, 800, 0, 0, 1322 541, 0, 1020, 1019, 0, 1015, 1017, 1058, 1034, 1057, 1323 0, 1054, 1055, 1044, 0, 1040, 1048, 0, 253, 0, 1324 0, 0, 0, 327, 191, 239, 237, 238, 0, 0, 1325 0, 0, 458, 0, 659, 0, 0, 998, 526, 488, 1326 490, 492, 509, 518, 0, 504, 269, 273, 0, 271, 1327 541, 426, 0, 430, 411, 415, 542, 0, 432, 433, 1328 0, 0, 416, 431, 224, 230, 0, 726, 718, 0, 1329 554, 561, 557, 0, 0, 543, 562, 0, 552, 0, 1330 888, 0, 886, 889, 0, 0, 669, 537, 288, 289, 1331 0, 292, 0, 285, 287, 296, 0, 293, 0, 274, 1332 346, 349, 0, 0, 371, 240, 342, 407, 453, 0, 1333 0, 0, 0, 479, 485, 0, 483, 481, 682, 683, 1334 680, 593, 0, 676, 0, 678, 0, 670, 723, 25, 1335 0, 736, 0, 1069, 1067, 0, 749, 0, 0, 192, 1336 763, 762, 0, 0, 782, 0, 775, 768, 776, 961, 1337 0, 955, 942, 943, 695, 687, 0, 0, 0, 0, 1338 582, 842, 656, 836, 833, 834, 837, 840, 0, 832, 1339 835, 839, 838, 0, 827, 923, 0, 0, 924, 925, 1340 931, 922, 528, 930, 527, 926, 928, 927, 0, 914, 1341 908, 906, 899, 897, 0, 0, 1072, 0, 140, 975, 1342 976, 786, 0, 193, 0, 0, 0, 0, 848, 0, 1343 846, 878, 866, 0, 861, 0, 884, 0, 855, 882, 1344 885, 0, 0, 0, 0, 689, 688, 692, 0, 811, 1345 0, 805, 807, 797, 0, 799, 1006, 0, 0, 1008, 1346 1052, 0, 1035, 1041, 943, 1049, 943, 221, 0, 250, 1347 0, 247, 246, 541, 0, 0, 333, 233, 1002, 663, 1348 462, 461, 0, 0, 498, 0, 730, 0, 0, 510, 1349 392, 516, 0, 0, 0, 0, 0, 0, 191, 441, 1350 183, 184, 185, 443, 444, 446, 447, 445, 440, 442, 1351 312, 0, 0, 314, 316, 681, 318, 319, 320, 420, 1352 0, 555, 0, 0, 559, 551, 0, 563, 566, 888, 1353 893, 0, 891, 0, 864, 779, 0, 290, 0, 284, 1354 0, 240, 0, 281, 275, 392, 0, 358, 336, 392, 1355 0, 362, 392, 0, 452, 465, 471, 0, 0, 482, 1356 679, 0, 0, 720, 0, 737, 0, 0, 32, 33, 1357 91, 71, 94, 258, 259, 255, 257, 256, 231, 225, 1358 0, 0, 27, 63, 65, 62, 541, 28, 101, 658, 1359 0, 0, 764, 0, 783, 0, 784, 0, 0, 980, 1360 981, 0, 944, 939, 795, 0, 0, 573, 574, 581, 1361 570, 0, 587, 0, 0, 841, 830, 0, 929, 0, 1362 920, 0, 0, 0, 598, 600, 601, 595, 792, 977, 1363 972, 0, 0, 0, 849, 851, 850, 0, 0, 860, 1364 0, 854, 0, 0, 858, 0, 0, 703, 0, 705, 1365 694, 809, 0, 803, 808, 801, 541, 1018, 1016, 0, 1366 1056, 0, 1031, 1036, 1047, 1047, 0, 0, 330, 0, 1367 459, 0, 497, 535, 728, 491, 487, 0, 386, 0, 1368 373, 378, 0, 381, 374, 384, 375, 388, 376, 394, 1369 0, 377, 396, 662, 383, 505, 513, 272, 263, 0, 1370 236, 234, 0, 0, 313, 777, 556, 560, 564, 0, 1371 0, 887, 0, 0, 286, 390, 0, 298, 0, 299, 1372 300, 294, 0, 400, 401, 399, 0, 0, 241, 0, 1373 0, 359, 363, 0, 455, 486, 484, 671, 722, 0, 1374 31, 1066, 1068, 30, 1070, 66, 534, 67, 72, 1065, 1375 95, 98, 96, 102, 0, 0, 0, 0, 0, 0, 1376 0, 0, 0, 0, 0, 0, 0, 0, 0, 55, 1377 0, 0, 0, 29, 750, 192, 0, 785, 962, 0, 1378 0, 956, 0, 579, 576, 0, 0, 0, 0, 586, 1379 589, 591, 828, 916, 915, 603, 0, 0, 0, 0, 1380 0, 0, 0, 852, 847, 845, 862, 883, 856, 0, 1381 701, 704, 706, 806, 810, 1009, 0, 0, 1038, 0, 1382 0, 0, 0, 499, 0, 0, 519, 393, 387, 0, 1383 0, 0, 0, 382, 398, 394, 0, 0, 317, 315, 1384 565, 0, 892, 0, 778, 0, 297, 0, 0, 0, 1385 0, 295, 301, 347, 350, 372, 364, 366, 365, 305, 1386 454, 392, 0, 64, 64, 64, 0, 54, 60, 39, 1387 49, 51, 50, 52, 45, 40, 47, 46, 38, 48, 1388 34, 35, 36, 0, 0, 53, 56, 37, 0, 42, 1389 0, 41, 0, 780, 989, 957, 988, 963, 984, 987, 1390 986, 983, 982, 940, 578, 577, 575, 571, 588, 0, 1391 604, 602, 596, 793, 973, 192, 0, 702, 0, 1032, 1392 0, 1046, 0, 0, 0, 729, 0, 379, 380, 383, 1393 386, 0, 385, 389, 395, 391, 397, 514, 0, 0, 1394 890, 291, 302, 304, 303, 0, 74, 61, 75, 0, 1395 0, 0, 59, 57, 58, 44, 43, 781, 0, 0, 1396 917, 0, 1037, 1039, 245, 248, 331, 0, 387, 0, 1397 423, 0, 456, 72, 87, 76, 77, 80, 79, 68, 1398 0, 73, 958, 985, 815, 0, 489, 0, 0, 0, 1399 85, 0, 86, 70, 332, 424, 894, 84, 0, 78, 1400 81, 0, 83, 0, 895, 82 1363 0, 0, 0, 658, 912, 0, 910, 908, 0, 0, 1364 0, 0, 903, 0, 901, 899, 0, 1075, 0, 818, 1365 0, 202, 968, 0, 131, 0, 845, 822, 0, 0, 1366 0, 0, 0, 0, 0, 0, 0, 88, 529, 825, 1367 870, 821, 823, 0, 873, 867, 872, 0, 0, 0, 1368 0, 699, 697, 698, 693, 690, 696, 804, 802, 0, 1369 798, 790, 787, 791, 1009, 0, 1008, 1057, 0, 1057, 1370 0, 1033, 0, 1046, 0, 220, 0, 0, 0, 0, 1371 249, 0, 328, 321, 0, 228, 227, 232, 226, 0, 1372 187, 609, 311, 309, 325, 322, 186, 612, 614, 617, 1373 626, 629, 645, 647, 649, 1004, 0, 0, 0, 460, 1374 526, 0, 500, 502, 534, 501, 495, 0, 731, 0, 1375 996, 998, 0, 1000, 0, 0, 517, 512, 515, 0, 1376 262, 0, 0, 0, 0, 414, 418, 541, 434, 223, 1377 435, 229, 439, 437, 0, 438, 436, 0, 419, 439, 1378 448, 305, 0, 367, 0, 724, 0, 716, 0, 553, 1379 0, 0, 541, 0, 550, 558, 567, 568, 1064, 0, 1380 865, 0, 0, 0, 536, 659, 0, 283, 0, 0, 1381 261, 279, 353, 344, 345, 0, 348, 0, 351, 352, 1382 354, 355, 356, 341, 343, 361, 335, 357, 370, 338, 1383 0, 403, 0, 0, 451, 360, 472, 464, 469, 470, 1384 473, 474, 0, 0, 202, 477, 0, 672, 679, 0, 1385 674, 0, 0, 681, 0, 668, 535, 540, 721, 0, 1386 0, 0, 0, 0, 0, 0, 193, 742, 746, 743, 1387 757, 741, 751, 748, 735, 753, 745, 755, 758, 754, 1388 756, 747, 752, 744, 761, 709, 759, 0, 0, 0, 1389 771, 0, 774, 709, 772, 982, 0, 983, 1066, 945, 1390 0, 794, 583, 545, 584, 572, 580, 585, 0, 0, 1391 0, 0, 0, 0, 0, 0, 0, 0, 0, 831, 1392 0, 829, 0, 0, 0, 0, 0, 0, 0, 0, 1393 0, 0, 0, 0, 924, 0, 922, 913, 916, 533, 1394 914, 532, 531, 844, 530, 915, 0, 0, 904, 907, 1395 906, 905, 0, 0, 597, 599, 0, 168, 0, 136, 1396 202, 139, 141, 142, 978, 192, 0, 0, 822, 871, 1397 875, 869, 874, 876, 877, 878, 880, 879, 0, 861, 1398 855, 0, 859, 1016, 1015, 0, 0, 689, 0, 0, 1399 796, 800, 0, 0, 541, 0, 1024, 1023, 0, 1019, 1400 1021, 1062, 1038, 1061, 0, 1058, 1059, 1048, 0, 1044, 1401 1052, 0, 253, 0, 0, 0, 0, 327, 191, 239, 1402 237, 238, 0, 0, 0, 0, 458, 0, 659, 0, 1403 0, 1002, 526, 488, 490, 492, 509, 518, 0, 504, 1404 269, 273, 0, 271, 541, 426, 0, 430, 411, 415, 1405 542, 0, 432, 433, 0, 0, 416, 431, 224, 230, 1406 0, 726, 718, 0, 554, 561, 557, 0, 0, 543, 1407 562, 0, 552, 0, 891, 0, 889, 892, 0, 0, 1408 669, 537, 288, 289, 0, 292, 0, 285, 287, 296, 1409 0, 293, 0, 274, 346, 349, 0, 0, 371, 240, 1410 342, 407, 453, 0, 0, 0, 0, 479, 485, 0, 1411 483, 481, 682, 683, 680, 593, 0, 676, 0, 678, 1412 0, 670, 723, 25, 0, 736, 0, 1073, 1071, 0, 1413 749, 0, 0, 192, 763, 762, 0, 0, 782, 0, 1414 775, 768, 776, 965, 0, 959, 946, 947, 695, 687, 1415 0, 0, 0, 0, 582, 843, 656, 836, 833, 834, 1416 837, 841, 0, 832, 835, 840, 839, 838, 0, 827, 1417 926, 0, 0, 927, 928, 935, 925, 528, 934, 527, 1418 929, 932, 931, 930, 0, 917, 911, 909, 902, 900, 1419 0, 0, 1076, 0, 140, 979, 980, 786, 0, 193, 1420 0, 0, 0, 0, 0, 849, 0, 847, 881, 868, 1421 0, 863, 0, 887, 0, 857, 885, 888, 0, 0, 1422 0, 0, 689, 688, 692, 0, 811, 0, 805, 807, 1423 797, 0, 799, 1010, 0, 0, 1012, 1056, 0, 1039, 1424 1045, 947, 1053, 947, 221, 0, 250, 0, 247, 246, 1425 541, 0, 0, 333, 233, 1006, 663, 462, 461, 0, 1426 0, 498, 0, 730, 0, 0, 510, 392, 516, 0, 1427 0, 0, 0, 0, 0, 191, 441, 183, 184, 185, 1428 443, 444, 446, 447, 445, 440, 442, 312, 0, 0, 1429 314, 316, 681, 318, 319, 320, 420, 0, 555, 0, 1430 0, 559, 551, 0, 563, 566, 891, 896, 0, 894, 1431 0, 866, 779, 0, 290, 0, 284, 0, 240, 0, 1432 281, 275, 392, 0, 358, 336, 392, 0, 362, 392, 1433 0, 452, 465, 471, 0, 0, 482, 679, 0, 0, 1434 720, 0, 737, 0, 0, 32, 33, 91, 71, 94, 1435 258, 259, 255, 257, 256, 231, 225, 0, 0, 27, 1436 63, 65, 62, 541, 28, 101, 658, 0, 0, 764, 1437 0, 783, 0, 784, 0, 0, 984, 985, 0, 948, 1438 943, 795, 0, 0, 573, 574, 581, 570, 0, 587, 1439 0, 0, 842, 830, 0, 933, 0, 923, 0, 0, 1440 0, 598, 600, 601, 595, 792, 981, 976, 0, 0, 1441 0, 850, 853, 852, 851, 0, 0, 862, 0, 856, 1442 0, 0, 860, 0, 0, 703, 0, 705, 694, 809, 1443 0, 803, 808, 801, 541, 1022, 1020, 0, 1060, 0, 1444 1035, 1040, 1051, 1051, 0, 0, 330, 0, 459, 0, 1445 497, 535, 728, 491, 487, 0, 386, 0, 373, 378, 1446 0, 381, 374, 384, 375, 388, 376, 394, 0, 377, 1447 396, 662, 383, 505, 513, 272, 263, 0, 236, 234, 1448 0, 0, 313, 777, 556, 560, 564, 0, 0, 890, 1449 0, 0, 286, 390, 0, 298, 0, 299, 300, 294, 1450 0, 400, 401, 399, 0, 0, 241, 0, 0, 359, 1451 363, 0, 455, 486, 484, 671, 722, 0, 31, 1070, 1452 1072, 30, 1074, 66, 534, 67, 72, 1069, 95, 98, 1453 96, 102, 0, 0, 0, 0, 0, 0, 0, 0, 1454 0, 0, 0, 0, 0, 0, 0, 55, 0, 0, 1455 0, 29, 750, 192, 0, 785, 966, 0, 0, 960, 1456 0, 579, 576, 0, 0, 0, 0, 586, 589, 591, 1457 828, 919, 918, 603, 0, 0, 0, 0, 0, 0, 1458 0, 854, 848, 846, 864, 886, 858, 0, 701, 704, 1459 706, 806, 810, 1013, 0, 0, 1042, 0, 0, 0, 1460 0, 499, 0, 0, 519, 393, 387, 0, 0, 0, 1461 0, 382, 398, 394, 0, 0, 317, 315, 565, 0, 1462 895, 0, 778, 0, 297, 0, 0, 0, 0, 295, 1463 301, 347, 350, 372, 364, 366, 365, 305, 454, 392, 1464 0, 64, 64, 64, 0, 54, 60, 39, 49, 51, 1465 50, 52, 45, 40, 47, 46, 38, 48, 34, 35, 1466 36, 0, 0, 53, 56, 37, 0, 42, 0, 41, 1467 0, 780, 993, 961, 992, 967, 988, 991, 990, 987, 1468 986, 944, 578, 577, 575, 571, 588, 0, 604, 602, 1469 596, 793, 977, 192, 0, 702, 0, 1036, 0, 1050, 1470 0, 0, 0, 729, 0, 379, 380, 383, 386, 0, 1471 385, 389, 395, 391, 397, 514, 0, 0, 893, 291, 1472 302, 304, 303, 0, 74, 61, 75, 0, 0, 0, 1473 59, 57, 58, 44, 43, 781, 0, 0, 920, 0, 1474 1041, 1043, 245, 248, 331, 0, 387, 0, 423, 0, 1475 456, 72, 87, 76, 77, 80, 79, 68, 0, 73, 1476 962, 989, 815, 0, 489, 0, 0, 0, 85, 0, 1477 86, 70, 332, 424, 897, 84, 0, 78, 81, 0, 1478 83, 0, 898, 82 1401 1479 }; 1402 1480 … … 1404 1482 static const yytype_int16 yypgoto[] = 1405 1483 { 1406 -14 28, -1428, -1428, 921, -1428, 1412, 477, -1428, -1428, -1428,1407 -14 28, -1428, -1428, -1428, -1428, -1428, -130, -1428, -1428, -1428,1408 -14 28, -1428, -1428, -1428, -725, -1428, -258, -1428, -11, -1428,1409 -14 28, -1428, -1428, -1428, -1428, -1428, -1428, 1369, 823, -1428,1410 -14 28, -1428, -95, 691, -1428, -1428, -1428, 549, -1428, -84,1411 - 896, -636, -1428, -1428, 457, 461, -45, 63, -1428, 583,1412 -2 08, -65, -1428, 1456, -1428, -1428, -1428, -1428, -1428, -1428,1413 1130, -1428, -189, -186, 1058, -441, -187, -1428, -1428, -1428,1414 203, -1428, -1428, -1428, 204, -33, -1428, -1428, -1428, -1428,1415 -14 28, -1428, -1428, 753, -1428, 251, -1428, -1428, -1428, 958,1416 -14 28, -1428, -1428, 212, -1428, -1428, 207, -1428, 40, -1428,1417 -14 28, -967, 1474, -1428, 1068, 479, -1428, 57, 59, -1428,1418 12 43, -1428, -1428, 1094, -608, -1428, -1428, -1428, -1428, -1428,1419 -14 28, -1428, -1428, -1428, 709, -1428, -1428, -1428, 440, -1428,1420 -14 28, -1428, -1428, -965, -266, -1428, -1428, -1184, -1150, -1427,1421 -11 69, -1320, -1428, -63, -1130, -60, -1428, -1428, 83, -1428,1422 - 64, -1428, -1428, -1428, -1428, -1428, 712, -1428, -1428, -1428,1423 -14 28, -427, -1428, -1428, 1009, -251, -1428, 786, -1428, 497,1424 - 281, -1428, 499, -1428, -1428, -1428, -1428, -1428, -1428, -1428,1425 -14 28, -1428, -1428, -1428, 528, -1428, -1428, -1428, -28, -1428,1426 -14 28, 448, -1428, 8, -1428, -1428, -1428, 708, -1428, 235,1427 -14 28, -1428, -185, 295, -1428, -1428, 1056, -1428, -1428, -930,1428 -14 28, -1428, -1428, -1428, -274, -466, -1428, -1428, -48, 531,1429 -14 28, 1345, -1428, 2073, -449, 637, -1428, -1428, -826, -1428,1430 -5 10, -1428, -455, -287, -291, -1428, 970, -1428, -1428, -262,1431 -28 9, -1428, -1428, 502, -1428, -1428, 969, -1428, -1428, -1428,1432 -14 28, 14, 5, 182, -1428, 429, -568, -1428, -1428, 17,1433 -14 28, -245, 194, 978, -1428, -1428, -1428, -1428, -1428, 12,1434 -14 28, -1428, 250, -78, 1095, -1428, -1428, -145, 1097, -1428,1435 12 77, -1428, 1096, 1098, 1100, -1428, -1428, -1428, -1428, -1428,1436 1 667, -791, -146, -166, 784, -37, -958, -1336, -1428, -1428,1437 -2 12, -1428, -46, 298, -1428, -1428, -1428, 741, 742, -514,1438 7 48, -1428, 1233, -376, -371, -863, -1428, -1428, -1428, -1428,1439 -8 28, -825, -1428, -1428, -1428, -1428, -107, -1428, 372, -1428,1440 -14 28, 991, -1428, -81, -694, -119, 1230, -1428, -1428, -1428,1441 -14 28, -1428, -1428, -1428, 994, -1428, -1428, -1428, 379, -1428,1442 - 504, -1428, -1428, -1428, -1428, -1428, -1428, 1002, -1428, -1428,1443 11 78, -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428, -1428,1444 -14 28, 181, -1093, -1428, 1005, -1428, -3, -1428, -1428, 947,1445 -1 49, -1428, 1011, -1428, -1428, -1428, 449, 687, 974, 1016,1446 -14 28, -1428, 223, 1017, -1428, -1428, 1024, -1428, -1428, -13,1447 1 213, 964, 655, -260, 656, 219, -871, -959, -861, -1428,1448 1 55, -1428, 1038, -1428, 690, 1047, -1428, 689, 1049, -1428,1449 -14 28, -1428, -1428, 467, 394, -1428, -1428, -1428, -1428, -1428,1450 -14 28, -1428, -1428, -495, -1428, -1428, -1428, 1273, -1428, -1428,1451 15 54, -1428, -1428, -1428, -1428, -1428, 728, -1428, -1428, -1428,1452 -14 28, -1428, -1428, -1428, -1428, -1428, -1428, -1037, -1428, -76,1453 -14 28, -1412, -1428, 1330, 1148, -1428, -1428, 904, -476, -1428,1454 10 59, -1428, -1428, -1428, -1428, -1428, -1428, 982, 923, 434,1455 4 36, -1428, -1428, 1598, -134, -1428, -1428, -1428, -1428, -1428,1456 -14 28, -1428, -1428, -1428, -1428, -131, -1428, -1428, -1428, -1428,1457 2 32, -1428, -1428, -1428, 967, -1428, 435, 453, -1428, -1428,1458 -14 28, -1428, -1428, 5411484 -1417, -1417, -1417, 1095, -1417, 1394, 642, -1417, -1417, -1417, 1485 -1417, -1417, -1417, -1417, -1417, -1417, -178, -1417, -1417, -1417, 1486 -1417, -1417, -1417, -1417, -769, -1417, -285, -1417, -11, -1417, 1487 -1417, -1417, -1417, -1417, -1417, -1417, -1417, 1348, 798, -1417, 1488 -1417, -1417, 152, 655, -1417, -1417, -1417, 527, -1417, -85, 1489 -906, -632, -1417, -1417, 435, 438, -42, 57, -1417, 544, 1490 -215, -74, -1417, 1431, -1417, -1417, -1417, -1417, -1417, -1417, 1491 866, -1417, -203, -186, 1042, -432, -180, -1417, -1417, -1417, 1492 177, -1417, -1417, -1417, 172, -41, -1417, -1417, -1417, -1417, 1493 -1417, -1417, -1417, 739, -1417, 225, -1417, -1417, -1417, 941, 1494 -1417, -1417, -1417, 178, -1417, -1417, 182, -1417, 11, -1417, 1495 -1417, -980, 1453, -1417, 1048, 456, -1417, 29, 34, -1417, 1496 1231, -1417, -1417, 1076, -626, -1417, -1417, -1417, -1417, -1417, 1497 -1417, -1417, -1417, -1417, 687, -1417, -1417, -1417, 422, -1417, 1498 -1417, -1417, -1417, -967, -266, -1417, -1417, -1187, -1166, -1186, 1499 -1193, -1135, -1417, -92, -1160, -89, -1417, -1417, 53, -1417, 1500 -86, -1417, -1417, -1417, -1417, -1417, 697, -1417, -1417, -1417, 1501 -1417, -416, -1417, -1417, 1003, -249, -1417, 762, -1417, 479, 1502 -576, -1417, 484, -1417, -1417, -1417, -1417, -1417, -1417, -1417, 1503 -1417, -1417, -1417, -1417, 516, -1417, -1417, -1417, -20, -1417, 1504 -1417, 434, -1417, 9, -1417, -1417, -1417, 702, -1417, 212, 1505 -1417, -1417, -197, 284, -1417, -1417, 1053, -1417, -1417, -931, 1506 -1417, -1417, -1417, -1417, -281, -467, -1417, -1417, -63, 517, 1507 -1417, 1225, -1417, 2143, -451, 621, -1417, -1417, -815, -1417, 1508 -531, -1417, -456, -286, -293, -1417, 964, -1417, -1417, -252, 1509 -282, -1417, -1417, 491, -1417, -1417, 960, -1417, -1417, -1417, 1510 -1417, -3, -9, 163, -1417, 413, -577, -1417, -1417, 0, 1511 -1417, -270, 179, 967, -1417, -1417, -1417, -1417, -1417, -7, 1512 -1417, -1417, 339, -30, 1085, -1417, -1417, -78, 1087, -1417, 1513 1265, -1417, 1086, 1081, 1089, -1417, -1417, -1417, -1417, -1417, 1514 1819, -794, -83, -166, 772, -69, -995, -1108, -1417, -1417, 1515 -204, -1417, -46, 100, -1417, -1417, -1417, 729, 731, -514, 1516 733, -1417, 1241, -367, -364, -861, -1417, -1417, -1417, -1417, 1517 -832, -838, -1417, -1417, -1417, -1417, -98, -1417, 295, -1417, 1518 -1417, 980, -1417, -77, -696, -104, 1242, -1417, -1417, -1417, 1519 -1417, -1417, -1417, -1417, 983, -1417, -1417, -1417, 326, -1417, 1520 -496, -1417, -1417, -1417, -1417, -1417, -1417, 986, -1417, -1417, 1521 1154, -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1417, 1522 -1417, 164, -1089, -1417, 989, -1417, -22, -1417, -1417, 937, 1523 -126, -1417, 993, -1417, -1417, -1417, 427, 675, -534, 1000, 1524 -1417, -1417, 183, 1007, -1417, -1417, 1011, -1417, -1417, -12, 1525 1180, 942, 626, -239, 624, 192, -889, -965, -860, -1417, 1526 120, -1417, 1014, -1417, 661, 1016, -1417, 672, 1023, -1417, 1527 -1417, -1417, -1417, 440, 397, -1417, -1417, -1417, -1417, -1417, 1528 -1417, -1417, -1417, -404, -1417, -1417, -1417, 1253, -1417, -1417, 1529 1533, -1417, -1417, -1417, -1417, -1417, 720, -1417, -1417, -1417, 1530 -1417, -1417, -1417, -1417, -1417, -1417, -1417, -1013, -1417, -107, 1531 -1417, -1416, -1417, 1310, 1128, -1417, -1417, 895, -482, -1417, 1532 1037, -1417, -1417, -1417, -1417, -1417, -1417, 971, 907, 423, 1533 420, -1417, -1417, 1587, -136, -1417, -1417, -1417, -1417, -1417, 1534 -1417, -1417, -1417, -1417, -1417, -130, -1417, -1417, -1417, -1417, 1535 214, -1417, -1417, -1417, 961, -1417, 421, 505, -1417, -1417, 1536 -1417, -1417, -1417, 531 1459 1537 }; 1460 1538 … … 1463 1541 { 1464 1542 -1, 1, 13, 14, 15, 16, 46, 17, 18, 33, 1465 279, 131 0, 1311, 1503, 1615, 1597, 1312, 1678, 1313, 1593,1466 1 594, 1314, 1595, 1315, 1679, 1705, 1706, 1707, 340, 1317,1467 13 18, 1482, 341, 51, 52, 99, 100, 101, 170, 171,1468 373, 374, 375, 371, 372, 91 6, 917, 918, 102, 172,1469 173, 240, 12 29, 1230, 241, 975, 174, 104, 559, 1089,1543 279, 1317, 1318, 1511, 1623, 1605, 1319, 1686, 1320, 1601, 1544 1602, 1321, 1603, 1322, 1687, 1713, 1714, 1715, 340, 1324, 1545 1325, 1490, 341, 51, 52, 99, 100, 101, 170, 171, 1546 373, 374, 375, 371, 372, 919, 920, 921, 102, 172, 1547 173, 240, 1236, 1237, 241, 979, 174, 104, 559, 1093, 1470 1548 242, 19, 20, 44, 68, 67, 70, 72, 71, 69, 1471 214, 215, 243, 244, 67 6, 415, 245, 246, 417, 978,1472 128 1, 221, 222, 223, 401, 247, 248, 106, 311, 107,1473 292, 293, 479, 480, 998, 999, 769, 518, 519, 520,1474 521, 76 7, 1042, 1043, 1443, 1046, 1047, 1271, 1446, 1581,1475 15 82, 732, 733, 249, 250, 734, 1242, 1243, 1244, 251,1476 406, 252, 68 4, 407, 408, 409, 1204, 1205, 108, 109,1477 105 3, 523, 524, 525, 782, 1275, 1276, 785, 786, 795,1478 78 7, 1461, 1462, 735, 110, 1055, 1279, 1409, 1410, 1411,1479 14 12, 1413, 1414, 1415, 1416, 1417, 1418, 1419, 1420, 1421,1480 14 22, 1456, 111, 526, 313, 528, 529, 112, 722, 493,1481 494, 295, 296, 73 6, 297, 298, 486, 487, 1002, 737,1482 10 08, 1238, 738, 739, 113, 114, 1060, 793, 1282, 1591,1483 115, 272, 121 2, 697, 698, 116, 117, 1061, 286, 796,1484 79 7, 798, 799, 53, 119, 801, 535, 536, 1065, 1066,1485 120, 12 19, 989, 990, 121, 275, 276, 459, 1213, 700,1486 122, 288, 122 2, 476, 800, 495, 995, 1566, 716, 717,1487 122 0, 253, 539, 124, 861, 1133, 1134, 628, 900, 901,1488 16 34, 898, 125, 514, 126, 323, 127, 501, 489, 128,1489 129, 130, 75 2, 753, 1028, 754, 175, 586, 1517, 1108,1490 13 37, 1338, 1635, 1514, 864, 865, 866, 1110, 1341, 1342,1491 13 43, 1344, 1070, 176, 606, 1528, 912, 1145, 1355, 1356,1549 214, 215, 243, 244, 677, 415, 245, 246, 417, 982, 1550 1288, 221, 222, 223, 401, 247, 248, 106, 311, 107, 1551 292, 293, 479, 480, 1002, 1003, 770, 518, 519, 520, 1552 521, 768, 1046, 1047, 1451, 1050, 1051, 1278, 1454, 1589, 1553 1590, 733, 734, 249, 250, 735, 1249, 1250, 1251, 251, 1554 406, 252, 685, 407, 408, 409, 1211, 1212, 108, 109, 1555 1057, 523, 524, 525, 783, 1282, 1283, 786, 787, 796, 1556 788, 1469, 1470, 736, 110, 1059, 1286, 1417, 1418, 1419, 1557 1420, 1421, 1422, 1423, 1424, 1425, 1426, 1427, 1428, 1429, 1558 1430, 1464, 111, 526, 313, 528, 529, 112, 723, 493, 1559 494, 295, 296, 737, 297, 298, 486, 487, 1006, 738, 1560 1012, 1245, 739, 740, 113, 114, 1064, 794, 1289, 1599, 1561 115, 272, 1219, 698, 699, 116, 117, 1065, 286, 797, 1562 798, 799, 800, 53, 119, 802, 535, 536, 1069, 1070, 1563 120, 1226, 993, 994, 121, 275, 276, 459, 1220, 701, 1564 122, 288, 1229, 476, 801, 495, 999, 1574, 717, 718, 1565 1227, 253, 539, 124, 862, 1138, 1139, 629, 903, 904, 1566 1642, 901, 125, 514, 126, 323, 127, 501, 489, 128, 1567 129, 130, 753, 754, 1032, 755, 175, 586, 1525, 1112, 1568 1344, 1345, 1643, 1522, 865, 866, 867, 1114, 1348, 1349, 1569 1350, 1351, 1074, 176, 606, 1536, 915, 1151, 1362, 1363, 1492 1570 254, 255, 256, 257, 258, 425, 428, 259, 260, 447, 1493 1571 261, 448, 262, 263, 264, 265, 266, 450, 452, 455, 1494 267, 111 1, 1112, 268, 515, 354, 1424, 1210, 364, 365,1495 366, 367, 177, 178, 320, 547, 548, 549, 550, 12 47,1496 542, 543, 12 48, 179, 180, 384, 643, 942, 181, 644,1497 64 5, 581, 943, 1175, 1176, 707, 324, 325, 182, 134,1572 267, 1115, 1116, 268, 515, 354, 1432, 1217, 364, 365, 1573 366, 367, 177, 178, 320, 547, 548, 549, 550, 1254, 1574 542, 543, 1255, 179, 180, 384, 644, 946, 181, 645, 1575 646, 581, 947, 1182, 1183, 708, 324, 325, 182, 134, 1498 1576 135, 561, 136, 280, 465, 326, 562, 563, 137, 138, 1499 564, 83 0, 139, 565, 566, 1090, 343, 183, 184, 570,1500 571, 85 0, 851, 141, 572, 852, 1097, 185, 186, 386,1501 387, 187, 15 29, 1106, 388, 651, 948, 1184, 648, 944,1502 118 0, 1181, 1182, 188, 189, 190, 191, 192, 368, 629,1503 63 0, 631, 193, 587, 1347, 878, 879, 1113, 902, 194,1504 92 3, 1159, 1160, 195, 1167, 1373, 196, 1163, 1370, 197,1505 63 2, 633, 634, 635, 1168, 1169, 1031, 1032, 1033, 1261,1506 126 2, 1573, 198, 603, 604, 199, 595, 596, 200, 1351,1507 16 39, 352, 892, 893, 377, 21, 331, 152, 22, 66,1508 578, 15 12, 1103, 1333, 153, 332, 333, 334, 54, 329,1509 55, 133 1, 1688, 575, 1625, 23, 56, 24, 65, 612,1510 613, 153 0, 1150, 1360, 855, 1101, 1329, 1626, 1627, 1628,1511 16 29, 530, 145, 283, 284, 146, 471, 472, 270, 695,1512 201, 390, 9 49, 654, 1389, 202, 638, 271, 954, 955,1513 9 56, 25, 26, 27, 28, 29, 658, 1547, 207, 959,1514 1 392, 1393, 660, 1650, 1194, 30, 31, 657, 205, 662,1515 15 48, 1196, 392, 656, 960, 961, 962, 203, 154, 576,1516 349, 10 86, 1592, 6081577 564, 831, 139, 565, 566, 1094, 343, 183, 184, 570, 1578 571, 851, 852, 141, 572, 853, 1101, 185, 186, 386, 1579 387, 187, 1537, 1110, 388, 652, 952, 1191, 649, 948, 1580 1187, 1188, 1189, 188, 189, 190, 191, 192, 368, 630, 1581 631, 632, 193, 587, 1354, 880, 881, 1117, 905, 194, 1582 926, 1166, 1167, 195, 1174, 1381, 196, 1170, 1378, 197, 1583 633, 634, 635, 636, 1175, 1176, 1035, 1036, 1037, 1268, 1584 1269, 1581, 198, 603, 604, 199, 595, 596, 200, 1358, 1585 1647, 352, 895, 896, 377, 21, 331, 152, 22, 66, 1586 578, 1520, 1107, 1340, 153, 332, 333, 334, 54, 329, 1587 55, 1338, 1696, 575, 1633, 23, 56, 24, 65, 612, 1588 613, 1538, 1156, 1367, 856, 1105, 1336, 1634, 1635, 1636, 1589 1637, 530, 145, 283, 284, 146, 471, 472, 270, 696, 1590 201, 390, 953, 655, 1397, 202, 639, 271, 958, 959, 1591 960, 25, 26, 27, 28, 29, 659, 1555, 207, 963, 1592 1400, 1401, 661, 1658, 1201, 30, 31, 658, 205, 663, 1593 1556, 1203, 392, 657, 964, 965, 966, 203, 154, 576, 1594 349, 1090, 1600, 608 1517 1595 }; 1518 1596 … … 1522 1600 static const yytype_int16 yytable[] = 1523 1601 { 1524 43, 398, 363, 488, 702, 491, 131, 103, 641, 290, 1525 701, 150, 404, 642, 477, 355, 357, 327, 951, 105, 1526 335, 742, 362, 336, 105, 481, 1151, 1003, 723, 105, 1527 105, 1105, 490, 400, 328, 553, 269, 813, 911, 143, 1528 1235, 98, 1237, 485, 312, 509, 98, 363, 414, 142, 1529 416, 98, 98, 1214, 131, 103, 729, 1128, 1129, 951, 1530 118, 105, 239, 1330, 1164, 973, 849, 105, 724, 429, 1531 1260, 105, 430, 432, 545, 1170, 1170, 1114, 1115, 1116, 1532 1177, 897, 314, 98, 1121, 1381, -182, 143, 376, 98, 1533 907, 1452, 418, 98, 421, 1457, 1630, 142, 1463, 212, 1534 1023, 1448, -525, 219, 1327, 668, 808, 1007, 118, 810, 1535 277, -195, 460, 431, 291, 933, 1172, 1459, 522, 151, 1536 1447, 468, 637, 1586, 492, 711, 492, 758, 803, 32, 1537 1657, 4, -195, 4, 937, 1263, 1272, 1372, 557, 105, 1538 1449, 903, 4, 47, 909, -412, 4, -413, 4, 4, 1539 1657, 913, 4, 34, 492, 4, 4, 4, 4, 508, 1540 558, 98, 934, 934, 414, 981, 416, 414, 703, 416, 1541 704, 8, -195, 8, 1026, 4, 1362, 1024, 1123, 1138, 1542 35, 433, 8, 269, 829, -412, 8, -413, 8, 8, 1543 1188, 665, 8, 1322, 1198, 8, 8, 8, 8, 335, 1544 1200, 1188, 336, 1224, 594, 1288, 1260, 602, 418, 1367, 1545 -732, 418, 681, 1382, 1401, 8, 414, 1433, 416, 913, 1546 1518, 1699, 346, 49, 573, 1579, 413, 646, 765, 957, 1547 555, 679, 432, -542, 508, 508, 508, 977, 1658, 685, 1548 474, 376, 685, 1672, 475, 432, 517, 227, 228, -476, 1549 1561, -542, 534, 227, 228, 1301, 783, 1296, 1658, 1460, 1550 418, 474, -766, 1268, 991, 475, -266, 503, 464, 1328, 1551 -339, 385, 213, 516, 1448, 302, 220, 1630, 1206, 614, 1552 310, 652, 546, 98, 647, 516, 422, 531, 532, 302, 1553 376, 1544, 105, 1447, -525, 862, 1005, 669, 809, -525, 1554 1348, 811, -766, -195, 1441, 12, -195, 12, 727, 412, 1555 730, 728, 1380, 1449, 98, 862, 12, 48, 148, -412, 1556 12, -413, 12, 12, 863, 1027, 12, 1345, 1335, 12, 1557 12, 12, 12, 904, 73, 756, 910, 42, 640, 577, 1558 433, 105, 413, 914, 863, 413, 1096, 74, 607, 12, 1559 132, 105, 741, 688, 935, 936, 649, 982, 92, 93, 1560 927, 95, 269, 98, 973, 42, 1122, 1580, 506, 1025, 1561 1124, 1139, 1127, 98, 1241, 1130, 574, 1336, 75, 1136, 1562 766, -197, 1189, 269, 269, -542, 1199, 318, 1448, 274, 1563 1661, 281, 1201, 1208, 413, 1225, 1561, 1289, 132, 302, 1564 958, 1368, 659, 661, 1335, 1383, 1402, 1675, 1448, 1434, 1565 239, 1504, 1519, 1700, 42, 1269, 89, 235, 745, 747, 1566 42, 236, 287, 42, 133, 204, 105, 236, 282, 4, 1567 488, 140, 491, 1352, 319, 89, -766, 230, 877, 891, 1568 894, 97, 843, 506, 506, 506, 144, 639, 699, 905, 1569 1009, 967, 481, 1336, 517, 970, 971, 1013, 969, 490, 1570 97, 1563, 105, 105, 731, 853, 462, 463, 4, 8, 1571 485, 1553, 133, 1632, 508, 285, 818, 919, 1523, 140, 1572 920, 1260, 1353, 1352, 98, 98, 726, 610, 234, 976, 1573 751, 730, 430, 1587, 144, 1588, 4, 363, 4, 1044, 1574 429, 363, 363, 430, 42, 147, 4, 206, 8, 1513, 1575 64, 1170, -466, 533, 828, 824, 235, 285, 105, 483, 1576 236, 794, 846, 783, 347, 76, 1513, 105, 702, 1223, 1577 348, 742, 1353, 741, 701, 742, 8, 4, 8, 4, 1578 98, 42, 11, 98, 431, -89, 8, 838, -89, 98, 1579 498, 499, 951, 147, 1015, 1014, 484, 833, 105, 105, 1580 236, 399, 1292, 1072, 833, 1074, 1234, 105, 105, 58, 1581 729, 59, 1533, 498, 499, 699, 1354, 8, 42, 8, 1582 98, 98, 434, 435, 436, 437, 438, 439, 440, 98, 1583 98, 47, 105, 556, 557, 699, -1022, 344, -1022, 496, 1584 1659, 1563, -90, 12, 301, -90, 105, 1563, 4, 1151, 1585 500, 227, 228, 1673, 98, 1674, 558, 302, 497, 4, 1586 1659, 4, 310, 825, 89, -236, -236, 939, 98, 269, 1587 151, 4, 302, 500, 426, 427, 945, 1011, -541, -935, 1588 89, 1105, 12, 950, 302, 1478, 1479, 1366, 8, 97, 1589 -1022, -61, -1022, 895, 9, 230, 1012, 92, 93, 8, 1590 95, 8, 906, 1006, 42, 97, 1048, 974, 11, -541, 1591 12, 8, 12, 357, 1080, 686, 315, 42, 687, 294, 1592 12, 155, 60, 506, 950, 930, 931, 932, 321, -1023, 1593 105, -1023, 703, -1022, 704, -1022, 569, 1215, 1095, 1394, 1594 -93, 1395, 988, -93, 492, 1093, 234, 1325, 9, 411, 1595 1000, 12, 98, 12, 316, 92, 93, 230, 95, -510, 1596 317, 304, 42, -510, 1119, 1091, 305, 516, 322, 306, 1597 453, 454, 441, 442, 443, 444, 60, 1131, 534, -92, 1598 11, 330, 1471, 82, 83, 1098, 1571, 9, 412, 1151, 1599 -137, 9, 57, 1407, 594, 337, 1045, 62, 307, 63, 1600 602, 1453, 1454, 1455, 369, 48, 445, 446, 234, 991, 1601 1071, 546, 338, 546, 1158, 60, 1376, 92, 93, 60, 1602 95, 235, 12, 919, 42, 236, 920, 1378, 508, 1539, 1603 11, -276, 105, 12, 11, 12, 350, 1241, 351, 1622, 1604 358, 641, 674, 675, -946, 12, 642, 36, 37, 38, 1605 39, 89, 1021, 640, 98, 40, 862, 359, 1233, 370, 1606 416, 41, 727, 42, 730, 728, 105, 385, 92, 93, 1607 389, 95, 391, 11, 1117, 42, 97, 11, 11, -277, 1608 414, 393, 416, 105, 396, 863, 411, -947, 98, 105, 1609 105, 105, 105, 862, 105, 412, 105, 105, 756, 1475, 1610 569, 848, 741, 1483, 420, 98, 741, 1173, 1174, 1680, 1611 1681, 98, 98, 98, 98, -223, 98, 1152, 98, 98, 1612 424, -1022, 863, -1022, 418, 208, 209, 1161, 449, 105, 1613 451, 82, 83, 1038, 1039, 89, 414, 457, 416, 394, 1614 395, 458, 1146, 105, 105, 5, -1022, 6, -1022, 560, 1615 567, 98, 92, 93, 7, 95, 512, 282, 470, 42, 1616 97, 473, 639, 1040, 482, 98, 98, 36, 37, 38, 1617 39, 1041, 513, 227, 228, 40, 602, 1120, 527, 9, 1618 418, 41, 551, 554, 556, 569, 702, 516, 588, 1426, 1619 105, 1135, 701, -97, -97, 42, -97, 653, 616, 663, 1620 -97, 1203, 664, -97, 9, 666, 667, 60, 672, 269, 1621 -100, -100, 699, -100, 877, 673, -234, -100, 731, -229, 1622 -100, 678, 680, -224, 742, 1153, 210, 211, 694, 891, 1623 696, 683, 10, 706, 708, 239, 1228, 506, 1294, 239, 1624 726, 273, 1044, 713, 641, 278, 1364, 714, 715, 642, 1625 718, 289, 720, 751, 1429, 227, 228, 721, 413, 760, 1626 761, -99, -99, 1476, -99, 11, 763, 1476, -99, 304, 1627 764, -99, 768, 784, 305, -138, 788, 378, 1431, 230, 1628 730, 430, 789, 105, 1152, 791, 792, 379, 805, 380, 1629 11, 794, 381, 382, 92, 93, 105, 95, 802, 807, 1630 363, 42, 815, 294, 231, 98, 307, 821, 819, 820, 1631 847, 383, 546, 854, 1316, 77, 607, 856, 98, 345, 1632 232, 233, 741, 858, 92, 93, 859, 95, 860, 360, 1633 234, 308, 915, 105, 400, 924, 699, 922, 921, 92, 1634 93, 941, 95, 235, 742, 928, 42, 236, 237, 947, 1635 703, 748, 704, 965, 966, 98, 238, 968, 226, 972, 1636 105, 230, 92, 93, 105, 95, 227, 228, 749, 42, 1637 440, 640, -230, 699, 1481, 93, 980, 95, 159, 983, 1638 984, 42, 98, -197, 105, 993, 98, 992, 161, 162, 1639 994, 163, 825, 1006, 164, 997, 1007, 822, 166, 823, 1640 1010, -449, 232, 233, 92, 93, 98, 95, 1016, 1034, 1641 1050, 42, 234, 1165, 1051, 1052, 1386, 950, 1054, 1058, 1642 1059, 92, 93, 1423, 95, 235, 1062, 1064, 42, 236, 1643 1227, 1068, 1076, 1079, 1082, 1087, 461, 89, 216, 217, 1644 218, 466, 224, 307, 469, 1099, 1100, 988, 1102, 1109, 1645 1107, 478, 1144, 1118, 92, 93, 1430, 95, 1158, 1365, 1646 1126, 42, 97, 1149, 1187, 502, 304, 1190, 511, 1191, 1647 1192, 305, 230, 1423, 1361, 1193, 1197, 1217, 1423, 1195, 1648 639, 1202, 1423, 1207, 379, 1423, 380, 1216, 991, 381, 1649 382, 1218, 1226, 1250, 1071, 1723, 1252, 231, 1280, 1283, 1650 1267, 1045, 750, 307, 583, 584, 1266, 585, 383, 1270, 1651 1287, 1290, 1291, 232, 233, 1323, 597, 1332, 605, 1340, 1652 1359, 105, 1349, 234, 1357, 105, 1358, 1363, 1263, 609, 1653 1372, 611, 92, 93, 1375, 95, 235, 1384, 1391, 42, 1654 236, 237, 105, 98, 1397, 1396, 1071, 98, 1398, 238, 1655 1399, 655, 230, 1403, 305, 1432, 1437, 1088, 1439, 105, 1656 -524, 1440, 1442, 1464, 98, 1465, 1474, 379, 1477, 380, 1657 1480, 1506, 381, 382, 640, 1508, 1469, 231, 1652, 105, 1658 1472, 98, 1509, 1653, 1510, 1505, 307, 105, 1515, 1516, 1659 1527, 383, 1521, 232, 233, 1668, 1526, 1546, 1550, 1551, 1660 1554, 98, 1552, 234, 1555, 1556, 1557, 1559, 105, 98, 1661 1558, 1560, 92, 93, 1565, 95, 235, 1564, -382, 42, 1662 236, 237, 1423, 1567, 363, 1576, 1577, 1583, 709, 238, 1663 699, 1578, 712, 1584, 1585, 1590, -255, 123, 225, 1646, 1664 1645, 363, 123, 719, 1624, 226, 1423, 123, 123, 1631, 1665 1654, 1665, 1328, 227, 228, 229, 1648, 1656, 1445, 1476, 1666 744, 746, 239, 640, 757, 1532, 1664, 105, 1669, 1203, 1667 759, 1670, 1689, 1671, 1692, 1694, 105, 1695, 1697, 299, 1668 1698, 1702, 1715, 639, 1709, 123, 1710, 790, 1703, 299, 1669 1711, 1718, 1721, 1725, 1722, 1728, 804, 1731, 98, 1733, 1670 1152, 78, 1676, 1729, 1231, 806, 1148, 402, 1232, 303, 1671 677, 996, 105, 814, 1450, 1427, 50, 770, 817, 1451, 1672 1444, 546, 105, 1575, 1458, 45, 1236, 1717, 403, 682, 1673 1569, 1568, 1277, 105, 98, 423, 1662, 857, 1056, 670, 1674 1663, 1666, 1562, 1057, 98, 725, 1239, 1001, 1249, 1211, 1675 1286, 1067, 1716, 1405, 269, 98, 705, 123, 1667, 230, 1676 1423, 1423, 1423, 1466, 816, 1221, 1255, 1137, 1423, 826, 1677 1636, 1640, 639, 363, 1525, 1638, 1339, 1520, 827, 1641, 1678 1423, 1423, 689, 456, 231, 690, 691, 105, 1037, 1073, 1679 692, 544, 1075, 1069, 1423, 693, 844, 568, 938, 845, 1680 232, 233, 831, 1543, 650, 832, 926, 1125, 825, 946, 1681 234, 834, 1346, 2, 3, 908, 835, 836, 963, 92, 1682 93, 1677, 95, 235, 837, 929, 42, 236, 237, 1162, 1683 1534, 1537, 1140, 1171, 636, 1572, 238, 4, 839, 1142, 1684 1152, 5, -1022, 6, -1022, 1350, 579, 840, 149, 841, 1685 7, 467, 105, 1713, 225, 987, 710, 1696, 979, 842, 1686 940, 226, 1388, 1387, 61, 964, 1390, 1549, 1320, 227, 1687 228, 229, 1701, 0, 98, 0, 0, 8, 1019, 0, 1688 0, 0, 0, 1004, 0, 226, 0, 0, 0, 0, 1602 43, 488, 363, 703, 269, 404, 131, 477, 702, 398, 1603 103, 105, 491, 290, 150, 743, 105, 642, 335, 1157, 1604 643, 105, 105, 955, 336, 481, 1007, 724, 1109, 914, 1605 142, 1242, 327, 400, 414, 312, 553, 814, 355, 357, 1606 143, 98, 490, 328, 1244, 485, 98, 363, 977, 545, 1607 1171, 98, 98, 105, 131, 429, 1221, 416, 103, 105, 1608 900, 118, 239, 105, 955, 730, 509, 911, 1267, 910, 1609 1133, 1134, 430, 432, 850, 1118, 1119, 1120, 142, 725, 1610 1177, 1177, 1125, 98, 1456, 362, 1184, 376, 143, 98, 1611 314, 1337, 937, 98, 936, 1460, 1389, 277, -182, 1465, 1612 1638, 212, 1471, 227, 228, 47, 460, 1179, 421, 118, 1613 -525, 1455, 669, 151, -195, 291, 1342, 1457, 4, 1030, 1614 468, 1027, 1359, 1334, 492, 712, 809, 4, 492, 1467, 1615 811, 105, 906, 912, 759, -195, 385, -732, 1308, 916, 1616 938, 4, 647, 638, 938, -412, 4, 985, 347, -413, 1617 414, 269, 132, 414, 348, 4, 1013, 1028, 8, 418, 1618 557, 98, 804, 1017, 32, 1343, 704, 8, 219, 1128, 1619 941, 1360, 1144, 416, 1195, -195, 416, 705, 1205, 1207, 1620 431, 8, 558, 4, 666, -412, 8, 1329, 1270, -413, 1621 1279, 4, 1195, 830, 1380, 8, 492, 335, 1231, 648, 1622 132, 1295, 414, 336, 1375, 682, 1390, 1267, 1409, 4, 1623 1441, 4, 4, 916, 1526, 4, 346, 4, 34, 1707, 1624 42, 650, 508, 8, 522, 416, 413, 594, 35, 433, 1625 602, 8, 432, 1587, 1569, 503, 1011, 517, 680, 686, 1626 376, 516, 686, 534, 961, 432, 4, 981, 1303, 8, 1627 546, 8, 8, 516, 49, 8, 784, 8, 1456, 227, 1628 228, 1369, 474, 995, -542, 573, 475, -266, 464, 766, 1629 1031, 1468, 1275, 235, 213, 418, 42, 236, 418, 48, 1630 1213, 1638, -542, 98, 105, 1455, 8, 302, 1335, 376, 1631 653, 1457, 12, 863, 728, 531, 532, 508, 508, 508, 1632 422, 12, -525, 1552, 670, 1449, -195, -525, 1009, -195, 1633 302, 729, 412, 863, 98, 12, 1355, 731, 810, -412, 1634 12, 1388, 812, -413, 907, 913, 302, 418, 1352, 12, 1635 269, 917, 939, 105, 864, 757, 940, -766, 641, 986, 1636 577, 220, 413, 105, 1127, 413, 1126, 133, 607, 1029, 1637 977, 269, 269, 1132, 864, 1100, 1135, 12, 1142, 1594, 1638 1141, 1129, 506, 98, 1145, 12, 1196, 58, 533, 59, 1639 1206, 1208, 1456, 98, 1669, 1588, -339, -766, 140, 1665, 1640 1569, 930, 1248, 12, 1215, 12, 12, 4, 433, 12, 1641 1232, 12, 1456, 1296, 413, 133, 1376, 11, 1391, 1665, 1642 1410, 689, 1442, 660, 662, 1512, 1527, 556, 557, 310, 1643 239, 1708, 1683, -476, 344, 962, -542, 574, 105, 742, 1644 12, 767, 746, 748, 1276, 73, 140, 8, 4, 488, 1645 558, 1666, 1571, 236, 498, 499, 42, 506, 506, 506, 1646 491, 640, 4, 92, 93, 517, 95, 1342, 700, 144, 1647 42, 1666, 973, 481, 105, 105, 732, 844, 74, 610, 1648 971, 879, 894, 897, 974, 975, 4, 1531, 8, 4, 1649 490, 281, 908, 485, 854, 922, 980, 555, 1561, 1680, 1650 819, 923, 8, 1267, 98, 98, 727, 429, 1595, 75, 1651 752, 227, 228, 430, 500, 4, 1343, 144, 363, 731, 1652 1048, 1596, 363, 363, 430, 1640, 8, 230, 282, 8, 1653 105, -766, 236, 399, 829, 285, 1359, 318, 825, 105, 1654 1177, 795, 498, 499, 784, 847, 614, 1521, 496, 743, 1655 4, 703, 1230, 743, 148, 8, 702, 508, 834, 1076, 1656 98, 1078, 42, 98, 1521, 834, -197, 497, 839, 98, 1657 105, 105, -466, 227, 228, 949, 1018, 147, 234, 105, 1658 105, 12, 1019, 955, 319, 1360, 1299, 462, 463, 4, 1659 8, 1667, 1571, 1361, 42, 700, 1541, 204, 1571, 1241, 1660 98, 98, 500, 730, 105, 105, 42, 47, 294, 98, 1661 98, 1667, -1026, 206, -1026, 700, 1052, 230, 269, 105, 1662 89, 742, 12, 227, 228, 147, 274, 1157, 1681, 8, 1663 1084, 42, 431, 4, 98, 98, 12, 826, 304, 426, 1664 427, 1682, 231, 305, 151, 97, 306, 4, 943, 98, 1665 1374, -1027, 1373, -1027, 1097, 483, 285, 1332, 232, 233, 1666 12, 287, 42, 12, 954, 1109, 302, 898, 234, 301, 1667 9, -236, -541, 8, 302, 307, 909, 92, 93, 230, 1668 95, 235, 89, 1384, 42, 236, 237, 8, 978, 12, 1669 1486, 1487, 484, 492, 238, 64, -61, 506, 60, 933, 1670 934, 935, 474, 105, 310, 954, 475, 97, -510, 9, 1671 76, 89, -510, -236, 704, 1015, 516, 357, 1386, 11, 1672 232, 233, 1222, 992, 12, 705, -939, 453, 454, 230, 1673 234, 1004, 302, 98, 1016, 1010, 97, 60, 315, 92, 1674 93, -541, 95, 235, 82, 83, 42, 236, 1234, -93, 1675 534, 235, -93, 11, -276, 236, 11, 1547, 411, 1075, 1676 546, 1095, 546, 12, 57, 316, -137, 1157, 1123, 62, 1677 -89, 63, 1579, -89, 569, 1102, 1099, 1049, 317, 1415, 1678 234, 48, 1136, -90, 687, 230, -90, 688, 321, 92, 1679 93, 89, 95, 235, 995, 11, 42, 236, 675, 676, 1680 594, 1630, 11, -277, 922, 105, 602, 12, 92, 93, 1681 923, 95, 1461, 1462, 1463, 42, 97, 1402, 330, 1403, 1682 1165, 12, -92, 1121, 369, 1479, 322, 1025, 1240, 1248, 1683 337, 412, 728, 370, 641, 98, 234, 642, 863, 105, 1684 643, 569, 849, 1180, 1181, 92, 93, 338, 95, 729, 1685 414, 416, 42, 1688, 1689, 731, 105, 105, 5, -1026, 1686 6, -1026, 155, 105, 105, 105, 105, 7, 105, 98, 1687 105, 105, 105, 416, 350, 508, 351, 863, 1168, 864, 1688 208, 209, 757, 394, 395, 1483, 98, 98, 358, 1491, 1689 560, 567, 359, 98, 98, 98, 98, 385, 98, 396, 1690 98, 98, 98, 1158, 105, 389, 414, 391, 393, 411, 1691 434, 435, 436, 437, 438, 439, 440, 9, 864, 105, 1692 105, 420, -1026, 89, -1026, 1152, 412, -223, 424, 416, 1693 36, 37, 38, 39, 98, 449, 451, 640, 40, 516, 1694 92, 93, 457, 95, 41, 10, 42, 42, 97, 98, 1695 98, 458, 1124, 742, 216, 217, 218, 742, 224, 282, 1696 -1026, 269, -1026, 470, 473, 482, 105, 1140, 512, 1434, 1697 513, 527, 551, 703, 554, 418, 556, 569, 702, 588, 1698 9, -97, -97, 602, -97, 1210, 42, -1026, -97, -1026, 1699 654, -97, 89, 616, 732, 664, 700, 36, 37, 38, 1700 39, 665, 1159, 11, 667, 40, 743, 668, 60, 92, 1701 93, 41, 95, 673, 674, 506, 42, 97, 9, 239, 1702 1235, -234, 879, 239, 727, 684, 1301, -229, 77, 1048, 1703 679, 418, 681, -100, -100, -224, -100, 752, 894, 695, 1704 -100, 642, 413, -100, 643, 9, 60, 707, 1484, 1437, 1705 697, 1439, 1484, 709, 714, 1371, 715, 716, 719, 105, 1706 441, 442, 443, 444, 546, 721, 11, 722, 430, 761, 1707 762, 1158, 105, 60, 731, 795, -950, 82, 83, 1042, 1708 1043, -99, -99, 764, -99, 765, 769, 363, -99, 98, 1709 789, -99, 785, 790, 445, 446, 225, 792, 1323, 793, 1710 607, 806, 98, 226, 11, 803, 808, 820, 816, 1044, 1711 105, 227, 228, 229, -951, 92, 93, 1045, 95, 821, 1712 700, 400, 42, 848, 294, 857, 743, 92, 93, 855, 1713 95, 11, 92, 93, 308, 95, 704, 859, 105, 42, 1714 98, -138, 105, 105, 860, 861, 230, 705, 92, 93, 1715 918, 95, 924, 1489, 93, 42, 95, 1172, 641, 700, 1716 42, 925, 927, 105, 305, 402, 931, 1092, 98, 945, 1717 826, 231, 98, 98, 951, 969, 742, 379, 1431, 380, 1718 210, 211, 381, 382, 970, 976, 403, 232, 233, -230, 1719 972, 440, 984, 98, 987, 273, 307, 234, 988, 278, 1720 996, 383, 997, 1394, 954, 289, 92, 93, 998, 95, 1721 235, 1001, 1010, 42, 236, 237, 1011, 230, 1014, -449, 1722 1020, 1038, 1054, 238, 1055, 1056, 1063, 1058, 1431, 1062, 1723 1066, 1068, 1072, 1431, 992, 1080, 1083, 1431, 1086, 1372, 1724 1431, 1091, 231, 1438, 307, 1113, 1103, 1104, 1106, 1075, 1725 1111, 1122, 1150, 1131, 1155, 1194, 1197, 1198, 232, 233, 1726 1199, 640, 1200, 1202, 1204, 1209, 1214, 772, 234, 1165, 1727 1223, 1224, 1225, 345, 995, 1233, 1257, 92, 93, 1259, 1728 95, 235, 1731, 360, 42, 236, 237, 1274, 1049, 1290, 1729 1273, 304, 1277, 1287, 238, 1297, 305, 123, 1294, 378, 1730 105, 1075, 123, 1298, 105, 1330, 1339, 123, 123, 379, 1731 1370, 380, 1366, 1347, 381, 382, 1356, 1364, 1365, 1270, 1732 1380, 105, 1383, 1392, 1399, 1405, 1404, 1406, 307, 1407, 1733 98, 1411, 1440, 383, 98, -524, 1447, 1445, 105, 299, 1734 1448, 82, 83, 773, 774, 123, 1472, 1450, 1473, 299, 1735 1477, 98, 1488, 1480, 1482, 1485, 1516, 1513, 1560, 105, 1736 1514, 1517, 641, 1518, 1661, 1524, 1523, 105, 98, 1529, 1737 1535, 1534, 1562, 775, 1660, 776, 777, 778, 1431, 1554, 1738 779, 780, 1558, 781, 782, 1559, 1563, 1564, 105, 98, 1739 461, 1676, 1565, 1572, 1566, 466, 1567, 98, 469, 1568, 1740 1573, 1575, 1431, -382, 1584, 478, 1585, 1591, 1586, 1632, 1741 1592, 1593, 363, 1598, -255, 1654, 1653, 123, 700, 502, 1742 1639, 1335, 511, 1662, 1677, 1656, 1453, 1664, 1672, 363, 1743 1673, 1678, 1679, 1697, 1700, 1702, 1703, 1705, 1706, 1723, 1744 1726, 1729, 1684, 1730, 1736, 1484, 1540, 105, 1710, 1711, 1745 239, 641, 1717, 1718, 1719, 1733, 105, 1210, 583, 584, 1746 1739, 585, 1741, 78, 1737, 640, 1238, 1154, 303, 1239, 1747 597, 50, 605, 1452, 678, 1458, 1435, 546, 1000, 1466, 1748 771, 1459, 1583, 609, 45, 611, 98, 1243, 304, 683, 1749 1577, 1158, 105, 305, 1576, 1670, 1368, 1060, 1284, 1671, 1750 1570, 671, 105, 423, 1005, 656, 379, 1674, 380, 1061, 1751 269, 381, 382, 105, 1256, 1246, 1431, 1431, 1431, 726, 1752 1293, 1218, 98, 1725, 1431, 307, 1071, 1474, 1724, 1413, 1753 383, 1675, 98, 706, 1143, 1228, 1431, 1431, 817, 1262, 1754 827, 1644, 1533, 98, 1346, 1648, 1646, 828, 1649, 1528, 1755 1431, 456, 690, 693, 640, 691, 692, 1041, 1077, 1073, 1756 651, 363, 1079, 538, 694, 845, 832, 105, 846, 833, 1757 123, 2, 3, 835, 1551, 1353, 929, 1130, 1542, 544, 1758 836, 637, 710, 932, 1169, 1178, 713, 837, 1580, 568, 1759 826, 838, 1545, 1148, 840, 4, 841, 720, 1146, 5, 1760 -1026, 6, -1026, 842, 1357, 749, 579, 149, 7, 1685, 1761 1721, 467, 226, 1704, 745, 747, 711, 843, 758, 123, 1762 227, 228, 750, 983, 760, 538, 538, 991, 1709, 299, 1763 944, 1158, 105, 61, 1395, 8, 225, 1557, 1396, 1398, 1764 968, 791, 1327, 226, 0, 0, 0, 0, 0, 0, 1765 805, 227, 228, 229, 0, 0, 0, 0, 9, 807, 1766 0, 0, 98, 0, 0, 0, 0, 815, 0, 0, 1767 0, 0, 818, 0, 1732, 0, 0, 1734, 0, 0, 1768 0, 0, 0, 0, 0, 0, 10, 0, 0, 0, 1769 1742, 858, 0, 0, 0, 0, 0, 105, 0, 0, 1770 0, 1492, 1493, 1494, 1495, 1496, 1497, 0, 1498, 1499, 1771 1500, 1501, 1502, 1503, 992, 1504, 1505, 1506, 1507, 1508, 1772 0, 0, 0, 0, 0, 0, 230, 98, 0, 0, 1773 1159, 1699, 0, 0, 0, 0, 0, 0, 0, 0, 1774 299, 299, 741, 0, 11, 0, 0, -202, -202, -202, 1775 -202, 231, 0, 942, 0, -202, 751, 230, 0, 0, 1776 0, -202, 0, 0, 950, 1023, 0, 232, 233, 12, 1777 0, 0, 226, 967, 0, 0, 0, 234, 0, 0, 1778 227, 228, 231, 0, 0, 0, 92, 93, 0, 95, 1779 235, 0, 0, 42, 236, 237, 299, 0, 232, 233, 1780 0, 0, 0, 238, 0, 299, 0, 0, 234, 0, 1781 0, 0, 0, 0, 0, 0, 0, 92, 93, 0, 1782 95, 235, 0, 0, 42, 236, 237, 0, 0, 0, 1783 0, 0, 0, 0, 238, 0, 299, 299, 1008, 0, 1784 0, 0, 0, 0, 0, 299, 299, 0, 0, 0, 1785 0, 1185, 0, 0, 0, 0, 0, 0, 226, 0, 1786 0, 1021, 0, 1022, 538, 0, 227, 228, 0, 0, 1787 299, 299, 0, 0, 0, 0, 0, 0, 1040, 0, 1788 0, 0, 0, 0, 1053, 299, 230, 0, 0, 0, 1789 0, 681, 1509, 1510, 0, 0, 0, 1263, 0, 0, 1790 538, 0, 0, 0, 226, 0, 0, 0, 822, 0, 1791 0, 231, 227, 228, 0, 0, 0, 1067, 0, 0, 1792 0, 0, 0, 0, 0, 0, 0, 232, 233, 1081, 1793 0, 0, 0, 0, 1082, 0, 1085, 234, 0, 0, 1794 0, 538, 0, 0, 0, 0, 92, 93, 0, 95, 1795 235, 0, 0, 42, 236, 237, 0, 0, 0, 0, 1796 0, 0, 0, 238, 1098, 0, 0, 0, 0, 299, 1797 0, 0, 230, 0, 0, 1108, 0, 0, 0, 159, 1798 0, 0, 0, 0, -197, 0, 0, 0, 0, 161, 1799 162, 0, 163, 0, 0, 164, 342, 231, 823, 166, 1800 824, 0, 0, 0, 0, 0, 0, 361, 0, 0, 1801 0, 0, 0, 232, 233, 0, 0, 0, 230, 0, 1802 0, 0, 1147, 234, 0, 0, 0, 0, 1149, 0, 1803 0, 0, 92, 93, 0, 95, 235, 0, 89, 42, 1804 236, 237, 0, 231, 0, 0, 0, 0, 0, 238, 1805 0, 0, 0, 0, 0, 92, 93, 0, 95, 232, 1806 233, 0, 42, 97, 1190, 0, 0, 1192, 1193, 234, 1807 410, 299, 0, 0, 0, 0, 419, 0, 92, 93, 1808 0, 95, 235, 0, 0, 42, 236, 237, 0, 0, 1809 0, 410, 1416, 0, 0, 238, 0, 0, 0, 226, 1810 0, 0, 0, 0, 0, 299, 0, 227, 228, 0, 1811 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1812 0, 0, 299, 299, 0, 0, 0, 0, 0, 299, 1813 299, 299, 299, 0, 299, 0, 299, 299, 299, 0, 1814 0, 0, 0, 0, 507, 510, 0, 0, 0, 0, 1815 1271, 0, 0, 1272, 0, 0, 0, 541, 0, 0, 1816 552, 0, 0, 0, 0, 1280, 0, 1281, 0, 0, 1817 123, 0, 1285, 0, 0, 0, 580, 582, 0, 1291, 1818 1292, 0, 0, 538, 0, 299, 299, 0, 0, 0, 1819 0, 0, 593, 1453, 0, 593, 0, 0, 1300, 1302, 1820 226, 0, 0, 0, 0, 0, 0, 0, 227, 228, 1821 0, 0, 1331, 230, 1333, 226, 0, 615, 0, 361, 1822 361, 507, 0, 227, 228, 1341, 0, 0, 0, 0, 1823 0, 0, 0, 0, 0, 0, 0, 0, 231, 0, 1824 0, 0, 0, 0, 672, 0, 0, 0, 0, 0, 1825 0, 0, 0, 0, 232, 233, 741, 300, 0, 538, 1826 741, 1160, 1161, 0, 234, 0, 0, 309, 0, 1162, 1827 0, 1163, 1164, 92, 93, 0, 95, 235, 0, 0, 1828 42, 236, 237, 0, 0, 1377, 0, 0, 0, 1379, 1829 238, 0, 0, 1382, 0, 1385, 1387, 0, 0, 0, 1830 0, 0, 0, 0, 0, 0, 1393, 0, 0, 0, 1831 0, 0, 0, 0, 230, 0, 0, 0, 0, 0, 1832 0, 0, 0, 0, 0, 299, 0, 0, 0, 230, 1833 0, 0, 0, 0, 1408, 0, 0, 744, 123, 231, 1834 756, 1414, 1668, 0, 1433, 0, 0, 1436, 0, 226, 1835 0, 0, 763, 0, 231, 232, 233, 227, 228, 0, 1836 0, 0, 0, 0, 0, 234, 0, 0, 0, 0, 1837 232, 233, 1443, 0, 92, 93, 299, 95, 235, 1712, 1838 234, 42, 236, 237, 0, 0, 226, 0, 0, 92, 1839 93, 238, 95, 235, 227, 228, 42, 236, 237, 0, 1840 0, 0, 0, 0, 299, 0, 238, 0, 299, 299, 1841 0, 0, 0, 0, 1475, 0, 1476, 0, 0, 0, 1842 0, 0, 0, 0, 0, 0, 0, 0, 0, 299, 1843 0, 0, 0, 0, 1727, 0, 0, 0, 0, 538, 1844 538, 226, 0, 0, 0, 0, 0, 1515, 0, 227, 1845 228, 0, 0, 1519, 0, 0, 0, 0, 0, 507, 1846 0, 0, 0, 230, 0, 0, 0, 0, 0, 1530, 1847 0, 0, 0, 1532, 0, 0, 0, 0, 0, 0, 1848 0, 540, 0, 0, 0, 0, 0, 0, 231, 0, 1849 0, 1543, 0, 1544, 957, 0, 1546, 0, 1548, 1549, 1850 230, 1550, 0, 0, 232, 233, 0, 0, 0, 0, 1851 0, 0, 1553, 410, 234, 0, 0, 0, 0, 0, 1852 0, 0, 0, 92, 93, 231, 95, 235, 0, 0, 1853 42, 236, 237, 0, 0, 957, 0, 0, 0, 0, 1854 238, 232, 233, 628, 628, 0, 989, 0, 990, 0, 1855 0, 234, 0, 0, 0, 230, 0, 0, 0, 0, 1856 92, 93, 0, 95, 235, 1582, 0, 42, 236, 237, 1857 0, 0, 0, 0, 0, 0, 0, 238, 0, 0, 1858 231, 0, 0, 0, 0, 0, 0, 299, 1024, 0, 1859 1026, 0, 0, 0, 0, 0, 232, 233, 1034, 0, 1860 0, 1039, 0, 0, 299, 0, 234, 0, 0, 0, 1861 0, 0, 0, 0, 0, 92, 93, 0, 95, 235, 1862 0, 0, 42, 236, 237, 299, 0, 0, 0, 1631, 1863 0, 0, 238, 299, 0, 1641, 0, 0, 0, 0, 1864 1645, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1865 0, 1650, 1651, 1652, 0, 0, 0, 0, 300, 300, 1866 1621, 0, 1655, 0, 0, 0, 226, 0, 0, 0, 1867 1657, 0, 1659, 0, 227, 228, 0, 1622, 0, 0, 1868 0, 0, 0, 0, 0, 538, 538, 1096, 0, 0, 1869 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1870 0, 0, 0, 0, 0, 0, 0, 507, 507, 507, 1871 507, 0, 0, 1597, 813, 507, 0, 0, 0, 1604, 1872 0, 507, 299, 0, 0, 226, 0, 0, 0, 0, 1689 1873 0, 0, 0, 227, 228, 0, 0, 0, 0, 0, 1690 9, 0, 0, 538, 0, 0, 1017, 0, 1018, 0, 1691 123, 0, 0, 0, 0, 0, 0, 105, 1724, 0, 1692 0, 1726, 0, 1036, 0, 0, 988, 0, 10, 1049, 1693 0, 0, 0, 0, 1734, 0, 0, 0, 0, 98, 1694 0, 0, 0, 0, 0, 0, 0, 0, 1153, 1691, 1695 0, 0, 0, 0, 0, 0, 0, 0, 0, 123, 1696 0, 0, 1063, 0, 0, 538, 538, 0, 0, 299, 1697 0, 0, 0, 0, 1077, 230, 0, 0, 0, 1078, 1698 1178, 1081, 0, 0, 0, 0, 11, 226, 0, -202, 1699 -202, -202, -202, 0, 0, 227, 228, -202, 0, 230, 1700 231, 0, 0, -202, 0, 0, 0, 0, 0, 1094, 1701 0, 12, 0, 0, 0, 0, 232, 233, 0, 0, 1702 1104, 0, 0, 0, 231, 0, 234, 0, 0, 0, 1703 0, 0, 0, 0, 0, 92, 93, 0, 95, 235, 1704 232, 233, 42, 236, 237, 0, 0, 0, 0, 0, 1705 234, 0, 238, 0, 0, 0, 0, 0, 0, 92, 1706 93, 0, 95, 235, 342, 1141, 42, 236, 237, 0, 1707 0, 1143, 0, 0, 0, 361, 238, 0, 0, 0, 1708 299, 299, 740, 0, 0, 0, 0, 0, 0, 0, 1874 0, 0, 0, 0, 0, 1695, 0, 0, 0, 0, 1875 0, 0, 0, 0, 899, 902, 0, 1153, 123, 0, 1876 0, 0, 1698, 899, 902, 0, 0, 0, 299, 0, 1877 0, 0, 0, 1701, 0, 0, 0, 361, 1034, 299, 1878 230, 0, 628, 0, 580, 1626, 0, 1186, 899, 902, 1879 0, 226, 0, 0, 0, 0, 0, 0, 0, 227, 1880 228, 0, 0, 309, 0, 231, 0, 0, 0, 0, 1881 0, 1720, 0, 0, 1722, 410, 0, 0, 956, 0, 1882 0, 232, 233, 1216, 0, 0, 0, 0, 0, 0, 1883 0, 234, 0, 1597, 0, 0, 0, 0, 0, 230, 1884 92, 93, 0, 95, 235, 0, 0, 42, 236, 237, 1885 0, 0, 0, 1253, 0, 0, 0, 238, 0, 956, 1886 0, 0, 1258, 0, 231, 0, 1261, 756, 0, 1264, 1887 1265, 0, 1266, 0, 0, 0, 0, 0, 0, 0, 1888 232, 233, 0, 0, 0, 0, 0, 300, 0, 0, 1889 234, 0, 0, 0, 0, 0, 0, 0, 123, 92, 1890 93, 0, 95, 235, 0, 230, 42, 236, 237, 0, 1891 0, 0, 0, 0, 0, 0, 238, 0, 0, 0, 1892 0, 0, 0, 0, 0, 580, 0, 0, 1326, 0, 1893 231, 1328, 0, 0, 0, 0, 0, 0, 0, 0, 1894 0, 0, 0, 0, 1628, 0, 232, 233, 0, 0, 1895 226, 0, 0, 0, 0, 0, 234, 0, 227, 228, 1896 0, 507, 0, 0, 0, 92, 93, 0, 95, 235, 1897 0, 0, 42, 236, 237, 0, 0, 0, 0, 0, 1898 0, 0, 238, 0, 0, 0, 0, 0, 0, 309, 1709 1899 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1710 0, 230, 0, 0, 0, 0, 1183, 0, 0, 1185, 1711 1186, 0, 1256, 0, 0, 0, 0, 0, 0, 226, 1712 0, 0, 0, 0, 0, 0, 231, 227, 228, 0, 1713 0, 0, 0, 0, 0, 0, 299, 0, 410, 0, 1714 0, 0, 232, 233, 419, 299, 0, 0, 0, 0, 1715 0, 0, 234, 0, 0, 0, 0, 0, 0, 410, 1900 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1901 0, 1034, 0, 0, 0, 0, 0, 0, 0, 0, 1902 0, 0, 0, 0, 1186, 0, 0, 0, 0, 0, 1903 0, 0, 0, 957, 957, 0, 0, 226, 0, 0, 1904 899, 902, 0, 0, 0, 227, 228, 899, 902, 902, 1905 899, 0, 1137, 0, 899, 902, 1137, 0, 0, 0, 1906 0, 0, 0, 1412, 230, -225, -225, -225, 0, -225, 1907 0, -225, -225, -225, -225, -225, -225, -225, -225, -225, 1908 -225, -225, -225, -225, 589, 0, 0, 0, 0, 231, 1909 0, 590, 0, 591, 592, 0, 0, 0, 1444, 0, 1910 0, 628, 1446, 1173, 1173, 232, 233, 0, 0, 1034, 1911 0, 0, 0, 0, 0, 234, 0, 0, 0, 0, 1912 0, 0, 0, -225, 92, 93, 226, 95, 235, 0, 1913 0, 42, 236, 237, 227, 228, 0, 226, 0, 0, 1914 0, 238, 0, 1478, 0, 227, 228, 0, 0, 0, 1915 -765, 230, 0, 0, 0, 0, 0, 1481, 0, 0, 1916 0, 0, 0, 0, 882, 0, 883, 884, 885, 886, 1917 0, 887, 0, 888, 889, 0, 231, 1252, 0, 0, 1918 890, 0, 891, 892, 893, 0, 0, 0, 0, 0, 1919 -765, 0, 232, 233, 0, 1034, 0, 0, 0, 0, 1920 0, 0, 234, 0, 0, 0, 0, 1539, 0, 507, 1716 1921 0, 92, 93, 0, 95, 235, 0, 0, 42, 236, 1717 237, 0, 0, 0, 1408, 0, 299, 299, 238, 0, 1718 0, 226, 0, 0, 0, 299, 299, 0, 0, 227, 1719 228, 0, 1264, 0, 0, 1265, 0, 0, 0, 0, 1720 0, 0, 0, 0, 538, 0, 0, 1273, 0, 1274, 1721 299, 0, 507, 510, 1278, 0, 0, 0, 0, 0, 1722 0, 1284, 1285, 0, 299, 541, 0, 0, 552, 0, 1723 0, 0, 0, 230, 0, 0, 0, 0, 0, 538, 1724 1293, 1295, 0, 0, 580, 582, 0, 0, 0, 0, 1725 1445, 0, 0, 0, 1324, 0, 1326, 226, 231, 0, 1726 593, 0, 0, 593, 0, 227, 228, 1334, 0, 0, 1727 0, 0, 0, 0, 232, 233, 0, 0, 0, 0, 1728 538, 0, 0, 0, 234, 615, 0, 361, 361, 507, 1729 0, 0, 0, 92, 93, 230, 95, 235, 0, 0, 1730 42, 236, 237, 0, 0, 0, 0, 0, 299, 0, 1731 238, 0, 671, 0, 0, 0, 0, 0, 0, 0, 1732 231, 0, 0, 0, 1369, 0, 0, 0, 1371, 0, 1733 0, 0, 1374, 0, 1377, 1379, 232, 233, 0, 0, 1734 0, 0, 0, 0, 0, 1385, 234, 0, 0, 0, 1735 0, 0, 0, 0, 0, 92, 93, 0, 95, 235, 1736 0, 0, 42, 236, 237, 0, 0, 0, 0, 0, 1737 0, 230, 238, 1400, 0, 0, 0, 0, 0, 0, 1738 1406, 0, 0, 1425, 1660, 0, 1428, 0, 0, 0, 1739 0, 226, 0, 0, 0, 0, 231, 0, 0, 227, 1740 228, 0, 0, 0, 0, 743, 0, 300, 755, 0, 1741 299, 1435, 232, 233, 0, 0, 0, 309, 0, 0, 1742 762, 0, 234, 0, 0, 0, 0, 0, 0, 0, 1743 0, 92, 93, 0, 95, 235, 0, 0, 42, 236, 1744 237, 0, 0, 0, 299, 0, 0, 0, 238, 0, 1745 0, 0, 0, 1467, 0, 1468, 0, 0, 0, 0, 1746 0, 299, 0, 0, 1704, 0, 0, 299, 299, 299, 1747 299, 226, 299, 0, 299, 299, 0, 0, 0, 227, 1748 228, 0, 0, 0, 0, 0, 1507, 0, 0, 0, 1749 0, 0, 1511, 0, 0, 0, 0, 0, 0, 0, 1750 0, 0, 0, 0, 0, 230, 0, 123, 1522, 0, 1751 0, 0, 1524, 0, 0, 0, 0, 0, 0, 538, 1752 0, 299, 299, 0, 771, 0, 0, 507, 0, 1535, 1753 231, 1536, 0, 0, 1538, 0, 1540, 1541, 0, 1542, 1754 0, 0, 1719, 0, 0, 0, 232, 233, 0, 226, 1755 1545, 0, 0, 0, 0, 0, 234, 227, 228, 0, 1756 0, 953, 0, 0, 0, 92, 93, 0, 95, 235, 1757 0, 0, 42, 236, 237, 0, 0, 0, 0, 0, 1758 410, 0, 238, 0, 0, 230, 0, 0, 0, 0, 1759 0, 0, 740, 0, 0, 538, 740, 0, 82, 83, 1760 772, 773, 953, 1574, 0, 0, 0, 0, 1613, 0, 1761 231, 0, 0, 985, 226, 986, 0, 0, 0, 0, 1762 0, 0, 227, 228, 0, 1614, 232, 233, 0, 0, 1763 774, 540, 775, 776, 777, 0, 234, 778, 779, 0, 1764 780, 781, 0, 0, 0, 92, 93, 0, 95, 235, 1765 0, 0, 42, 236, 237, 1020, 0, 1022, 0, 0, 1766 0, 299, 238, 230, 0, 1030, 0, 1623, 1035, 0, 1767 0, 0, 0, 1633, 123, 0, 0, 0, 1637, 0, 1768 0, 0, 0, 0, 0, 0, 0, 0, 231, 1642, 1769 1643, 1644, 0, 627, 627, 0, 0, 0, 0, 0, 1770 1647, 1596, 0, 0, 232, 233, 0, 226, 1649, 0, 1771 1651, 299, 0, 0, 234, 227, 228, 0, 0, 0, 1772 0, 0, 0, 92, 93, 0, 95, 235, 230, 0, 1773 42, 236, 237, 0, 0, 0, 0, 0, 299, 0, 1774 238, 0, 299, 0, 0, 0, 0, 0, 0, 0, 1775 0, 0, 0, 231, 1092, 0, 0, 0, 0, 0, 1776 0, 0, 299, 0, 0, 0, 0, 0, 0, 232, 1777 233, 0, 538, 538, 507, 507, 507, 507, 0, 234, 1778 0, 0, 507, 1687, 0, 0, 0, 507, 92, 93, 1779 0, 95, 235, 0, 0, 42, 236, 237, 0, 0, 1780 1690, 0, 0, 0, 0, 238, 0, 0, 300, 300, 1781 0, 1693, 0, 0, 0, 0, 0, 0, 0, 0, 1782 0, 230, 1147, 1618, 0, 0, 0, 0, 0, 226, 1783 0, 0, 0, 0, 0, 0, 0, 227, 228, 0, 1784 0, 361, 1030, 0, 0, 0, 231, 0, 580, 1712, 1785 0, 1179, 1714, 0, 0, 0, 0, 0, 0, 0, 1786 1620, 0, 232, 233, 812, 0, 226, 0, 0, 0, 1787 0, 0, 234, 0, 227, 228, 0, 0, 0, 410, 1788 0, 92, 93, 0, 95, 235, 0, 1209, 42, 236, 1789 237, 0, 0, 0, 0, 0, 0, 0, 238, 0, 1790 226, 0, 0, 0, 896, 899, 0, 0, 227, 228, 1791 0, 0, 0, 896, 899, 0, 0, 1246, 0, 0, 1792 299, 0, 0, 0, 0, 0, 1251, 0, 0, 0, 1793 1254, 755, 627, 1257, 1258, 0, 1259, 299, 896, 0, 1794 0, 0, 0, 230, 0, 0, 1154, 1155, 0, 0, 1795 0, 0, 309, 0, 1156, 0, 1157, 299, 0, 0, 1796 0, 0, 0, 0, 0, 299, 0, 952, 231, 0, 1922 237, -225, -225, -225, -225, 0, 0, 0, 238, 1186, 1923 0, 1186, 0, 0, 0, 0, 0, 0, 0, 0, 1924 230, 0, 0, 813, 0, 0, 0, 0, 0, 0, 1925 0, 230, -225, 0, 0, -225, -225, -225, 0, 0, 1926 412, 0, 0, 0, 0, 231, 0, 0, 0, 0, 1927 0, 0, 0, 0, 0, 0, 231, 0, 0, 1253, 1928 1253, 232, 233, 0, 0, 0, 1578, 1034, 0, 0, 1929 0, 234, 232, 233, 902, 0, 0, 0, 0, 0, 1930 92, 93, 234, 95, 235, 0, 1216, 42, 236, 237, 1931 0, 92, 93, 0, 95, 235, 0, 238, 339, 236, 1932 237, 0, 309, 0, -765, 0, 899, 902, 238, 0, 1933 0, 1606, 1607, 1608, 1609, 1610, 1611, 1612, 1613, 1614, 1934 1615, 1616, 1617, 1618, 1619, 1620, 1624, 1625, 1627, 1629, 1935 0, 0, 0, 0, 0, 0, 0, 956, 956, 0, 1936 0, 0, -88, -88, -88, 0, -88, 0, -88, -88, 1937 -88, -88, -88, -88, -88, -88, -88, -88, -88, -88, 1938 -88, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1797 1939 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1798 230, 0, 0, 0, 232, 233, 0, 0, 0, 580, 1799 0, 0, 1319, 0, 234, 1321, 0, 0, 0, 0, 1800 0, 0, 0, 92, 93, 231, 95, 235, 952, 0, 1801 42, 236, 237, 0, 230, 0, 0, 538, 538, 0, 1802 238, 232, 233, 0, 0, 507, 0, 0, 0, 0, 1803 0, 234, 0, 0, 0, 0, 300, 0, 0, 231, 1804 92, 93, 0, 95, 235, 1589, 0, 42, 236, 237, 1805 0, 0, 0, 0, 299, 232, 233, 238, 0, 0, 1806 0, 0, 0, 0, 0, 234, 0, 0, 0, 0, 1807 0, 0, 1030, 0, 92, 93, 0, 95, 235, 0, 1808 0, 42, 236, 237, 0, 1179, 0, 0, 0, 0, 1809 123, 238, 0, 0, 953, 953, 0, 0, 0, 0, 1810 299, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1811 0, 299, 0, 0, 0, 0, 0, 0, 0, -225, 1812 -225, -225, 0, -225, 1404, -225, -225, -225, -225, -225, 1813 -225, -225, -225, -225, -225, -225, -225, -225, 309, 1484, 1814 1485, 1486, 1487, 1488, 1489, 0, 1490, 1491, 1492, 1493, 1815 1494, 1495, 0, 1496, 1497, 1498, 1499, 1500, 0, 1436, 1816 0, 0, 0, 1438, 0, 1589, 0, 0, 0, 0, 1817 1030, 0, 0, 0, 0, 0, 0, -225, 0, 0, 1818 0, 0, 0, 0, 0, 0, 0, 0, 0, 896, 1819 0, 0, 0, 0, 0, 896, 899, 899, 896, 0, 1820 1132, 0, 896, 1132, 1470, 0, 0, 0, 0, 0, 1821 0, 0, 0, 0, 0, 0, 0, 0, 1473, 0, 1822 0, 0, 0, 0, 0, -88, -88, -88, 0, -88, 1823 123, -88, -88, -88, -88, -88, -88, -88, -88, -88, 1824 -88, -88, -88, -88, 0, 0, 0, 627, 0, 1166, 1825 1166, 0, 0, 0, 0, 0, 1030, 0, 0, 0, 1826 0, 0, 0, 0, 0, 0, 0, 0, 1531, 0, 1827 507, 0, 0, 0, 0, -225, -225, -225, -225, 0, 1828 0, 0, 0, -88, 0, 0, 0, 0, 0, 1179, 1829 0, 1179, 0, 0, 0, 0, 0, 0, 0, 0, 1830 0, 0, 0, 0, 0, 0, -225, 0, 0, -225, 1831 -225, -225, 0, 226, 412, 0, 0, 0, 0, 0, 1832 0, 227, 228, 1245, 0, 0, 0, 0, 0, 680, 1833 1501, 1502, 0, 0, 0, 0, 0, 0, 0, 1246, 1834 1246, 0, 0, 0, 0, 0, 1570, 1030, 0, 0, 1835 0, 880, 0, 881, 882, 883, 884, 0, 885, 0, 1836 886, 887, 0, 0, 0, 0, 1209, 888, 0, 889, 1837 0, 890, 0, 0, 0, 0, 0, 0, 0, 0, 1838 0, -88, -88, -88, -88, 0, 0, 0, 0, 812, 1839 0, 1598, 1599, 1600, 1601, 1602, 1603, 1604, 1605, 1606, 1840 1607, 1608, 1609, 1610, 1611, 1612, 1616, 1617, 1619, 1621, 1841 0, 0, -88, -88, 0, -88, -88, -88, 0, -88, 1842 0, 0, 0, 0, 0, 226, 0, 230, 0, 0, 1843 0, 0, 0, 227, 228, 617, 0, 0, 0, 899, 1940 0, 1663, 0, 0, 0, 0, 0, 0, 0, 0, 1844 1941 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1845 0, 0, 231, 0, 0, 0, 0, 0, 0, 0, 1846 0, 1655, 0, 0, 618, 0, 309, 0, 232, 233, 1847 896, 0, 619, 0, 620, 621, 622, 623, 234, 624, 1848 0, 625, 0, 0, 0, 0, 1209, 92, 93, 0, 1849 95, 235, 0, 0, 42, 236, 237, 0, 226, 0, 1850 952, 952, 0, 1682, 238, 0, 227, 228, 0, 0, 1942 -88, 0, 0, 0, 0, 0, 1216, 0, 0, 0, 1943 0, 226, 0, 0, 0, 0, 0, 0, 0, 227, 1944 228, 617, 0, 1690, 0, 0, 0, 0, 0, 0, 1851 1945 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1852 1683, 1684, 0, 0, 0, 1685, 0, 1686, 0, 0, 1853 0, 0, 0, 0, 0, 0, 867, 0, 0, 230, 1854 868, 869, 870, 871, 872, 873, 0, 0, 0, 0, 1855 0, 0, 874, 875, 876, 0, 0, 0, 0, 0, 1856 0, 0, 0, 0, 231, 0, 0, 0, 0, 0, 1946 1691, 1692, 0, 0, 0, 1693, 0, 1694, 0, 0, 1947 618, 0, 0, 0, 0, 0, 0, 0, 619, 0, 1948 620, 621, 622, 623, 0, 624, 0, 625, 626, 0, 1857 1949 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1858 232, 233, 89, 0, 0, 1708, 0, 1297, 0, 0, 1859 234, 0, 0, 0, 0, 1298, 1299, 0, 0, 92, 1860 93, 0, 95, 235, 0, 0, 626, 505, 237, 0, 1861 0, 1720, 230, 0, 0, 0, 238, 0, 0, 0, 1862 1300, 0, 0, 0, 0, 0, 1727, 0, 1708, 1730, 1863 0, 0, 0, 0, 598, 1732, 0, 231, 0, 0, 1864 1735, 599, 0, 600, 601, 0, 0, 0, 899, 0, 1865 0, 0, 226, 232, 233, 0, 0, 0, 0, 0, 1866 227, 228, 0, 234, 0, 899, 0, 0, 0, 0, 1867 0, 0, 92, 93, 0, 95, 235, 0, 0, 42, 1868 236, 237, 0, 0, 0, 1166, 1301, 0, 0, 238, 1869 880, 0, 881, 0, 883, 884, 0, 885, 0, 886, 1870 887, 230, 0, 0, 0, 0, 888, 0, 889, 0, 1871 890, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1872 0, 0, 0, 0, 0, 0, 231, 226, 0, 0, 1873 0, 0, 1302, 0, 0, 227, 228, 0, 0, 0, 1874 0, 0, 1303, 1304, 0, 1245, 1245, 0, 0, 0, 1950 0, 0, 0, 0, 0, 902, 0, 0, 0, 0, 1951 0, 0, 0, 0, 0, 0, 0, 0, -88, -88, 1952 -88, -88, 902, 0, 0, 1716, 0, 0, 0, 0, 1953 0, 0, 0, 226, 0, 0, 0, 0, 0, 0, 1954 0, 227, 228, 1173, 0, 230, 0, 0, 0, -88, 1955 -88, 1728, -88, -88, -88, 0, -88, 0, 0, 0, 1956 0, 0, 0, 0, 0, 0, 1735, 0, 1716, 1738, 1957 231, 0, 0, 226, 0, 1740, 0, 0, 0, 0, 1958 1743, 227, 228, 0, 0, 0, 232, 233, 89, 0, 1959 0, 0, 0, 0, 0, 0, 234, 0, 0, 0, 1960 0, 0, 0, 1252, 1252, 92, 93, 0, 95, 235, 1961 0, 868, 627, 505, 237, 869, 870, 871, 872, 873, 1962 874, 0, 238, 226, 0, 0, 0, 875, 876, 877, 1963 878, 227, 228, 0, 0, 0, 0, 0, 0, 0, 1964 0, 0, 0, 0, 0, 0, 0, 230, 0, 0, 1965 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1966 0, 882, 0, 883, 0, 885, 886, 0, 887, 0, 1967 888, 889, 231, 0, 0, 0, 1304, 890, 0, 891, 1968 892, 893, 0, 0, 1305, 1306, 899, 230, 232, 233, 1969 0, 0, 0, 0, 0, 0, 0, 899, 234, 0, 1970 0, 0, 0, 0, 0, 0, 0, 92, 93, 1307, 1971 95, 235, 231, 226, 537, 236, 237, 1247, 0, 0, 1972 0, 227, 228, 598, 238, 0, 0, 0, 232, 233, 1973 599, 0, 600, 601, 0, 0, 0, 230, 234, 0, 1974 0, 0, 0, 0, 0, 0, 0, 92, 93, 0, 1975 95, 235, 0, 0, 42, 236, 237, 0, 0, 0, 1976 598, 0, 231, 226, 238, 0, 0, 599, 0, 600, 1977 601, 227, 228, 0, 0, 1308, 4, 0, 232, 233, 1978 0, 0, 0, 0, 0, 0, 0, 0, 234, 0, 1979 230, 0, 0, 0, 0, 0, 0, 92, 93, 0, 1980 95, 235, 0, 226, 42, 236, 237, 0, 0, 0, 1981 0, 227, 228, 504, 238, 231, 8, 0, 0, 0, 1982 0, 1309, 0, 0, 0, 0, 0, 230, 0, 0, 1983 0, 1310, 1311, 0, 0, 0, 0, 226, 0, 0, 1984 0, 234, 0, 0, 0, 227, 228, 0, 0, 0, 1985 1312, 1313, 231, 1314, 1315, 0, 0, 42, 1316, 237, 1986 0, 0, 0, 0, 0, 0, 0, 238, 232, 233, 1987 0, 0, 0, 0, 226, 0, 0, 230, 234, 0, 1988 0, 0, 227, 228, 928, 0, 0, 92, 93, 0, 1989 95, 235, 0, 0, 42, 236, 237, 0, 0, 0, 1990 0, 0, 231, 226, 238, 0, 0, 0, 0, 0, 1991 0, 227, 228, 1260, 0, 0, 0, 230, 232, 233, 1992 397, 0, 0, 0, 0, 0, 0, 0, 234, 0, 1993 0, 0, 0, 0, 0, 0, 0, 92, 93, 0, 1994 95, 235, 231, 0, 42, 236, 237, 0, 0, 0, 1995 12, 230, 0, 226, 238, 0, 0, 0, 232, 233, 1996 89, 227, 228, -395, 0, 0, 0, 0, 234, 0, 1997 0, 0, 0, 0, 0, 0, 231, 92, 93, 0, 1998 95, 235, 226, 0, 42, 505, 237, 0, 230, 0, 1999 227, 228, 232, 233, 238, 0, 0, 0, 0, 0, 1875 2000 0, 0, 234, 0, 0, 0, 0, 0, 0, 0, 1876 0, 1305, 1306, 0, 1307, 1308, 230, 226, 42, 1309, 1877 237, 0, 0, 0, 589, 227, 228, 0, 238, 0, 1878 0, 590, 0, 591, 592, 0, 0, 0, 0, 0, 1879 0, 231, 0, 0, 0, 0, 0, 226, 0, 0, 1880 0, 0, 0, 0, 0, 227, 228, 232, 233, 0, 1881 -765, 0, 0, 0, 598, 0, 0, 234, 0, 0, 1882 0, 599, 0, 600, 601, 0, 92, 93, 896, 95, 1883 235, 0, 0, 42, 236, 237, 0, 0, 0, 896, 1884 0, 230, 0, 238, 0, 0, 226, 0, 0, 0, 1885 -765, 0, 0, 0, 227, 228, 0, 0, 0, 4, 1886 0, 0, 0, 0, 0, 0, 231, 0, 0, 0, 1887 0, 0, 0, 0, 0, 0, 0, 0, 0, 226, 1888 0, 230, 232, 233, 0, 0, 0, 227, 228, 504, 1889 0, 0, 234, 0, 0, 0, 0, 0, 0, 8, 1890 0, 92, 93, 0, 95, 235, 231, 0, 42, 236, 1891 237, 230, 226, 0, 0, 0, 0, 0, 238, 0, 1892 227, 228, 232, 233, 0, 0, 0, 0, 0, 0, 1893 0, 0, 234, 0, 0, 0, 231, 0, 0, 0, 1894 0, 92, 93, 0, 95, 235, 0, 0, 42, 236, 1895 237, 0, 232, 233, 0, 0, 0, 226, 238, 0, 1896 230, 0, 234, 0, 0, 227, 228, 925, 226, 0, 1897 0, 92, 93, 0, 95, 235, 227, 228, 339, 236, 1898 237, 0, 0, 0, -765, 231, 0, 0, 238, 0, 1899 0, 0, 0, 230, 0, 397, 0, 0, 0, 0, 1900 0, 232, 233, 0, 0, 226, 0, 0, 0, 0, 1901 0, 234, 0, 227, 228, 1253, 0, 0, 231, 0, 1902 92, 93, 0, 95, 235, 0, 230, 42, 236, 237, 1903 0, 0, 0, 12, 232, 233, 89, 238, 0, 226, 1904 0, 0, 0, 0, 234, 0, 0, 227, 228, -395, 1905 226, 231, 0, 92, 93, 0, 95, 235, 227, 228, 1906 42, 505, 237, 0, 0, 0, 0, 232, 233, 0, 1907 238, 230, 0, 0, 0, 0, 0, 234, 0, 0, 1908 0, 0, 230, 0, 0, 0, 92, 93, 0, 95, 1909 235, 0, 0, 42, 236, 237, 231, 226, 0, 0, 1910 0, 0, 0, 238, 0, 227, 228, 231, 0, 0, 1911 0, 0, 232, 233, 0, 0, 0, 0, 0, 230, 1912 0, 226, 234, 232, 233, 0, 0, 0, 0, 227, 1913 228, 92, 93, 234, 95, 235, 0, 0, 42, 236, 1914 237, 0, 92, 93, 231, 95, 235, 0, 238, 537, 1915 236, 237, 1240, 230, 226, 0, 0, 0, 0, 238, 1916 232, 233, 227, 228, 230, 0, 0, 0, 0, 0, 1917 234, 0, 0, 0, 0, 0, 0, 0, 231, 92, 1918 93, 0, 95, 235, 0, 0, 42, 236, 237, 231, 1919 0, 226, 0, 0, 232, 233, 238, 0, 0, 227, 1920 228, 0, 0, 0, 234, 232, 233, 0, 0, 0, 1921 0, 230, 0, 92, 93, 234, 95, 235, 0, 0, 1922 42, 236, 237, 0, 92, 93, 0, 95, 235, 0, 1923 238, 42, 236, 353, 0, 230, 231, 226, 0, 0, 1924 0, 238, 0, 0, 0, 227, 228, 0, 226, 0, 1925 0, 0, 232, 233, 0, 0, 227, 228, 0, 0, 1926 231, 0, 234, 0, 0, 0, 0, 0, 230, 0, 1927 0, 92, 93, 0, 95, 235, 232, 233, 42, 236, 1928 356, 0, 0, 0, 0, 0, 234, 0, 238, 0, 1929 0, 0, 0, 231, 0, 92, 93, 0, 95, 235, 1930 0, 0, 42, 236, 405, 230, 0, 0, 0, 232, 1931 233, 0, 238, 0, 0, 0, 0, 0, 0, 234, 1932 0, 0, 0, 0, 0, 0, 0, 0, 92, 93, 1933 231, 95, 235, 0, 79, 42, 236, 237, 0, 0, 1934 0, 80, 0, 0, 0, 238, 232, 233, 0, 0, 1935 0, 230, 0, 0, 0, 0, 234, 0, 0, 0, 1936 0, 0, 230, 0, 0, 92, 93, 0, 95, 235, 1937 0, 0, 537, 236, 237, 0, 231, 0, 0, 0, 1938 0, 0, 238, 0, 0, 0, 0, 231, 0, 0, 1939 0, 81, 232, 233, 0, 0, 0, 0, 0, 0, 1940 0, 0, 234, 232, 233, 0, 0, 0, 82, 83, 1941 0, 92, 93, 234, 95, 235, 0, 0, 42, 236, 1942 1029, 84, 92, 93, 0, 95, 235, 0, 238, 1083, 1943 1084, 1085, 0, 0, 0, 0, 0, 0, 0, 238, 1944 -450, 0, 85, 80, 86, 87, 0, 0, 0, 155, 1945 -463, 0, -476, 0, 0, 0, 0, 88, -708, 156, 2001 0, 92, 93, 231, 95, 235, 0, 230, 42, 236, 2002 237, 0, 0, 0, 0, 0, 0, 226, 238, 232, 2003 233, 0, 0, 0, 0, 227, 228, 0, 226, 234, 2004 0, 0, 231, 0, 0, 0, 227, 228, 92, 93, 2005 0, 95, 235, 0, 0, 42, 236, 237, 232, 233, 2006 0, 0, 0, 0, 0, 238, 0, 230, 234, 0, 2007 0, 0, 0, 0, 0, 0, 0, 92, 93, 0, 2008 95, 235, 0, 0, 42, 236, 237, 0, 0, 0, 2009 0, 0, 231, 226, 238, 0, 230, 0, 0, 0, 2010 0, 227, 228, 0, 0, 0, 0, 0, 232, 233, 2011 0, 0, 0, 0, 0, 0, 0, 226, 234, 0, 2012 0, 231, 0, 0, 0, 227, 228, 92, 93, 0, 2013 95, 235, 0, 0, 42, 236, 237, 232, 233, 0, 2014 0, 230, 0, 0, 238, 0, 226, 234, 0, 0, 2015 0, 0, 230, 0, 227, 228, 92, 93, 0, 95, 2016 235, 0, 0, 42, 236, 353, 231, 0, 0, 0, 2017 0, 0, 0, 238, 0, 0, 226, 231, 0, 0, 2018 0, 0, 232, 233, 227, 228, 0, 0, 0, 0, 2019 0, 0, 234, 232, 233, 0, 0, 0, 0, 0, 2020 0, 92, 93, 234, 95, 235, 0, 230, 42, 236, 2021 356, 0, 92, 93, 0, 95, 235, 0, 238, 42, 2022 236, 405, 0, 0, 0, 0, 0, 0, 0, 238, 2023 0, 230, 231, 0, 0, 0, 0, 0, 0, 0, 2024 0, 0, 0, 0, 0, 0, 0, 0, 232, 233, 2025 0, 0, 0, 0, 0, 0, 231, 0, 234, 0, 2026 230, 0, 0, 0, 0, 0, 0, 92, 93, 0, 2027 95, 235, 232, 233, 42, 236, 237, 0, 0, 0, 2028 0, 79, 234, 0, 238, 231, 0, 0, 80, 0, 2029 230, 92, 93, 0, 95, 235, 0, 0, 537, 236, 2030 237, 232, 233, 0, 0, 0, 0, 0, 238, 0, 2031 0, 234, 0, 0, 0, 231, 0, 0, 0, 0, 2032 92, 93, 0, 95, 235, 0, 0, 42, 236, 1033, 2033 0, 232, 233, 0, 0, 0, 0, 238, 81, 0, 2034 0, 234, 0, 0, 0, 0, 0, 0, 0, 0, 2035 92, 93, 0, 95, 235, 82, 83, 1087, 1088, 1089, 2036 0, 0, 0, 0, 0, 0, 0, 238, 84, 0, 1946 2037 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2038 0, 0, 0, 0, 0, 0, 0, -450, 0, 85, 2039 80, 86, 87, 0, 0, 0, 155, -463, 0, -476, 2040 0, 0, 0, 0, 88, -708, 156, 0, 0, 0, 2041 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2042 0, 0, 0, 0, 89, 0, 0, 90, 91, -334, 2043 0, 0, -334, -334, -334, -334, 157, 0, 0, 0, 2044 -334, 92, 93, 94, 95, 0, -334, 0, 96, 97, 2045 0, 158, 0, 0, 0, 0, 0, 0, 0, 0, 2046 0, 0, 0, -708, -708, -708, 0, 159, 0, 0, 2047 84, 0, -708, 0, 160, 80, 0, 161, 162, 0, 2048 163, 155, 0, 164, 0, 0, 165, 166, 167, 0, 2049 -708, 156, 0, 0, 0, 0, 0, 0, 0, 0, 2050 0, 0, 0, 80, 0, 0, 0, 0, 0, 155, 2051 0, 0, 168, 0, 0, 0, 0, 0, 0, 156, 2052 0, 157, 0, 0, 0, 0, 89, -708, -708, 90, 2053 0, 0, 0, 0, 0, 0, 158, 0, 0, 0, 2054 0, 0, 0, 92, 93, 0, 95, 0, 0, 157, 2055 169, 97, 159, 0, 0, 84, -128, 0, 0, 160, 2056 0, 0, 161, 162, 158, 163, 0, 0, 164, 0, 2057 0, 165, 166, 167, 0, 0, 0, 0, 0, 0, 2058 159, 0, 0, 84, -129, 0, 0, 160, 0, 0, 2059 161, 162, 0, 163, 155, 0, 164, 168, 0, 165, 2060 166, 167, 0, 0, 156, 0, 0, 0, 0, 0, 2061 0, 89, 0, 0, 90, 0, 0, 0, 0, 0, 2062 0, 0, 822, 0, 0, 168, -128, 0, 92, 93, 2063 0, 95, 0, 0, 157, 169, 97, 0, 0, 89, 2064 0, 0, 90, 0, 0, 0, 0, 0, 0, 158, 2065 0, 0, 0, 0, -129, 0, 92, 93, 0, 95, 2066 0, 0, 157, 169, 97, 159, 0, 0, 84, -125, 2067 0, 0, 160, 0, 0, 161, 162, 158, 163, 0, 2068 0, 164, 0, 0, 165, 166, 167, 0, 1038, 0, 2069 0, 0, 0, 159, 0, 0, 0, 0, 0, 0, 2070 160, 0, 0, 161, 162, 0, 163, 822, 0, 164, 2071 168, 0, 165, 166, 167, 0, 0, 0, 0, 0, 2072 0, 0, 0, 0, 89, 0, 0, 90, 0, 0, 2073 0, 0, 0, 0, 0, 0, 0, 0, 168, -125, 2074 0, 92, 93, 0, 95, 0, 0, 157, 169, 97, 2075 0, 0, 89, 0, 0, 0, 0, 0, 0, 0, 2076 0, 0, 158, 0, 0, 0, 0, 0, 0, 92, 2077 93, 0, 95, 0, 0, 0, 42, 97, 159, 0, 2078 0, 0, 0, 0, 0, 160, 0, 0, 161, 162, 2079 0, 163, 0, 0, 164, 0, 0, 165, 166, 167, 2080 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2081 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2082 0, 0, 0, 168, 0, 0, 0, 0, 0, 0, 1947 2083 0, 0, 0, 0, 0, 0, 0, 89, 0, 0, 1948 90, 91, -334, 0, 0, -334, -334, -334, -334, 157,1949 0, 0, 0, -334, 92, 93, 94, 95, 0, -334,1950 0, 96, 97, 0, 158, 0, 0, 0, 0, 0,1951 0, 0, 0, 0, 0, 0, -708, -708, -708, 0,1952 159, 0, 0, 84, 0, -708, 0, 160, 80, 0,1953 161, 162, 0, 163, 155, 0, 164, 0, 0, 165,1954 166, 167, 0, -708, 156, 0, 0, 0, 0, 0,1955 0, 0, 0, 0, 0, 0, 80, 0, 0, 0,1956 0, 0, 155, 0, 0, 168, 0, 0, 0, 0,1957 0, 0, 156, 0, 157, 0, 0, 0, 0, 89,1958 -708, -708, 90, 0, 0, 0, 0, 0, 0, 158,1959 0, 0, 0, 0, 0, 0, 92, 93, 0, 95,1960 0, 0, 157, 169, 97, 159, 0, 0, 84, -128,1961 0, 0, 160, 0, 0, 161, 162, 158, 163, 0,1962 0, 164, 0, 0, 165, 166, 167, 0, 0, 0,1963 0, 0, 0, 159, 0, 0, 84, -129, 0, 0,1964 160, 0, 0, 161, 162, 0, 163, 155, 0, 164,1965 168, 0, 165, 166, 167, 0, 0, 156, 0, 0,1966 0, 0, 0, 0, 89, 0, 0, 90, 0, 0,1967 0, 0, 0, 0, 0, 821, 0, 0, 168, -128,1968 0, 92, 93, 0, 95, 0, 0, 157, 169, 97,1969 0, 0, 89, 0, 0, 90, 0, 0, 0, 0,1970 0, 0, 158, 0, 0, 0, 0, -129, 0, 92,1971 93, 0, 95, 0, 0, 157, 169, 97, 159, 0,1972 0, 84, -125, 0, 0, 160, 0, 0, 161, 162,1973 158, 163, 0, 0, 164, 0, 0, 165, 166, 167,1974 0, 1034, 0, 0, 0, 0, 159, 0, 0, 0,1975 0, 0, 0, 160, 0, 0, 161, 162, 0, 163,1976 821, 0, 164, 168, 0, 165, 166, 167, 0, 0,1977 0, 0, 0, 0, 0, 0, 0, 89, 0, 0,1978 90, 0, 0, 0, 0, 0, 0, 0, 0, 0,1979 0, 168, -125, 0, 92, 93, 0, 95, 0, 0,1980 157, 169, 97, 0, 0, 89, 0, 0, 0, 0,1981 0, 0, 0, 0, 0, 158, 0, 0, 0, 0,1982 0, 0, 92, 93, 0, 95, 0, 0, 0, 42,1983 97, 159, 0, 0, 0, 0, 0, 0, 160, 0,1984 0, 161, 162, 0, 163, 0, 0, 164, 0, 0,1985 165, 166, 167, 0, 0, 0, 0, 0, 0, 0,1986 2084 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1987 0, 0, 0, 0, 0, 0, 168, 0, 0, 0, 1988 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1989 89, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1990 0, 0, 0, 0, 0, 0, 0, 92, 93, 0, 1991 95, 0, 0, 0, 42, 97 2085 0, 0, 0, 0, 92, 93, 0, 95, 0, 0, 2086 0, 42, 97 1992 2087 }; 1993 2088 1994 2089 static const yytype_int16 yycheck[] = 1995 2090 { 1996 11, 213, 168, 294, 459, 294, 52, 52, 384, 90, 1997 459, 56, 220, 384, 288, 164, 165, 136, 654, 52, 1998 154, 497, 168, 154, 57, 291, 922, 721, 494, 62, 1999 63, 859, 294, 219, 141, 322, 73, 551, 606, 52, 2000 1007, 52, 1007, 294, 109, 305, 57, 213, 237, 52, 2001 237, 62, 63, 983, 100, 100, 497, 883, 884, 695, 2002 52, 94, 73, 1100, 935, 673, 570, 100, 495, 258, 2003 1029, 104, 258, 259, 319, 936, 937, 868, 869, 870, 2004 943, 591, 110, 94, 875, 1178, 5, 100, 172, 100, 2005 600, 1275, 237, 104, 3, 1279, 1508, 100, 1282, 21, 2006 5, 1270, 3, 21, 27, 3, 3, 21, 100, 3, 2007 3, 3, 3, 258, 3, 625, 941, 5, 3, 56, 2008 1270, 3, 382, 1459, 3, 3, 3, 3, 3, 185, 2009 1557, 24, 24, 24, 3, 3, 3, 3, 170, 172, 2010 1270, 3, 24, 24, 3, 24, 24, 24, 24, 24, 2011 1577, 3, 24, 192, 3, 24, 24, 24, 24, 305, 2012 192, 172, 3, 3, 353, 3, 353, 356, 459, 356, 2013 459, 64, 64, 64, 4, 24, 3, 3, 3, 3, 2014 192, 259, 64, 220, 560, 64, 64, 64, 64, 64, 2015 3, 399, 64, 1089, 3, 64, 64, 64, 64, 333, 2016 3, 3, 333, 3, 353, 3, 1165, 356, 353, 3, 2017 5, 356, 420, 3, 3, 64, 405, 3, 405, 3, 2018 3, 3, 159, 24, 3, 5, 237, 137, 3, 21, 2019 325, 418, 418, 3, 380, 381, 382, 678, 1558, 425, 2020 18, 325, 428, 1579, 22, 431, 311, 19, 20, 161, 2021 1419, 21, 317, 19, 20, 110, 522, 1082, 1578, 147, 2022 405, 18, 24, 3, 713, 22, 155, 304, 279, 192, 2023 155, 47, 194, 310, 1443, 194, 194, 1689, 972, 374, 2024 194, 388, 319, 294, 194, 322, 195, 315, 316, 194, 2025 374, 1384, 325, 1443, 195, 586, 723, 195, 195, 200, 2026 1126, 195, 64, 195, 1263, 198, 198, 198, 497, 201, 2027 497, 497, 1175, 1443, 325, 606, 198, 198, 161, 198, 2028 198, 198, 198, 198, 586, 155, 198, 1118, 97, 198, 2029 198, 198, 198, 195, 194, 501, 195, 192, 384, 331, 2030 418, 374, 353, 195, 606, 356, 850, 195, 359, 198, 2031 52, 384, 497, 431, 195, 195, 132, 195, 185, 186, 2032 620, 188, 399, 374, 972, 192, 876, 147, 305, 195, 2033 195, 195, 882, 384, 1010, 885, 155, 146, 195, 889, 2034 155, 114, 195, 420, 421, 155, 195, 147, 1557, 194, 2035 1559, 155, 195, 195, 405, 195, 1565, 195, 100, 194, 2036 192, 195, 394, 395, 97, 195, 195, 1591, 1577, 195, 2037 421, 195, 195, 195, 192, 155, 168, 189, 499, 500, 2038 192, 193, 22, 192, 52, 192, 459, 193, 192, 24, 2039 721, 52, 721, 97, 194, 168, 198, 125, 587, 588, 2040 589, 193, 561, 380, 381, 382, 52, 384, 459, 598, 2041 731, 663, 718, 146, 519, 667, 668, 738, 666, 721, 2042 193, 1419, 495, 496, 497, 572, 117, 118, 24, 64, 2043 721, 1401, 100, 1510, 620, 155, 557, 611, 1349, 100, 2044 611, 1440, 146, 97, 495, 496, 497, 48, 176, 678, 2045 501, 678, 678, 1460, 100, 1460, 24, 663, 24, 765, 2046 689, 667, 668, 689, 192, 52, 24, 192, 64, 1335, 2047 33, 1372, 192, 144, 560, 560, 189, 155, 551, 155, 2048 193, 532, 567, 789, 192, 48, 1352, 560, 983, 995, 2049 198, 1007, 146, 678, 983, 1011, 64, 24, 64, 24, 2050 551, 192, 173, 554, 689, 192, 64, 560, 195, 560, 2051 111, 112, 1188, 100, 741, 741, 192, 560, 591, 592, 2052 193, 194, 1076, 808, 567, 810, 1007, 600, 601, 29, 2053 1011, 31, 1363, 111, 112, 586, 1144, 64, 192, 64, 2054 591, 592, 12, 13, 14, 15, 16, 17, 18, 600, 2055 601, 24, 625, 169, 170, 606, 29, 192, 31, 3, 2056 1558, 1559, 192, 198, 4, 195, 639, 1565, 24, 1505, 2057 171, 19, 20, 1580, 625, 1580, 192, 194, 22, 24, 2058 1578, 24, 194, 560, 168, 175, 175, 638, 639, 666, 2059 567, 24, 194, 171, 21, 22, 192, 3, 200, 183, 2060 168, 1469, 198, 654, 194, 194, 195, 1157, 64, 193, 2061 29, 200, 31, 590, 87, 125, 22, 185, 186, 64, 2062 188, 64, 599, 194, 192, 193, 192, 678, 173, 200, 2063 198, 64, 198, 822, 192, 425, 131, 192, 428, 194, 2064 198, 38, 115, 620, 695, 622, 623, 624, 5, 29, 2065 723, 31, 983, 29, 983, 31, 105, 984, 107, 1194, 2066 192, 1196, 713, 195, 3, 192, 176, 192, 87, 201, 2067 721, 198, 723, 198, 141, 185, 186, 125, 188, 18, 2068 143, 103, 192, 22, 873, 844, 108, 764, 194, 111, 2069 6, 7, 162, 163, 164, 165, 115, 886, 803, 192, 2070 173, 113, 195, 99, 100, 852, 1440, 87, 201, 1645, 2071 183, 87, 24, 1219, 903, 194, 767, 29, 140, 31, 2072 909, 158, 159, 160, 4, 198, 196, 197, 176, 1218, 2073 807, 808, 194, 810, 923, 115, 192, 185, 186, 115, 2074 188, 189, 198, 917, 192, 193, 917, 192, 934, 192, 2075 173, 174, 825, 198, 173, 198, 194, 1433, 194, 192, 2076 194, 1177, 192, 193, 183, 198, 1177, 176, 177, 178, 2077 179, 168, 749, 859, 825, 184, 1107, 194, 1007, 113, 2078 1007, 190, 1011, 192, 1011, 1011, 859, 47, 185, 186, 2079 194, 188, 194, 173, 871, 192, 193, 173, 173, 174, 2080 1029, 194, 1029, 876, 193, 1107, 201, 183, 859, 882, 2081 883, 884, 885, 1144, 887, 201, 889, 890, 1024, 1314, 2082 105, 106, 1007, 1318, 5, 876, 1011, 40, 41, 1594, 2083 1595, 882, 883, 884, 885, 175, 887, 922, 889, 890, 2084 23, 29, 1144, 31, 1029, 62, 63, 924, 10, 922, 2085 8, 99, 100, 101, 102, 168, 1085, 194, 1085, 208, 2086 209, 194, 913, 936, 937, 28, 29, 30, 31, 326, 2087 327, 922, 185, 186, 37, 188, 4, 192, 192, 192, 2088 193, 192, 859, 131, 192, 936, 937, 176, 177, 178, 2089 179, 139, 5, 19, 20, 184, 1085, 874, 192, 87, 2090 1085, 190, 147, 200, 169, 105, 1401, 984, 194, 1223, 2091 983, 888, 1401, 185, 186, 192, 188, 195, 194, 5, 2092 192, 972, 195, 195, 87, 5, 5, 115, 151, 1006, 2093 185, 186, 983, 188, 1123, 3, 175, 192, 1011, 175, 2094 195, 175, 195, 175, 1460, 922, 65, 66, 195, 1138, 2095 192, 203, 115, 194, 5, 1006, 1007, 934, 1079, 1010, 2096 1011, 80, 1268, 22, 1380, 84, 1155, 192, 192, 1380, 2097 3, 90, 194, 1024, 1226, 19, 20, 3, 1029, 195, 2098 111, 185, 186, 1314, 188, 173, 195, 1318, 192, 103, 2099 4, 195, 174, 192, 108, 183, 155, 111, 1227, 125, 2100 1227, 1227, 3, 1076, 1089, 3, 192, 121, 200, 123, 2101 173, 1062, 126, 127, 185, 186, 1089, 188, 194, 4, 2102 1226, 192, 195, 194, 150, 1076, 140, 38, 4, 114, 2103 194, 145, 1109, 135, 1085, 198, 1087, 192, 1089, 158, 2104 166, 167, 1227, 183, 185, 186, 195, 188, 195, 168, 2105 176, 192, 194, 1126, 1280, 5, 1107, 195, 183, 185, 2106 186, 39, 188, 189, 1580, 192, 192, 193, 194, 192, 2107 1401, 4, 1401, 183, 183, 1126, 202, 195, 11, 3, 2108 1153, 125, 185, 186, 1157, 188, 19, 20, 21, 192, 2109 18, 1177, 175, 1144, 185, 186, 5, 188, 109, 3, 2110 194, 192, 1153, 114, 1177, 194, 1157, 22, 119, 120, 2111 3, 122, 1089, 194, 125, 192, 21, 128, 129, 130, 2112 194, 21, 166, 167, 185, 186, 1177, 188, 195, 104, 2113 194, 192, 176, 194, 194, 3, 1187, 1188, 194, 194, 2114 3, 185, 186, 1220, 188, 189, 3, 192, 192, 193, 2115 194, 192, 147, 170, 194, 194, 275, 168, 68, 69, 2116 70, 280, 72, 140, 283, 155, 3, 1218, 115, 194, 2117 3, 290, 3, 5, 185, 186, 1227, 188, 1367, 1156, 2118 5, 192, 193, 30, 5, 304, 103, 195, 307, 3, 2119 195, 108, 125, 1270, 111, 31, 195, 3, 1275, 29, 2120 1177, 195, 1279, 195, 121, 1282, 123, 195, 1697, 126, 2121 127, 3, 5, 104, 1291, 1710, 4, 150, 21, 192, 2122 194, 1272, 155, 140, 343, 344, 195, 346, 145, 194, 2123 20, 4, 4, 166, 167, 195, 355, 192, 357, 195, 2124 192, 1314, 195, 176, 195, 1318, 195, 5, 3, 368, 2125 3, 370, 185, 186, 195, 188, 189, 4, 26, 192, 2126 193, 194, 1335, 1314, 73, 94, 1343, 1318, 195, 202, 2127 5, 390, 125, 195, 108, 5, 1253, 111, 4, 1352, 2128 200, 3, 104, 194, 1335, 192, 200, 121, 194, 123, 2129 192, 104, 126, 127, 1380, 4, 195, 150, 1550, 1372, 2130 195, 1352, 147, 1551, 3, 195, 140, 1380, 5, 3, 2131 3, 145, 4, 166, 167, 1567, 5, 194, 5, 5, 2132 3, 1372, 1399, 176, 22, 195, 3, 3, 1401, 1380, 2133 4, 3, 185, 186, 3, 188, 189, 21, 4, 192, 2134 193, 194, 1419, 3, 1550, 195, 3, 195, 467, 202, 2135 1401, 4, 471, 195, 195, 195, 194, 52, 4, 3, 2136 195, 1567, 57, 482, 192, 11, 1443, 62, 63, 192, 2137 3, 21, 192, 19, 20, 21, 192, 192, 4, 1710, 2138 499, 500, 1433, 1469, 503, 1362, 4, 1460, 5, 1440, 2139 509, 195, 3, 195, 195, 195, 1469, 195, 22, 94, 2140 4, 195, 3, 1380, 195, 100, 195, 526, 194, 104, 2141 195, 3, 3, 195, 4, 4, 535, 3, 1469, 4, 2142 1505, 49, 1592, 1721, 1007, 544, 917, 73, 1007, 100, 2143 412, 718, 1505, 552, 1271, 1224, 20, 519, 557, 1272, 2144 1268, 1518, 1515, 1443, 1280, 11, 1007, 1699, 94, 421, 2145 1433, 1432, 1052, 1526, 1505, 252, 1559, 576, 789, 405, 2146 1560, 1565, 1419, 791, 1515, 496, 1007, 721, 1011, 981, 2147 1062, 803, 1697, 1218, 1551, 1526, 460, 172, 1566, 125, 2148 1557, 1558, 1559, 1288, 554, 994, 1024, 890, 1565, 560, 2149 1516, 1526, 1469, 1699, 1352, 1518, 1107, 1343, 560, 1527, 2150 1577, 1578, 447, 266, 150, 448, 450, 1580, 764, 808, 2151 452, 318, 810, 805, 1591, 455, 565, 327, 637, 565, 2152 166, 167, 560, 1382, 386, 560, 619, 880, 1505, 648, 2153 176, 560, 1123, 0, 1, 601, 560, 560, 657, 185, 2154 186, 1592, 188, 189, 560, 621, 192, 193, 194, 934, 2155 1367, 1372, 903, 937, 381, 1440, 202, 24, 560, 909, 2156 1645, 28, 29, 30, 31, 1138, 333, 560, 54, 560, 2157 37, 281, 1645, 1689, 4, 711, 468, 1654, 695, 560, 2158 638, 11, 1188, 1187, 26, 658, 1191, 1395, 1087, 19, 2159 20, 21, 1669, -1, 1645, -1, -1, 64, 4, -1, 2160 -1, -1, -1, 722, -1, 11, -1, -1, -1, -1, 2091 11, 294, 168, 459, 73, 220, 52, 288, 459, 213, 2092 52, 52, 294, 90, 56, 497, 57, 384, 154, 925, 2093 384, 62, 63, 655, 154, 291, 722, 494, 860, 606, 2094 52, 1011, 136, 219, 237, 109, 322, 551, 164, 165, 2095 52, 52, 294, 141, 1011, 294, 57, 213, 674, 319, 2096 939, 62, 63, 94, 100, 258, 987, 237, 100, 100, 2097 591, 52, 73, 104, 696, 497, 305, 601, 1033, 600, 2098 885, 886, 258, 259, 570, 869, 870, 871, 100, 495, 2099 940, 941, 876, 94, 1277, 168, 947, 172, 100, 100, 2100 110, 1104, 626, 104, 625, 1282, 1185, 3, 5, 1286, 2101 1516, 21, 1289, 19, 20, 24, 3, 945, 3, 100, 2102 3, 1277, 3, 56, 3, 3, 97, 1277, 24, 4, 2103 3, 5, 97, 27, 3, 3, 3, 24, 3, 5, 2104 3, 172, 3, 3, 3, 24, 47, 5, 110, 3, 2105 3, 24, 137, 382, 3, 24, 24, 3, 192, 24, 2106 353, 220, 52, 356, 198, 24, 732, 3, 64, 237, 2107 170, 172, 3, 739, 185, 146, 459, 64, 21, 3, 2108 3, 146, 3, 353, 3, 64, 356, 459, 3, 3, 2109 258, 64, 192, 24, 399, 64, 64, 1093, 3, 64, 2110 3, 24, 3, 560, 3, 64, 3, 333, 3, 194, 2111 100, 3, 405, 333, 3, 420, 3, 1172, 3, 24, 2112 3, 24, 24, 3, 3, 24, 159, 24, 192, 3, 2113 192, 132, 305, 64, 3, 405, 237, 353, 192, 259, 2114 356, 64, 418, 5, 1427, 304, 21, 311, 418, 425, 2115 325, 310, 428, 317, 21, 431, 24, 679, 1086, 64, 2116 319, 64, 64, 322, 24, 64, 522, 64, 1451, 19, 2117 20, 3, 18, 714, 3, 3, 22, 155, 279, 3, 2118 155, 147, 3, 189, 194, 353, 192, 193, 356, 198, 2119 976, 1697, 21, 294, 325, 1451, 64, 194, 192, 374, 2120 388, 1451, 198, 586, 497, 315, 316, 380, 381, 382, 2121 195, 198, 195, 1392, 195, 1270, 195, 200, 724, 198, 2122 194, 497, 201, 606, 325, 198, 1131, 497, 195, 198, 2123 198, 1182, 195, 198, 195, 195, 194, 405, 1122, 198, 2124 399, 195, 195, 374, 586, 501, 195, 24, 384, 195, 2125 331, 194, 353, 384, 878, 356, 877, 52, 359, 195, 2126 976, 420, 421, 884, 606, 851, 887, 198, 892, 1467, 2127 891, 195, 305, 374, 195, 198, 195, 29, 144, 31, 2128 195, 195, 1565, 384, 1567, 147, 155, 64, 52, 1565, 2129 1573, 620, 1014, 198, 195, 198, 198, 24, 418, 198, 2130 195, 198, 1585, 195, 405, 100, 195, 173, 195, 1585, 2131 195, 431, 195, 394, 395, 195, 195, 169, 170, 194, 2132 421, 195, 1599, 161, 192, 192, 155, 155, 459, 497, 2133 198, 155, 499, 500, 155, 194, 100, 64, 24, 722, 2134 192, 1566, 1427, 193, 111, 112, 192, 380, 381, 382, 2135 722, 384, 24, 185, 186, 519, 188, 97, 459, 52, 2136 192, 1586, 667, 719, 495, 496, 497, 561, 195, 48, 2137 664, 587, 588, 589, 668, 669, 24, 1356, 64, 24, 2138 722, 155, 598, 722, 572, 611, 679, 325, 1409, 1587, 2139 557, 611, 64, 1448, 495, 496, 497, 690, 1468, 195, 2140 501, 19, 20, 679, 171, 24, 146, 100, 664, 679, 2141 766, 1468, 668, 669, 690, 1518, 64, 125, 192, 64, 2142 551, 198, 193, 194, 560, 155, 97, 147, 560, 560, 2143 1380, 532, 111, 112, 790, 567, 374, 1342, 3, 1011, 2144 24, 987, 999, 1015, 161, 64, 987, 620, 560, 809, 2145 551, 811, 192, 554, 1359, 567, 114, 22, 560, 560, 2146 591, 592, 192, 19, 20, 192, 742, 52, 176, 600, 2147 601, 198, 742, 1195, 194, 146, 1080, 117, 118, 24, 2148 64, 1566, 1567, 1150, 192, 586, 1370, 192, 1573, 1011, 2149 591, 592, 171, 1015, 625, 626, 192, 24, 194, 600, 2150 601, 1586, 29, 192, 31, 606, 192, 125, 667, 640, 2151 168, 679, 198, 19, 20, 100, 194, 1513, 1588, 64, 2152 192, 192, 690, 24, 625, 626, 198, 560, 103, 21, 2153 22, 1588, 150, 108, 567, 193, 111, 24, 639, 640, 2154 1164, 29, 1163, 31, 192, 155, 155, 192, 166, 167, 2155 198, 22, 192, 198, 655, 1477, 194, 590, 176, 4, 2156 87, 175, 200, 64, 194, 140, 599, 185, 186, 125, 2157 188, 189, 168, 192, 192, 193, 194, 64, 679, 198, 2158 194, 195, 192, 3, 202, 33, 200, 620, 115, 622, 2159 623, 624, 18, 724, 194, 696, 22, 193, 18, 87, 2160 48, 168, 22, 175, 987, 3, 765, 823, 192, 173, 2161 166, 167, 988, 714, 198, 987, 183, 6, 7, 125, 2162 176, 722, 194, 724, 22, 194, 193, 115, 131, 185, 2163 186, 200, 188, 189, 99, 100, 192, 193, 194, 192, 2164 804, 189, 195, 173, 174, 193, 173, 192, 201, 808, 2165 809, 845, 811, 198, 24, 141, 183, 1653, 874, 29, 2166 192, 31, 1448, 195, 105, 853, 107, 768, 143, 1226, 2167 176, 198, 888, 192, 425, 125, 195, 428, 5, 185, 2168 186, 168, 188, 189, 1225, 173, 192, 193, 192, 193, 2169 906, 192, 173, 174, 920, 826, 912, 198, 185, 186, 2170 920, 188, 158, 159, 160, 192, 193, 1201, 113, 1203, 2171 926, 198, 192, 872, 4, 195, 194, 750, 1011, 1441, 2172 194, 201, 1015, 113, 860, 826, 176, 1184, 1111, 860, 2173 1184, 105, 106, 40, 41, 185, 186, 194, 188, 1015, 2174 1033, 1011, 192, 1602, 1603, 1015, 877, 878, 28, 29, 2175 30, 31, 38, 884, 885, 886, 887, 37, 889, 860, 2176 891, 892, 893, 1033, 194, 938, 194, 1150, 927, 1111, 2177 62, 63, 1028, 208, 209, 1321, 877, 878, 194, 1325, 2178 326, 327, 194, 884, 885, 886, 887, 47, 889, 193, 2179 891, 892, 893, 925, 925, 194, 1089, 194, 194, 201, 2180 12, 13, 14, 15, 16, 17, 18, 87, 1150, 940, 2181 941, 5, 29, 168, 31, 916, 201, 175, 23, 1089, 2182 176, 177, 178, 179, 925, 10, 8, 860, 184, 988, 2183 185, 186, 194, 188, 190, 115, 192, 192, 193, 940, 2184 941, 194, 875, 1011, 68, 69, 70, 1015, 72, 192, 2185 29, 1010, 31, 192, 192, 192, 987, 890, 4, 1230, 2186 5, 192, 147, 1409, 200, 1033, 169, 105, 1409, 194, 2187 87, 185, 186, 1089, 188, 976, 192, 29, 192, 31, 2188 195, 195, 168, 194, 1015, 5, 987, 176, 177, 178, 2189 179, 195, 925, 173, 5, 184, 1468, 5, 115, 185, 2190 186, 190, 188, 151, 3, 938, 192, 193, 87, 1010, 2191 1011, 175, 1128, 1014, 1015, 203, 1083, 175, 198, 1275, 2192 175, 1089, 195, 185, 186, 175, 188, 1028, 1144, 195, 2193 192, 1388, 1033, 195, 1388, 87, 115, 194, 1321, 1233, 2194 192, 1234, 1325, 5, 22, 1161, 192, 192, 3, 1080, 2195 162, 163, 164, 165, 1113, 194, 173, 3, 1234, 195, 2196 111, 1093, 1093, 115, 1234, 1066, 183, 99, 100, 101, 2197 102, 185, 186, 195, 188, 4, 174, 1233, 192, 1080, 2198 155, 195, 192, 3, 196, 197, 4, 3, 1089, 192, 2199 1091, 200, 1093, 11, 173, 194, 4, 4, 195, 131, 2200 1131, 19, 20, 21, 183, 185, 186, 139, 188, 114, 2201 1111, 1287, 192, 194, 194, 192, 1588, 185, 186, 135, 2202 188, 173, 185, 186, 192, 188, 1409, 183, 1159, 192, 2203 1131, 183, 1163, 1164, 195, 195, 125, 1409, 185, 186, 2204 194, 188, 183, 185, 186, 192, 188, 194, 1184, 1150, 2205 192, 195, 5, 1184, 108, 73, 192, 111, 1159, 39, 2206 1093, 150, 1163, 1164, 192, 183, 1234, 121, 1227, 123, 2207 65, 66, 126, 127, 183, 3, 94, 166, 167, 175, 2208 195, 18, 5, 1184, 3, 80, 140, 176, 194, 84, 2209 22, 145, 194, 1194, 1195, 90, 185, 186, 3, 188, 2210 189, 192, 194, 192, 193, 194, 21, 125, 194, 21, 2211 195, 104, 194, 202, 194, 3, 3, 194, 1277, 194, 2212 3, 192, 192, 1282, 1225, 147, 170, 1286, 194, 1162, 2213 1289, 194, 150, 1234, 140, 194, 155, 3, 115, 1298, 2214 3, 5, 3, 5, 30, 5, 195, 3, 166, 167, 2215 195, 1184, 31, 29, 195, 195, 195, 25, 176, 1375, 2216 195, 3, 3, 158, 1705, 5, 104, 185, 186, 4, 2217 188, 189, 1718, 168, 192, 193, 194, 194, 1279, 192, 2218 195, 103, 194, 21, 202, 4, 108, 52, 20, 111, 2219 1321, 1350, 57, 4, 1325, 195, 192, 62, 63, 121, 2220 5, 123, 192, 195, 126, 127, 195, 195, 195, 3, 2221 3, 1342, 195, 4, 26, 73, 94, 195, 140, 5, 2222 1321, 195, 5, 145, 1325, 200, 4, 1260, 1359, 94, 2223 3, 99, 100, 101, 102, 100, 194, 104, 192, 104, 2224 195, 1342, 192, 195, 200, 194, 4, 195, 1407, 1380, 2225 104, 147, 1388, 3, 1559, 3, 5, 1388, 1359, 4, 2226 3, 5, 3, 131, 1558, 133, 134, 135, 1427, 194, 2227 138, 139, 5, 141, 142, 5, 22, 195, 1409, 1380, 2228 275, 1575, 3, 21, 4, 280, 3, 1388, 283, 3, 2229 3, 3, 1451, 4, 195, 290, 3, 195, 4, 192, 2230 195, 195, 1558, 195, 194, 3, 195, 172, 1409, 304, 2231 192, 192, 307, 3, 5, 192, 4, 192, 4, 1575, 2232 21, 195, 195, 3, 195, 195, 195, 22, 4, 3, 2233 3, 3, 1600, 4, 4, 1718, 1369, 1468, 195, 194, 2234 1441, 1477, 195, 195, 195, 195, 1477, 1448, 343, 344, 2235 3, 346, 4, 49, 1729, 1388, 1011, 920, 100, 1011, 2236 355, 20, 357, 1275, 412, 1278, 1231, 1526, 719, 1287, 2237 519, 1279, 1451, 368, 11, 370, 1477, 1011, 103, 421, 2238 1441, 1513, 1513, 108, 1440, 1567, 111, 790, 1056, 1568, 2239 1427, 405, 1523, 252, 722, 390, 121, 1573, 123, 792, 2240 1559, 126, 127, 1534, 1015, 1011, 1565, 1566, 1567, 496, 2241 1066, 985, 1513, 1707, 1573, 140, 804, 1295, 1705, 1225, 2242 145, 1574, 1523, 460, 893, 998, 1585, 1586, 554, 1028, 2243 560, 1524, 1359, 1534, 1111, 1534, 1526, 560, 1535, 1350, 2244 1599, 266, 447, 452, 1477, 448, 450, 765, 809, 806, 2245 386, 1707, 811, 318, 455, 565, 560, 1588, 565, 560, 2246 325, 0, 1, 560, 1390, 1128, 619, 882, 1375, 318, 2247 560, 381, 467, 621, 938, 941, 471, 560, 1448, 327, 2248 1513, 560, 1380, 912, 560, 24, 560, 482, 906, 28, 2249 29, 30, 31, 560, 1144, 4, 333, 54, 37, 1600, 2250 1697, 281, 11, 1662, 499, 500, 468, 560, 503, 374, 2251 19, 20, 21, 696, 509, 380, 381, 712, 1677, 384, 2252 639, 1653, 1653, 26, 1194, 64, 4, 1403, 1195, 1198, 2253 659, 526, 1091, 11, -1, -1, -1, -1, -1, -1, 2254 535, 19, 20, 21, -1, -1, -1, -1, 87, 544, 2255 -1, -1, 1653, -1, -1, -1, -1, 552, -1, -1, 2256 -1, -1, 557, -1, 1723, -1, -1, 1726, -1, -1, 2257 -1, -1, -1, -1, -1, -1, 115, -1, -1, -1, 2258 1739, 576, -1, -1, -1, -1, -1, 1718, -1, -1, 2259 -1, 5, 6, 7, 8, 9, 10, -1, 12, 13, 2260 14, 15, 16, 17, 1705, 19, 20, 21, 22, 23, 2261 -1, -1, -1, -1, -1, -1, 125, 1718, -1, -1, 2262 1653, 1654, -1, -1, -1, -1, -1, -1, -1, -1, 2263 495, 496, 497, -1, 173, -1, -1, 176, 177, 178, 2264 179, 150, -1, 638, -1, 184, 155, 125, -1, -1, 2265 -1, 190, -1, -1, 649, 4, -1, 166, 167, 198, 2266 -1, -1, 11, 658, -1, -1, -1, 176, -1, -1, 2267 19, 20, 150, -1, -1, -1, 185, 186, -1, 188, 2268 189, -1, -1, 192, 193, 194, 551, -1, 166, 167, 2269 -1, -1, -1, 202, -1, 560, -1, -1, 176, -1, 2270 -1, -1, -1, -1, -1, -1, -1, 185, 186, -1, 2271 188, 189, -1, -1, 192, 193, 194, -1, -1, -1, 2272 -1, -1, -1, -1, 202, -1, 591, 592, 723, -1, 2273 -1, -1, -1, -1, -1, 600, 601, -1, -1, -1, 2274 -1, 4, -1, -1, -1, -1, -1, -1, 11, -1, 2275 -1, 746, -1, 748, 619, -1, 19, 20, -1, -1, 2276 625, 626, -1, -1, -1, -1, -1, -1, 763, -1, 2277 -1, -1, -1, -1, 769, 640, 125, -1, -1, -1, 2278 -1, 195, 196, 197, -1, -1, -1, 4, -1, -1, 2279 655, -1, -1, -1, 11, -1, -1, -1, 38, -1, 2280 -1, 150, 19, 20, -1, -1, -1, 802, -1, -1, 2281 -1, -1, -1, -1, -1, -1, -1, 166, 167, 814, 2282 -1, -1, -1, -1, 819, -1, 821, 176, -1, -1, 2283 -1, 696, -1, -1, -1, -1, 185, 186, -1, 188, 2284 189, -1, -1, 192, 193, 194, -1, -1, -1, -1, 2285 -1, -1, -1, 202, 849, -1, -1, -1, -1, 724, 2286 -1, -1, 125, -1, -1, 860, -1, -1, -1, 109, 2287 -1, -1, -1, -1, 114, -1, -1, -1, -1, 119, 2288 120, -1, 122, -1, -1, 125, 157, 150, 128, 129, 2289 130, -1, -1, -1, -1, -1, -1, 168, -1, -1, 2290 -1, -1, -1, 166, 167, -1, -1, -1, 125, -1, 2291 -1, -1, 907, 176, -1, -1, -1, -1, 913, -1, 2292 -1, -1, 185, 186, -1, 188, 189, -1, 168, 192, 2293 193, 194, -1, 150, -1, -1, -1, -1, -1, 202, 2294 -1, -1, -1, -1, -1, 185, 186, -1, 188, 166, 2295 167, -1, 192, 193, 949, -1, -1, 952, 953, 176, 2296 231, 826, -1, -1, -1, -1, 237, -1, 185, 186, 2297 -1, 188, 189, -1, -1, 192, 193, 194, -1, -1, 2298 -1, 252, 4, -1, -1, 202, -1, -1, -1, 11, 2299 -1, -1, -1, -1, -1, 860, -1, 19, 20, -1, 2300 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 2301 -1, -1, 877, 878, -1, -1, -1, -1, -1, 884, 2302 885, 886, 887, -1, 889, -1, 891, 892, 893, -1, 2303 -1, -1, -1, -1, 305, 306, -1, -1, -1, -1, 2304 1035, -1, -1, 1038, -1, -1, -1, 318, -1, -1, 2305 321, -1, -1, -1, -1, 1050, -1, 1052, -1, -1, 2306 925, -1, 1057, -1, -1, -1, 337, 338, -1, 1064, 2307 1065, -1, -1, 938, -1, 940, 941, -1, -1, -1, 2308 -1, -1, 353, 4, -1, 356, -1, -1, 1083, 1084, 2309 11, -1, -1, -1, -1, -1, -1, -1, 19, 20, 2310 -1, -1, 1097, 125, 1099, 11, -1, 378, -1, 380, 2311 381, 382, -1, 19, 20, 1110, -1, -1, -1, -1, 2312 -1, -1, -1, -1, -1, -1, -1, -1, 150, -1, 2313 -1, -1, -1, -1, 405, -1, -1, -1, -1, -1, 2314 -1, -1, -1, -1, 166, 167, 1011, 94, -1, 1014, 2315 1015, 57, 58, -1, 176, -1, -1, 104, -1, 65, 2316 -1, 67, 68, 185, 186, -1, 188, 189, -1, -1, 2317 192, 193, 194, -1, -1, 1170, -1, -1, -1, 1174, 2318 202, -1, -1, 1178, -1, 1180, 1181, -1, -1, -1, 2319 -1, -1, -1, -1, -1, -1, 1191, -1, -1, -1, 2320 -1, -1, -1, -1, 125, -1, -1, -1, -1, -1, 2321 -1, -1, -1, -1, -1, 1080, -1, -1, -1, 125, 2322 -1, -1, -1, -1, 1219, -1, -1, 498, 1093, 150, 2323 501, 1226, 4, -1, 1229, -1, -1, 1232, -1, 11, 2324 -1, -1, 513, -1, 150, 166, 167, 19, 20, -1, 2325 -1, -1, -1, -1, -1, 176, -1, -1, -1, -1, 2326 166, 167, 1257, -1, 185, 186, 1131, 188, 189, 4, 2327 176, 192, 193, 194, -1, -1, 11, -1, -1, 185, 2328 186, 202, 188, 189, 19, 20, 192, 193, 194, -1, 2329 -1, -1, -1, -1, 1159, -1, 202, -1, 1163, 1164, 2330 -1, -1, -1, -1, 1299, -1, 1301, -1, -1, -1, 2331 -1, -1, -1, -1, -1, -1, -1, -1, -1, 1184, 2332 -1, -1, -1, -1, 4, -1, -1, -1, -1, 1194, 2333 1195, 11, -1, -1, -1, -1, -1, 1332, -1, 19, 2334 20, -1, -1, 1338, -1, -1, -1, -1, -1, 620, 2335 -1, -1, -1, 125, -1, -1, -1, -1, -1, 1354, 2336 -1, -1, -1, 1358, -1, -1, -1, -1, -1, -1, 2337 -1, 318, -1, -1, -1, -1, -1, -1, 150, -1, 2338 -1, 1376, -1, 1378, 655, -1, 1381, -1, 1383, 1384, 2339 125, 1386, -1, -1, 166, 167, -1, -1, -1, -1, 2340 -1, -1, 1397, 674, 176, -1, -1, -1, -1, -1, 2341 -1, -1, -1, 185, 186, 150, 188, 189, -1, -1, 2342 192, 193, 194, -1, -1, 696, -1, -1, -1, -1, 2343 202, 166, 167, 380, 381, -1, 707, -1, 709, -1, 2344 -1, 176, -1, -1, -1, 125, -1, -1, -1, -1, 2345 185, 186, -1, 188, 189, 1450, -1, 192, 193, 194, 2346 -1, -1, -1, -1, -1, -1, -1, 202, -1, -1, 2347 150, -1, -1, -1, -1, -1, -1, 1342, 749, -1, 2348 751, -1, -1, -1, -1, -1, 166, 167, 759, -1, 2349 -1, 762, -1, -1, 1359, -1, 176, -1, -1, -1, 2350 -1, -1, -1, -1, -1, 185, 186, -1, 188, 189, 2351 -1, -1, 192, 193, 194, 1380, -1, -1, -1, 1514, 2352 -1, -1, 202, 1388, -1, 1520, -1, -1, -1, -1, 2353 1525, -1, -1, -1, -1, -1, -1, -1, -1, -1, 2354 -1, 1536, 1537, 1538, -1, -1, -1, -1, 495, 496, 2355 5, -1, 1547, -1, -1, -1, 11, -1, -1, -1, 2356 1555, -1, 1557, -1, 19, 20, -1, 22, -1, -1, 2357 -1, -1, -1, -1, -1, 1440, 1441, 848, -1, -1, 2358 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 2359 -1, -1, -1, -1, -1, -1, -1, 868, 869, 870, 2360 871, -1, -1, 1468, 551, 876, -1, -1, -1, 5, 2361 -1, 882, 1477, -1, -1, 11, -1, -1, -1, -1, 2161 2362 -1, -1, -1, 19, 20, -1, -1, -1, -1, -1, 2162 87, -1, -1, 318, -1, -1, 745, -1, 747, -1, 2163 325, -1, -1, -1, -1, -1, -1, 1710, 1715, -1, 2164 -1, 1718, -1, 762, -1, -1, 1697, -1, 115, 768, 2165 -1, -1, -1, -1, 1731, -1, -1, -1, -1, 1710, 2166 -1, -1, -1, -1, -1, -1, -1, -1, 1645, 1646, 2167 -1, -1, -1, -1, -1, -1, -1, -1, -1, 374, 2168 -1, -1, 801, -1, -1, 380, 381, -1, -1, 384, 2169 -1, -1, -1, -1, 813, 125, -1, -1, -1, 818, 2170 4, 820, -1, -1, -1, -1, 173, 11, -1, 176, 2171 177, 178, 179, -1, -1, 19, 20, 184, -1, 125, 2172 150, -1, -1, 190, -1, -1, -1, -1, -1, 848, 2173 -1, 198, -1, -1, -1, -1, 166, 167, -1, -1, 2174 859, -1, -1, -1, 150, -1, 176, -1, -1, -1, 2175 -1, -1, -1, -1, -1, 185, 186, -1, 188, 189, 2176 166, 167, 192, 193, 194, -1, -1, -1, -1, -1, 2177 176, -1, 202, -1, -1, -1, -1, -1, -1, 185, 2178 186, -1, 188, 189, 157, 904, 192, 193, 194, -1, 2179 -1, 910, -1, -1, -1, 168, 202, -1, -1, -1, 2180 495, 496, 497, -1, -1, -1, -1, -1, -1, -1, 2363 -1, -1, -1, -1, -1, 1630, -1, -1, -1, -1, 2364 -1, -1, -1, -1, 591, 592, -1, 918, 1513, -1, 2365 -1, -1, 1647, 600, 601, -1, -1, -1, 1523, -1, 2366 -1, -1, -1, 1658, -1, -1, -1, 938, 939, 1534, 2367 125, -1, 619, -1, 945, 5, -1, 948, 625, 626, 2368 -1, 11, -1, -1, -1, -1, -1, -1, -1, 19, 2369 20, -1, -1, 640, -1, 150, -1, -1, -1, -1, 2370 -1, 1696, -1, -1, 1699, 976, -1, -1, 655, -1, 2371 -1, 166, 167, 984, -1, -1, -1, -1, -1, -1, 2372 -1, 176, -1, 1588, -1, -1, -1, -1, -1, 125, 2373 185, 186, -1, 188, 189, -1, -1, 192, 193, 194, 2374 -1, -1, -1, 1014, -1, -1, -1, 202, -1, 696, 2375 -1, -1, 1023, -1, 150, -1, 1027, 1028, -1, 1030, 2376 1031, -1, 1033, -1, -1, -1, -1, -1, -1, -1, 2377 166, 167, -1, -1, -1, -1, -1, 724, -1, -1, 2378 176, -1, -1, -1, -1, -1, -1, -1, 1653, 185, 2379 186, -1, 188, 189, -1, 125, 192, 193, 194, -1, 2380 -1, -1, -1, -1, -1, -1, 202, -1, -1, -1, 2381 -1, -1, -1, -1, -1, 1086, -1, -1, 1089, -1, 2382 150, 1092, -1, -1, -1, -1, -1, -1, -1, -1, 2383 -1, -1, -1, -1, 5, -1, 166, 167, -1, -1, 2384 11, -1, -1, -1, -1, -1, 176, -1, 19, 20, 2385 -1, 1122, -1, -1, -1, 185, 186, -1, 188, 189, 2386 -1, -1, 192, 193, 194, -1, -1, -1, -1, -1, 2387 -1, -1, 202, -1, -1, -1, -1, -1, -1, 826, 2181 2388 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 2182 -1, 125, -1, -1, -1, -1, 945, -1, -1, 948, 2183 949, -1, 4, -1, -1, -1, -1, -1, -1, 11, 2184 -1, -1, -1, -1, -1, -1, 150, 19, 20, -1, 2185 -1, -1, -1, -1, -1, -1, 551, -1, 231, -1, 2186 -1, -1, 166, 167, 237, 560, -1, -1, -1, -1, 2187 -1, -1, 176, -1, -1, -1, -1, -1, -1, 252, 2389 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 2390 -1, 1172, -1, -1, -1, -1, -1, -1, -1, -1, 2391 -1, -1, -1, -1, 1185, -1, -1, -1, -1, -1, 2392 -1, -1, -1, 1194, 1195, -1, -1, 11, -1, -1, 2393 877, 878, -1, -1, -1, 19, 20, 884, 885, 886, 2394 887, -1, 889, -1, 891, 892, 893, -1, -1, -1, 2395 -1, -1, -1, 1224, 125, 6, 7, 8, -1, 10, 2396 -1, 12, 13, 14, 15, 16, 17, 18, 19, 20, 2397 21, 22, 23, 24, 58, -1, -1, -1, -1, 150, 2398 -1, 65, -1, 67, 68, -1, -1, -1, 1259, -1, 2399 -1, 938, 1263, 940, 941, 166, 167, -1, -1, 1270, 2400 -1, -1, -1, -1, -1, 176, -1, -1, -1, -1, 2401 -1, -1, -1, 64, 185, 186, 11, 188, 189, -1, 2402 -1, 192, 193, 194, 19, 20, -1, 11, -1, -1, 2403 -1, 202, -1, 1304, -1, 19, 20, -1, -1, -1, 2404 24, 125, -1, -1, -1, -1, -1, 1318, -1, -1, 2405 -1, -1, -1, -1, 49, -1, 51, 52, 53, 54, 2406 -1, 56, -1, 58, 59, -1, 150, 1014, -1, -1, 2407 65, -1, 67, 68, 69, -1, -1, -1, -1, -1, 2408 64, -1, 166, 167, -1, 1356, -1, -1, -1, -1, 2409 -1, -1, 176, -1, -1, -1, -1, 1368, -1, 1370, 2188 2410 -1, 185, 186, -1, 188, 189, -1, -1, 192, 193, 2189 194, -1, -1, -1, 4, -1, 591, 592, 202, -1, 2190 -1, 11, -1, -1, -1, 600, 601, -1, -1, 19, 2191 20, -1, 1031, -1, -1, 1034, -1, -1, -1, -1, 2192 -1, -1, -1, -1, 619, -1, -1, 1046, -1, 1048, 2193 625, -1, 305, 306, 1053, -1, -1, -1, -1, -1, 2194 -1, 1060, 1061, -1, 639, 318, -1, -1, 321, -1, 2195 -1, -1, -1, 125, -1, -1, -1, -1, -1, 654, 2196 1079, 1080, -1, -1, 337, 338, -1, -1, -1, -1, 2197 4, -1, -1, -1, 1093, -1, 1095, 11, 150, -1, 2198 353, -1, -1, 356, -1, 19, 20, 1106, -1, -1, 2199 -1, -1, -1, -1, 166, 167, -1, -1, -1, -1, 2200 695, -1, -1, -1, 176, 378, -1, 380, 381, 382, 2201 -1, -1, -1, 185, 186, 125, 188, 189, -1, -1, 2202 192, 193, 194, -1, -1, -1, -1, -1, 723, -1, 2203 202, -1, 405, -1, -1, -1, -1, -1, -1, -1, 2204 150, -1, -1, -1, 1163, -1, -1, -1, 1167, -1, 2205 -1, -1, 1171, -1, 1173, 1174, 166, 167, -1, -1, 2206 -1, -1, -1, -1, -1, 1184, 176, -1, -1, -1, 2207 -1, -1, -1, -1, -1, 185, 186, -1, 188, 189, 2208 -1, -1, 192, 193, 194, -1, -1, -1, -1, -1, 2209 -1, 125, 202, 1212, -1, -1, -1, -1, -1, -1, 2210 1219, -1, -1, 1222, 4, -1, 1225, -1, -1, -1, 2211 -1, 11, -1, -1, -1, -1, 150, -1, -1, 19, 2212 20, -1, -1, -1, -1, 498, -1, 94, 501, -1, 2213 825, 1250, 166, 167, -1, -1, -1, 104, -1, -1, 2214 513, -1, 176, -1, -1, -1, -1, -1, -1, -1, 2215 -1, 185, 186, -1, 188, 189, -1, -1, 192, 193, 2216 194, -1, -1, -1, 859, -1, -1, -1, 202, -1, 2217 -1, -1, -1, 1292, -1, 1294, -1, -1, -1, -1, 2218 -1, 876, -1, -1, 4, -1, -1, 882, 883, 884, 2219 885, 11, 887, -1, 889, 890, -1, -1, -1, 19, 2220 20, -1, -1, -1, -1, -1, 1325, -1, -1, -1, 2221 -1, -1, 1331, -1, -1, -1, -1, -1, -1, -1, 2222 -1, -1, -1, -1, -1, 125, -1, 922, 1347, -1, 2223 -1, -1, 1351, -1, -1, -1, -1, -1, -1, 934, 2224 -1, 936, 937, -1, 25, -1, -1, 620, -1, 1368, 2225 150, 1370, -1, -1, 1373, -1, 1375, 1376, -1, 1378, 2226 -1, -1, 4, -1, -1, -1, 166, 167, -1, 11, 2227 1389, -1, -1, -1, -1, -1, 176, 19, 20, -1, 2228 -1, 654, -1, -1, -1, 185, 186, -1, 188, 189, 2229 -1, -1, 192, 193, 194, -1, -1, -1, -1, -1, 2230 673, -1, 202, -1, -1, 125, -1, -1, -1, -1, 2231 -1, -1, 1007, -1, -1, 1010, 1011, -1, 99, 100, 2232 101, 102, 695, 1442, -1, -1, -1, -1, 5, -1, 2233 150, -1, -1, 706, 11, 708, -1, -1, -1, -1, 2234 -1, -1, 19, 20, -1, 22, 166, 167, -1, -1, 2235 131, 318, 133, 134, 135, -1, 176, 138, 139, -1, 2236 141, 142, -1, -1, -1, 185, 186, -1, 188, 189, 2237 -1, -1, 192, 193, 194, 748, -1, 750, -1, -1, 2238 -1, 1076, 202, 125, -1, 758, -1, 1506, 761, -1, 2239 -1, -1, -1, 1512, 1089, -1, -1, -1, 1517, -1, 2240 -1, -1, -1, -1, -1, -1, -1, -1, 150, 1528, 2241 1529, 1530, -1, 380, 381, -1, -1, -1, -1, -1, 2242 1539, 5, -1, -1, 166, 167, -1, 11, 1547, -1, 2243 1549, 1126, -1, -1, 176, 19, 20, -1, -1, -1, 2244 -1, -1, -1, 185, 186, -1, 188, 189, 125, -1, 2245 192, 193, 194, -1, -1, -1, -1, -1, 1153, -1, 2246 202, -1, 1157, -1, -1, -1, -1, -1, -1, -1, 2247 -1, -1, -1, 150, 847, -1, -1, -1, -1, -1, 2248 -1, -1, 1177, -1, -1, -1, -1, -1, -1, 166, 2249 167, -1, 1187, 1188, 867, 868, 869, 870, -1, 176, 2250 -1, -1, 875, 1622, -1, -1, -1, 880, 185, 186, 2251 -1, 188, 189, -1, -1, 192, 193, 194, -1, -1, 2252 1639, -1, -1, -1, -1, 202, -1, -1, 495, 496, 2253 -1, 1650, -1, -1, -1, -1, -1, -1, -1, -1, 2254 -1, 125, 915, 5, -1, -1, -1, -1, -1, 11, 2255 -1, -1, -1, -1, -1, -1, -1, 19, 20, -1, 2256 -1, 934, 935, -1, -1, -1, 150, -1, 941, 1688, 2257 -1, 944, 1691, -1, -1, -1, -1, -1, -1, -1, 2258 5, -1, 166, 167, 551, -1, 11, -1, -1, -1, 2259 -1, -1, 176, -1, 19, 20, -1, -1, -1, 972, 2260 -1, 185, 186, -1, 188, 189, -1, 980, 192, 193, 2261 194, -1, -1, -1, -1, -1, -1, -1, 202, -1, 2262 11, -1, -1, -1, 591, 592, -1, -1, 19, 20, 2263 -1, -1, -1, 600, 601, -1, -1, 1010, -1, -1, 2264 1335, -1, -1, -1, -1, -1, 1019, -1, -1, -1, 2265 1023, 1024, 619, 1026, 1027, -1, 1029, 1352, 625, -1, 2266 -1, -1, -1, 125, -1, -1, 57, 58, -1, -1, 2267 -1, -1, 639, -1, 65, -1, 67, 1372, -1, -1, 2268 -1, -1, -1, -1, -1, 1380, -1, 654, 150, -1, 2411 194, 162, 163, 164, 165, -1, -1, -1, 202, 1390, 2412 -1, 1392, -1, -1, -1, -1, -1, -1, -1, -1, 2413 125, -1, -1, 1080, -1, -1, -1, -1, -1, -1, 2414 -1, 125, 193, -1, -1, 196, 197, 198, -1, -1, 2415 201, -1, -1, -1, -1, 150, -1, -1, -1, -1, 2416 -1, -1, -1, -1, -1, -1, 150, -1, -1, 1440, 2417 1441, 166, 167, -1, -1, -1, 1447, 1448, -1, -1, 2418 -1, 176, 166, 167, 1131, -1, -1, -1, -1, -1, 2419 185, 186, 176, 188, 189, -1, 1467, 192, 193, 194, 2420 -1, 185, 186, -1, 188, 189, -1, 202, 192, 193, 2421 194, -1, 1159, -1, 198, -1, 1163, 1164, 202, -1, 2422 -1, 1492, 1493, 1494, 1495, 1496, 1497, 1498, 1499, 1500, 2423 1501, 1502, 1503, 1504, 1505, 1506, 1507, 1508, 1509, 1510, 2424 -1, -1, -1, -1, -1, -1, -1, 1194, 1195, -1, 2425 -1, -1, 6, 7, 8, -1, 10, -1, 12, 13, 2426 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 2427 24, -1, -1, -1, -1, -1, -1, -1, -1, -1, 2269 2428 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 2270 125, -1, -1, -1, 166, 167, -1, -1, -1, 1082, 2271 -1, -1, 1085, -1, 176, 1088, -1, -1, -1, -1, 2272 -1, -1, -1, 185, 186, 150, 188, 189, 695, -1, 2273 192, 193, 194, -1, 125, -1, -1, 1432, 1433, -1, 2274 202, 166, 167, -1, -1, 1118, -1, -1, -1, -1, 2275 -1, 176, -1, -1, -1, -1, 723, -1, -1, 150, 2276 185, 186, -1, 188, 189, 1460, -1, 192, 193, 194, 2277 -1, -1, -1, -1, 1469, 166, 167, 202, -1, -1, 2278 -1, -1, -1, -1, -1, 176, -1, -1, -1, -1, 2279 -1, -1, 1165, -1, 185, 186, -1, 188, 189, -1, 2280 -1, 192, 193, 194, -1, 1178, -1, -1, -1, -1, 2281 1505, 202, -1, -1, 1187, 1188, -1, -1, -1, -1, 2282 1515, -1, -1, -1, -1, -1, -1, -1, -1, -1, 2283 -1, 1526, -1, -1, -1, -1, -1, -1, -1, 6, 2284 7, 8, -1, 10, 1217, 12, 13, 14, 15, 16, 2285 17, 18, 19, 20, 21, 22, 23, 24, 825, 5, 2286 6, 7, 8, 9, 10, -1, 12, 13, 14, 15, 2287 16, 17, -1, 19, 20, 21, 22, 23, -1, 1252, 2288 -1, -1, -1, 1256, -1, 1580, -1, -1, -1, -1, 2289 1263, -1, -1, -1, -1, -1, -1, 64, -1, -1, 2290 -1, -1, -1, -1, -1, -1, -1, -1, -1, 876, 2291 -1, -1, -1, -1, -1, 882, 883, 884, 885, -1, 2292 887, -1, 889, 890, 1297, -1, -1, -1, -1, -1, 2293 -1, -1, -1, -1, -1, -1, -1, -1, 1311, -1, 2294 -1, -1, -1, -1, -1, 6, 7, 8, -1, 10, 2295 1645, 12, 13, 14, 15, 16, 17, 18, 19, 20, 2296 21, 22, 23, 24, -1, -1, -1, 934, -1, 936, 2297 937, -1, -1, -1, -1, -1, 1349, -1, -1, -1, 2298 -1, -1, -1, -1, -1, -1, -1, -1, 1361, -1, 2299 1363, -1, -1, -1, -1, 162, 163, 164, 165, -1, 2300 -1, -1, -1, 64, -1, -1, -1, -1, -1, 1382, 2301 -1, 1384, -1, -1, -1, -1, -1, -1, -1, -1, 2302 -1, -1, -1, -1, -1, -1, 193, -1, -1, 196, 2303 197, 198, -1, 11, 201, -1, -1, -1, -1, -1, 2304 -1, 19, 20, 1010, -1, -1, -1, -1, -1, 195, 2305 196, 197, -1, -1, -1, -1, -1, -1, -1, 1432, 2306 1433, -1, -1, -1, -1, -1, 1439, 1440, -1, -1, 2307 -1, 49, -1, 51, 52, 53, 54, -1, 56, -1, 2308 58, 59, -1, -1, -1, -1, 1459, 65, -1, 67, 2309 -1, 69, -1, -1, -1, -1, -1, -1, -1, -1, 2310 -1, 162, 163, 164, 165, -1, -1, -1, -1, 1076, 2311 -1, 1484, 1485, 1486, 1487, 1488, 1489, 1490, 1491, 1492, 2312 1493, 1494, 1495, 1496, 1497, 1498, 1499, 1500, 1501, 1502, 2313 -1, -1, 193, 194, -1, 196, 197, 198, -1, 200, 2314 -1, -1, -1, -1, -1, 11, -1, 125, -1, -1, 2315 -1, -1, -1, 19, 20, 21, -1, -1, -1, 1126, 2429 -1, 1562, -1, -1, -1, -1, -1, -1, -1, -1, 2316 2430 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 2317 -1, -1, 150, -1, -1, -1, -1, -1, -1, -1, 2318 -1, 1554, -1, -1, 50, -1, 1153, -1, 166, 167, 2319 1157, -1, 58, -1, 60, 61, 62, 63, 176, 65, 2320 -1, 67, -1, -1, -1, -1, 1579, 185, 186, -1, 2321 188, 189, -1, -1, 192, 193, 194, -1, 11, -1, 2322 1187, 1188, -1, 1596, 202, -1, 19, 20, -1, -1, 2431 64, -1, -1, -1, -1, -1, 1587, -1, -1, -1, 2432 -1, 11, -1, -1, -1, -1, -1, -1, -1, 19, 2433 20, 21, -1, 1604, -1, -1, -1, -1, -1, -1, 2323 2434 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 2324 1613, 1614, -1, -1, -1, 1618, -1, 1620, -1, -1, 2325 -1, -1, -1, -1, -1, -1, 49, -1, -1, 125, 2326 53, 54, 55, 56, 57, 58, -1, -1, -1, -1, 2327 -1, -1, 65, 66, 67, -1, -1, -1, -1, -1, 2328 -1, -1, -1, -1, 150, -1, -1, -1, -1, -1, 2435 1621, 1622, -1, -1, -1, 1626, -1, 1628, -1, -1, 2436 50, -1, -1, -1, -1, -1, -1, -1, 58, -1, 2437 60, 61, 62, 63, -1, 65, -1, 67, 68, -1, 2329 2438 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 2330 166, 167, 168, -1, -1, 1678, -1, 11, -1, -1, 2331 176, -1, -1, -1, -1, 19, 20, -1, -1, 185, 2332 186, -1, 188, 189, -1, -1, 192, 193, 194, -1, 2333 -1, 1704, 125, -1, -1, -1, 202, -1, -1, -1, 2334 44, -1, -1, -1, -1, -1, 1719, -1, 1721, 1722, 2335 -1, -1, -1, -1, 58, 1728, -1, 150, -1, -1, 2336 1733, 65, -1, 67, 68, -1, -1, -1, 1335, -1, 2337 -1, -1, 11, 166, 167, -1, -1, -1, -1, -1, 2338 19, 20, -1, 176, -1, 1352, -1, -1, -1, -1, 2339 -1, -1, 185, 186, -1, 188, 189, -1, -1, 192, 2340 193, 194, -1, -1, -1, 1372, 110, -1, -1, 202, 2341 49, -1, 51, -1, 53, 54, -1, 56, -1, 58, 2342 59, 125, -1, -1, -1, -1, 65, -1, 67, -1, 2343 69, -1, -1, -1, -1, -1, -1, -1, -1, -1, 2344 -1, -1, -1, -1, -1, -1, 150, 11, -1, -1, 2345 -1, -1, 156, -1, -1, 19, 20, -1, -1, -1, 2346 -1, -1, 166, 167, -1, 1432, 1433, -1, -1, -1, 2439 -1, -1, -1, -1, -1, 1342, -1, -1, -1, -1, 2440 -1, -1, -1, -1, -1, -1, -1, -1, 162, 163, 2441 164, 165, 1359, -1, -1, 1686, -1, -1, -1, -1, 2442 -1, -1, -1, 11, -1, -1, -1, -1, -1, -1, 2443 -1, 19, 20, 1380, -1, 125, -1, -1, -1, 193, 2444 194, 1712, 196, 197, 198, -1, 200, -1, -1, -1, 2445 -1, -1, -1, -1, -1, -1, 1727, -1, 1729, 1730, 2446 150, -1, -1, 11, -1, 1736, -1, -1, -1, -1, 2447 1741, 19, 20, -1, -1, -1, 166, 167, 168, -1, 2448 -1, -1, -1, -1, -1, -1, 176, -1, -1, -1, 2449 -1, -1, -1, 1440, 1441, 185, 186, -1, 188, 189, 2450 -1, 49, 192, 193, 194, 53, 54, 55, 56, 57, 2451 58, -1, 202, 11, -1, -1, -1, 65, 66, 67, 2452 68, 19, 20, -1, -1, -1, -1, -1, -1, -1, 2453 -1, -1, -1, -1, -1, -1, -1, 125, -1, -1, 2454 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 2455 -1, 49, -1, 51, -1, 53, 54, -1, 56, -1, 2456 58, 59, 150, -1, -1, -1, 11, 65, -1, 67, 2457 68, 69, -1, -1, 19, 20, 1523, 125, 166, 167, 2458 -1, -1, -1, -1, -1, -1, -1, 1534, 176, -1, 2459 -1, -1, -1, -1, -1, -1, -1, 185, 186, 44, 2460 188, 189, 150, 11, 192, 193, 194, 195, -1, -1, 2461 -1, 19, 20, 58, 202, -1, -1, -1, 166, 167, 2462 65, -1, 67, 68, -1, -1, -1, 125, 176, -1, 2463 -1, -1, -1, -1, -1, -1, -1, 185, 186, -1, 2464 188, 189, -1, -1, 192, 193, 194, -1, -1, -1, 2465 58, -1, 150, 11, 202, -1, -1, 65, -1, 67, 2466 68, 19, 20, -1, -1, 110, 24, -1, 166, 167, 2467 -1, -1, -1, -1, -1, -1, -1, -1, 176, -1, 2468 125, -1, -1, -1, -1, -1, -1, 185, 186, -1, 2469 188, 189, -1, 11, 192, 193, 194, -1, -1, -1, 2470 -1, 19, 20, 21, 202, 150, 64, -1, -1, -1, 2471 -1, 156, -1, -1, -1, -1, -1, 125, -1, -1, 2472 -1, 166, 167, -1, -1, -1, -1, 11, -1, -1, 2473 -1, 176, -1, -1, -1, 19, 20, -1, -1, -1, 2474 185, 186, 150, 188, 189, -1, -1, 192, 193, 194, 2475 -1, -1, -1, -1, -1, -1, -1, 202, 166, 167, 2476 -1, -1, -1, -1, 11, -1, -1, 125, 176, -1, 2477 -1, -1, 19, 20, 21, -1, -1, 185, 186, -1, 2478 188, 189, -1, -1, 192, 193, 194, -1, -1, -1, 2479 -1, -1, 150, 11, 202, -1, -1, -1, -1, -1, 2480 -1, 19, 20, 21, -1, -1, -1, 125, 166, 167, 2481 94, -1, -1, -1, -1, -1, -1, -1, 176, -1, 2482 -1, -1, -1, -1, -1, -1, -1, 185, 186, -1, 2483 188, 189, 150, -1, 192, 193, 194, -1, -1, -1, 2484 198, 125, -1, 11, 202, -1, -1, -1, 166, 167, 2485 168, 19, 20, 21, -1, -1, -1, -1, 176, -1, 2486 -1, -1, -1, -1, -1, -1, 150, 185, 186, -1, 2487 188, 189, 11, -1, 192, 193, 194, -1, 125, -1, 2488 19, 20, 166, 167, 202, -1, -1, -1, -1, -1, 2347 2489 -1, -1, 176, -1, -1, -1, -1, -1, -1, -1, 2348 -1, 185, 186, -1, 188, 189, 125, 11, 192, 193, 2349 194, -1, -1, -1, 58, 19, 20, -1, 202, -1, 2350 -1, 65, -1, 67, 68, -1, -1, -1, -1, -1, 2351 -1, 150, -1, -1, -1, -1, -1, 11, -1, -1, 2352 -1, -1, -1, -1, -1, 19, 20, 166, 167, -1, 2353 24, -1, -1, -1, 58, -1, -1, 176, -1, -1, 2354 -1, 65, -1, 67, 68, -1, 185, 186, 1515, 188, 2355 189, -1, -1, 192, 193, 194, -1, -1, -1, 1526, 2356 -1, 125, -1, 202, -1, -1, 11, -1, -1, -1, 2357 64, -1, -1, -1, 19, 20, -1, -1, -1, 24, 2358 -1, -1, -1, -1, -1, -1, 150, -1, -1, -1, 2359 -1, -1, -1, -1, -1, -1, -1, -1, -1, 11, 2360 -1, 125, 166, 167, -1, -1, -1, 19, 20, 21, 2361 -1, -1, 176, -1, -1, -1, -1, -1, -1, 64, 2362 -1, 185, 186, -1, 188, 189, 150, -1, 192, 193, 2363 194, 125, 11, -1, -1, -1, -1, -1, 202, -1, 2364 19, 20, 166, 167, -1, -1, -1, -1, -1, -1, 2365 -1, -1, 176, -1, -1, -1, 150, -1, -1, -1, 2366 -1, 185, 186, -1, 188, 189, -1, -1, 192, 193, 2367 194, -1, 166, 167, -1, -1, -1, 11, 202, -1, 2368 125, -1, 176, -1, -1, 19, 20, 21, 11, -1, 2369 -1, 185, 186, -1, 188, 189, 19, 20, 192, 193, 2370 194, -1, -1, -1, 198, 150, -1, -1, 202, -1, 2371 -1, -1, -1, 125, -1, 94, -1, -1, -1, -1, 2372 -1, 166, 167, -1, -1, 11, -1, -1, -1, -1, 2373 -1, 176, -1, 19, 20, 21, -1, -1, 150, -1, 2374 185, 186, -1, 188, 189, -1, 125, 192, 193, 194, 2375 -1, -1, -1, 198, 166, 167, 168, 202, -1, 11, 2376 -1, -1, -1, -1, 176, -1, -1, 19, 20, 21, 2377 11, 150, -1, 185, 186, -1, 188, 189, 19, 20, 2378 192, 193, 194, -1, -1, -1, -1, 166, 167, -1, 2379 202, 125, -1, -1, -1, -1, -1, 176, -1, -1, 2380 -1, -1, 125, -1, -1, -1, 185, 186, -1, 188, 2381 189, -1, -1, 192, 193, 194, 150, 11, -1, -1, 2382 -1, -1, -1, 202, -1, 19, 20, 150, -1, -1, 2383 -1, -1, 166, 167, -1, -1, -1, -1, -1, 125, 2384 -1, 11, 176, 166, 167, -1, -1, -1, -1, 19, 2385 20, 185, 186, 176, 188, 189, -1, -1, 192, 193, 2386 194, -1, 185, 186, 150, 188, 189, -1, 202, 192, 2387 193, 194, 195, 125, 11, -1, -1, -1, -1, 202, 2388 166, 167, 19, 20, 125, -1, -1, -1, -1, -1, 2389 176, -1, -1, -1, -1, -1, -1, -1, 150, 185, 2390 186, -1, 188, 189, -1, -1, 192, 193, 194, 150, 2391 -1, 11, -1, -1, 166, 167, 202, -1, -1, 19, 2392 20, -1, -1, -1, 176, 166, 167, -1, -1, -1, 2393 -1, 125, -1, 185, 186, 176, 188, 189, -1, -1, 2394 192, 193, 194, -1, 185, 186, -1, 188, 189, -1, 2395 202, 192, 193, 194, -1, 125, 150, 11, -1, -1, 2396 -1, 202, -1, -1, -1, 19, 20, -1, 11, -1, 2397 -1, -1, 166, 167, -1, -1, 19, 20, -1, -1, 2398 150, -1, 176, -1, -1, -1, -1, -1, 125, -1, 2399 -1, 185, 186, -1, 188, 189, 166, 167, 192, 193, 2400 194, -1, -1, -1, -1, -1, 176, -1, 202, -1, 2401 -1, -1, -1, 150, -1, 185, 186, -1, 188, 189, 2402 -1, -1, 192, 193, 194, 125, -1, -1, -1, 166, 2403 167, -1, 202, -1, -1, -1, -1, -1, -1, 176, 2404 -1, -1, -1, -1, -1, -1, -1, -1, 185, 186, 2405 150, 188, 189, -1, 25, 192, 193, 194, -1, -1, 2406 -1, 32, -1, -1, -1, 202, 166, 167, -1, -1, 2407 -1, 125, -1, -1, -1, -1, 176, -1, -1, -1, 2408 -1, -1, 125, -1, -1, 185, 186, -1, 188, 189, 2409 -1, -1, 192, 193, 194, -1, 150, -1, -1, -1, 2410 -1, -1, 202, -1, -1, -1, -1, 150, -1, -1, 2411 -1, 82, 166, 167, -1, -1, -1, -1, -1, -1, 2412 -1, -1, 176, 166, 167, -1, -1, -1, 99, 100, 2413 -1, 185, 186, 176, 188, 189, -1, -1, 192, 193, 2414 194, 112, 185, 186, -1, 188, 189, -1, 202, 192, 2490 -1, 185, 186, 150, 188, 189, -1, 125, 192, 193, 2491 194, -1, -1, -1, -1, -1, -1, 11, 202, 166, 2492 167, -1, -1, -1, -1, 19, 20, -1, 11, 176, 2493 -1, -1, 150, -1, -1, -1, 19, 20, 185, 186, 2494 -1, 188, 189, -1, -1, 192, 193, 194, 166, 167, 2495 -1, -1, -1, -1, -1, 202, -1, 125, 176, -1, 2496 -1, -1, -1, -1, -1, -1, -1, 185, 186, -1, 2497 188, 189, -1, -1, 192, 193, 194, -1, -1, -1, 2498 -1, -1, 150, 11, 202, -1, 125, -1, -1, -1, 2499 -1, 19, 20, -1, -1, -1, -1, -1, 166, 167, 2500 -1, -1, -1, -1, -1, -1, -1, 11, 176, -1, 2501 -1, 150, -1, -1, -1, 19, 20, 185, 186, -1, 2502 188, 189, -1, -1, 192, 193, 194, 166, 167, -1, 2503 -1, 125, -1, -1, 202, -1, 11, 176, -1, -1, 2504 -1, -1, 125, -1, 19, 20, 185, 186, -1, 188, 2505 189, -1, -1, 192, 193, 194, 150, -1, -1, -1, 2506 -1, -1, -1, 202, -1, -1, 11, 150, -1, -1, 2507 -1, -1, 166, 167, 19, 20, -1, -1, -1, -1, 2508 -1, -1, 176, 166, 167, -1, -1, -1, -1, -1, 2509 -1, 185, 186, 176, 188, 189, -1, 125, 192, 193, 2510 194, -1, 185, 186, -1, 188, 189, -1, 202, 192, 2415 2511 193, 194, -1, -1, -1, -1, -1, -1, -1, 202, 2416 131, -1, 133, 32, 135, 136, -1, -1, -1, 38, 2417 141, -1, 143, -1, -1, -1, -1, 148, 47, 48, 2512 -1, 125, 150, -1, -1, -1, -1, -1, -1, -1, 2513 -1, -1, -1, -1, -1, -1, -1, -1, 166, 167, 2514 -1, -1, -1, -1, -1, -1, 150, -1, 176, -1, 2515 125, -1, -1, -1, -1, -1, -1, 185, 186, -1, 2516 188, 189, 166, 167, 192, 193, 194, -1, -1, -1, 2517 -1, 25, 176, -1, 202, 150, -1, -1, 32, -1, 2518 125, 185, 186, -1, 188, 189, -1, -1, 192, 193, 2519 194, 166, 167, -1, -1, -1, -1, -1, 202, -1, 2520 -1, 176, -1, -1, -1, 150, -1, -1, -1, -1, 2521 185, 186, -1, 188, 189, -1, -1, 192, 193, 194, 2522 -1, 166, 167, -1, -1, -1, -1, 202, 82, -1, 2523 -1, 176, -1, -1, -1, -1, -1, -1, -1, -1, 2524 185, 186, -1, 188, 189, 99, 100, 192, 193, 194, 2525 -1, -1, -1, -1, -1, -1, -1, 202, 112, -1, 2418 2526 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 2419 -1, -1, -1, -1, -1, -1, -1, 168, -1, -1, 2420 171, 172, 173, -1, -1, 176, 177, 178, 179, 78, 2421 -1, -1, -1, 184, 185, 186, 187, 188, -1, 190, 2422 -1, 192, 193, -1, 93, -1, -1, -1, -1, -1, 2423 -1, -1, -1, -1, -1, -1, 105, 106, 107, -1, 2424 109, -1, -1, 112, -1, 114, -1, 116, 32, -1, 2425 119, 120, -1, 122, 38, -1, 125, -1, -1, 128, 2426 129, 130, -1, 132, 48, -1, -1, -1, -1, -1, 2427 -1, -1, -1, -1, -1, -1, 32, -1, -1, -1, 2428 -1, -1, 38, -1, -1, 154, -1, -1, -1, -1, 2429 -1, -1, 48, -1, 78, -1, -1, -1, -1, 168, 2430 169, 170, 171, -1, -1, -1, -1, -1, -1, 93, 2431 -1, -1, -1, -1, -1, -1, 185, 186, -1, 188, 2527 -1, -1, -1, -1, -1, -1, -1, 131, -1, 133, 2528 32, 135, 136, -1, -1, -1, 38, 141, -1, 143, 2529 -1, -1, -1, -1, 148, 47, 48, -1, -1, -1, 2530 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 2531 -1, -1, -1, -1, 168, -1, -1, 171, 172, 173, 2532 -1, -1, 176, 177, 178, 179, 78, -1, -1, -1, 2533 184, 185, 186, 187, 188, -1, 190, -1, 192, 193, 2534 -1, 93, -1, -1, -1, -1, -1, -1, -1, -1, 2535 -1, -1, -1, 105, 106, 107, -1, 109, -1, -1, 2536 112, -1, 114, -1, 116, 32, -1, 119, 120, -1, 2537 122, 38, -1, 125, -1, -1, 128, 129, 130, -1, 2538 132, 48, -1, -1, -1, -1, -1, -1, -1, -1, 2539 -1, -1, -1, 32, -1, -1, -1, -1, -1, 38, 2540 -1, -1, 154, -1, -1, -1, -1, -1, -1, 48, 2541 -1, 78, -1, -1, -1, -1, 168, 169, 170, 171, 2542 -1, -1, -1, -1, -1, -1, 93, -1, -1, -1, 2543 -1, -1, -1, 185, 186, -1, 188, -1, -1, 78, 2544 192, 193, 109, -1, -1, 112, 113, -1, -1, 116, 2545 -1, -1, 119, 120, 93, 122, -1, -1, 125, -1, 2546 -1, 128, 129, 130, -1, -1, -1, -1, -1, -1, 2547 109, -1, -1, 112, 113, -1, -1, 116, -1, -1, 2548 119, 120, -1, 122, 38, -1, 125, 154, -1, 128, 2549 129, 130, -1, -1, 48, -1, -1, -1, -1, -1, 2550 -1, 168, -1, -1, 171, -1, -1, -1, -1, -1, 2551 -1, -1, 38, -1, -1, 154, 183, -1, 185, 186, 2552 -1, 188, -1, -1, 78, 192, 193, -1, -1, 168, 2553 -1, -1, 171, -1, -1, -1, -1, -1, -1, 93, 2554 -1, -1, -1, -1, 183, -1, 185, 186, -1, 188, 2432 2555 -1, -1, 78, 192, 193, 109, -1, -1, 112, 113, 2433 2556 -1, -1, 116, -1, -1, 119, 120, 93, 122, -1, 2434 -1, 125, -1, -1, 128, 129, 130, -1, -1, -1,2435 -1, -1, -1, 109, -1, -1, 112, 113, -1, -1,2557 -1, 125, -1, -1, 128, 129, 130, -1, 104, -1, 2558 -1, -1, -1, 109, -1, -1, -1, -1, -1, -1, 2436 2559 116, -1, -1, 119, 120, -1, 122, 38, -1, 125, 2437 154, -1, 128, 129, 130, -1, -1, 48, -1, -1,2560 154, -1, 128, 129, 130, -1, -1, -1, -1, -1, 2438 2561 -1, -1, -1, -1, 168, -1, -1, 171, -1, -1, 2439 -1, -1, -1, -1, -1, 38, -1, -1, 154, 183,2562 -1, -1, -1, -1, -1, -1, -1, -1, 154, 183, 2440 2563 -1, 185, 186, -1, 188, -1, -1, 78, 192, 193, 2441 -1, -1, 168, -1, -1, 171, -1, -1, -1, -1,2442 -1, -1, 93, -1, -1, -1, -1, 183, -1, 185,2443 186, -1, 188, -1, -1, 78, 192, 193, 109, -1,2444 -1, 112, 113, -1, -1, 116, -1, -1, 119, 120,2445 93, 122, -1, -1, 125, -1, -1, 128, 129, 130,2446 -1, 104, -1, -1, -1, -1, 109, -1, -1, -1,2447 -1, -1, -1, 116, -1, -1, 119, 120, -1, 122,2448 38, -1, 125, 154, -1, 128, 129, 130, -1, -1,2564 -1, -1, 168, -1, -1, -1, -1, -1, -1, -1, 2565 -1, -1, 93, -1, -1, -1, -1, -1, -1, 185, 2566 186, -1, 188, -1, -1, -1, 192, 193, 109, -1, 2567 -1, -1, -1, -1, -1, 116, -1, -1, 119, 120, 2568 -1, 122, -1, -1, 125, -1, -1, 128, 129, 130, 2569 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 2570 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 2571 -1, -1, -1, 154, -1, -1, -1, -1, -1, -1, 2449 2572 -1, -1, -1, -1, -1, -1, -1, 168, -1, -1, 2450 171, -1, -1, -1, -1, -1, -1, -1, -1, -1,2451 -1, 154, 183, -1, 185, 186, -1, 188, -1, -1,2452 78, 192, 193, -1, -1, 168, -1, -1, -1, -1,2453 -1, -1, -1, -1, -1, 93, -1, -1, -1, -1,2454 -1, -1, 185, 186, -1, 188, -1, -1, -1, 192,2455 193, 109, -1, -1, -1, -1, -1, -1, 116, -1,2456 -1, 119, 120, -1, 122, -1, -1, 125, -1, -1,2457 128, 129, 130, -1, -1, -1, -1, -1, -1, -1,2458 2573 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 2459 -1, -1, -1, -1, -1, -1, 154, -1, -1, -1, 2460 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 2461 168, -1, -1, -1, -1, -1, -1, -1, -1, -1, 2462 -1, -1, -1, -1, -1, -1, -1, 185, 186, -1, 2463 188, -1, -1, -1, 192, 193 2574 -1, -1, -1, -1, 185, 186, -1, 188, -1, -1, 2575 -1, 192, 193 2464 2576 }; 2465 2577 2466 2578 /* YYSTOS[STATE-NUM] -- The (internal number of the) accessing 2467 2579 symbol of state STATE-NUM. */ 2468 static const yytype_ uint16 yystos[] =2580 static const yytype_int16 yystos[] = 2469 2581 { 2470 2582 0, 205, 0, 1, 24, 28, 30, 37, 64, 87, … … 2530 2642 67, 68, 594, 627, 628, 207, 478, 232, 727, 207, 2531 2643 48, 207, 663, 664, 246, 504, 194, 21, 50, 58, 2532 60, 61, 62, 63, 65, 67, 192, 437, 441, 593, 2533 594, 595, 614, 615, 616, 617, 614, 617, 690, 261, 2534 516, 527, 528, 530, 533, 534, 137, 194, 582, 132, 2535 574, 579, 540, 195, 687, 207, 717, 711, 700, 407, 2536 706, 407, 713, 5, 195, 264, 5, 5, 3, 195, 2537 327, 504, 151, 3, 192, 193, 278, 278, 175, 280, 2538 195, 264, 318, 203, 326, 277, 486, 486, 487, 488, 2539 492, 496, 497, 498, 195, 683, 192, 397, 398, 232, 2540 423, 438, 446, 448, 454, 420, 194, 539, 5, 207, 2541 678, 3, 207, 22, 192, 192, 432, 433, 3, 207, 2542 194, 3, 372, 429, 375, 378, 232, 276, 277, 279, 2543 280, 289, 315, 316, 319, 347, 377, 383, 386, 387, 2544 435, 491, 682, 504, 207, 547, 207, 547, 4, 21, 2545 155, 232, 456, 457, 459, 504, 507, 207, 3, 207, 2546 195, 111, 504, 195, 4, 3, 155, 305, 174, 300, 2547 303, 25, 101, 102, 131, 133, 134, 135, 138, 139, 2548 141, 142, 338, 348, 192, 341, 342, 344, 155, 3, 2549 207, 3, 192, 391, 232, 343, 403, 404, 405, 406, 2550 428, 409, 194, 3, 207, 200, 207, 4, 3, 195, 2551 3, 195, 437, 523, 207, 195, 450, 207, 547, 4, 2552 114, 38, 128, 130, 260, 261, 460, 477, 516, 527, 2553 555, 571, 588, 590, 596, 603, 607, 610, 613, 626, 2554 629, 632, 684, 549, 545, 558, 260, 194, 106, 564, 2555 565, 566, 569, 540, 135, 668, 192, 207, 183, 195, 2556 195, 438, 448, 453, 468, 469, 470, 49, 53, 54, 2557 55, 56, 57, 58, 65, 66, 67, 594, 599, 600, 2558 49, 51, 52, 53, 54, 56, 58, 59, 65, 67, 2559 69, 594, 636, 637, 594, 261, 437, 444, 445, 437, 2560 442, 443, 602, 3, 195, 594, 261, 444, 602, 3, 2561 195, 470, 480, 3, 195, 194, 249, 250, 251, 698, 2562 709, 183, 195, 604, 5, 21, 593, 617, 192, 615, 2563 261, 261, 261, 444, 3, 195, 195, 3, 207, 232, 2564 691, 39, 531, 536, 583, 192, 207, 192, 580, 686, 2565 232, 255, 437, 504, 692, 693, 694, 21, 192, 703, 2566 718, 719, 720, 207, 718, 183, 183, 514, 195, 264, 2567 514, 514, 3, 328, 232, 259, 276, 279, 283, 692, 2568 5, 3, 195, 3, 194, 504, 504, 681, 232, 416, 2569 417, 438, 22, 194, 3, 430, 297, 192, 298, 299, 2570 232, 381, 382, 548, 207, 375, 194, 21, 384, 384, 2571 194, 3, 22, 384, 277, 280, 195, 207, 207, 4, 2572 504, 261, 504, 5, 3, 195, 4, 155, 458, 194, 2573 504, 620, 621, 622, 104, 504, 207, 508, 101, 102, 2574 131, 139, 306, 307, 348, 232, 309, 310, 192, 207, 2575 194, 194, 3, 334, 194, 349, 338, 370, 194, 3, 2576 390, 401, 3, 207, 192, 412, 413, 411, 192, 524, 2577 476, 509, 475, 521, 475, 522, 147, 207, 207, 170, 2578 192, 207, 194, 192, 193, 194, 725, 194, 111, 263, 2579 559, 549, 504, 192, 207, 107, 564, 570, 540, 155, 2580 3, 669, 115, 646, 207, 534, 577, 3, 463, 194, 2581 471, 505, 506, 601, 505, 505, 505, 509, 5, 594, 2582 261, 505, 444, 3, 195, 601, 5, 444, 442, 442, 2583 444, 594, 437, 439, 440, 261, 444, 439, 3, 195, 2584 631, 207, 628, 207, 3, 481, 232, 504, 251, 30, 2585 666, 254, 260, 261, 57, 58, 65, 67, 594, 605, 2586 606, 509, 616, 611, 620, 194, 437, 608, 618, 619, 2587 622, 618, 535, 40, 41, 537, 538, 529, 4, 504, 2588 584, 585, 586, 207, 581, 207, 207, 5, 3, 195, 2589 195, 3, 195, 31, 708, 29, 715, 195, 3, 195, 2590 3, 195, 195, 232, 330, 331, 548, 195, 195, 504, 2591 511, 398, 396, 422, 423, 447, 195, 3, 3, 415, 2592 434, 433, 426, 429, 3, 195, 5, 194, 232, 256, 2593 257, 258, 259, 276, 279, 315, 319, 347, 385, 386, 2594 195, 255, 320, 321, 322, 437, 504, 523, 526, 383, 2595 104, 504, 4, 21, 504, 457, 4, 504, 504, 504, 2596 621, 623, 624, 3, 207, 207, 195, 194, 3, 155, 2597 194, 311, 3, 207, 207, 339, 340, 342, 207, 350, 2598 21, 284, 392, 192, 207, 207, 405, 20, 3, 195, 2599 4, 4, 523, 207, 547, 207, 535, 11, 19, 20, 2600 44, 110, 156, 166, 167, 185, 186, 188, 189, 193, 2601 215, 216, 220, 222, 225, 227, 232, 233, 234, 504, 2602 727, 504, 254, 195, 207, 192, 207, 27, 192, 670, 2603 671, 655, 192, 647, 207, 97, 146, 464, 465, 469, 2604 195, 472, 473, 474, 475, 505, 600, 598, 442, 195, 2605 637, 633, 97, 146, 470, 482, 483, 195, 195, 192, 2606 667, 111, 3, 5, 594, 261, 444, 3, 195, 207, 2607 612, 207, 3, 609, 207, 195, 192, 207, 192, 207, 2608 529, 586, 3, 195, 4, 207, 232, 694, 693, 688, 2609 720, 26, 704, 705, 647, 647, 94, 73, 195, 5, 2610 207, 3, 195, 195, 504, 417, 207, 429, 4, 351, 2611 352, 353, 354, 355, 356, 357, 358, 359, 360, 361, 2612 362, 363, 364, 509, 510, 207, 428, 299, 207, 514, 2613 232, 276, 5, 3, 195, 207, 504, 261, 504, 4, 2614 3, 621, 104, 308, 307, 4, 312, 352, 354, 358, 2615 284, 310, 351, 158, 159, 160, 365, 351, 288, 5, 2616 147, 345, 346, 351, 194, 192, 413, 207, 207, 195, 2617 504, 195, 195, 504, 200, 446, 448, 194, 194, 195, 2618 192, 185, 235, 446, 5, 6, 7, 8, 9, 10, 2619 12, 13, 14, 15, 16, 17, 19, 20, 21, 22, 2620 23, 196, 197, 217, 195, 195, 104, 207, 4, 147, 2621 3, 207, 645, 442, 467, 5, 3, 462, 3, 195, 2622 476, 4, 207, 620, 207, 467, 5, 3, 479, 576, 2623 665, 504, 261, 505, 606, 207, 207, 619, 207, 192, 2624 207, 207, 207, 585, 586, 207, 194, 701, 714, 714, 2625 5, 5, 509, 423, 3, 22, 195, 3, 4, 3, 2626 3, 354, 362, 510, 21, 3, 431, 3, 322, 321, 2627 504, 548, 624, 625, 207, 312, 195, 3, 4, 5, 2628 147, 313, 314, 195, 195, 195, 511, 315, 347, 435, 2629 195, 393, 726, 223, 224, 226, 5, 219, 504, 504, 2644 60, 61, 62, 63, 65, 67, 68, 192, 437, 441, 2645 593, 594, 595, 614, 615, 616, 617, 614, 617, 690, 2646 261, 516, 527, 528, 530, 533, 534, 137, 194, 582, 2647 132, 574, 579, 540, 195, 687, 207, 717, 711, 700, 2648 407, 706, 407, 713, 5, 195, 264, 5, 5, 3, 2649 195, 327, 504, 151, 3, 192, 193, 278, 278, 175, 2650 280, 195, 264, 318, 203, 326, 277, 486, 486, 487, 2651 488, 492, 496, 497, 498, 195, 683, 192, 397, 398, 2652 232, 423, 438, 446, 448, 454, 420, 194, 539, 5, 2653 207, 678, 3, 207, 22, 192, 192, 432, 433, 3, 2654 207, 194, 3, 372, 429, 375, 378, 232, 276, 277, 2655 279, 280, 289, 315, 316, 319, 347, 377, 383, 386, 2656 387, 435, 491, 682, 504, 207, 547, 207, 547, 4, 2657 21, 155, 232, 456, 457, 459, 504, 507, 207, 3, 2658 207, 195, 111, 504, 195, 4, 3, 155, 305, 174, 2659 300, 303, 25, 101, 102, 131, 133, 134, 135, 138, 2660 139, 141, 142, 338, 348, 192, 341, 342, 344, 155, 2661 3, 207, 3, 192, 391, 232, 343, 403, 404, 405, 2662 406, 428, 409, 194, 3, 207, 200, 207, 4, 3, 2663 195, 3, 195, 437, 523, 207, 195, 450, 207, 547, 2664 4, 114, 38, 128, 130, 260, 261, 460, 477, 516, 2665 527, 555, 571, 588, 590, 596, 603, 607, 610, 613, 2666 626, 629, 632, 684, 549, 545, 558, 260, 194, 106, 2667 564, 565, 566, 569, 540, 135, 668, 192, 207, 183, 2668 195, 195, 438, 448, 453, 468, 469, 470, 49, 53, 2669 54, 55, 56, 57, 58, 65, 66, 67, 68, 594, 2670 599, 600, 49, 51, 52, 53, 54, 56, 58, 59, 2671 65, 67, 68, 69, 594, 636, 637, 594, 261, 437, 2672 444, 445, 437, 442, 443, 602, 3, 195, 594, 261, 2673 444, 602, 3, 195, 470, 480, 3, 195, 194, 249, 2674 250, 251, 698, 709, 183, 195, 604, 5, 21, 593, 2675 617, 192, 615, 261, 261, 261, 444, 602, 3, 195, 2676 195, 3, 207, 232, 691, 39, 531, 536, 583, 192, 2677 207, 192, 580, 686, 232, 255, 437, 504, 692, 693, 2678 694, 21, 192, 703, 718, 719, 720, 207, 718, 183, 2679 183, 514, 195, 264, 514, 514, 3, 328, 232, 259, 2680 276, 279, 283, 692, 5, 3, 195, 3, 194, 504, 2681 504, 681, 232, 416, 417, 438, 22, 194, 3, 430, 2682 297, 192, 298, 299, 232, 381, 382, 548, 207, 375, 2683 194, 21, 384, 384, 194, 3, 22, 384, 277, 280, 2684 195, 207, 207, 4, 504, 261, 504, 5, 3, 195, 2685 4, 155, 458, 194, 504, 620, 621, 622, 104, 504, 2686 207, 508, 101, 102, 131, 139, 306, 307, 348, 232, 2687 309, 310, 192, 207, 194, 194, 3, 334, 194, 349, 2688 338, 370, 194, 3, 390, 401, 3, 207, 192, 412, 2689 413, 411, 192, 524, 476, 509, 475, 521, 475, 522, 2690 147, 207, 207, 170, 192, 207, 194, 192, 193, 194, 2691 725, 194, 111, 263, 559, 549, 504, 192, 207, 107, 2692 564, 570, 540, 155, 3, 669, 115, 646, 207, 534, 2693 577, 3, 463, 194, 471, 505, 506, 601, 505, 505, 2694 505, 509, 5, 594, 261, 505, 444, 602, 3, 195, 2695 601, 5, 444, 442, 442, 444, 594, 437, 439, 440, 2696 261, 444, 602, 439, 3, 195, 631, 207, 628, 207, 2697 3, 481, 232, 504, 251, 30, 666, 254, 260, 261, 2698 57, 58, 65, 67, 68, 594, 605, 606, 509, 616, 2699 611, 620, 194, 437, 608, 618, 619, 622, 618, 535, 2700 40, 41, 537, 538, 529, 4, 504, 584, 585, 586, 2701 207, 581, 207, 207, 5, 3, 195, 195, 3, 195, 2702 31, 708, 29, 715, 195, 3, 195, 3, 195, 195, 2703 232, 330, 331, 548, 195, 195, 504, 511, 398, 396, 2704 422, 423, 447, 195, 3, 3, 415, 434, 433, 426, 2705 429, 3, 195, 5, 194, 232, 256, 257, 258, 259, 2706 276, 279, 315, 319, 347, 385, 386, 195, 255, 320, 2707 321, 322, 437, 504, 523, 526, 383, 104, 504, 4, 2708 21, 504, 457, 4, 504, 504, 504, 621, 623, 624, 2709 3, 207, 207, 195, 194, 3, 155, 194, 311, 3, 2710 207, 207, 339, 340, 342, 207, 350, 21, 284, 392, 2711 192, 207, 207, 405, 20, 3, 195, 4, 4, 523, 2712 207, 547, 207, 535, 11, 19, 20, 44, 110, 156, 2713 166, 167, 185, 186, 188, 189, 193, 215, 216, 220, 2714 222, 225, 227, 232, 233, 234, 504, 727, 504, 254, 2715 195, 207, 192, 207, 27, 192, 670, 671, 655, 192, 2716 647, 207, 97, 146, 464, 465, 469, 195, 472, 473, 2717 474, 475, 505, 600, 598, 442, 195, 637, 633, 97, 2718 146, 470, 482, 483, 195, 195, 192, 667, 111, 3, 2719 5, 594, 261, 444, 602, 3, 195, 207, 612, 207, 2720 3, 609, 207, 195, 192, 207, 192, 207, 529, 586, 2721 3, 195, 4, 207, 232, 694, 693, 688, 720, 26, 2722 704, 705, 647, 647, 94, 73, 195, 5, 207, 3, 2723 195, 195, 504, 417, 207, 429, 4, 351, 352, 353, 2724 354, 355, 356, 357, 358, 359, 360, 361, 362, 363, 2725 364, 509, 510, 207, 428, 299, 207, 514, 232, 276, 2726 5, 3, 195, 207, 504, 261, 504, 4, 3, 621, 2727 104, 308, 307, 4, 312, 352, 354, 358, 284, 310, 2728 351, 158, 159, 160, 365, 351, 288, 5, 147, 345, 2729 346, 351, 194, 192, 413, 207, 207, 195, 504, 195, 2730 195, 504, 200, 446, 448, 194, 194, 195, 192, 185, 2731 235, 446, 5, 6, 7, 8, 9, 10, 12, 13, 2732 14, 15, 16, 17, 19, 20, 21, 22, 23, 196, 2733 197, 217, 195, 195, 104, 207, 4, 147, 3, 207, 2734 645, 442, 467, 5, 3, 462, 3, 195, 476, 4, 2735 207, 620, 207, 467, 5, 3, 479, 576, 665, 504, 2736 261, 505, 606, 207, 207, 619, 207, 192, 207, 207, 2737 207, 585, 586, 207, 194, 701, 714, 714, 5, 5, 2738 509, 423, 3, 22, 195, 3, 4, 3, 3, 354, 2739 362, 510, 21, 3, 431, 3, 322, 321, 504, 548, 2740 624, 625, 207, 312, 195, 3, 4, 5, 147, 313, 2741 314, 195, 195, 195, 511, 315, 347, 435, 195, 393, 2742 726, 223, 224, 226, 5, 219, 504, 504, 504, 504, 2630 2743 504, 504, 504, 504, 504, 504, 504, 504, 504, 504, 2631 504, 504, 504, 5, 22, 218, 504, 504, 5, 504,2632 5, 504, 192, 207, 192, 658, 671, 672, 673, 674,2633 67 5, 192, 671, 207, 444, 466, 465, 207, 473, 634,2634 466, 483, 207, 207, 207, 195, 3, 207, 192, 207,2635 707, 207, 514, 264, 3, 504, 192, 353, 355, 510,2636 4, 354, 357, 359, 4, 21, 364, 432, 514,5,2637 195, 195, 511, 315, 347, 351, 220, 232, 221, 228,2638 228, 228, 504, 504, 504, 504, 504, 207, 656, 3,2639 207, 261, 195, 207, 195, 195, 509, 22, 4, 3,2640 195, 509, 195, 194, 4, 229, 230, 231, 504, 195,2641 195, 195, 207, 673, 207, 3, 416, 514, 3, 4,2642 504, 3, 4, 446, 509, 195, 509, 504, 4, 230,2643 504, 3, 504,4, 509, 5042744 504, 5, 22, 218, 504, 504, 5, 504, 5, 504, 2745 192, 207, 192, 658, 671, 672, 673, 674, 675, 192, 2746 671, 207, 444, 466, 465, 207, 473, 634, 466, 483, 2747 207, 207, 207, 195, 3, 207, 192, 207, 707, 207, 2748 514, 264, 3, 504, 192, 353, 355, 510, 4, 354, 2749 357, 359, 4, 21, 364, 432, 514, 5, 195, 195, 2750 511, 315, 347, 351, 220, 232, 221, 228, 228, 228, 2751 504, 504, 504, 504, 504, 207, 656, 3, 207, 261, 2752 195, 207, 195, 195, 509, 22, 4, 3, 195, 509, 2753 195, 194, 4, 229, 230, 231, 504, 195, 195, 195, 2754 207, 673, 207, 3, 416, 514, 3, 4, 504, 3, 2755 4, 446, 509, 195, 509, 504, 4, 230, 504, 3, 2756 504, 4, 509, 504 2644 2757 }; 2645 2758 2646 2759 /* YYR1[YYN] -- Symbol number of symbol that rule YYN derives. */ 2647 static const yytype_ uint16 yyr1[] =2760 static const yytype_int16 yyr1[] = 2648 2761 { 2649 2762 0, 204, 205, 205, 206, 206, 206, 207, 207, 207, … … 2731 2844 592, 593, 593, 593, 594, 595, 597, 598, 596, 599, 2732 2845 599, 600, 600, 600, 600, 600, 600, 600, 600, 600, 2733 600, 600, 60 1, 602, 604, 603, 605, 605, 606, 606,2734 606, 606, 606, 60 8, 607, 609, 607, 607, 607, 611,2735 6 10, 612, 610, 613, 613, 614, 614, 615, 616, 616,2736 616, 616, 616, 616, 616, 616, 616, 616, 616, 61 7,2737 61 7, 617, 618, 618, 619, 619, 620, 620, 621, 621,2738 62 2, 623, 623, 624, 625, 625, 626, 626, 627, 627,2739 62 8, 628, 628, 628, 628, 629, 629, 630, 630, 631,2740 63 1, 631, 631, 631, 633, 632, 634, 632, 635, 636,2741 63 6, 637, 637, 637, 637, 637, 637, 637, 637, 637,2742 637, 637, 63 8, 640, 639, 641, 641, 643, 642, 645,2743 64 4, 646, 646, 647, 647, 648, 649, 649, 650, 650,2744 6 51, 651, 652, 652, 653, 655, 654, 656, 654, 657,2745 65 7, 657, 658, 658, 659, 660, 660, 242, 242, 662,2746 66 1, 664, 665, 663, 666, 666, 667, 667, 668, 669,2747 66 9, 670, 670, 671, 672, 672, 673, 673, 673, 674,2748 67 5, 676, 676, 677, 677, 678, 679, 680, 680, 681,2749 6 82, 683, 682, 685, 684, 686, 684, 687, 688, 684,2750 6 90, 689, 691, 691, 691, 692, 692, 693, 693, 694,2751 69 4, 694, 695, 695, 696, 696, 697, 697, 697, 698,2752 700, 701, 699, 702, 703, 704, 704, 705, 707, 706,2753 70 8, 708, 709, 711, 710, 712, 713, 714, 715, 715,2754 71 6, 717, 716, 718, 718, 719, 719, 720, 720, 721,2755 7 21, 723, 722, 724, 724, 725, 725, 725, 725, 725,2756 72 6, 727, 7272846 600, 600, 600, 601, 602, 604, 603, 605, 605, 606, 2847 606, 606, 606, 606, 606, 608, 607, 609, 607, 607, 2848 607, 611, 610, 612, 610, 613, 613, 614, 614, 615, 2849 616, 616, 616, 616, 616, 616, 616, 616, 616, 616, 2850 616, 616, 617, 617, 617, 618, 618, 619, 619, 620, 2851 620, 621, 621, 622, 623, 623, 624, 625, 625, 626, 2852 626, 627, 627, 628, 628, 628, 628, 628, 629, 629, 2853 630, 630, 631, 631, 631, 631, 631, 633, 632, 634, 2854 632, 635, 636, 636, 637, 637, 637, 637, 637, 637, 2855 637, 637, 637, 637, 637, 637, 638, 640, 639, 641, 2856 641, 643, 642, 645, 644, 646, 646, 647, 647, 648, 2857 649, 649, 650, 650, 651, 651, 652, 652, 653, 655, 2858 654, 656, 654, 657, 657, 657, 658, 658, 659, 660, 2859 660, 242, 242, 662, 661, 664, 665, 663, 666, 666, 2860 667, 667, 668, 669, 669, 670, 670, 671, 672, 672, 2861 673, 673, 673, 674, 675, 676, 676, 677, 677, 678, 2862 679, 680, 680, 681, 682, 683, 682, 685, 684, 686, 2863 684, 687, 688, 684, 690, 689, 691, 691, 691, 692, 2864 692, 693, 693, 694, 694, 694, 695, 695, 696, 696, 2865 697, 697, 697, 698, 700, 701, 699, 702, 703, 704, 2866 704, 705, 707, 706, 708, 708, 709, 711, 710, 712, 2867 713, 714, 715, 715, 716, 717, 716, 718, 718, 719, 2868 719, 720, 720, 721, 721, 723, 722, 724, 724, 725, 2869 725, 725, 725, 725, 726, 727, 727 2757 2870 }; 2758 2871 2759 2872 /* YYR2[YYN] -- Number of symbols on the right hand side of rule YYN. */ 2760 static const yytype_ uint8 yyr2[] =2873 static const yytype_int8 yyr2[] = 2761 2874 { 2762 2875 0, 2, 0, 2, 1, 1, 1, 2, 1, 1, … … 2844 2957 1, 1, 1, 1, 1, 1, 0, 0, 7, 1, 2845 2958 3, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2846 2, 3, 1, 1, 0, 7, 1, 3, 1, 2,2847 2, 2, 3, 0, 6, 0, 7, 4, 6, 0,2848 6, 0, 7, 4, 6, 1, 3, 1, 1, 2,2849 1, 1, 2, 2, 2, 2, 2, 2, 3, 1,2850 1, 1, 1, 3, 1, 1, 1, 3, 1, 1,2851 5, 1, 3, 1, 5, 7, 3, 5, 1, 3,2852 1, 2, 2, 2, 2, 3, 5, 1, 3, 1,2853 2, 2, 2, 2, 0, 7, 0, 9, 0, 1,2854 3, 1, 2, 2, 2, 2, 2, 2, 2, 3,2855 2, 2, 2, 0, 5, 0, 1, 0, 4, 0,2856 6, 0, 1, 0, 1, 2, 0, 1, 1, 2,2857 1, 1, 1, 2, 0, 0, 8, 0, 11, 0,2858 1, 3, 0, 1, 5, 0, 1, 0, 1, 0,2859 4, 0, 0, 6, 0, 1, 0, 1, 1, 0,2860 2, 1, 3, 3, 1, 3, 1, 1, 1, 1,2861 1, 3, 4, 1, 3, 1, 4, 1, 3, 1,2862 3, 0, 5, 0, 3, 0, 5, 0, 0, 7,2863 0, 4, 1, 1, 1, 1, 3, 1, 3, 1,2864 1, 1, 0, 1, 1, 2, 1, 1, 1, 5,2865 0, 0, 10, 1, 1, 0, 1, 4, 0, 7,2866 0, 1, 5, 0, 6, 1, 6, 0, 0, 1,2867 0, 0, 4, 0, 1, 1, 3, 1, 1, 3,2868 4, 0, 4, 1, 1, 3, 3, 1, 3, 1,2869 0, 1, 32959 2, 2, 3, 1, 1, 0, 7, 1, 3, 1, 2960 2, 2, 2, 2, 3, 0, 6, 0, 7, 4, 2961 6, 0, 6, 0, 7, 4, 6, 1, 3, 1, 2962 1, 2, 1, 1, 2, 2, 2, 2, 2, 2, 2963 2, 3, 1, 1, 1, 1, 3, 1, 1, 1, 2964 3, 1, 1, 5, 1, 3, 1, 5, 7, 3, 2965 5, 1, 3, 1, 2, 2, 2, 2, 3, 5, 2966 1, 3, 1, 2, 2, 2, 2, 0, 7, 0, 2967 9, 0, 1, 3, 1, 2, 2, 2, 2, 2, 2968 2, 2, 2, 3, 2, 2, 2, 0, 5, 0, 2969 1, 0, 4, 0, 6, 0, 1, 0, 1, 2, 2970 0, 1, 1, 2, 1, 1, 1, 2, 0, 0, 2971 8, 0, 11, 0, 1, 3, 0, 1, 5, 0, 2972 1, 0, 1, 0, 4, 0, 0, 6, 0, 1, 2973 0, 1, 1, 0, 2, 1, 3, 3, 1, 3, 2974 1, 1, 1, 1, 1, 3, 4, 1, 3, 1, 2975 4, 1, 3, 1, 3, 0, 5, 0, 3, 0, 2976 5, 0, 0, 7, 0, 4, 1, 1, 1, 1, 2977 3, 1, 3, 1, 1, 1, 0, 1, 1, 2, 2978 1, 1, 1, 5, 0, 0, 10, 1, 1, 0, 2979 1, 4, 0, 7, 0, 1, 5, 0, 6, 1, 2980 6, 0, 0, 1, 0, 0, 4, 0, 1, 1, 2981 3, 1, 1, 3, 4, 0, 4, 1, 1, 3, 2982 3, 1, 3, 1, 0, 1, 3 2870 2983 }; 2871 2984 … … 2883 2996 #define YYRECOVERING() (!!yyerrstatus) 2884 2997 2885 #define YYBACKUP(Token, Value) \2886 do \2887 if (yychar == YYEMPTY) \2888 { \2889 yychar = (Token); \2890 yylval = (Value); \2891 YYPOPSTACK (yylen); \2892 yystate = *yyssp; \2893 goto yybackup; \2894 } \2895 else \2896 { \2897 yyerror (YY_("syntax error: cannot back up")); \2898 YYERROR; \2899 } \2900 while (0)2998 #define YYBACKUP(Token, Value) \ 2999 do \ 3000 if (yychar == YYEMPTY) \ 3001 { \ 3002 yychar = (Token); \ 3003 yylval = (Value); \ 3004 YYPOPSTACK (yylen); \ 3005 yystate = *yyssp; \ 3006 goto yybackup; \ 3007 } \ 3008 else \ 3009 { \ 3010 yyerror (YY_("syntax error: cannot back up")); \ 3011 YYERROR; \ 3012 } \ 3013 while (0) 2901 3014 2902 3015 /* Error token number */ … … 2938 3051 2939 3052 2940 /*----------------------------------- -----.2941 | Print this symbol's value on YYO UTPUT. |2942 `----------------------------------- -----*/3053 /*-----------------------------------. 3054 | Print this symbol's value on YYO. | 3055 `-----------------------------------*/ 2943 3056 2944 3057 static void 2945 yy_symbol_value_print (FILE *yyo utput, int yytype, YYSTYPE const * const yyvaluep)3058 yy_symbol_value_print (FILE *yyo, int yytype, YYSTYPE const * const yyvaluep) 2946 3059 { 2947 FILE *yyo = yyoutput;2948 YYUSE (yyo );3060 FILE *yyoutput = yyo; 3061 YYUSE (yyoutput); 2949 3062 if (!yyvaluep) 2950 3063 return; 2951 3064 # ifdef YYPRINT 2952 3065 if (yytype < YYNTOKENS) 2953 YYPRINT (yyo utput, yytoknum[yytype], *yyvaluep);3066 YYPRINT (yyo, yytoknum[yytype], *yyvaluep); 2954 3067 # endif 3068 YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN 2955 3069 YYUSE (yytype); 3070 YY_IGNORE_MAYBE_UNINITIALIZED_END 2956 3071 } 2957 3072 2958 3073 2959 /*--------------------------- -----.2960 | Print this symbol on YYO UTPUT. |2961 `--------------------------- -----*/3074 /*---------------------------. 3075 | Print this symbol on YYO. | 3076 `---------------------------*/ 2962 3077 2963 3078 static void 2964 yy_symbol_print (FILE *yyo utput, int yytype, YYSTYPE const * const yyvaluep)3079 yy_symbol_print (FILE *yyo, int yytype, YYSTYPE const * const yyvaluep) 2965 3080 { 2966 YYFPRINTF (yyo utput, "%s %s (",3081 YYFPRINTF (yyo, "%s %s (", 2967 3082 yytype < YYNTOKENS ? "token" : "nterm", yytname[yytype]); 2968 3083 2969 yy_symbol_value_print (yyo utput, yytype, yyvaluep);2970 YYFPRINTF (yyo utput, ")");3084 yy_symbol_value_print (yyo, yytype, yyvaluep); 3085 YYFPRINTF (yyo, ")"); 2971 3086 } 2972 3087 … … 2977 3092 2978 3093 static void 2979 yy_stack_print (yy type_int16 *yybottom, yytype_int16*yytop)3094 yy_stack_print (yy_state_t *yybottom, yy_state_t *yytop) 2980 3095 { 2981 3096 YYFPRINTF (stderr, "Stack now"); … … 3000 3115 3001 3116 static void 3002 yy_reduce_print (yy type_int16*yyssp, YYSTYPE *yyvsp, int yyrule)3117 yy_reduce_print (yy_state_t *yyssp, YYSTYPE *yyvsp, int yyrule) 3003 3118 { 3004 unsigned longint yylno = yyrline[yyrule];3119 int yylno = yyrline[yyrule]; 3005 3120 int yynrhs = yyr2[yyrule]; 3006 3121 int yyi; 3007 YYFPRINTF (stderr, "Reducing stack by rule %d (line % lu):\n",3122 YYFPRINTF (stderr, "Reducing stack by rule %d (line %d):\n", 3008 3123 yyrule - 1, yylno); 3009 3124 /* The symbols being reduced. */ … … 3012 3127 YYFPRINTF (stderr, " $%d = ", yyi + 1); 3013 3128 yy_symbol_print (stderr, 3014 yystos[ yyssp[yyi + 1 - yynrhs]],3015 & (yyvsp[(yyi + 1) - (yynrhs)])3129 yystos[+yyssp[yyi + 1 - yynrhs]], 3130 &yyvsp[(yyi + 1) - (yynrhs)] 3016 3131 ); 3017 3132 YYFPRINTF (stderr, "\n"); … … 3057 3172 # ifndef yystrlen 3058 3173 # if defined __GLIBC__ && defined _STRING_H 3059 # define yystrlen strlen3174 # define yystrlen(S) (YY_CAST (YYPTRDIFF_T, strlen (S))) 3060 3175 # else 3061 3176 /* Return the length of YYSTR. */ 3062 static YY SIZE_T3177 static YYPTRDIFF_T 3063 3178 yystrlen (const char *yystr) 3064 3179 { 3065 YY SIZE_T yylen;3180 YYPTRDIFF_T yylen; 3066 3181 for (yylen = 0; yystr[yylen]; yylen++) 3067 3182 continue; … … 3099 3214 null, do not copy; instead, return the length of what the result 3100 3215 would have been. */ 3101 static YY SIZE_T3216 static YYPTRDIFF_T 3102 3217 yytnamerr (char *yyres, const char *yystr) 3103 3218 { 3104 3219 if (*yystr == '"') 3105 3220 { 3106 YY SIZE_T yyn = 0;3221 YYPTRDIFF_T yyn = 0; 3107 3222 char const *yyp = yystr; 3108 3223 … … 3117 3232 if (*++yyp != '\\') 3118 3233 goto do_not_strip_quotes; 3119 /* Fall through. */ 3234 else 3235 goto append; 3236 3237 append: 3120 3238 default: 3121 3239 if (yyres) … … 3132 3250 } 3133 3251 3134 if (! yyres) 3252 if (yyres) 3253 return yystpcpy (yyres, yystr) - yyres; 3254 else 3135 3255 return yystrlen (yystr); 3136 3137 return yystpcpy (yyres, yystr) - yyres;3138 3256 } 3139 3257 # endif … … 3148 3266 required number of bytes is too large to store. */ 3149 3267 static int 3150 yysyntax_error (YY SIZE_T *yymsg_alloc, char **yymsg,3151 yy type_int16*yyssp, int yytoken)3268 yysyntax_error (YYPTRDIFF_T *yymsg_alloc, char **yymsg, 3269 yy_state_t *yyssp, int yytoken) 3152 3270 { 3153 YYSIZE_T yysize0 = yytnamerr (YY_NULLPTR, yytname[yytoken]);3154 YYSIZE_T yysize = yysize0;3155 3271 enum { YYERROR_VERBOSE_ARGS_MAXIMUM = 5 }; 3156 3272 /* Internationalized format string. */ 3157 3273 const char *yyformat = YY_NULLPTR; 3158 /* Arguments of yyformat. */ 3274 /* Arguments of yyformat: reported tokens (one for the "unexpected", 3275 one per "expected"). */ 3159 3276 char const *yyarg[YYERROR_VERBOSE_ARGS_MAXIMUM]; 3160 /* Number of reported tokens (one for the "unexpected", one per 3161 "expected"). */ 3277 /* Actual size of YYARG. */ 3162 3278 int yycount = 0; 3279 /* Cumulated lengths of YYARG. */ 3280 YYPTRDIFF_T yysize = 0; 3163 3281 3164 3282 /* There are many possibilities here to consider: … … 3187 3305 if (yytoken != YYEMPTY) 3188 3306 { 3189 int yyn = yypact[*yyssp]; 3307 int yyn = yypact[+*yyssp]; 3308 YYPTRDIFF_T yysize0 = yytnamerr (YY_NULLPTR, yytname[yytoken]); 3309 yysize = yysize0; 3190 3310 yyarg[yycount++] = yytname[yytoken]; 3191 3311 if (!yypact_value_is_default (yyn)) … … 3212 3332 yyarg[yycount++] = yytname[yyx]; 3213 3333 { 3214 YYSIZE_T yysize1 = yysize + yytnamerr (YY_NULLPTR, yytname[yyx]); 3215 if (! (yysize <= yysize1 3216 && yysize1 <= YYSTACK_ALLOC_MAXIMUM)) 3334 YYPTRDIFF_T yysize1 3335 = yysize + yytnamerr (YY_NULLPTR, yytname[yyx]); 3336 if (yysize <= yysize1 && yysize1 <= YYSTACK_ALLOC_MAXIMUM) 3337 yysize = yysize1; 3338 else 3217 3339 return 2; 3218 yysize = yysize1;3219 3340 } 3220 3341 } … … 3228 3349 yyformat = S; \ 3229 3350 break 3351 default: /* Avoid compiler warnings. */ 3230 3352 YYCASE_(0, YY_("syntax error")); 3231 3353 YYCASE_(1, YY_("syntax error, unexpected %s")); … … 3238 3360 3239 3361 { 3240 YYSIZE_T yysize1 = yysize + yystrlen (yyformat); 3241 if (! (yysize <= yysize1 && yysize1 <= YYSTACK_ALLOC_MAXIMUM)) 3362 /* Don't count the "%s"s in the final size, but reserve room for 3363 the terminator. */ 3364 YYPTRDIFF_T yysize1 = yysize + (yystrlen (yyformat) - 2 * yycount) + 1; 3365 if (yysize <= yysize1 && yysize1 <= YYSTACK_ALLOC_MAXIMUM) 3366 yysize = yysize1; 3367 else 3242 3368 return 2; 3243 yysize = yysize1;3244 3369 } 3245 3370 … … 3267 3392 else 3268 3393 { 3269 yyp++;3270 yyformat++;3394 ++yyp; 3395 ++yyformat; 3271 3396 } 3272 3397 } … … 3311 3436 yyparse (void) 3312 3437 { 3313 int yystate;3438 yy_state_fast_t yystate; 3314 3439 /* Number of tokens to shift before error messages enabled. */ 3315 3440 int yyerrstatus; … … 3323 3448 3324 3449 /* The state stack. */ 3325 yy type_int16yyssa[YYINITDEPTH];3326 yy type_int16*yyss;3327 yy type_int16*yyssp;3450 yy_state_t yyssa[YYINITDEPTH]; 3451 yy_state_t *yyss; 3452 yy_state_t *yyssp; 3328 3453 3329 3454 /* The semantic value stack. */ … … 3332 3457 YYSTYPE *yyvsp; 3333 3458 3334 YY SIZE_T yystacksize;3459 YYPTRDIFF_T yystacksize; 3335 3460 3336 3461 int yyn; … … 3346 3471 char yymsgbuf[128]; 3347 3472 char *yymsg = yymsgbuf; 3348 YY SIZE_T yymsg_alloc = sizeof yymsgbuf;3473 YYPTRDIFF_T yymsg_alloc = sizeof yymsgbuf; 3349 3474 #endif 3350 3475 … … 3367 3492 goto yysetstate; 3368 3493 3494 3369 3495 /*------------------------------------------------------------. 3370 | yynewstate -- Push a new state, which is found in yystate. |3496 | yynewstate -- push a new state, which is found in yystate. | 3371 3497 `------------------------------------------------------------*/ 3372 3498 yynewstate: 3373 3499 /* In all cases, when you get here, the value and location stacks 3374 3500 have just been pushed. So pushing a state here evens the stacks. */ 3375 3501 yyssp++; 3376 3502 3377 yysetstate: 3378 *yyssp = yystate; 3503 3504 /*--------------------------------------------------------------------. 3505 | yysetstate -- set current state (the top of the stack) to yystate. | 3506 `--------------------------------------------------------------------*/ 3507 yysetstate: 3508 YYDPRINTF ((stderr, "Entering state %d\n", yystate)); 3509 YY_ASSERT (0 <= yystate && yystate < YYNSTATES); 3510 YY_IGNORE_USELESS_CAST_BEGIN 3511 *yyssp = YY_CAST (yy_state_t, yystate); 3512 YY_IGNORE_USELESS_CAST_END 3379 3513 3380 3514 if (yyss + yystacksize - 1 <= yyssp) 3515 #if !defined yyoverflow && !defined YYSTACK_RELOCATE 3516 goto yyexhaustedlab; 3517 #else 3381 3518 { 3382 3519 /* Get the current used size of the three stacks, in elements. */ 3383 YY SIZE_T yysize = yyssp - yyss + 1;3384 3385 # ifdefyyoverflow3520 YYPTRDIFF_T yysize = yyssp - yyss + 1; 3521 3522 # if defined yyoverflow 3386 3523 { 3387 3524 /* Give user a chance to reallocate the stack. Use copies of 3388 3525 these so that the &'s don't force the real ones into 3389 3526 memory. */ 3527 yy_state_t *yyss1 = yyss; 3390 3528 YYSTYPE *yyvs1 = yyvs; 3391 yytype_int16 *yyss1 = yyss;3392 3529 3393 3530 /* Each stack pointer address is followed by the size of the … … 3396 3533 be undefined if yyoverflow is a macro. */ 3397 3534 yyoverflow (YY_("memory exhausted"), 3398 &yyss1, yysize * sizeof(*yyssp),3399 &yyvs1, yysize * sizeof(*yyvsp),3535 &yyss1, yysize * YYSIZEOF (*yyssp), 3536 &yyvs1, yysize * YYSIZEOF (*yyvsp), 3400 3537 &yystacksize); 3401 3402 3538 yyss = yyss1; 3403 3539 yyvs = yyvs1; 3404 3540 } 3405 #else /* no yyoverflow */ 3406 # ifndef YYSTACK_RELOCATE 3407 goto yyexhaustedlab; 3408 # else 3541 # else /* defined YYSTACK_RELOCATE */ 3409 3542 /* Extend the stack our own way. */ 3410 3543 if (YYMAXDEPTH <= yystacksize) … … 3415 3548 3416 3549 { 3417 yy type_int16*yyss1 = yyss;3550 yy_state_t *yyss1 = yyss; 3418 3551 union yyalloc *yyptr = 3419 (union yyalloc *) YYSTACK_ALLOC (YYSTACK_BYTES (yystacksize)); 3552 YY_CAST (union yyalloc *, 3553 YYSTACK_ALLOC (YY_CAST (YYSIZE_T, YYSTACK_BYTES (yystacksize)))); 3420 3554 if (! yyptr) 3421 3555 goto yyexhaustedlab; 3422 3556 YYSTACK_RELOCATE (yyss_alloc, yyss); 3423 3557 YYSTACK_RELOCATE (yyvs_alloc, yyvs); 3424 # 3558 # undef YYSTACK_RELOCATE 3425 3559 if (yyss1 != yyssa) 3426 3560 YYSTACK_FREE (yyss1); 3427 3561 } 3428 3562 # endif 3429 #endif /* no yyoverflow */3430 3563 3431 3564 yyssp = yyss + yysize - 1; 3432 3565 yyvsp = yyvs + yysize - 1; 3433 3566 3434 YYDPRINTF ((stderr, "Stack size increased to %lu\n", 3435 (unsigned long int) yystacksize)); 3567 YY_IGNORE_USELESS_CAST_BEGIN 3568 YYDPRINTF ((stderr, "Stack size increased to %ld\n", 3569 YY_CAST (long, yystacksize))); 3570 YY_IGNORE_USELESS_CAST_END 3436 3571 3437 3572 if (yyss + yystacksize - 1 <= yyssp) 3438 3573 YYABORT; 3439 3574 } 3440 3441 YYDPRINTF ((stderr, "Entering state %d\n", yystate)); 3575 #endif /* !defined yyoverflow && !defined YYSTACK_RELOCATE */ 3442 3576 3443 3577 if (yystate == YYFINAL) … … 3445 3579 3446 3580 goto yybackup; 3581 3447 3582 3448 3583 /*-----------. … … 3450 3585 `-----------*/ 3451 3586 yybackup: 3452 3453 3587 /* Do appropriate processing given the current state. Read a 3454 3588 lookahead token if we need one and don't already have one. */ … … 3500 3634 /* Shift the lookahead token. */ 3501 3635 YY_SYMBOL_PRINT ("Shifting", yytoken, &yylval, &yylloc); 3502 3503 /* Discard the shifted token. */3504 yychar = YYEMPTY;3505 3506 3636 yystate = yyn; 3507 3637 YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN … … 3509 3639 YY_IGNORE_MAYBE_UNINITIALIZED_END 3510 3640 3641 /* Discard the shifted token. */ 3642 yychar = YYEMPTY; 3511 3643 goto yynewstate; 3512 3644 … … 3523 3655 3524 3656 /*-----------------------------. 3525 | yyreduce -- Do a reduction. |3657 | yyreduce -- do a reduction. | 3526 3658 `-----------------------------*/ 3527 3659 yyreduce: … … 3543 3675 switch (yyn) 3544 3676 { 3545 3546 #line 520 "fortran.y" /* yacc.c:1646 */3547 {yyerrok;yyclearin;}3548 #line 3 549 "fortran.tab.c" /* yacc.c:1646 */3677 case 6: 3678 #line 520 "fortran.y" 3679 {yyerrok;yyclearin;} 3680 #line 3681 "fortran.tab.c" 3549 3681 break; 3550 3682 3551 3683 case 7: 3552 #line 523 "fortran.y" /* yacc.c:1646 */3553 {token_since_endofstmt = 0; increment_nbtokens = 0;}3554 #line 3 555 "fortran.tab.c" /* yacc.c:1646 */3684 #line 523 "fortran.y" 3685 {token_since_endofstmt = 0; increment_nbtokens = 0;} 3686 #line 3687 "fortran.tab.c" 3555 3687 break; 3556 3688 3557 3689 case 16: 3558 #line 536 "fortran.y" /* yacc.c:1646 */3559 {3690 #line 536 "fortran.y" 3691 { 3560 3692 if (inmoduledeclare == 0 ) 3561 3693 { … … 3564 3696 } 3565 3697 } 3566 #line 3 567 "fortran.tab.c" /* yacc.c:1646 */3698 #line 3699 "fortran.tab.c" 3567 3699 break; 3568 3700 3569 3701 case 18: 3570 #line 561 "fortran.y" /* yacc.c:1646 */3571 { pos_cur = setposcur(); }3572 #line 3 573 "fortran.tab.c" /* yacc.c:1646 */3702 #line 561 "fortran.y" 3703 { pos_cur = setposcur(); } 3704 #line 3705 "fortran.tab.c" 3573 3705 break; 3574 3706 3575 3707 case 24: 3576 #line 585 "fortran.y" /* yacc.c:1646 */3577 { Add_Include_1((yyvsp[0].na)); }3578 #line 3 579 "fortran.tab.c" /* yacc.c:1646 */3708 #line 585 "fortran.y" 3709 { Add_Include_1((yyvsp[0].na)); } 3710 #line 3711 "fortran.tab.c" 3579 3711 break; 3580 3712 3581 3713 case 27: 3582 #line 1107 "fortran.y" /* yacc.c:1646 */3583 { strcpy((yyval.na),(yyvsp[0].na)); }3584 #line 3 585 "fortran.tab.c" /* yacc.c:1646 */3714 #line 1107 "fortran.y" 3715 { strcpy((yyval.na),(yyvsp[0].na)); } 3716 #line 3717 "fortran.tab.c" 3585 3717 break; 3586 3718 3587 3719 case 28: 3588 #line 1108 "fortran.y" /* yacc.c:1646 */3589 { strcpy((yyval.na),(yyvsp[0].na)); }3590 #line 3 591 "fortran.tab.c" /* yacc.c:1646 */3720 #line 1108 "fortran.y" 3721 { strcpy((yyval.na),(yyvsp[0].na)); } 3722 #line 3723 "fortran.tab.c" 3591 3723 break; 3592 3724 3593 3725 case 29: 3594 #line 1109 "fortran.y" /* yacc.c:1646 */3595 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); }3596 #line 3 597 "fortran.tab.c" /* yacc.c:1646 */3726 #line 1109 "fortran.y" 3727 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); } 3728 #line 3729 "fortran.tab.c" 3597 3729 break; 3598 3730 3599 3731 case 30: 3600 #line 1110 "fortran.y" /* yacc.c:1646 */3601 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); }3602 #line 3 603 "fortran.tab.c" /* yacc.c:1646 */3732 #line 1110 "fortran.y" 3733 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); } 3734 #line 3735 "fortran.tab.c" 3603 3735 break; 3604 3736 3605 3737 case 31: 3606 #line 1111 "fortran.y" /* yacc.c:1646 */3607 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); }3608 #line 3 609 "fortran.tab.c" /* yacc.c:1646 */3738 #line 1111 "fortran.y" 3739 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); } 3740 #line 3741 "fortran.tab.c" 3609 3741 break; 3610 3742 3611 3743 case 32: 3612 #line 1113 "fortran.y" /* yacc.c:1646 */3613 { strcpy((yyval.na),"+"); }3614 #line 3 615 "fortran.tab.c" /* yacc.c:1646 */3744 #line 1113 "fortran.y" 3745 { strcpy((yyval.na),"+"); } 3746 #line 3747 "fortran.tab.c" 3615 3747 break; 3616 3748 3617 3749 case 33: 3618 #line 1114 "fortran.y" /* yacc.c:1646 */3619 { strcpy((yyval.na),"-"); }3620 #line 3 621 "fortran.tab.c" /* yacc.c:1646 */3750 #line 1114 "fortran.y" 3751 { strcpy((yyval.na),"-"); } 3752 #line 3753 "fortran.tab.c" 3621 3753 break; 3622 3754 3623 3755 case 34: 3624 #line 1118 "fortran.y" /* yacc.c:1646 */3625 { sprintf((yyval.na),"+%s",(yyvsp[0].na)); }3626 #line 3 627 "fortran.tab.c" /* yacc.c:1646 */3756 #line 1118 "fortran.y" 3757 { sprintf((yyval.na),"+%s",(yyvsp[0].na)); } 3758 #line 3759 "fortran.tab.c" 3627 3759 break; 3628 3760 3629 3761 case 35: 3630 #line 1119 "fortran.y" /* yacc.c:1646 */3631 { sprintf((yyval.na),"-%s",(yyvsp[0].na)); }3632 #line 3 633 "fortran.tab.c" /* yacc.c:1646 */3762 #line 1119 "fortran.y" 3763 { sprintf((yyval.na),"-%s",(yyvsp[0].na)); } 3764 #line 3765 "fortran.tab.c" 3633 3765 break; 3634 3766 3635 3767 case 36: 3636 #line 1120 "fortran.y" /* yacc.c:1646 */3637 { sprintf((yyval.na),"*%s",(yyvsp[0].na)); }3638 #line 3 639 "fortran.tab.c" /* yacc.c:1646 */3768 #line 1120 "fortran.y" 3769 { sprintf((yyval.na),"*%s",(yyvsp[0].na)); } 3770 #line 3771 "fortran.tab.c" 3639 3771 break; 3640 3772 3641 3773 case 37: 3642 #line 1121 "fortran.y" /* yacc.c:1646 */3643 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); }3644 #line 3 645 "fortran.tab.c" /* yacc.c:1646 */3774 #line 1121 "fortran.y" 3775 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); } 3776 #line 3777 "fortran.tab.c" 3645 3777 break; 3646 3778 3647 3779 case 38: 3648 #line 1122 "fortran.y" /* yacc.c:1646 */3649 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); }3650 #line 3 651 "fortran.tab.c" /* yacc.c:1646 */3780 #line 1122 "fortran.y" 3781 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); } 3782 #line 3783 "fortran.tab.c" 3651 3783 break; 3652 3784 3653 3785 case 39: 3654 #line 1123 "fortran.y" /* yacc.c:1646 */3655 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); }3656 #line 3 657 "fortran.tab.c" /* yacc.c:1646 */3786 #line 1123 "fortran.y" 3787 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); } 3788 #line 3789 "fortran.tab.c" 3657 3789 break; 3658 3790 3659 3791 case 40: 3660 #line 1124 "fortran.y" /* yacc.c:1646 */3661 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); }3662 #line 3 663 "fortran.tab.c" /* yacc.c:1646 */3792 #line 1124 "fortran.y" 3793 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); } 3794 #line 3795 "fortran.tab.c" 3663 3795 break; 3664 3796 3665 3797 case 41: 3666 #line 1125 "fortran.y" /* yacc.c:1646 */3667 { sprintf((yyval.na)," > %s",(yyvsp[0].na)); }3668 #line 3 669 "fortran.tab.c" /* yacc.c:1646 */3798 #line 1125 "fortran.y" 3799 { sprintf((yyval.na)," > %s",(yyvsp[0].na)); } 3800 #line 3801 "fortran.tab.c" 3669 3801 break; 3670 3802 3671 3803 case 42: 3672 #line 1126 "fortran.y" /* yacc.c:1646 */3673 { sprintf((yyval.na)," < %s",(yyvsp[0].na)); }3674 #line 3 675 "fortran.tab.c" /* yacc.c:1646 */3804 #line 1126 "fortran.y" 3805 { sprintf((yyval.na)," < %s",(yyvsp[0].na)); } 3806 #line 3807 "fortran.tab.c" 3675 3807 break; 3676 3808 3677 3809 case 43: 3678 #line 1127 "fortran.y" /* yacc.c:1646 */3679 { sprintf((yyval.na)," >= %s",(yyvsp[0].na)); }3680 #line 3 681 "fortran.tab.c" /* yacc.c:1646 */3810 #line 1127 "fortran.y" 3811 { sprintf((yyval.na)," >= %s",(yyvsp[0].na)); } 3812 #line 3813 "fortran.tab.c" 3681 3813 break; 3682 3814 3683 3815 case 44: 3684 #line 1128 "fortran.y" /* yacc.c:1646 */3685 { sprintf((yyval.na)," <= %s",(yyvsp[0].na)); }3686 #line 3 687 "fortran.tab.c" /* yacc.c:1646 */3816 #line 1128 "fortran.y" 3817 { sprintf((yyval.na)," <= %s",(yyvsp[0].na)); } 3818 #line 3819 "fortran.tab.c" 3687 3819 break; 3688 3820 3689 3821 case 45: 3690 #line 1129 "fortran.y" /* yacc.c:1646 */3691 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); }3692 #line 3 693 "fortran.tab.c" /* yacc.c:1646 */3822 #line 1129 "fortran.y" 3823 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); } 3824 #line 3825 "fortran.tab.c" 3693 3825 break; 3694 3826 3695 3827 case 46: 3696 #line 1130 "fortran.y" /* yacc.c:1646 */3697 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); }3698 #line 3 699 "fortran.tab.c" /* yacc.c:1646 */3828 #line 1130 "fortran.y" 3829 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); } 3830 #line 3831 "fortran.tab.c" 3699 3831 break; 3700 3832 3701 3833 case 47: 3702 #line 1131 "fortran.y" /* yacc.c:1646 */3703 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); }3704 #line 3 705 "fortran.tab.c" /* yacc.c:1646 */3834 #line 1131 "fortran.y" 3835 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); } 3836 #line 3837 "fortran.tab.c" 3705 3837 break; 3706 3838 3707 3839 case 48: 3708 #line 1132 "fortran.y" /* yacc.c:1646 */3709 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); }3710 #line 3 711 "fortran.tab.c" /* yacc.c:1646 */3840 #line 1132 "fortran.y" 3841 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); } 3842 #line 3843 "fortran.tab.c" 3711 3843 break; 3712 3844 3713 3845 case 49: 3714 #line 1133 "fortran.y" /* yacc.c:1646 */3715 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); }3716 #line 3 717 "fortran.tab.c" /* yacc.c:1646 */3846 #line 1133 "fortran.y" 3847 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); } 3848 #line 3849 "fortran.tab.c" 3717 3849 break; 3718 3850 3719 3851 case 50: 3720 #line 1134 "fortran.y" /* yacc.c:1646 */3721 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); }3722 #line 3 723 "fortran.tab.c" /* yacc.c:1646 */3852 #line 1134 "fortran.y" 3853 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); } 3854 #line 3855 "fortran.tab.c" 3723 3855 break; 3724 3856 3725 3857 case 51: 3726 #line 1135 "fortran.y" /* yacc.c:1646 */3727 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); }3728 #line 3 729 "fortran.tab.c" /* yacc.c:1646 */3858 #line 1135 "fortran.y" 3859 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); } 3860 #line 3861 "fortran.tab.c" 3729 3861 break; 3730 3862 3731 3863 case 52: 3732 #line 1136 "fortran.y" /* yacc.c:1646 */3733 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); }3734 #line 3 735 "fortran.tab.c" /* yacc.c:1646 */3864 #line 1136 "fortran.y" 3865 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); } 3866 #line 3867 "fortran.tab.c" 3735 3867 break; 3736 3868 3737 3869 case 53: 3738 #line 1137 "fortran.y" /* yacc.c:1646 */3739 { sprintf((yyval.na),"%s",(yyvsp[0].na)); }3740 #line 3 741 "fortran.tab.c" /* yacc.c:1646 */3870 #line 1137 "fortran.y" 3871 { sprintf((yyval.na),"%s",(yyvsp[0].na)); } 3872 #line 3873 "fortran.tab.c" 3741 3873 break; 3742 3874 3743 3875 case 54: 3744 #line 1138 "fortran.y" /* yacc.c:1646 */3745 { sprintf((yyval.na),"%s",(yyvsp[0].na)); }3746 #line 3 747 "fortran.tab.c" /* yacc.c:1646 */3876 #line 1138 "fortran.y" 3877 { sprintf((yyval.na),"%s",(yyvsp[0].na)); } 3878 #line 3879 "fortran.tab.c" 3747 3879 break; 3748 3880 3749 3881 case 55: 3750 #line 1140 "fortran.y" /* yacc.c:1646 */3751 { strcpy((yyval.na),""); }3752 #line 3 753 "fortran.tab.c" /* yacc.c:1646 */3882 #line 1140 "fortran.y" 3883 { strcpy((yyval.na),""); } 3884 #line 3885 "fortran.tab.c" 3753 3885 break; 3754 3886 3755 3887 case 56: 3756 #line 1141 "fortran.y" /* yacc.c:1646 */3757 { sprintf((yyval.na),"/%s",(yyvsp[0].na)); }3758 #line 3 759 "fortran.tab.c" /* yacc.c:1646 */3888 #line 1141 "fortran.y" 3889 { sprintf((yyval.na),"/%s",(yyvsp[0].na)); } 3890 #line 3891 "fortran.tab.c" 3759 3891 break; 3760 3892 3761 3893 case 57: 3762 #line 1142 "fortran.y" /* yacc.c:1646 */3763 { sprintf((yyval.na),"/= %s",(yyvsp[0].na));}3764 #line 3 765 "fortran.tab.c" /* yacc.c:1646 */3894 #line 1142 "fortran.y" 3895 { sprintf((yyval.na),"/= %s",(yyvsp[0].na));} 3896 #line 3897 "fortran.tab.c" 3765 3897 break; 3766 3898 3767 3899 case 58: 3768 #line 1143 "fortran.y" /* yacc.c:1646 */3769 { sprintf((yyval.na),"//%s",(yyvsp[0].na)); }3770 #line 3 771 "fortran.tab.c" /* yacc.c:1646 */3900 #line 1143 "fortran.y" 3901 { sprintf((yyval.na),"//%s",(yyvsp[0].na)); } 3902 #line 3903 "fortran.tab.c" 3771 3903 break; 3772 3904 3773 3905 case 59: 3774 #line 1146 "fortran.y" /* yacc.c:1646 */3775 { sprintf((yyval.na),"==%s",(yyvsp[0].na)); }3776 #line 3 777 "fortran.tab.c" /* yacc.c:1646 */3906 #line 1146 "fortran.y" 3907 { sprintf((yyval.na),"==%s",(yyvsp[0].na)); } 3908 #line 3909 "fortran.tab.c" 3777 3909 break; 3778 3910 3779 3911 case 60: 3780 #line 1147 "fortran.y" /* yacc.c:1646 */3781 { sprintf((yyval.na),"= %s",(yyvsp[0].na)); }3782 #line 3 783 "fortran.tab.c" /* yacc.c:1646 */3912 #line 1147 "fortran.y" 3913 { sprintf((yyval.na),"= %s",(yyvsp[0].na)); } 3914 #line 3915 "fortran.tab.c" 3783 3915 break; 3784 3916 3785 3917 case 61: 3786 #line 1150 "fortran.y" /* yacc.c:1646 */3787 { strcpy((yyval.na),(yyvsp[0].na)); }3788 #line 3 789 "fortran.tab.c" /* yacc.c:1646 */3918 #line 1150 "fortran.y" 3919 { strcpy((yyval.na),(yyvsp[0].na)); } 3920 #line 3921 "fortran.tab.c" 3789 3921 break; 3790 3922 3791 3923 case 62: 3792 #line 1151 "fortran.y" /* yacc.c:1646 */3793 { strcpy((yyval.na),(yyvsp[0].na)); }3794 #line 3 795 "fortran.tab.c" /* yacc.c:1646 */3924 #line 1151 "fortran.y" 3925 { strcpy((yyval.na),(yyvsp[0].na)); } 3926 #line 3927 "fortran.tab.c" 3795 3927 break; 3796 3928 3797 3929 case 63: 3798 #line 1152 "fortran.y" /* yacc.c:1646 */3799 { strcpy((yyval.na),(yyvsp[0].na)); }3800 #line 3 801 "fortran.tab.c" /* yacc.c:1646 */3930 #line 1152 "fortran.y" 3931 { strcpy((yyval.na),(yyvsp[0].na)); } 3932 #line 3933 "fortran.tab.c" 3801 3933 break; 3802 3934 3803 3935 case 64: 3804 #line 1156 "fortran.y" /* yacc.c:1646 */3805 {3936 #line 1156 "fortran.y" 3937 { 3806 3938 agrif_parentcall = 0; 3807 3939 if ( !strcasecmp(identcopy, "Agrif_Parent") ) agrif_parentcall = 1; … … 3812 3944 } 3813 3945 } 3814 #line 3 815 "fortran.tab.c" /* yacc.c:1646 */3946 #line 3947 "fortran.tab.c" 3815 3947 break; 3816 3948 3817 3949 case 65: 3818 #line 1167 "fortran.y" /* yacc.c:1646 */3819 { strcpy((yyval.na),(yyvsp[0].na)); if ( incalldeclare == 0 ) inagrifcallargument = 0; }3820 #line 3 821 "fortran.tab.c" /* yacc.c:1646 */3950 #line 1167 "fortran.y" 3951 { strcpy((yyval.na),(yyvsp[0].na)); if ( incalldeclare == 0 ) inagrifcallargument = 0; } 3952 #line 3953 "fortran.tab.c" 3821 3953 break; 3822 3954 3823 3955 case 66: 3824 #line 1168 "fortran.y" /* yacc.c:1646 */3825 { sprintf((yyval.na)," %s %s ",(yyvsp[-1].na),(yyvsp[0].na)); }3826 #line 3 827 "fortran.tab.c" /* yacc.c:1646 */3956 #line 1168 "fortran.y" 3957 { sprintf((yyval.na)," %s %s ",(yyvsp[-1].na),(yyvsp[0].na)); } 3958 #line 3959 "fortran.tab.c" 3827 3959 break; 3828 3960 3829 3961 case 67: 3830 #line 1169 "fortran.y" /* yacc.c:1646 */3831 {in_complex_literal=0;}3832 #line 3 833 "fortran.tab.c" /* yacc.c:1646 */3962 #line 1169 "fortran.y" 3963 {in_complex_literal=0;} 3964 #line 3965 "fortran.tab.c" 3833 3965 break; 3834 3966 3835 3967 case 68: 3836 #line 1169 "fortran.y" /* yacc.c:1646 */3837 { sprintf((yyval.na)," %s ( %s )",(yyvsp[-4].na),(yyvsp[-1].na)); }3838 #line 3 839 "fortran.tab.c" /* yacc.c:1646 */3968 #line 1169 "fortran.y" 3969 { sprintf((yyval.na)," %s ( %s )",(yyvsp[-4].na),(yyvsp[-1].na)); } 3970 #line 3971 "fortran.tab.c" 3839 3971 break; 3840 3972 3841 3973 case 69: 3842 #line 1170 "fortran.y" /* yacc.c:1646 */3843 {in_complex_literal=0;}3844 #line 3 845 "fortran.tab.c" /* yacc.c:1646 */3974 #line 1170 "fortran.y" 3975 {in_complex_literal=0;} 3976 #line 3977 "fortran.tab.c" 3845 3977 break; 3846 3978 3847 3979 case 70: 3848 #line 1170 "fortran.y" /* yacc.c:1646 */3849 { sprintf((yyval.na)," %s ( %s ) %s ",(yyvsp[-5].na),(yyvsp[-2].na),(yyvsp[0].na)); }3850 #line 3 851 "fortran.tab.c" /* yacc.c:1646 */3980 #line 1170 "fortran.y" 3981 { sprintf((yyval.na)," %s ( %s ) %s ",(yyvsp[-5].na),(yyvsp[-2].na),(yyvsp[0].na)); } 3982 #line 3983 "fortran.tab.c" 3851 3983 break; 3852 3984 3853 3985 case 72: 3854 #line 1173 "fortran.y" /* yacc.c:1646 */3855 {in_complex_literal=0;}3856 #line 3 857 "fortran.tab.c" /* yacc.c:1646 */3986 #line 1173 "fortran.y" 3987 {in_complex_literal=0;} 3988 #line 3989 "fortran.tab.c" 3857 3989 break; 3858 3990 3859 3991 case 73: 3860 #line 1174 "fortran.y" /* yacc.c:1646 */3861 {3992 #line 1174 "fortran.y" 3993 { 3862 3994 if ( inside_type_declare ) break; 3863 3995 sprintf((yyval.na)," %s ( %s )",(yyvsp[-4].na),(yyvsp[-1].na)); … … 3865 3997 agrif_parentcall = 0; 3866 3998 } 3867 #line 3868 "fortran.tab.c" /* yacc.c:1646 */3999 #line 4000 "fortran.tab.c" 3868 4000 break; 3869 4001 3870 4002 case 74: 3871 #line 1183 "fortran.y" /* yacc.c:1646 */3872 {4003 #line 1183 "fortran.y" 4004 { 3873 4005 sprintf((yyval.na)," %s %% %s ",(yyvsp[-3].na),(yyvsp[0].na)); 3874 4006 if ( incalldeclare == 0 ) inagrifcallargument = 0; 3875 4007 } 3876 #line 3877 "fortran.tab.c" /* yacc.c:1646 */4008 #line 4009 "fortran.tab.c" 3877 4009 break; 3878 4010 3879 4011 case 75: 3880 #line 1194 "fortran.y" /* yacc.c:1646 */3881 { strcpy((yyval.na)," "); }3882 #line 3883 "fortran.tab.c" /* yacc.c:1646 */4012 #line 1194 "fortran.y" 4013 { strcpy((yyval.na)," "); } 4014 #line 4015 "fortran.tab.c" 3883 4015 break; 3884 4016 3885 4017 case 76: 3886 #line 1195 "fortran.y" /* yacc.c:1646 */3887 { strcpy((yyval.na),(yyvsp[0].na)); }3888 #line 3889 "fortran.tab.c" /* yacc.c:1646 */4018 #line 1195 "fortran.y" 4019 { strcpy((yyval.na),(yyvsp[0].na)); } 4020 #line 4021 "fortran.tab.c" 3889 4021 break; 3890 4022 3891 4023 case 77: 3892 #line 1198 "fortran.y" /* yacc.c:1646 */3893 { strcpy((yyval.na),(yyvsp[0].na)); }3894 #line 3895 "fortran.tab.c" /* yacc.c:1646 */4024 #line 1198 "fortran.y" 4025 { strcpy((yyval.na),(yyvsp[0].na)); } 4026 #line 4027 "fortran.tab.c" 3895 4027 break; 3896 4028 3897 4029 case 78: 3898 #line 1199 "fortran.y" /* yacc.c:1646 */3899 { sprintf((yyval.na),"%s,%s",(yyvsp[-2].na),(yyvsp[0].na)); }3900 #line 3901 "fortran.tab.c" /* yacc.c:1646 */4030 #line 1199 "fortran.y" 4031 { sprintf((yyval.na),"%s,%s",(yyvsp[-2].na),(yyvsp[0].na)); } 4032 #line 4033 "fortran.tab.c" 3901 4033 break; 3902 4034 3903 4035 case 79: 3904 #line 1202 "fortran.y" /* yacc.c:1646 */3905 {strcpy((yyval.na),(yyvsp[0].na));}3906 #line 3907 "fortran.tab.c" /* yacc.c:1646 */4036 #line 1202 "fortran.y" 4037 {strcpy((yyval.na),(yyvsp[0].na));} 4038 #line 4039 "fortran.tab.c" 3907 4039 break; 3908 4040 3909 4041 case 80: 3910 #line 1203 "fortran.y" /* yacc.c:1646 */3911 {strcpy((yyval.na),(yyvsp[0].na));}3912 #line 3913 "fortran.tab.c" /* yacc.c:1646 */4042 #line 1203 "fortran.y" 4043 {strcpy((yyval.na),(yyvsp[0].na));} 4044 #line 4045 "fortran.tab.c" 3913 4045 break; 3914 4046 3915 4047 case 81: 3916 #line 1206 "fortran.y" /* yacc.c:1646 */3917 { sprintf((yyval.na),"%s :%s",(yyvsp[-2].na),(yyvsp[0].na));}3918 #line 3919 "fortran.tab.c" /* yacc.c:1646 */4048 #line 1206 "fortran.y" 4049 { sprintf((yyval.na),"%s :%s",(yyvsp[-2].na),(yyvsp[0].na));} 4050 #line 4051 "fortran.tab.c" 3919 4051 break; 3920 4052 3921 4053 case 82: 3922 #line 1207 "fortran.y" /* yacc.c:1646 */3923 { sprintf((yyval.na),"%s :%s :%s",(yyvsp[-4].na),(yyvsp[-2].na),(yyvsp[0].na));}3924 #line 3925 "fortran.tab.c" /* yacc.c:1646 */4054 #line 1207 "fortran.y" 4055 { sprintf((yyval.na),"%s :%s :%s",(yyvsp[-4].na),(yyvsp[-2].na),(yyvsp[0].na));} 4056 #line 4057 "fortran.tab.c" 3925 4057 break; 3926 4058 3927 4059 case 83: 3928 #line 1208 "fortran.y" /* yacc.c:1646 */3929 { sprintf((yyval.na),":%s :%s",(yyvsp[-2].na),(yyvsp[0].na));}3930 #line 3931 "fortran.tab.c" /* yacc.c:1646 */4060 #line 1208 "fortran.y" 4061 { sprintf((yyval.na),":%s :%s",(yyvsp[-2].na),(yyvsp[0].na));} 4062 #line 4063 "fortran.tab.c" 3931 4063 break; 3932 4064 3933 4065 case 84: 3934 #line 1209 "fortran.y" /* yacc.c:1646 */3935 { sprintf((yyval.na),": : %s",(yyvsp[0].na));}3936 #line 3937 "fortran.tab.c" /* yacc.c:1646 */4066 #line 1209 "fortran.y" 4067 { sprintf((yyval.na),": : %s",(yyvsp[0].na));} 4068 #line 4069 "fortran.tab.c" 3937 4069 break; 3938 4070 3939 4071 case 85: 3940 #line 1210 "fortran.y" /* yacc.c:1646 */3941 { sprintf((yyval.na),":%s",(yyvsp[0].na));}3942 #line 3943 "fortran.tab.c" /* yacc.c:1646 */4072 #line 1210 "fortran.y" 4073 { sprintf((yyval.na),":%s",(yyvsp[0].na));} 4074 #line 4075 "fortran.tab.c" 3943 4075 break; 3944 4076 3945 4077 case 86: 3946 #line 1211 "fortran.y" /* yacc.c:1646 */3947 { sprintf((yyval.na),"%s :",(yyvsp[-1].na));}3948 #line 3949 "fortran.tab.c" /* yacc.c:1646 */4078 #line 1211 "fortran.y" 4079 { sprintf((yyval.na),"%s :",(yyvsp[-1].na));} 4080 #line 4081 "fortran.tab.c" 3949 4081 break; 3950 4082 3951 4083 case 87: 3952 #line 1212 "fortran.y" /* yacc.c:1646 */3953 { sprintf((yyval.na),":");}3954 #line 3955 "fortran.tab.c" /* yacc.c:1646 */4084 #line 1212 "fortran.y" 4085 { sprintf((yyval.na),":");} 4086 #line 4087 "fortran.tab.c" 3955 4087 break; 3956 4088 3957 4089 case 88: 3958 #line 1215 "fortran.y" /* yacc.c:1646 */3959 {4090 #line 1215 "fortran.y" 4091 { 3960 4092 // if (indeclaration == 1) break; 3961 4093 if ( afterpercent == 0 ) … … 4001 4133 } 4002 4134 } 4003 #line 4 004 "fortran.tab.c" /* yacc.c:1646 */4135 #line 4136 "fortran.tab.c" 4004 4136 break; 4005 4137 4006 4138 case 89: 4007 #line 1261 "fortran.y" /* yacc.c:1646 */4008 { strcpy((yyval.na),".TRUE.");}4009 #line 4 010 "fortran.tab.c" /* yacc.c:1646 */4139 #line 1261 "fortran.y" 4140 { strcpy((yyval.na),".TRUE.");} 4141 #line 4142 "fortran.tab.c" 4010 4142 break; 4011 4143 4012 4144 case 90: 4013 #line 1262 "fortran.y" /* yacc.c:1646 */4014 { strcpy((yyval.na),".FALSE.");}4015 #line 4 016 "fortran.tab.c" /* yacc.c:1646 */4145 #line 1262 "fortran.y" 4146 { strcpy((yyval.na),".FALSE.");} 4147 #line 4148 "fortran.tab.c" 4016 4148 break; 4017 4149 4018 4150 case 91: 4019 #line 1263 "fortran.y" /* yacc.c:1646 */4020 { strcpy((yyval.na),"NULL()"); }4021 #line 4 022 "fortran.tab.c" /* yacc.c:1646 */4151 #line 1263 "fortran.y" 4152 { strcpy((yyval.na),"NULL()"); } 4153 #line 4154 "fortran.tab.c" 4022 4154 break; 4023 4155 4024 4156 case 92: 4025 #line 1264 "fortran.y" /* yacc.c:1646 */4026 { strcpy((yyval.na),(yyvsp[0].na)); }4027 #line 4 028 "fortran.tab.c" /* yacc.c:1646 */4157 #line 1264 "fortran.y" 4158 { strcpy((yyval.na),(yyvsp[0].na)); } 4159 #line 4160 "fortran.tab.c" 4028 4160 break; 4029 4161 4030 4162 case 93: 4031 #line 1265 "fortran.y" /* yacc.c:1646 */4032 { strcpy((yyval.na),(yyvsp[0].na)); }4033 #line 4 034 "fortran.tab.c" /* yacc.c:1646 */4163 #line 1265 "fortran.y" 4164 { strcpy((yyval.na),(yyvsp[0].na)); } 4165 #line 4166 "fortran.tab.c" 4034 4166 break; 4035 4167 4036 4168 case 94: 4037 #line 1266 "fortran.y" /* yacc.c:1646 */4038 { strcpy((yyval.na),(yyvsp[0].na)); }4039 #line 4 040 "fortran.tab.c" /* yacc.c:1646 */4169 #line 1266 "fortran.y" 4170 { strcpy((yyval.na),(yyvsp[0].na)); } 4171 #line 4172 "fortran.tab.c" 4040 4172 break; 4041 4173 4042 4174 case 95: 4043 #line 1268 "fortran.y" /* yacc.c:1646 */4044 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); }4045 #line 4 046 "fortran.tab.c" /* yacc.c:1646 */4175 #line 1268 "fortran.y" 4176 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); } 4177 #line 4178 "fortran.tab.c" 4046 4178 break; 4047 4179 4048 4180 case 97: 4049 #line 1272 "fortran.y" /* yacc.c:1646 */4050 { strcpy((yyval.na),(yyvsp[0].na));}4051 #line 4 052 "fortran.tab.c" /* yacc.c:1646 */4181 #line 1272 "fortran.y" 4182 { strcpy((yyval.na),(yyvsp[0].na));} 4183 #line 4184 "fortran.tab.c" 4052 4184 break; 4053 4185 4054 4186 case 99: 4055 #line 1274 "fortran.y" /* yacc.c:1646 */4056 { strcpy((yyval.na),(yyvsp[0].na));}4057 #line 4 058 "fortran.tab.c" /* yacc.c:1646 */4187 #line 1274 "fortran.y" 4188 { strcpy((yyval.na),(yyvsp[0].na));} 4189 #line 4190 "fortran.tab.c" 4058 4190 break; 4059 4191 4060 4192 case 100: 4061 #line 1275 "fortran.y" /* yacc.c:1646 */4062 { strcpy((yyval.na),(yyvsp[0].na));}4063 #line 4 064 "fortran.tab.c" /* yacc.c:1646 */4193 #line 1275 "fortran.y" 4194 { strcpy((yyval.na),(yyvsp[0].na));} 4195 #line 4196 "fortran.tab.c" 4064 4196 break; 4065 4197 4066 4198 case 101: 4067 #line 1277 "fortran.y" /* yacc.c:1646 */4068 { strcpy((yyval.na)," ");}4069 #line 4 070 "fortran.tab.c" /* yacc.c:1646 */4199 #line 1277 "fortran.y" 4200 { strcpy((yyval.na)," ");} 4201 #line 4202 "fortran.tab.c" 4070 4202 break; 4071 4203 4072 4204 case 102: 4073 #line 1278 "fortran.y" /* yacc.c:1646 */4074 { strcpy((yyval.na),(yyvsp[0].na));}4075 #line 4 076 "fortran.tab.c" /* yacc.c:1646 */4205 #line 1278 "fortran.y" 4206 { strcpy((yyval.na),(yyvsp[0].na));} 4207 #line 4208 "fortran.tab.c" 4076 4208 break; 4077 4209 4078 4210 case 103: 4079 #line 1288 "fortran.y" /* yacc.c:1646 */4080 { strcpy((yyval.na)," ");}4081 #line 4 082 "fortran.tab.c" /* yacc.c:1646 */4211 #line 1288 "fortran.y" 4212 { strcpy((yyval.na)," ");} 4213 #line 4214 "fortran.tab.c" 4082 4214 break; 4083 4215 4084 4216 case 104: 4085 #line 1289 "fortran.y" /* yacc.c:1646 */4086 { strcpy((yyval.na),(yyvsp[0].na));}4087 #line 4 088 "fortran.tab.c" /* yacc.c:1646 */4217 #line 1289 "fortran.y" 4218 { strcpy((yyval.na),(yyvsp[0].na));} 4219 #line 4220 "fortran.tab.c" 4088 4220 break; 4089 4221 4090 4222 case 169: 4091 #line 1487 "fortran.y" /* yacc.c:1646 */4092 {4223 #line 1487 "fortran.y" 4224 { 4093 4225 /* if we never meet the contains keyword */ 4094 4226 if ( firstpass == 0 ) … … 4111 4243 GlobalDeclaration = 0 ; 4112 4244 } 4113 #line 4 114 "fortran.tab.c" /* yacc.c:1646 */4245 #line 4246 "fortran.tab.c" 4114 4246 break; 4115 4247 4116 4248 case 189: 4117 #line 1540 "fortran.y" /* yacc.c:1646 */4118 {in_complex_literal=0;}4119 #line 4 120 "fortran.tab.c" /* yacc.c:1646 */4249 #line 1540 "fortran.y" 4250 {in_complex_literal=0;} 4251 #line 4252 "fortran.tab.c" 4120 4252 break; 4121 4253 4122 4254 case 192: 4123 #line 1564 "fortran.y" /* yacc.c:1646 */ 4255 #line 1564 "fortran.y" 4256 {strcpy((yyval.na),"");} 4257 #line 4258 "fortran.tab.c" 4258 break; 4259 4260 case 196: 4261 #line 1574 "fortran.y" 4262 {strcpy((yyval.na),"");} 4263 #line 4264 "fortran.tab.c" 4264 break; 4265 4266 case 197: 4267 #line 1576 "fortran.y" 4268 {strcpy((yyval.na),(yyvsp[0].na));} 4269 #line 4270 "fortran.tab.c" 4270 break; 4271 4272 case 202: 4273 #line 1596 "fortran.y" 4274 {pos_cur_decl=my_position_before;} 4275 #line 4276 "fortran.tab.c" 4276 break; 4277 4278 case 203: 4279 #line 1597 "fortran.y" 4280 {strcpy((yyval.na),(yyvsp[0].na));} 4281 #line 4282 "fortran.tab.c" 4282 break; 4283 4284 case 205: 4285 #line 1600 "fortran.y" 4286 {strcpy(DeclType,"type"); GlobalDeclarationType = 1; } 4287 #line 4288 "fortran.tab.c" 4288 break; 4289 4290 case 206: 4291 #line 1604 "fortran.y" 4292 {in_kind_selector = 1;} 4293 #line 4294 "fortran.tab.c" 4294 break; 4295 4296 case 207: 4297 #line 1605 "fortran.y" 4298 {sprintf((yyval.na),"%s%s",(yyvsp[-2].na),(yyvsp[0].na));strcpy(DeclType,(yyvsp[-2].na)); in_kind_selector =0;} 4299 #line 4300 "fortran.tab.c" 4300 break; 4301 4302 case 208: 4303 #line 1606 "fortran.y" 4304 {in_kind_selector = 1;} 4305 #line 4306 "fortran.tab.c" 4306 break; 4307 4308 case 209: 4309 #line 1607 "fortran.y" 4310 {sprintf((yyval.na),"%s%s",(yyvsp[-2].na),(yyvsp[0].na));strcpy(DeclType,(yyvsp[-2].na));in_kind_selector =0;} 4311 #line 4312 "fortran.tab.c" 4312 break; 4313 4314 case 210: 4315 #line 1608 "fortran.y" 4316 {in_kind_selector = 1;} 4317 #line 4318 "fortran.tab.c" 4318 break; 4319 4320 case 211: 4321 #line 1609 "fortran.y" 4322 {sprintf((yyval.na),"%s%s",(yyvsp[-2].na),(yyvsp[0].na));strcpy(DeclType,"real"); strcpy(NamePrecision,"8");in_kind_selector =0;} 4323 #line 4324 "fortran.tab.c" 4324 break; 4325 4326 case 212: 4327 #line 1610 "fortran.y" 4328 {in_kind_selector = 1;} 4329 #line 4330 "fortran.tab.c" 4330 break; 4331 4332 case 213: 4333 #line 1611 "fortran.y" 4334 {sprintf((yyval.na),"%s%s",(yyvsp[-2].na),(yyvsp[0].na));strcpy(DeclType,(yyvsp[-2].na));in_kind_selector =0;} 4335 #line 4336 "fortran.tab.c" 4336 break; 4337 4338 case 214: 4339 #line 1612 "fortran.y" 4340 {in_char_selector = 1;} 4341 #line 4342 "fortran.tab.c" 4342 break; 4343 4344 case 215: 4345 #line 1613 "fortran.y" 4346 {sprintf((yyval.na),"%s%s",(yyvsp[-2].na),(yyvsp[0].na));strcpy(DeclType,(yyvsp[-2].na));in_char_selector = 0;} 4347 #line 4348 "fortran.tab.c" 4348 break; 4349 4350 case 216: 4351 #line 1614 "fortran.y" 4352 {in_kind_selector = 1;} 4353 #line 4354 "fortran.tab.c" 4354 break; 4355 4356 case 217: 4357 #line 1615 "fortran.y" 4358 {sprintf((yyval.na),"%s%s",(yyvsp[-2].na),(yyvsp[0].na));strcpy(DeclType,(yyvsp[-2].na));in_kind_selector =0;} 4359 #line 4360 "fortran.tab.c" 4360 break; 4361 4362 case 218: 4363 #line 1619 "fortran.y" 4364 {strcpy((yyval.na),"");strcpy(NamePrecision,"");} 4365 #line 4366 "fortran.tab.c" 4366 break; 4367 4368 case 219: 4369 #line 1621 "fortran.y" 4370 {strcpy((yyval.na),(yyvsp[0].na));} 4371 #line 4372 "fortran.tab.c" 4372 break; 4373 4374 case 220: 4375 #line 1627 "fortran.y" 4376 {sprintf((yyval.na),"(%s)",(yyvsp[-1].na)); strcpy(NamePrecision,(yyvsp[-1].na));} 4377 #line 4378 "fortran.tab.c" 4378 break; 4379 4380 case 221: 4381 #line 1629 "fortran.y" 4382 {sprintf((yyval.na),"(KIND=%s)",(yyvsp[-1].na)); strcpy(NamePrecision,(yyvsp[-1].na));} 4383 #line 4384 "fortran.tab.c" 4384 break; 4385 4386 case 222: 4387 #line 1631 "fortran.y" 4388 {sprintf((yyval.na),"*%s",(yyvsp[0].na));strcpy(NamePrecision,(yyvsp[0].na));} 4389 #line 4390 "fortran.tab.c" 4390 break; 4391 4392 case 224: 4393 #line 1639 "fortran.y" 4394 {sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na));} 4395 #line 4396 "fortran.tab.c" 4396 break; 4397 4398 case 226: 4399 #line 1645 "fortran.y" 4400 {sprintf((yyval.na),"%s_%s",(yyvsp[-2].na),(yyvsp[0].na));} 4401 #line 4402 "fortran.tab.c" 4402 break; 4403 4404 case 230: 4405 #line 1668 "fortran.y" 4406 {sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na));} 4407 #line 4408 "fortran.tab.c" 4408 break; 4409 4410 case 232: 4411 #line 1674 "fortran.y" 4412 {sprintf((yyval.na),"%s_%s",(yyvsp[-2].na),(yyvsp[0].na));} 4413 #line 4414 "fortran.tab.c" 4414 break; 4415 4416 case 233: 4417 #line 1681 "fortran.y" 4418 {sprintf((yyval.na),"(%s,%s)",(yyvsp[-3].na),(yyvsp[-1].na));} 4419 #line 4420 "fortran.tab.c" 4420 break; 4421 4422 case 241: 4423 #line 1699 "fortran.y" 4424 {char_length_toreset = 1;} 4425 #line 4426 "fortran.tab.c" 4426 break; 4427 4428 case 242: 4429 #line 1703 "fortran.y" 4430 {strcpy((yyval.na),"");} 4431 #line 4432 "fortran.tab.c" 4432 break; 4433 4434 case 243: 4435 #line 1705 "fortran.y" 4124 4436 {strcpy((yyval.na),"");} 4125 #line 4126 "fortran.tab.c" /* yacc.c:1646 */ 4126 break; 4127 4128 case 196: 4129 #line 1574 "fortran.y" /* yacc.c:1646 */ 4130 {strcpy((yyval.na),"");} 4131 #line 4132 "fortran.tab.c" /* yacc.c:1646 */ 4132 break; 4133 4134 case 197: 4135 #line 1576 "fortran.y" /* yacc.c:1646 */ 4136 {strcpy((yyval.na),(yyvsp[0].na));} 4137 #line 4138 "fortran.tab.c" /* yacc.c:1646 */ 4138 break; 4139 4140 case 202: 4141 #line 1596 "fortran.y" /* yacc.c:1646 */ 4142 {pos_cur_decl=my_position_before;} 4143 #line 4144 "fortran.tab.c" /* yacc.c:1646 */ 4144 break; 4145 4146 case 203: 4147 #line 1597 "fortran.y" /* yacc.c:1646 */ 4148 {strcpy((yyval.na),(yyvsp[0].na));} 4149 #line 4150 "fortran.tab.c" /* yacc.c:1646 */ 4150 break; 4151 4152 case 205: 4153 #line 1600 "fortran.y" /* yacc.c:1646 */ 4154 {strcpy(DeclType,"type"); GlobalDeclarationType = 1; } 4155 #line 4156 "fortran.tab.c" /* yacc.c:1646 */ 4156 break; 4157 4158 case 206: 4159 #line 1604 "fortran.y" /* yacc.c:1646 */ 4160 {in_kind_selector = 1;} 4161 #line 4162 "fortran.tab.c" /* yacc.c:1646 */ 4162 break; 4163 4164 case 207: 4165 #line 1605 "fortran.y" /* yacc.c:1646 */ 4166 {sprintf((yyval.na),"%s%s",(yyvsp[-2].na),(yyvsp[0].na));strcpy(DeclType,(yyvsp[-2].na)); in_kind_selector =0;} 4167 #line 4168 "fortran.tab.c" /* yacc.c:1646 */ 4168 break; 4169 4170 case 208: 4171 #line 1606 "fortran.y" /* yacc.c:1646 */ 4172 {in_kind_selector = 1;} 4173 #line 4174 "fortran.tab.c" /* yacc.c:1646 */ 4174 break; 4175 4176 case 209: 4177 #line 1607 "fortran.y" /* yacc.c:1646 */ 4178 {sprintf((yyval.na),"%s%s",(yyvsp[-2].na),(yyvsp[0].na));strcpy(DeclType,(yyvsp[-2].na));in_kind_selector =0;} 4179 #line 4180 "fortran.tab.c" /* yacc.c:1646 */ 4180 break; 4181 4182 case 210: 4183 #line 1608 "fortran.y" /* yacc.c:1646 */ 4184 {in_kind_selector = 1;} 4185 #line 4186 "fortran.tab.c" /* yacc.c:1646 */ 4186 break; 4187 4188 case 211: 4189 #line 1609 "fortran.y" /* yacc.c:1646 */ 4190 {sprintf((yyval.na),"%s%s",(yyvsp[-2].na),(yyvsp[0].na));strcpy(DeclType,"real"); strcpy(NamePrecision,"8");in_kind_selector =0;} 4191 #line 4192 "fortran.tab.c" /* yacc.c:1646 */ 4192 break; 4193 4194 case 212: 4195 #line 1610 "fortran.y" /* yacc.c:1646 */ 4196 {in_kind_selector = 1;} 4197 #line 4198 "fortran.tab.c" /* yacc.c:1646 */ 4198 break; 4199 4200 case 213: 4201 #line 1611 "fortran.y" /* yacc.c:1646 */ 4202 {sprintf((yyval.na),"%s%s",(yyvsp[-2].na),(yyvsp[0].na));strcpy(DeclType,(yyvsp[-2].na));in_kind_selector =0;} 4203 #line 4204 "fortran.tab.c" /* yacc.c:1646 */ 4204 break; 4205 4206 case 214: 4207 #line 1612 "fortran.y" /* yacc.c:1646 */ 4208 {in_char_selector = 1;} 4209 #line 4210 "fortran.tab.c" /* yacc.c:1646 */ 4210 break; 4211 4212 case 215: 4213 #line 1613 "fortran.y" /* yacc.c:1646 */ 4214 {sprintf((yyval.na),"%s%s",(yyvsp[-2].na),(yyvsp[0].na));strcpy(DeclType,(yyvsp[-2].na));in_char_selector = 0;} 4215 #line 4216 "fortran.tab.c" /* yacc.c:1646 */ 4216 break; 4217 4218 case 216: 4219 #line 1614 "fortran.y" /* yacc.c:1646 */ 4220 {in_kind_selector = 1;} 4221 #line 4222 "fortran.tab.c" /* yacc.c:1646 */ 4222 break; 4223 4224 case 217: 4225 #line 1615 "fortran.y" /* yacc.c:1646 */ 4226 {sprintf((yyval.na),"%s%s",(yyvsp[-2].na),(yyvsp[0].na));strcpy(DeclType,(yyvsp[-2].na));in_kind_selector =0;} 4227 #line 4228 "fortran.tab.c" /* yacc.c:1646 */ 4228 break; 4229 4230 case 218: 4231 #line 1619 "fortran.y" /* yacc.c:1646 */ 4232 {strcpy((yyval.na),"");strcpy(NamePrecision,"");} 4233 #line 4234 "fortran.tab.c" /* yacc.c:1646 */ 4234 break; 4235 4236 case 219: 4237 #line 1621 "fortran.y" /* yacc.c:1646 */ 4238 {strcpy((yyval.na),(yyvsp[0].na));} 4239 #line 4240 "fortran.tab.c" /* yacc.c:1646 */ 4240 break; 4241 4242 case 220: 4243 #line 1627 "fortran.y" /* yacc.c:1646 */ 4244 {sprintf((yyval.na),"(%s)",(yyvsp[-1].na)); strcpy(NamePrecision,(yyvsp[-1].na));} 4245 #line 4246 "fortran.tab.c" /* yacc.c:1646 */ 4246 break; 4247 4248 case 221: 4249 #line 1629 "fortran.y" /* yacc.c:1646 */ 4250 {sprintf((yyval.na),"(KIND=%s)",(yyvsp[-1].na)); strcpy(NamePrecision,(yyvsp[-1].na));} 4251 #line 4252 "fortran.tab.c" /* yacc.c:1646 */ 4252 break; 4253 4254 case 222: 4255 #line 1631 "fortran.y" /* yacc.c:1646 */ 4256 {sprintf((yyval.na),"*%s",(yyvsp[0].na));strcpy(NamePrecision,(yyvsp[0].na));} 4257 #line 4258 "fortran.tab.c" /* yacc.c:1646 */ 4258 break; 4259 4260 case 224: 4261 #line 1639 "fortran.y" /* yacc.c:1646 */ 4262 {sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na));} 4263 #line 4264 "fortran.tab.c" /* yacc.c:1646 */ 4264 break; 4265 4266 case 226: 4267 #line 1645 "fortran.y" /* yacc.c:1646 */ 4268 {sprintf((yyval.na),"%s_%s",(yyvsp[-2].na),(yyvsp[0].na));} 4269 #line 4270 "fortran.tab.c" /* yacc.c:1646 */ 4270 break; 4271 4272 case 230: 4273 #line 1668 "fortran.y" /* yacc.c:1646 */ 4274 {sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na));} 4275 #line 4276 "fortran.tab.c" /* yacc.c:1646 */ 4276 break; 4277 4278 case 232: 4279 #line 1674 "fortran.y" /* yacc.c:1646 */ 4280 {sprintf((yyval.na),"%s_%s",(yyvsp[-2].na),(yyvsp[0].na));} 4281 #line 4282 "fortran.tab.c" /* yacc.c:1646 */ 4282 break; 4283 4284 case 233: 4285 #line 1681 "fortran.y" /* yacc.c:1646 */ 4286 {sprintf((yyval.na),"(%s,%s)",(yyvsp[-3].na),(yyvsp[-1].na));} 4287 #line 4288 "fortran.tab.c" /* yacc.c:1646 */ 4288 break; 4289 4290 case 241: 4291 #line 1699 "fortran.y" /* yacc.c:1646 */ 4292 {char_length_toreset = 1;} 4293 #line 4294 "fortran.tab.c" /* yacc.c:1646 */ 4294 break; 4295 4296 case 242: 4297 #line 1703 "fortran.y" /* yacc.c:1646 */ 4298 {strcpy((yyval.na),"");} 4299 #line 4300 "fortran.tab.c" /* yacc.c:1646 */ 4300 break; 4301 4302 case 243: 4303 #line 1705 "fortran.y" /* yacc.c:1646 */ 4304 {strcpy((yyval.na),"");} 4305 #line 4306 "fortran.tab.c" /* yacc.c:1646 */ 4437 #line 4438 "fortran.tab.c" 4306 4438 break; 4307 4439 4308 4440 case 249: 4309 #line 1718 "fortran.y" /* yacc.c:1646 */4310 {strcpy(CharacterSize,(yyvsp[-1].na));}4311 #line 4 312 "fortran.tab.c" /* yacc.c:1646 */4441 #line 1718 "fortran.y" 4442 {strcpy(CharacterSize,(yyvsp[-1].na));} 4443 #line 4444 "fortran.tab.c" 4312 4444 break; 4313 4445 4314 4446 case 250: 4315 #line 1720 "fortran.y" /* yacc.c:1646 */4316 {strcpy(CharacterSize,(yyvsp[-1].na));}4317 #line 4 318 "fortran.tab.c" /* yacc.c:1646 */4447 #line 1720 "fortran.y" 4448 {strcpy(CharacterSize,(yyvsp[-1].na));} 4449 #line 4450 "fortran.tab.c" 4318 4450 break; 4319 4451 4320 4452 case 253: 4321 #line 1727 "fortran.y" /* yacc.c:1646 */4322 {c_star=1; strcpy(CharacterSize,(yyvsp[-1].na));}4323 #line 4 324 "fortran.tab.c" /* yacc.c:1646 */4453 #line 1727 "fortran.y" 4454 {c_star=1; strcpy(CharacterSize,(yyvsp[-1].na));} 4455 #line 4456 "fortran.tab.c" 4324 4456 break; 4325 4457 4326 4458 case 254: 4327 #line 1729 "fortran.y" /* yacc.c:1646 */4328 {c_selectorgiven = 1; strcpy(c_selectorname,(yyvsp[0].na));}4329 #line 4 330 "fortran.tab.c" /* yacc.c:1646 */4459 #line 1729 "fortran.y" 4460 {c_selectorgiven = 1; strcpy(c_selectorname,(yyvsp[0].na));} 4461 #line 4462 "fortran.tab.c" 4330 4462 break; 4331 4463 4332 4464 case 260: 4333 #line 1744 "fortran.y" /* yacc.c:1646 */4334 { inside_type_declare = 1;}4335 #line 4 336 "fortran.tab.c" /* yacc.c:1646 */4465 #line 1744 "fortran.y" 4466 { inside_type_declare = 1;} 4467 #line 4468 "fortran.tab.c" 4336 4468 break; 4337 4469 4338 4470 case 261: 4339 #line 1745 "fortran.y" /* yacc.c:1646 */4340 { inside_type_declare = 0;}4341 #line 4 342 "fortran.tab.c" /* yacc.c:1646 */4471 #line 1745 "fortran.y" 4472 { inside_type_declare = 0;} 4473 #line 4474 "fortran.tab.c" 4342 4474 break; 4343 4475 4344 4476 case 290: 4345 #line 1811 "fortran.y" /* yacc.c:1646 */4346 {in_complex_literal=0;}4347 #line 4 348 "fortran.tab.c" /* yacc.c:1646 */4477 #line 1811 "fortran.y" 4478 {in_complex_literal=0;} 4479 #line 4480 "fortran.tab.c" 4348 4480 break; 4349 4481 4350 4482 case 295: 4351 #line 1821 "fortran.y" /* yacc.c:1646 */4352 {4483 #line 1821 "fortran.y" 4484 { 4353 4485 PublicDeclare = 0; 4354 4486 PrivateDeclare = 0; … … 4371 4503 GlobalDeclarationType = 0; 4372 4504 } 4373 #line 4 374 "fortran.tab.c" /* yacc.c:1646 */4505 #line 4506 "fortran.tab.c" 4374 4506 break; 4375 4507 4376 4508 case 305: 4377 #line 1865 "fortran.y" /* yacc.c:1646 */4378 {strcpy(my_dim.last,"");}4379 #line 4 380 "fortran.tab.c" /* yacc.c:1646 */4509 #line 1865 "fortran.y" 4510 {strcpy(my_dim.last,"");} 4511 #line 4512 "fortran.tab.c" 4380 4512 break; 4381 4513 4382 4514 case 306: 4383 #line 1870 "fortran.y" /* yacc.c:1646 */4384 {strcpy(NamePrecision,(yyvsp[0].na));}4385 #line 4 386 "fortran.tab.c" /* yacc.c:1646 */4515 #line 1870 "fortran.y" 4516 {strcpy(NamePrecision,(yyvsp[0].na));} 4517 #line 4518 "fortran.tab.c" 4386 4518 break; 4387 4519 4388 4520 case 321: 4389 #line 1905 "fortran.y" /* yacc.c:1646 */4390 { sprintf((yyval.na),"(/%s/)",(yyvsp[-1].na));}4391 #line 4 392 "fortran.tab.c" /* yacc.c:1646 */4521 #line 1905 "fortran.y" 4522 { sprintf((yyval.na),"(/%s/)",(yyvsp[-1].na));} 4523 #line 4524 "fortran.tab.c" 4392 4524 break; 4393 4525 4394 4526 case 322: 4395 #line 1907 "fortran.y" /* yacc.c:1646 */4396 { sprintf((yyval.na),"[%s]",(yyvsp[-1].na)); }4397 #line 4 398 "fortran.tab.c" /* yacc.c:1646 */4527 #line 1907 "fortran.y" 4528 { sprintf((yyval.na),"[%s]",(yyvsp[-1].na)); } 4529 #line 4530 "fortran.tab.c" 4398 4530 break; 4399 4531 4400 4532 case 327: 4401 #line 1935 "fortran.y" /* yacc.c:1646 */4402 {sprintf((yyval.na),"%s,%s",(yyvsp[-2].na),(yyvsp[0].na));}4403 #line 4 404 "fortran.tab.c" /* yacc.c:1646 */4533 #line 1935 "fortran.y" 4534 {sprintf((yyval.na),"%s,%s",(yyvsp[-2].na),(yyvsp[0].na));} 4535 #line 4536 "fortran.tab.c" 4404 4536 break; 4405 4537 4406 4538 case 330: 4407 #line 1945 "fortran.y" /* yacc.c:1646 */4408 {sprintf((yyval.na),"(%s,%s)",(yyvsp[-3].na),(yyvsp[-1].na));}4409 #line 4 410 "fortran.tab.c" /* yacc.c:1646 */4539 #line 1945 "fortran.y" 4540 {sprintf((yyval.na),"(%s,%s)",(yyvsp[-3].na),(yyvsp[-1].na));} 4541 #line 4542 "fortran.tab.c" 4410 4542 break; 4411 4543 4412 4544 case 331: 4413 #line 1950 "fortran.y" /* yacc.c:1646 */4414 {sprintf((yyval.na),"%s=%s,%s",(yyvsp[-4].na),(yyvsp[-2].na),(yyvsp[0].na));}4415 #line 4 416 "fortran.tab.c" /* yacc.c:1646 */4545 #line 1950 "fortran.y" 4546 {sprintf((yyval.na),"%s=%s,%s",(yyvsp[-4].na),(yyvsp[-2].na),(yyvsp[0].na));} 4547 #line 4548 "fortran.tab.c" 4416 4548 break; 4417 4549 4418 4550 case 332: 4419 #line 1952 "fortran.y" /* yacc.c:1646 */4420 {sprintf((yyval.na),"%s=%s,%s,%s",(yyvsp[-6].na),(yyvsp[-4].na),(yyvsp[-2].na),(yyvsp[0].na));}4421 #line 4 422 "fortran.tab.c" /* yacc.c:1646 */4551 #line 1952 "fortran.y" 4552 {sprintf((yyval.na),"%s=%s,%s,%s",(yyvsp[-6].na),(yyvsp[-4].na),(yyvsp[-2].na),(yyvsp[0].na));} 4553 #line 4554 "fortran.tab.c" 4422 4554 break; 4423 4555 4424 4556 case 334: 4425 #line 1960 "fortran.y" /* yacc.c:1646 */4426 {indeclaration=1;}4427 #line 4 428 "fortran.tab.c" /* yacc.c:1646 */4557 #line 1960 "fortran.y" 4558 {indeclaration=1;} 4559 #line 4560 "fortran.tab.c" 4428 4560 break; 4429 4561 4430 4562 case 335: 4431 #line 1961 "fortran.y" /* yacc.c:1646 */4432 {4563 #line 1961 "fortran.y" 4564 { 4433 4565 /* if the variable is a parameter we can suppose that is*/ 4434 4566 /* value is the same on each grid. It is not useless */ … … 4495 4627 GlobalDeclarationType = 0; 4496 4628 } 4497 #line 4 498 "fortran.tab.c" /* yacc.c:1646 */4629 #line 4630 "fortran.tab.c" 4498 4630 break; 4499 4631 4500 4632 case 344: 4501 #line 2045 "fortran.y" /* yacc.c:1646 */4502 { Allocatabledeclare = 1; }4503 #line 4 504 "fortran.tab.c" /* yacc.c:1646 */4633 #line 2045 "fortran.y" 4634 { Allocatabledeclare = 1; } 4635 #line 4636 "fortran.tab.c" 4504 4636 break; 4505 4637 4506 4638 case 345: 4507 #line 2047 "fortran.y" /* yacc.c:1646 */4508 { contiguousdeclare = 1 ; }4509 #line 4 510 "fortran.tab.c" /* yacc.c:1646 */4639 #line 2047 "fortran.y" 4640 { contiguousdeclare = 1 ; } 4641 #line 4642 "fortran.tab.c" 4510 4642 break; 4511 4643 4512 4644 case 346: 4513 #line 2048 "fortran.y" /* yacc.c:1646 */4514 {in_complex_literal=0;}4515 #line 4 516 "fortran.tab.c" /* yacc.c:1646 */4645 #line 2048 "fortran.y" 4646 {in_complex_literal=0;} 4647 #line 4648 "fortran.tab.c" 4516 4648 break; 4517 4649 4518 4650 case 347: 4519 #line 2049 "fortran.y" /* yacc.c:1646 */4520 { dimsgiven = 1; curdim = (yyvsp[-1].d); }4521 #line 4 522 "fortran.tab.c" /* yacc.c:1646 */4651 #line 2049 "fortran.y" 4652 { dimsgiven = 1; curdim = (yyvsp[-1].d); } 4653 #line 4654 "fortran.tab.c" 4522 4654 break; 4523 4655 4524 4656 case 348: 4525 #line 2051 "fortran.y" /* yacc.c:1646 */4526 { ExternalDeclare = 1; }4527 #line 4 528 "fortran.tab.c" /* yacc.c:1646 */4657 #line 2051 "fortran.y" 4658 { ExternalDeclare = 1; } 4659 #line 4660 "fortran.tab.c" 4528 4660 break; 4529 4661 4530 4662 case 349: 4531 #line 2052 "fortran.y" /* yacc.c:1646 */4532 {in_complex_literal=0;}4533 #line 4 534 "fortran.tab.c" /* yacc.c:1646 */4663 #line 2052 "fortran.y" 4664 {in_complex_literal=0;} 4665 #line 4666 "fortran.tab.c" 4534 4666 break; 4535 4667 4536 4668 case 350: 4537 #line 2053 "fortran.y" /* yacc.c:1646 */4538 { strcpy(IntentSpec,(yyvsp[-1].na)); }4539 #line 4 540 "fortran.tab.c" /* yacc.c:1646 */4669 #line 2053 "fortran.y" 4670 { strcpy(IntentSpec,(yyvsp[-1].na)); } 4671 #line 4672 "fortran.tab.c" 4540 4672 break; 4541 4673 4542 4674 case 352: 4543 #line 2056 "fortran.y" /* yacc.c:1646 */4544 { optionaldeclare = 1 ; }4545 #line 4 546 "fortran.tab.c" /* yacc.c:1646 */4675 #line 2056 "fortran.y" 4676 { optionaldeclare = 1 ; } 4677 #line 4678 "fortran.tab.c" 4546 4678 break; 4547 4679 4548 4680 case 353: 4549 #line 2058 "fortran.y" /* yacc.c:1646 */4550 {VariableIsParameter = 1; }4551 #line 4 552 "fortran.tab.c" /* yacc.c:1646 */4681 #line 2058 "fortran.y" 4682 {VariableIsParameter = 1; } 4683 #line 4684 "fortran.tab.c" 4552 4684 break; 4553 4685 4554 4686 case 354: 4555 #line 2060 "fortran.y" /* yacc.c:1646 */4556 { pointerdeclare = 1 ; }4557 #line 4 558 "fortran.tab.c" /* yacc.c:1646 */4687 #line 2060 "fortran.y" 4688 { pointerdeclare = 1 ; } 4689 #line 4690 "fortran.tab.c" 4558 4690 break; 4559 4691 4560 4692 case 355: 4561 #line 2062 "fortran.y" /* yacc.c:1646 */4562 { SaveDeclare = 1 ; }4563 #line 4 564 "fortran.tab.c" /* yacc.c:1646 */4693 #line 2062 "fortran.y" 4694 { SaveDeclare = 1 ; } 4695 #line 4696 "fortran.tab.c" 4564 4696 break; 4565 4697 4566 4698 case 356: 4567 #line 2064 "fortran.y" /* yacc.c:1646 */4568 { Targetdeclare = 1; }4569 #line 4 570 "fortran.tab.c" /* yacc.c:1646 */4699 #line 2064 "fortran.y" 4700 { Targetdeclare = 1; } 4701 #line 4702 "fortran.tab.c" 4570 4702 break; 4571 4703 4572 4704 case 357: 4573 #line 2069 "fortran.y" /* yacc.c:1646 */4574 {(yyval.l)=insertvar(NULL,(yyvsp[0].v));}4575 #line 4 576 "fortran.tab.c" /* yacc.c:1646 */4705 #line 2069 "fortran.y" 4706 {(yyval.l)=insertvar(NULL,(yyvsp[0].v));} 4707 #line 4708 "fortran.tab.c" 4576 4708 break; 4577 4709 4578 4710 case 358: 4579 #line 2071 "fortran.y" /* yacc.c:1646 */4580 {(yyval.l)=insertvar((yyvsp[-2].l),(yyvsp[0].v));}4581 #line 4 582 "fortran.tab.c" /* yacc.c:1646 */4711 #line 2071 "fortran.y" 4712 {(yyval.l)=insertvar((yyvsp[-2].l),(yyvsp[0].v));} 4713 #line 4714 "fortran.tab.c" 4582 4714 break; 4583 4715 4584 4716 case 359: 4585 #line 2076 "fortran.y" /* yacc.c:1646 */4586 {4717 #line 2076 "fortran.y" 4718 { 4587 4719 if ( ! inside_type_declare ) 4588 4720 { … … 4613 4745 (yyval.v)=curvar; 4614 4746 } 4615 #line 4 616 "fortran.tab.c" /* yacc.c:1646 */4747 #line 4748 "fortran.tab.c" 4616 4748 break; 4617 4749 4618 4750 case 362: 4619 #line 2115 "fortran.y" /* yacc.c:1646 */4620 {InitialValueGiven = 0; }4621 #line 4 622 "fortran.tab.c" /* yacc.c:1646 */4751 #line 2115 "fortran.y" 4752 {InitialValueGiven = 0; } 4753 #line 4754 "fortran.tab.c" 4622 4754 break; 4623 4755 4624 4756 case 364: 4625 #line 2121 "fortran.y" /* yacc.c:1646 */4626 {4757 #line 2121 "fortran.y" 4758 { 4627 4759 if ( inside_type_declare ) break; 4628 4760 strcpy(InitValue,(yyvsp[0].na)); 4629 4761 InitialValueGiven = 1; 4630 4762 } 4631 #line 4 632 "fortran.tab.c" /* yacc.c:1646 */4763 #line 4764 "fortran.tab.c" 4632 4764 break; 4633 4765 4634 4766 case 365: 4635 #line 2127 "fortran.y" /* yacc.c:1646 */4636 {4767 #line 2127 "fortran.y" 4768 { 4637 4769 if ( inside_type_declare ) break; 4638 4770 strcpy(InitValue,(yyvsp[0].na)); 4639 4771 InitialValueGiven = 2; 4640 4772 } 4641 #line 4 642 "fortran.tab.c" /* yacc.c:1646 */4773 #line 4774 "fortran.tab.c" 4642 4774 break; 4643 4775 4644 4776 case 366: 4645 #line 2133 "fortran.y" /* yacc.c:1646 */4646 {4777 #line 2133 "fortran.y" 4778 { 4647 4779 if ( inside_type_declare ) break; 4648 4780 strcpy(InitValue,(yyvsp[0].na)); 4649 4781 InitialValueGiven = 2; 4650 4782 } 4651 #line 4 652 "fortran.tab.c" /* yacc.c:1646 */4783 #line 4784 "fortran.tab.c" 4652 4784 break; 4653 4785 4654 4786 case 368: 4655 #line 2146 "fortran.y" /* yacc.c:1646 */4656 {PublicDeclare = 1; }4657 #line 4 658 "fortran.tab.c" /* yacc.c:1646 */4787 #line 2146 "fortran.y" 4788 {PublicDeclare = 1; } 4789 #line 4790 "fortran.tab.c" 4658 4790 break; 4659 4791 4660 4792 case 369: 4661 #line 2148 "fortran.y" /* yacc.c:1646 */4662 {PrivateDeclare = 1; }4663 #line 4 664 "fortran.tab.c" /* yacc.c:1646 */4793 #line 2148 "fortran.y" 4794 {PrivateDeclare = 1; } 4795 #line 4796 "fortran.tab.c" 4664 4796 break; 4665 4797 4666 4798 case 370: 4667 #line 2152 "fortran.y" /* yacc.c:1646 */4668 {(yyval.d)=NULL;}4669 #line 4 670 "fortran.tab.c" /* yacc.c:1646 */4799 #line 2152 "fortran.y" 4800 {(yyval.d)=NULL;} 4801 #line 4802 "fortran.tab.c" 4670 4802 break; 4671 4803 4672 4804 case 371: 4673 #line 2153 "fortran.y" /* yacc.c:1646 */4674 {in_complex_literal=0;}4675 #line 4 676 "fortran.tab.c" /* yacc.c:1646 */4805 #line 2153 "fortran.y" 4806 {in_complex_literal=0;} 4807 #line 4808 "fortran.tab.c" 4676 4808 break; 4677 4809 4678 4810 case 372: 4679 #line 2154 "fortran.y" /* yacc.c:1646 */4680 {(yyval.d)=(yyvsp[-1].d);}4681 #line 4 682 "fortran.tab.c" /* yacc.c:1646 */4811 #line 2154 "fortran.y" 4812 {(yyval.d)=(yyvsp[-1].d);} 4813 #line 4814 "fortran.tab.c" 4682 4814 break; 4683 4815 4684 4816 case 373: 4685 #line 2159 "fortran.y" /* yacc.c:1646 */4686 {(yyval.d)=(yyvsp[0].d);}4687 #line 4 688 "fortran.tab.c" /* yacc.c:1646 */4817 #line 2159 "fortran.y" 4818 {(yyval.d)=(yyvsp[0].d);} 4819 #line 4820 "fortran.tab.c" 4688 4820 break; 4689 4821 4690 4822 case 374: 4691 #line 2161 "fortran.y" /* yacc.c:1646 */4692 {(yyval.d)=(yyvsp[0].d);}4693 #line 4 694 "fortran.tab.c" /* yacc.c:1646 */4823 #line 2161 "fortran.y" 4824 {(yyval.d)=(yyvsp[0].d);} 4825 #line 4826 "fortran.tab.c" 4694 4826 break; 4695 4827 4696 4828 case 375: 4697 #line 2163 "fortran.y" /* yacc.c:1646 */4698 {(yyval.d)=(yyvsp[0].d);}4699 #line 4 700 "fortran.tab.c" /* yacc.c:1646 */4829 #line 2163 "fortran.y" 4830 {(yyval.d)=(yyvsp[0].d);} 4831 #line 4832 "fortran.tab.c" 4700 4832 break; 4701 4833 4702 4834 case 376: 4703 #line 2165 "fortran.y" /* yacc.c:1646 */4704 {(yyval.d)=(yyvsp[0].d);}4705 #line 4 706 "fortran.tab.c" /* yacc.c:1646 */4835 #line 2165 "fortran.y" 4836 {(yyval.d)=(yyvsp[0].d);} 4837 #line 4838 "fortran.tab.c" 4706 4838 break; 4707 4839 4708 4840 case 377: 4709 #line 2167 "fortran.y" /* yacc.c:1646 */4710 {(yyval.d)=(yyvsp[0].d);}4711 #line 4 712 "fortran.tab.c" /* yacc.c:1646 */4841 #line 2167 "fortran.y" 4842 {(yyval.d)=(yyvsp[0].d);} 4843 #line 4844 "fortran.tab.c" 4712 4844 break; 4713 4845 4714 4846 case 378: 4715 #line 2171 "fortran.y" /* yacc.c:1646 */4716 {4847 #line 2171 "fortran.y" 4848 { 4717 4849 (yyval.d) = (listdim*) NULL; 4718 4850 if ( inside_type_declare ) break; 4719 4851 if ( created_dimensionlist == 1 || agrif_parentcall == 1 ) (yyval.d)=insertdim(NULL,(yyvsp[0].dim1)); 4720 4852 } 4721 #line 4 722 "fortran.tab.c" /* yacc.c:1646 */4853 #line 4854 "fortran.tab.c" 4722 4854 break; 4723 4855 4724 4856 case 379: 4725 #line 2177 "fortran.y" /* yacc.c:1646 */4726 {4857 #line 2177 "fortran.y" 4858 { 4727 4859 (yyval.d) = (listdim*) NULL; 4728 4860 if ( inside_type_declare ) break; 4729 4861 if ( (!inside_type_declare) && created_dimensionlist == 1 ) (yyval.d)=insertdim((yyvsp[-2].d),(yyvsp[0].dim1)); 4730 4862 } 4731 #line 4 732 "fortran.tab.c" /* yacc.c:1646 */4863 #line 4864 "fortran.tab.c" 4732 4864 break; 4733 4865 4734 4866 case 380: 4735 #line 2186 "fortran.y" /* yacc.c:1646 */4736 {strcpy((yyval.dim1).first,(yyvsp[-2].na)); Save_Length((yyvsp[-2].na),2); strcpy((yyval.dim1).last,(yyvsp[0].na)); Save_Length((yyvsp[0].na),1); }4737 #line 4 738 "fortran.tab.c" /* yacc.c:1646 */4867 #line 2186 "fortran.y" 4868 {strcpy((yyval.dim1).first,(yyvsp[-2].na)); Save_Length((yyvsp[-2].na),2); strcpy((yyval.dim1).last,(yyvsp[0].na)); Save_Length((yyvsp[0].na),1); } 4869 #line 4870 "fortran.tab.c" 4738 4870 break; 4739 4871 4740 4872 case 381: 4741 #line 2188 "fortran.y" /* yacc.c:1646 */4742 {strcpy((yyval.dim1).first,"1"); strcpy((yyval.dim1).last,(yyvsp[0].na)); Save_Length((yyvsp[0].na),1);}4743 #line 4 744 "fortran.tab.c" /* yacc.c:1646 */4873 #line 2188 "fortran.y" 4874 {strcpy((yyval.dim1).first,"1"); strcpy((yyval.dim1).last,(yyvsp[0].na)); Save_Length((yyvsp[0].na),1);} 4875 #line 4876 "fortran.tab.c" 4744 4876 break; 4745 4877 4746 4878 case 382: 4747 #line 2193 "fortran.y" /* yacc.c:1646 */4748 {strcpy((yyval.na),(yyvsp[0].na));}4749 #line 4 750 "fortran.tab.c" /* yacc.c:1646 */4879 #line 2193 "fortran.y" 4880 {strcpy((yyval.na),(yyvsp[0].na));} 4881 #line 4882 "fortran.tab.c" 4750 4882 break; 4751 4883 4752 4884 case 384: 4753 #line 2202 "fortran.y" /* yacc.c:1646 */4754 {4885 #line 2202 "fortran.y" 4886 { 4755 4887 (yyval.d) = (listdim*) NULL; 4756 4888 if ( inside_type_declare ) break; 4757 4889 if ( created_dimensionlist == 1 || agrif_parentcall == 1 ) (yyval.d)=insertdim(NULL,(yyvsp[0].dim1)); 4758 4890 } 4759 #line 4 760 "fortran.tab.c" /* yacc.c:1646 */4891 #line 4892 "fortran.tab.c" 4760 4892 break; 4761 4893 4762 4894 case 385: 4763 #line 2208 "fortran.y" /* yacc.c:1646 */4764 {4895 #line 2208 "fortran.y" 4896 { 4765 4897 (yyval.d) = (listdim*) NULL; 4766 4898 if ( inside_type_declare ) break; 4767 4899 if ( (!inside_type_declare) && created_dimensionlist == 1 ) (yyval.d)=insertdim((yyvsp[-2].d),(yyvsp[0].dim1)); 4768 4900 } 4769 #line 4 770 "fortran.tab.c" /* yacc.c:1646 */4901 #line 4902 "fortran.tab.c" 4770 4902 break; 4771 4903 4772 4904 case 386: 4773 #line 2217 "fortran.y" /* yacc.c:1646 */4774 { strcpy((yyval.dim1).first,""); strcpy((yyval.dim1).last,""); }4775 #line 4 776 "fortran.tab.c" /* yacc.c:1646 */4905 #line 2217 "fortran.y" 4906 { strcpy((yyval.dim1).first,""); strcpy((yyval.dim1).last,""); } 4907 #line 4908 "fortran.tab.c" 4776 4908 break; 4777 4909 4778 4910 case 387: 4779 #line 2219 "fortran.y" /* yacc.c:1646 */4780 { strcpy((yyval.dim1).first,(yyvsp[-1].na)); Save_Length((yyvsp[-1].na),2); strcpy((yyval.dim1).last,""); }4781 #line 4 782 "fortran.tab.c" /* yacc.c:1646 */4911 #line 2219 "fortran.y" 4912 { strcpy((yyval.dim1).first,(yyvsp[-1].na)); Save_Length((yyvsp[-1].na),2); strcpy((yyval.dim1).last,""); } 4913 #line 4914 "fortran.tab.c" 4782 4914 break; 4783 4915 4784 4916 case 388: 4785 #line 2224 "fortran.y" /* yacc.c:1646 */4786 {4917 #line 2224 "fortran.y" 4918 { 4787 4919 (yyval.d) = (listdim*) NULL; 4788 4920 if ( inside_type_declare ) break; 4789 4921 if ( created_dimensionlist == 1 || agrif_parentcall == 1 ) (yyval.d)=insertdim(NULL,(yyvsp[0].dim1)); 4790 4922 } 4791 #line 4 792 "fortran.tab.c" /* yacc.c:1646 */4923 #line 4924 "fortran.tab.c" 4792 4924 break; 4793 4925 4794 4926 case 389: 4795 #line 2230 "fortran.y" /* yacc.c:1646 */4796 {4927 #line 2230 "fortran.y" 4928 { 4797 4929 (yyval.d) = (listdim*) NULL; 4798 4930 if ( inside_type_declare ) break; 4799 4931 if ( (!inside_type_declare) && created_dimensionlist == 1 ) (yyval.d)=insertdim((yyvsp[-2].d),(yyvsp[0].dim1)); 4800 4932 } 4801 #line 4 802 "fortran.tab.c" /* yacc.c:1646 */4933 #line 4934 "fortran.tab.c" 4802 4934 break; 4803 4935 4804 4936 case 390: 4805 #line 2239 "fortran.y" /* yacc.c:1646 */4806 { strcpy((yyval.dim1).first,""); strcpy((yyval.dim1).last,""); }4807 #line 4 808 "fortran.tab.c" /* yacc.c:1646 */4937 #line 2239 "fortran.y" 4938 { strcpy((yyval.dim1).first,""); strcpy((yyval.dim1).last,""); } 4939 #line 4940 "fortran.tab.c" 4808 4940 break; 4809 4941 4810 4942 case 391: 4811 #line 2244 "fortran.y" /* yacc.c:1646 */4812 {4943 #line 2244 "fortran.y" 4944 { 4813 4945 (yyval.d) = (listdim*) NULL; 4814 4946 if ( inside_type_declare ) break; … … 4829 4961 } 4830 4962 } 4831 #line 4 832 "fortran.tab.c" /* yacc.c:1646 */4963 #line 4964 "fortran.tab.c" 4832 4964 break; 4833 4965 4834 4966 case 392: 4835 #line 2266 "fortran.y" /* yacc.c:1646 */4836 {(yyval.d) = (listdim *) NULL;}4837 #line 4 838 "fortran.tab.c" /* yacc.c:1646 */4967 #line 2266 "fortran.y" 4968 {(yyval.d) = (listdim *) NULL;} 4969 #line 4970 "fortran.tab.c" 4838 4970 break; 4839 4971 4840 4972 case 393: 4841 #line 2268 "fortran.y" /* yacc.c:1646 */4842 {(yyval.d) = (yyvsp[-1].d);}4843 #line 4 844 "fortran.tab.c" /* yacc.c:1646 */4973 #line 2268 "fortran.y" 4974 {(yyval.d) = (yyvsp[-1].d);} 4975 #line 4976 "fortran.tab.c" 4844 4976 break; 4845 4977 4846 4978 case 394: 4847 #line 2286 "fortran.y" /* yacc.c:1646 */4848 {strcpy((yyval.na),"");}4849 #line 4 850 "fortran.tab.c" /* yacc.c:1646 */4979 #line 2286 "fortran.y" 4980 {strcpy((yyval.na),"");} 4981 #line 4982 "fortran.tab.c" 4850 4982 break; 4851 4983 4852 4984 case 395: 4853 #line 2288 "fortran.y" /* yacc.c:1646 */4854 {strcpy((yyval.na),(yyvsp[-1].na));}4855 #line 4 856 "fortran.tab.c" /* yacc.c:1646 */4985 #line 2288 "fortran.y" 4986 {strcpy((yyval.na),(yyvsp[-1].na));} 4987 #line 4988 "fortran.tab.c" 4856 4988 break; 4857 4989 4858 4990 case 399: 4859 #line 2301 "fortran.y" /* yacc.c:1646 */4860 { strcpy((yyval.na),(yyvsp[0].na)); }4861 #line 4 862 "fortran.tab.c" /* yacc.c:1646 */4991 #line 2301 "fortran.y" 4992 { strcpy((yyval.na),(yyvsp[0].na)); } 4993 #line 4994 "fortran.tab.c" 4862 4994 break; 4863 4995 4864 4996 case 400: 4865 #line 2303 "fortran.y" /* yacc.c:1646 */4866 { strcpy((yyval.na),(yyvsp[0].na)); }4867 #line 4868 "fortran.tab.c" /* yacc.c:1646 */4997 #line 2303 "fortran.y" 4998 { strcpy((yyval.na),(yyvsp[0].na)); } 4999 #line 5000 "fortran.tab.c" 4868 5000 break; 4869 5001 4870 5002 case 401: 4871 #line 2305 "fortran.y" /* yacc.c:1646 */4872 { strcpy((yyval.na),(yyvsp[0].na)); }4873 #line 4874 "fortran.tab.c" /* yacc.c:1646 */5003 #line 2305 "fortran.y" 5004 { strcpy((yyval.na),(yyvsp[0].na)); } 5005 #line 5006 "fortran.tab.c" 4874 5006 break; 4875 5007 4876 5008 case 402: 4877 #line 2310 "fortran.y" /* yacc.c:1646 */4878 {5009 #line 2310 "fortran.y" 5010 { 4879 5011 if ((firstpass == 0) && (PublicDeclare == 1)) 4880 5012 { … … 4890 5022 PrivateDeclare = 0; 4891 5023 } 4892 #line 4893 "fortran.tab.c" /* yacc.c:1646 */5024 #line 5025 "fortran.tab.c" 4893 5025 break; 4894 5026 4895 5027 case 404: 4896 #line 2328 "fortran.y" /* yacc.c:1646 */4897 {(yyval.lnn)=(listname *)NULL;}4898 #line 4899 "fortran.tab.c" /* yacc.c:1646 */5028 #line 2328 "fortran.y" 5029 {(yyval.lnn)=(listname *)NULL;} 5030 #line 5031 "fortran.tab.c" 4899 5031 break; 4900 5032 4901 5033 case 405: 4902 #line 2330 "fortran.y" /* yacc.c:1646 */4903 {(yyval.lnn)=(yyvsp[0].lnn);}4904 #line 4905 "fortran.tab.c" /* yacc.c:1646 */5034 #line 2330 "fortran.y" 5035 {(yyval.lnn)=(yyvsp[0].lnn);} 5036 #line 5037 "fortran.tab.c" 4905 5037 break; 4906 5038 4907 5039 case 406: 4908 #line 2334 "fortran.y" /* yacc.c:1646 */4909 {(yyval.lnn)=Insertname(NULL,(yyvsp[0].na),0);}4910 #line 4911 "fortran.tab.c" /* yacc.c:1646 */5040 #line 2334 "fortran.y" 5041 {(yyval.lnn)=Insertname(NULL,(yyvsp[0].na),0);} 5042 #line 5043 "fortran.tab.c" 4911 5043 break; 4912 5044 4913 5045 case 407: 4914 #line 2336 "fortran.y" /* yacc.c:1646 */4915 {(yyval.lnn)=Insertname((yyvsp[-2].lnn),(yyvsp[0].na),0);}4916 #line 4917 "fortran.tab.c" /* yacc.c:1646 */5046 #line 2336 "fortran.y" 5047 {(yyval.lnn)=Insertname((yyvsp[-2].lnn),(yyvsp[0].na),0);} 5048 #line 5049 "fortran.tab.c" 4917 5049 break; 4918 5050 4919 5051 case 410: 4920 #line 2346 "fortran.y" /* yacc.c:1646 */4921 {5052 #line 2346 "fortran.y" 5053 { 4922 5054 /* we should remove the data declaration */ 4923 5055 pos_end = setposcur(); … … 4930 5062 Init_List_Data_Var(); 4931 5063 } 4932 #line 4933 "fortran.tab.c" /* yacc.c:1646 */5064 #line 5065 "fortran.tab.c" 4933 5065 break; 4934 5066 4935 5067 case 416: 4936 #line 2370 "fortran.y" /* yacc.c:1646 */4937 {5068 #line 2370 "fortran.y" 5069 { 4938 5070 if (firstpass == 1) 4939 5071 { … … 4942 5074 else Add_Data_Var_Names_01(&List_Data_Var_Cur,(yyvsp[-3].l),(yyvsp[-1].lnn)); 4943 5075 } 4944 #line 4945 "fortran.tab.c" /* yacc.c:1646 */5076 #line 5077 "fortran.tab.c" 4945 5077 break; 4946 5078 4947 5079 case 417: 4948 #line 2380 "fortran.y" /* yacc.c:1646 */4949 { (yyval.l)=insertvar(NULL,(yyvsp[0].v)); }4950 #line 4951 "fortran.tab.c" /* yacc.c:1646 */5080 #line 2380 "fortran.y" 5081 { (yyval.l)=insertvar(NULL,(yyvsp[0].v)); } 5082 #line 5083 "fortran.tab.c" 4951 5083 break; 4952 5084 4953 5085 case 418: 4954 #line 2382 "fortran.y" /* yacc.c:1646 */4955 {5086 #line 2382 "fortran.y" 5087 { 4956 5088 (yyval.l) = insertvar((yyvsp[-2].l),(yyvsp[0].v)); 4957 5089 } 4958 #line 4959 "fortran.tab.c" /* yacc.c:1646 */5090 #line 5091 "fortran.tab.c" 4959 5091 break; 4960 5092 4961 5093 case 419: 4962 #line 2388 "fortran.y" /* yacc.c:1646 */4963 {(yyval.lnn)=Insertname(NULL,(yyvsp[0].na),0);}4964 #line 4965 "fortran.tab.c" /* yacc.c:1646 */5094 #line 2388 "fortran.y" 5095 {(yyval.lnn)=Insertname(NULL,(yyvsp[0].na),0);} 5096 #line 5097 "fortran.tab.c" 4965 5097 break; 4966 5098 4967 5099 case 420: 4968 #line 2390 "fortran.y" /* yacc.c:1646 */4969 {(yyval.lnn) = Insertname((yyvsp[-2].lnn),(yyvsp[0].na),1); }4970 #line 4971 "fortran.tab.c" /* yacc.c:1646 */5100 #line 2390 "fortran.y" 5101 {(yyval.lnn) = Insertname((yyvsp[-2].lnn),(yyvsp[0].na),1); } 5102 #line 5103 "fortran.tab.c" 4971 5103 break; 4972 5104 4973 5105 case 423: 4974 #line 2400 "fortran.y" /* yacc.c:1646 */4975 {printf("DOVARIABLE = %s %s %s\n",(yyvsp[-5].na),(yyvsp[-3].na),(yyvsp[-1].na));5106 #line 2400 "fortran.y" 5107 {printf("DOVARIABLE = %s %s %s\n",(yyvsp[-5].na),(yyvsp[-3].na),(yyvsp[-1].na)); 4976 5108 printf("AUTRE = %s %s\n",(yyvsp[-7].l)->var->v_nomvar,(yyvsp[-7].l)->var->v_initialvalue_array); 4977 5109 Insertdoloop((yyvsp[-7].l)->var,(yyvsp[-5].na),(yyvsp[-3].na),(yyvsp[-1].na),""); 4978 5110 (yyval.v)=(yyvsp[-7].l)->var; 4979 5111 } 4980 #line 4981 "fortran.tab.c" /* yacc.c:1646 */5112 #line 5113 "fortran.tab.c" 4981 5113 break; 4982 5114 4983 5115 case 424: 4984 #line 2406 "fortran.y" /* yacc.c:1646 */4985 {5116 #line 2406 "fortran.y" 5117 { 4986 5118 Insertdoloop((yyvsp[-9].l)->var,(yyvsp[-7].na),(yyvsp[-5].na),(yyvsp[-3].na),(yyvsp[-1].na)); 4987 5119 (yyval.v)=(yyvsp[-9].l)->var; 4988 5120 } 4989 #line 4990 "fortran.tab.c" /* yacc.c:1646 */5121 #line 5122 "fortran.tab.c" 4990 5122 break; 4991 5123 4992 5124 case 425: 4993 #line 2413 "fortran.y" /* yacc.c:1646 */4994 {(yyval.l)=insertvar(NULL,(yyvsp[0].v));}4995 #line 4996 "fortran.tab.c" /* yacc.c:1646 */5125 #line 2413 "fortran.y" 5126 {(yyval.l)=insertvar(NULL,(yyvsp[0].v));} 5127 #line 5128 "fortran.tab.c" 4996 5128 break; 4997 5129 4998 5130 case 426: 4999 #line 2415 "fortran.y" /* yacc.c:1646 */5000 {(yyval.l) = insertvar((yyvsp[-2].l),(yyvsp[0].v));}5001 #line 5 002 "fortran.tab.c" /* yacc.c:1646 */5131 #line 2415 "fortran.y" 5132 {(yyval.l) = insertvar((yyvsp[-2].l),(yyvsp[0].v));} 5133 #line 5134 "fortran.tab.c" 5002 5134 break; 5003 5135 5004 5136 case 428: 5005 #line 2421 "fortran.y" /* yacc.c:1646 */5006 {(yyval.v)->v_initialvalue_array=Insertname((yyval.v)->v_initialvalue_array,my_dim.last,0);5137 #line 2421 "fortran.y" 5138 {(yyval.v)->v_initialvalue_array=Insertname((yyval.v)->v_initialvalue_array,my_dim.last,0); 5007 5139 strcpy(my_dim.last,""); 5008 5140 } 5009 #line 5 010 "fortran.tab.c" /* yacc.c:1646 */5141 #line 5142 "fortran.tab.c" 5010 5142 break; 5011 5143 5012 5144 case 431: 5013 #line 2434 "fortran.y" /* yacc.c:1646 */5014 {sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na));}5015 #line 5 016 "fortran.tab.c" /* yacc.c:1646 */5145 #line 2434 "fortran.y" 5146 {sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na));} 5147 #line 5148 "fortran.tab.c" 5016 5148 break; 5017 5149 5018 5150 case 432: 5019 #line 2436 "fortran.y" /* yacc.c:1646 */5020 {sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na));}5021 #line 5 022 "fortran.tab.c" /* yacc.c:1646 */5151 #line 2436 "fortran.y" 5152 {sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na));} 5153 #line 5154 "fortran.tab.c" 5022 5154 break; 5023 5155 5024 5156 case 433: 5025 #line 2438 "fortran.y" /* yacc.c:1646 */5026 {sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na));}5027 #line 5 028 "fortran.tab.c" /* yacc.c:1646 */5157 #line 2438 "fortran.y" 5158 {sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na));} 5159 #line 5160 "fortran.tab.c" 5028 5160 break; 5029 5161 5030 5162 case 439: 5031 #line 2447 "fortran.y" /* yacc.c:1646 */5032 {strcpy((yyval.na),"");}5033 #line 5 034 "fortran.tab.c" /* yacc.c:1646 */5163 #line 2447 "fortran.y" 5164 {strcpy((yyval.na),"");} 5165 #line 5166 "fortran.tab.c" 5034 5166 break; 5035 5167 5036 5168 case 440: 5037 #line 2449 "fortran.y" /* yacc.c:1646 */5038 {sprintf((yyval.na),"*%s",(yyvsp[0].na));}5039 #line 5 040 "fortran.tab.c" /* yacc.c:1646 */5169 #line 2449 "fortran.y" 5170 {sprintf((yyval.na),"*%s",(yyvsp[0].na));} 5171 #line 5172 "fortran.tab.c" 5040 5172 break; 5041 5173 5042 5174 case 449: 5043 #line 2485 "fortran.y" /* yacc.c:1646 */5044 {strcpy(my_dim.last,"");}5045 #line 5 046 "fortran.tab.c" /* yacc.c:1646 */5175 #line 2485 "fortran.y" 5176 {strcpy(my_dim.last,"");} 5177 #line 5178 "fortran.tab.c" 5046 5178 break; 5047 5179 5048 5180 case 450: 5049 #line 2489 "fortran.y" /* yacc.c:1646 */5050 {positioninblock = 0; pos_curdimension = my_position_before;}5051 #line 5 052 "fortran.tab.c" /* yacc.c:1646 */5181 #line 2489 "fortran.y" 5182 {positioninblock = 0; pos_curdimension = my_position_before;} 5183 #line 5184 "fortran.tab.c" 5052 5184 break; 5053 5185 5054 5186 case 451: 5055 #line 2491 "fortran.y" /* yacc.c:1646 */5056 {5187 #line 2491 "fortran.y" 5188 { 5057 5189 /* if the variable is a parameter we can suppose that is */ 5058 5190 /* value is the same on each grid. It is not useless to */ … … 5097 5229 strcpy(c_selectorname,""); 5098 5230 } 5099 #line 5 100 "fortran.tab.c" /* yacc.c:1646 */5231 #line 5232 "fortran.tab.c" 5100 5232 break; 5101 5233 5102 5234 case 453: 5103 #line 2537 "fortran.y" /* yacc.c:1646 */5104 {in_complex_literal = 0;}5105 #line 5 106 "fortran.tab.c" /* yacc.c:1646 */5235 #line 2537 "fortran.y" 5236 {in_complex_literal = 0;} 5237 #line 5238 "fortran.tab.c" 5106 5238 break; 5107 5239 5108 5240 case 454: 5109 #line 2538 "fortran.y" /* yacc.c:1646 */5110 {5241 #line 2538 "fortran.y" 5242 { 5111 5243 if ( inside_type_declare ) break; 5112 5244 curvar = createvar((yyvsp[-4].na),(yyvsp[-1].d)); … … 5116 5248 strcpy(vallengspec,""); 5117 5249 } 5118 #line 5 119 "fortran.tab.c" /* yacc.c:1646 */5250 #line 5251 "fortran.tab.c" 5119 5251 break; 5120 5252 5121 5253 case 455: 5122 #line 2546 "fortran.y" /* yacc.c:1646 */5123 {in_complex_literal = 0;}5124 #line 5 125 "fortran.tab.c" /* yacc.c:1646 */5254 #line 2546 "fortran.y" 5255 {in_complex_literal = 0;} 5256 #line 5257 "fortran.tab.c" 5125 5257 break; 5126 5258 5127 5259 case 456: 5128 #line 2547 "fortran.y" /* yacc.c:1646 */5129 {5260 #line 2547 "fortran.y" 5261 { 5130 5262 if ( inside_type_declare ) break; 5131 5263 curvar = createvar((yyvsp[-4].na),(yyvsp[-1].d)); … … 5135 5267 strcpy(vallengspec,""); 5136 5268 } 5137 #line 5 138 "fortran.tab.c" /* yacc.c:1646 */5269 #line 5270 "fortran.tab.c" 5138 5270 break; 5139 5271 5140 5272 case 457: 5141 #line 2559 "fortran.y" /* yacc.c:1646 */5142 { VariableIsParameter = 1; pos_curparameter = setposcur()-9; }5143 #line 5 144 "fortran.tab.c" /* yacc.c:1646 */5273 #line 2559 "fortran.y" 5274 { VariableIsParameter = 1; pos_curparameter = setposcur()-9; } 5275 #line 5276 "fortran.tab.c" 5144 5276 break; 5145 5277 5146 5278 case 458: 5147 #line 2560 "fortran.y" /* yacc.c:1646 */5148 {5279 #line 2560 "fortran.y" 5280 { 5149 5281 if ( ! inside_type_declare ) 5150 5282 { … … 5162 5294 VariableIsParameter = 0 ; 5163 5295 } 5164 #line 5 165 "fortran.tab.c" /* yacc.c:1646 */5296 #line 5297 "fortran.tab.c" 5165 5297 break; 5166 5298 5167 5299 case 460: 5168 #line 2580 "fortran.y" /* yacc.c:1646 */5169 {(yyval.l)=insertvar(NULL,(yyvsp[0].v));}5170 #line 5 171 "fortran.tab.c" /* yacc.c:1646 */5300 #line 2580 "fortran.y" 5301 {(yyval.l)=insertvar(NULL,(yyvsp[0].v));} 5302 #line 5303 "fortran.tab.c" 5171 5303 break; 5172 5304 5173 5305 case 461: 5174 #line 2582 "fortran.y" /* yacc.c:1646 */5175 {(yyval.l)=insertvar((yyvsp[-2].l),(yyvsp[0].v));}5176 #line 5 177 "fortran.tab.c" /* yacc.c:1646 */5306 #line 2582 "fortran.y" 5307 {(yyval.l)=insertvar((yyvsp[-2].l),(yyvsp[0].v));} 5308 #line 5309 "fortran.tab.c" 5177 5309 break; 5178 5310 5179 5311 case 462: 5180 #line 2587 "fortran.y" /* yacc.c:1646 */5181 {5312 #line 2587 "fortran.y" 5313 { 5182 5314 if ( inside_type_declare ) break; 5183 5315 curvar=(variable *) calloc(1,sizeof(variable)); … … 5192 5324 (yyval.v) = curvar; 5193 5325 } 5194 #line 5 195 "fortran.tab.c" /* yacc.c:1646 */5326 #line 5327 "fortran.tab.c" 5195 5327 break; 5196 5328 5197 5329 case 463: 5198 #line 2603 "fortran.y" /* yacc.c:1646 */5199 {pos_cursave = my_position_before;}5200 #line 5 201 "fortran.tab.c" /* yacc.c:1646 */5330 #line 2603 "fortran.y" 5331 {pos_cursave = my_position_before;} 5332 #line 5333 "fortran.tab.c" 5201 5333 break; 5202 5334 5203 5335 case 464: 5204 #line 2604 "fortran.y" /* yacc.c:1646 */5205 {5336 #line 2604 "fortran.y" 5337 { 5206 5338 pos_end = setposcur(); 5207 5339 RemoveWordSET_0(fortran_out,pos_cursave,pos_end-pos_cursave); 5208 5340 } 5209 #line 5 210 "fortran.tab.c" /* yacc.c:1646 */5341 #line 5342 "fortran.tab.c" 5210 5342 break; 5211 5343 5212 5344 case 472: 5213 #line 2625 "fortran.y" /* yacc.c:1646 */5214 {if ( ! inside_type_declare ) Add_Save_Var_1((yyvsp[0].na),(listdim*) NULL); }5215 #line 5 216 "fortran.tab.c" /* yacc.c:1646 */5345 #line 2625 "fortran.y" 5346 {if ( ! inside_type_declare ) Add_Save_Var_1((yyvsp[0].na),(listdim*) NULL); } 5347 #line 5348 "fortran.tab.c" 5216 5348 break; 5217 5349 5218 5350 case 476: 5219 #line 2635 "fortran.y" /* yacc.c:1646 */5220 {my_position = my_position_before;}5221 #line 5 222 "fortran.tab.c" /* yacc.c:1646 */5351 #line 2635 "fortran.y" 5352 {my_position = my_position_before;} 5353 #line 5354 "fortran.tab.c" 5222 5354 break; 5223 5355 5224 5356 case 478: 5225 #line 2641 "fortran.y" /* yacc.c:1646 */5226 {5357 #line 2641 "fortran.y" 5358 { 5227 5359 if ( insubroutinedeclare == 1 ) 5228 5360 { … … 5232 5364 } 5233 5365 } 5234 #line 5 235 "fortran.tab.c" /* yacc.c:1646 */5366 #line 5367 "fortran.tab.c" 5235 5367 break; 5236 5368 5237 5369 case 496: 5238 #line 2693 "fortran.y" /* yacc.c:1646 */5239 {in_complex_literal=0;}5240 #line 5 241 "fortran.tab.c" /* yacc.c:1646 */5370 #line 2693 "fortran.y" 5371 {in_complex_literal=0;} 5372 #line 5373 "fortran.tab.c" 5241 5373 break; 5242 5374 5243 5375 case 503: 5244 #line 2708 "fortran.y" /* yacc.c:1646 */5245 { positioninblock = 0; pos_curcommon = my_position_before; indeclaration=1;}5246 #line 5 247 "fortran.tab.c" /* yacc.c:1646 */5376 #line 2708 "fortran.y" 5377 { positioninblock = 0; pos_curcommon = my_position_before; indeclaration=1;} 5378 #line 5379 "fortran.tab.c" 5247 5379 break; 5248 5380 5249 5381 case 504: 5250 #line 2709 "fortran.y" /* yacc.c:1646 */5251 {5382 #line 2709 "fortran.y" 5383 { 5252 5384 indeclaration = 0; 5253 5385 if ( inside_type_declare ) break; … … 5255 5387 RemoveWordSET_0(fortran_out,pos_curcommon,pos_end-pos_curcommon); 5256 5388 } 5257 #line 5 258 "fortran.tab.c" /* yacc.c:1646 */5389 #line 5390 "fortran.tab.c" 5258 5390 break; 5259 5391 5260 5392 case 507: 5261 #line 2720 "fortran.y" /* yacc.c:1646 */5262 {5393 #line 2720 "fortran.y" 5394 { 5263 5395 if ( inside_type_declare ) break; 5264 5396 sprintf(charusemodule,"%s",(yyvsp[0].na)); 5265 5397 Add_NameOfCommon_1((yyvsp[0].na),subroutinename); 5266 5398 } 5267 #line 5 268 "fortran.tab.c" /* yacc.c:1646 */5399 #line 5400 "fortran.tab.c" 5268 5400 break; 5269 5401 5270 5402 case 508: 5271 #line 2728 "fortran.y" /* yacc.c:1646 */5272 {5403 #line 2728 "fortran.y" 5404 { 5273 5405 strcpy((yyval.na),""); 5274 5406 positioninblock=0; 5275 5407 strcpy(commonblockname,""); 5276 5408 } 5277 #line 5 278 "fortran.tab.c" /* yacc.c:1646 */5409 #line 5410 "fortran.tab.c" 5278 5410 break; 5279 5411 5280 5412 case 509: 5281 #line 2734 "fortran.y" /* yacc.c:1646 */5282 {5413 #line 2734 "fortran.y" 5414 { 5283 5415 strcpy((yyval.na),(yyvsp[-1].na)); 5284 5416 positioninblock=0; 5285 5417 strcpy(commonblockname,(yyvsp[-1].na)); 5286 5418 } 5287 #line 5 288 "fortran.tab.c" /* yacc.c:1646 */5419 #line 5420 "fortran.tab.c" 5288 5420 break; 5289 5421 5290 5422 case 513: 5291 #line 2747 "fortran.y" /* yacc.c:1646 */5292 {5423 #line 2747 "fortran.y" 5424 { 5293 5425 if ( inside_type_declare ) break; 5294 5426 sprintf(charusemodule,"%s",(yyvsp[0].na)); 5295 5427 Add_NameOfCommon_1((yyvsp[0].na),subroutinename); 5296 5428 } 5297 #line 5 298 "fortran.tab.c" /* yacc.c:1646 */5429 #line 5430 "fortran.tab.c" 5298 5430 break; 5299 5431 5300 5432 case 515: 5301 #line 2757 "fortran.y" /* yacc.c:1646 */5302 {if ( ! inside_type_declare ) Add_Common_var_1(); }5303 #line 5 304 "fortran.tab.c" /* yacc.c:1646 */5433 #line 2757 "fortran.y" 5434 {if ( ! inside_type_declare ) Add_Common_var_1(); } 5435 #line 5436 "fortran.tab.c" 5304 5436 break; 5305 5437 5306 5438 case 516: 5307 #line 2759 "fortran.y" /* yacc.c:1646 */5308 {if ( ! inside_type_declare ) Add_Common_var_1(); }5309 #line 5 310 "fortran.tab.c" /* yacc.c:1646 */5439 #line 2759 "fortran.y" 5440 {if ( ! inside_type_declare ) Add_Common_var_1(); } 5441 #line 5442 "fortran.tab.c" 5310 5442 break; 5311 5443 5312 5444 case 517: 5313 #line 2767 "fortran.y" /* yacc.c:1646 */5314 {5445 #line 2767 "fortran.y" 5446 { 5315 5447 positioninblock = positioninblock + 1 ; 5316 5448 strcpy(commonvar,(yyvsp[0].na)); 5317 5449 commondim = (listdim*) NULL; 5318 5450 } 5319 #line 5 320 "fortran.tab.c" /* yacc.c:1646 */5451 #line 5452 "fortran.tab.c" 5320 5452 break; 5321 5453 5322 5454 case 518: 5323 #line 2772 "fortran.y" /* yacc.c:1646 */5324 {in_complex_literal=0;}5325 #line 5 326 "fortran.tab.c" /* yacc.c:1646 */5455 #line 2772 "fortran.y" 5456 {in_complex_literal=0;} 5457 #line 5458 "fortran.tab.c" 5326 5458 break; 5327 5459 5328 5460 case 519: 5329 #line 2773 "fortran.y" /* yacc.c:1646 */5330 {5461 #line 2773 "fortran.y" 5462 { 5331 5463 positioninblock = positioninblock + 1 ; 5332 5464 strcpy(commonvar,(yyvsp[-4].na)); 5333 5465 commondim = (yyvsp[-1].d); 5334 5466 } 5335 #line 5 336 "fortran.tab.c" /* yacc.c:1646 */5467 #line 5468 "fortran.tab.c" 5336 5468 break; 5337 5469 5338 5470 case 523: 5339 #line 2785 "fortran.y" /* yacc.c:1646 */5340 {(yyval.v)=createvar((yyvsp[0].na),NULL);}5341 #line 5 342 "fortran.tab.c" /* yacc.c:1646 */5471 #line 2785 "fortran.y" 5472 {(yyval.v)=createvar((yyvsp[0].na),NULL);} 5473 #line 5474 "fortran.tab.c" 5342 5474 break; 5343 5475 5344 5476 case 525: 5345 #line 2797 "fortran.y" /* yacc.c:1646 */5346 {if (strcmp(my_dim.last,""))5477 #line 2797 "fortran.y" 5478 {if (strcmp(my_dim.last,"")) 5347 5479 { 5348 5480 (yyval.v)->v_initialvalue_array=Insertname(NULL,my_dim.last,0); … … 5350 5482 strcpy(my_dim.last,""); 5351 5483 } 5352 #line 5 353 "fortran.tab.c" /* yacc.c:1646 */5484 #line 5485 "fortran.tab.c" 5353 5485 break; 5354 5486 5355 5487 case 535: 5356 #line 2839 "fortran.y" /* yacc.c:1646 */5357 {sprintf((yyval.na),"%s(%s)",(yyvsp[-3].na),(yyvsp[-1].na));}5358 #line 5 359 "fortran.tab.c" /* yacc.c:1646 */5488 #line 2839 "fortran.y" 5489 {sprintf((yyval.na),"%s(%s)",(yyvsp[-3].na),(yyvsp[-1].na));} 5490 #line 5491 "fortran.tab.c" 5359 5491 break; 5360 5492 5361 5493 case 536: 5362 #line 2841 "fortran.y" /* yacc.c:1646 */5363 {sprintf((yyval.na),"%s(%s)",(yyvsp[-3].na),(yyvsp[-1].na));}5364 #line 5 365 "fortran.tab.c" /* yacc.c:1646 */5494 #line 2841 "fortran.y" 5495 {sprintf((yyval.na),"%s(%s)",(yyvsp[-3].na),(yyvsp[-1].na));} 5496 #line 5497 "fortran.tab.c" 5365 5497 break; 5366 5498 5367 5499 case 537: 5368 #line 2856 "fortran.y" /* yacc.c:1646 */5369 {sprintf((yyval.na),"%s:%s",(yyvsp[-2].na),(yyvsp[0].na));}5370 #line 5 371 "fortran.tab.c" /* yacc.c:1646 */5500 #line 2856 "fortran.y" 5501 {sprintf((yyval.na),"%s:%s",(yyvsp[-2].na),(yyvsp[0].na));} 5502 #line 5503 "fortran.tab.c" 5371 5503 break; 5372 5504 5373 5505 case 538: 5374 #line 2861 "fortran.y" /* yacc.c:1646 */5375 {sprintf((yyval.na),"%s%s",(yyvsp[-1].v)->v_nomvar,(yyvsp[0].na));}5376 #line 5 377 "fortran.tab.c" /* yacc.c:1646 */5506 #line 2861 "fortran.y" 5507 {sprintf((yyval.na),"%s%s",(yyvsp[-1].v)->v_nomvar,(yyvsp[0].na));} 5508 #line 5509 "fortran.tab.c" 5377 5509 break; 5378 5510 5379 5511 case 539: 5380 #line 2865 "fortran.y" /* yacc.c:1646 */5381 {strcpy((yyval.na),"");}5382 #line 5 383 "fortran.tab.c" /* yacc.c:1646 */5512 #line 2865 "fortran.y" 5513 {strcpy((yyval.na),"");} 5514 #line 5515 "fortran.tab.c" 5383 5515 break; 5384 5516 5385 5517 case 540: 5386 #line 2867 "fortran.y" /* yacc.c:1646 */5387 {sprintf((yyval.na),"%s%%%s",(yyvsp[-2].na),(yyvsp[0].v)->v_nomvar);}5388 #line 5 389 "fortran.tab.c" /* yacc.c:1646 */5518 #line 2867 "fortran.y" 5519 {sprintf((yyval.na),"%s%%%s",(yyvsp[-2].na),(yyvsp[0].v)->v_nomvar);} 5520 #line 5521 "fortran.tab.c" 5389 5521 break; 5390 5522 5391 5523 case 541: 5392 #line 2872 "fortran.y" /* yacc.c:1646 */5393 {(yyval.v)=createvar((yyvsp[0].na),NULL);}5394 #line 5 395 "fortran.tab.c" /* yacc.c:1646 */5524 #line 2872 "fortran.y" 5525 {(yyval.v)=createvar((yyvsp[0].na),NULL);} 5526 #line 5527 "fortran.tab.c" 5395 5527 break; 5396 5528 5397 5529 case 542: 5398 #line 2873 "fortran.y" /* yacc.c:1646 */5399 {in_complex_literal=0;}5400 #line 5 401 "fortran.tab.c" /* yacc.c:1646 */5530 #line 2873 "fortran.y" 5531 {in_complex_literal=0;} 5532 #line 5533 "fortran.tab.c" 5401 5533 break; 5402 5534 5403 5535 case 543: 5404 #line 2874 "fortran.y" /* yacc.c:1646 */5405 {sprintf(ligne,"%s(%s)",(yyvsp[-4].na),(yyvsp[-1].na));(yyval.v)=createvar((yyvsp[-4].na),NULL);strcpy(my_dim.last,(yyvsp[-1].na));}5406 #line 5 407 "fortran.tab.c" /* yacc.c:1646 */5536 #line 2874 "fortran.y" 5537 {sprintf(ligne,"%s(%s)",(yyvsp[-4].na),(yyvsp[-1].na));(yyval.v)=createvar((yyvsp[-4].na),NULL);strcpy(my_dim.last,(yyvsp[-1].na));} 5538 #line 5539 "fortran.tab.c" 5407 5539 break; 5408 5540 5409 5541 case 545: 5410 #line 2890 "fortran.y" /* yacc.c:1646 */5411 {strcpy(my_dim.last,"");}5412 #line 5 413 "fortran.tab.c" /* yacc.c:1646 */5542 #line 2890 "fortran.y" 5543 {strcpy(my_dim.last,"");} 5544 #line 5545 "fortran.tab.c" 5413 5545 break; 5414 5546 5415 5547 case 546: 5416 #line 2895 "fortran.y" /* yacc.c:1646 */5417 {strcpy(my_dim.last,"");}5418 #line 5 419 "fortran.tab.c" /* yacc.c:1646 */5548 #line 2895 "fortran.y" 5549 {strcpy(my_dim.last,"");} 5550 #line 5551 "fortran.tab.c" 5419 5551 break; 5420 5552 5421 5553 case 547: 5422 #line 2900 "fortran.y" /* yacc.c:1646 */5423 {strcpy(my_dim.last,"");}5424 #line 5 425 "fortran.tab.c" /* yacc.c:1646 */5554 #line 2900 "fortran.y" 5555 {strcpy(my_dim.last,"");} 5556 #line 5557 "fortran.tab.c" 5425 5557 break; 5426 5558 5427 5559 case 548: 5428 #line 2902 "fortran.y" /* yacc.c:1646 */5429 {strcpy(my_dim.last,"");}5430 #line 5 431 "fortran.tab.c" /* yacc.c:1646 */5560 #line 2902 "fortran.y" 5561 {strcpy(my_dim.last,"");} 5562 #line 5563 "fortran.tab.c" 5431 5563 break; 5432 5564 5433 5565 case 549: 5434 #line 2908 "fortran.y" /* yacc.c:1646 */5435 {strcpy((yyval.na),"");}5436 #line 5 437 "fortran.tab.c" /* yacc.c:1646 */5566 #line 2908 "fortran.y" 5567 {strcpy((yyval.na),"");} 5568 #line 5569 "fortran.tab.c" 5437 5569 break; 5438 5570 5439 5571 case 550: 5440 #line 2910 "fortran.y" /* yacc.c:1646 */5441 {strcpy((yyval.na),(yyvsp[0].na));}5442 #line 5 443 "fortran.tab.c" /* yacc.c:1646 */5572 #line 2910 "fortran.y" 5573 {strcpy((yyval.na),(yyvsp[0].na));} 5574 #line 5575 "fortran.tab.c" 5443 5575 break; 5444 5576 5445 5577 case 551: 5446 #line 2912 "fortran.y" /* yacc.c:1646 */5447 {sprintf((yyval.na),"%s,%s",(yyvsp[-2].na),(yyvsp[0].na));}5448 #line 5 449 "fortran.tab.c" /* yacc.c:1646 */5578 #line 2912 "fortran.y" 5579 {sprintf((yyval.na),"%s,%s",(yyvsp[-2].na),(yyvsp[0].na));} 5580 #line 5581 "fortran.tab.c" 5449 5581 break; 5450 5582 5451 5583 case 552: 5452 #line 2934 "fortran.y" /* yacc.c:1646 */5453 {sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na));}5454 #line 5 455 "fortran.tab.c" /* yacc.c:1646 */5584 #line 2934 "fortran.y" 5585 {sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na));} 5586 #line 5587 "fortran.tab.c" 5455 5587 break; 5456 5588 5457 5589 case 553: 5458 #line 2936 "fortran.y" /* yacc.c:1646 */5459 {strcpy((yyval.na),":");}5460 #line 5 461 "fortran.tab.c" /* yacc.c:1646 */5590 #line 2936 "fortran.y" 5591 {strcpy((yyval.na),":");} 5592 #line 5593 "fortran.tab.c" 5461 5593 break; 5462 5594 5463 5595 case 554: 5464 #line 2938 "fortran.y" /* yacc.c:1646 */5465 {sprintf((yyval.na),":%s",(yyvsp[0].na));}5466 #line 5 467 "fortran.tab.c" /* yacc.c:1646 */5596 #line 2938 "fortran.y" 5597 {sprintf((yyval.na),":%s",(yyvsp[0].na));} 5598 #line 5599 "fortran.tab.c" 5467 5599 break; 5468 5600 5469 5601 case 555: 5470 #line 2940 "fortran.y" /* yacc.c:1646 */5471 {sprintf((yyval.na),": :%s",(yyvsp[0].na));}5472 #line 5 473 "fortran.tab.c" /* yacc.c:1646 */5602 #line 2940 "fortran.y" 5603 {sprintf((yyval.na),": :%s",(yyvsp[0].na));} 5604 #line 5605 "fortran.tab.c" 5473 5605 break; 5474 5606 5475 5607 case 556: 5476 #line 2942 "fortran.y" /* yacc.c:1646 */5477 {sprintf((yyval.na),":%s :%s",(yyvsp[-2].na),(yyvsp[0].na));}5478 #line 5 479 "fortran.tab.c" /* yacc.c:1646 */5608 #line 2942 "fortran.y" 5609 {sprintf((yyval.na),":%s :%s",(yyvsp[-2].na),(yyvsp[0].na));} 5610 #line 5611 "fortran.tab.c" 5479 5611 break; 5480 5612 5481 5613 case 557: 5482 #line 2944 "fortran.y" /* yacc.c:1646 */5483 {sprintf((yyval.na),"::%s",(yyvsp[0].na));}5484 #line 5 485 "fortran.tab.c" /* yacc.c:1646 */5614 #line 2944 "fortran.y" 5615 {sprintf((yyval.na),"::%s",(yyvsp[0].na));} 5616 #line 5617 "fortran.tab.c" 5485 5617 break; 5486 5618 5487 5619 case 559: 5488 #line 2947 "fortran.y" /* yacc.c:1646 */5489 {sprintf((yyval.na),"%s=%s",(yyvsp[-2].na),(yyvsp[0].na));}5490 #line 5 491 "fortran.tab.c" /* yacc.c:1646 */5620 #line 2947 "fortran.y" 5621 {sprintf((yyval.na),"%s=%s",(yyvsp[-2].na),(yyvsp[0].na));} 5622 #line 5623 "fortran.tab.c" 5491 5623 break; 5492 5624 5493 5625 case 560: 5494 #line 2949 "fortran.y" /* yacc.c:1646 */5495 {sprintf((yyval.na),"%s=*%s",(yyvsp[-3].na),(yyvsp[0].na));}5496 #line 5 497 "fortran.tab.c" /* yacc.c:1646 */5626 #line 2949 "fortran.y" 5627 {sprintf((yyval.na),"%s=*%s",(yyvsp[-3].na),(yyvsp[0].na));} 5628 #line 5629 "fortran.tab.c" 5497 5629 break; 5498 5630 5499 5631 case 561: 5500 #line 2951 "fortran.y" /* yacc.c:1646 */5501 {sprintf((yyval.na),"*%s",(yyvsp[0].na));}5502 #line 5 503 "fortran.tab.c" /* yacc.c:1646 */5632 #line 2951 "fortran.y" 5633 {sprintf((yyval.na),"*%s",(yyvsp[0].na));} 5634 #line 5635 "fortran.tab.c" 5503 5635 break; 5504 5636 5505 5637 case 562: 5506 #line 2955 "fortran.y" /* yacc.c:1646 */5507 {strcpy((yyval.na),":");}5508 #line 5 509 "fortran.tab.c" /* yacc.c:1646 */5638 #line 2955 "fortran.y" 5639 {strcpy((yyval.na),":");} 5640 #line 5641 "fortran.tab.c" 5509 5641 break; 5510 5642 5511 5643 case 563: 5512 #line 2957 "fortran.y" /* yacc.c:1646 */5513 {sprintf((yyval.na),":%s",(yyvsp[0].na));}5514 #line 5 515 "fortran.tab.c" /* yacc.c:1646 */5644 #line 2957 "fortran.y" 5645 {sprintf((yyval.na),":%s",(yyvsp[0].na));} 5646 #line 5647 "fortran.tab.c" 5515 5647 break; 5516 5648 5517 5649 case 564: 5518 #line 2959 "fortran.y" /* yacc.c:1646 */5519 {sprintf((yyval.na),": :%s",(yyvsp[0].na));}5520 #line 5 521 "fortran.tab.c" /* yacc.c:1646 */5650 #line 2959 "fortran.y" 5651 {sprintf((yyval.na),": :%s",(yyvsp[0].na));} 5652 #line 5653 "fortran.tab.c" 5521 5653 break; 5522 5654 5523 5655 case 565: 5524 #line 2961 "fortran.y" /* yacc.c:1646 */5525 {sprintf((yyval.na),":%s :%s",(yyvsp[-2].na),(yyvsp[0].na));}5526 #line 5 527 "fortran.tab.c" /* yacc.c:1646 */5656 #line 2961 "fortran.y" 5657 {sprintf((yyval.na),":%s :%s",(yyvsp[-2].na),(yyvsp[0].na));} 5658 #line 5659 "fortran.tab.c" 5527 5659 break; 5528 5660 5529 5661 case 566: 5530 #line 2963 "fortran.y" /* yacc.c:1646 */5531 {sprintf((yyval.na),"::%s",(yyvsp[0].na));}5532 #line 5 533 "fortran.tab.c" /* yacc.c:1646 */5662 #line 2963 "fortran.y" 5663 {sprintf((yyval.na),"::%s",(yyvsp[0].na));} 5664 #line 5665 "fortran.tab.c" 5533 5665 break; 5534 5666 5535 5667 case 567: 5536 #line 2965 "fortran.y" /* yacc.c:1646 */5537 {strcpy((yyval.na),"");}5538 #line 5 539 "fortran.tab.c" /* yacc.c:1646 */5668 #line 2965 "fortran.y" 5669 {strcpy((yyval.na),"");} 5670 #line 5671 "fortran.tab.c" 5539 5671 break; 5540 5672 5541 5673 case 569: 5542 #line 2983 "fortran.y" /* yacc.c:1646 */5543 {in_complex_literal=0;}5544 #line 5 545 "fortran.tab.c" /* yacc.c:1646 */5674 #line 2983 "fortran.y" 5675 {in_complex_literal=0;} 5676 #line 5677 "fortran.tab.c" 5545 5677 break; 5546 5678 5547 5679 case 570: 5548 #line 2984 "fortran.y" /* yacc.c:1646 */5549 {inallocate = 0;}5550 #line 5 551 "fortran.tab.c" /* yacc.c:1646 */5680 #line 2984 "fortran.y" 5681 {inallocate = 0;} 5682 #line 5683 "fortran.tab.c" 5551 5683 break; 5552 5684 5553 5685 case 594: 5554 #line 3054 "fortran.y" /* yacc.c:1646 */5555 {in_complex_literal=0;}5556 #line 5 557 "fortran.tab.c" /* yacc.c:1646 */5686 #line 3054 "fortran.y" 5687 {in_complex_literal=0;} 5688 #line 5689 "fortran.tab.c" 5557 5689 break; 5558 5690 5559 5691 case 595: 5560 #line 3055 "fortran.y" /* yacc.c:1646 */5561 {inallocate = 0;}5562 #line 5 563 "fortran.tab.c" /* yacc.c:1646 */5692 #line 3055 "fortran.y" 5693 {inallocate = 0;} 5694 #line 5695 "fortran.tab.c" 5563 5695 break; 5564 5696 5565 5697 case 605: 5566 #line 3085 "fortran.y" /* yacc.c:1646 */5567 {5698 #line 3085 "fortran.y" 5699 { 5568 5700 strcpy((yyval.na),(yyvsp[0].v)->v_nomvar); 5569 5701 if (strcasecmp(my_dim.last,"")) … … 5574 5706 } 5575 5707 } 5576 #line 5 577 "fortran.tab.c" /* yacc.c:1646 */5708 #line 5709 "fortran.tab.c" 5577 5709 break; 5578 5710 5579 5711 case 609: 5580 #line 3098 "fortran.y" /* yacc.c:1646 */5581 { sprintf((yyval.na),"(%s)",(yyvsp[-1].na));}5582 #line 5 583 "fortran.tab.c" /* yacc.c:1646 */5712 #line 3098 "fortran.y" 5713 { sprintf((yyval.na),"(%s)",(yyvsp[-1].na));} 5714 #line 5715 "fortran.tab.c" 5583 5715 break; 5584 5716 5585 5717 case 610: 5586 #line 3103 "fortran.y" /* yacc.c:1646 */5587 {strcpy(my_dim.last,"");}5588 #line 5 589 "fortran.tab.c" /* yacc.c:1646 */5718 #line 3103 "fortran.y" 5719 {strcpy(my_dim.last,"");} 5720 #line 5721 "fortran.tab.c" 5589 5721 break; 5590 5722 5591 5723 case 612: 5592 #line 3109 "fortran.y" /* yacc.c:1646 */5593 {sprintf((yyval.na),"%s**%s",(yyvsp[-2].na),(yyvsp[0].na));}5594 #line 5 595 "fortran.tab.c" /* yacc.c:1646 */5724 #line 3109 "fortran.y" 5725 {sprintf((yyval.na),"%s**%s",(yyvsp[-2].na),(yyvsp[0].na));} 5726 #line 5727 "fortran.tab.c" 5595 5727 break; 5596 5728 5597 5729 case 614: 5598 #line 3114 "fortran.y" /* yacc.c:1646 */5599 { sprintf((yyval.na),"%s%s%s",(yyvsp[-2].na),(yyvsp[-1].na),(yyvsp[0].na)); }5600 #line 5 601 "fortran.tab.c" /* yacc.c:1646 */5730 #line 3114 "fortran.y" 5731 { sprintf((yyval.na),"%s%s%s",(yyvsp[-2].na),(yyvsp[-1].na),(yyvsp[0].na)); } 5732 #line 5733 "fortran.tab.c" 5601 5733 break; 5602 5734 5603 5735 case 616: 5604 #line 3122 "fortran.y" /* yacc.c:1646 */5605 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); }5606 #line 5 607 "fortran.tab.c" /* yacc.c:1646 */5736 #line 3122 "fortran.y" 5737 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); } 5738 #line 5739 "fortran.tab.c" 5607 5739 break; 5608 5740 5609 5741 case 617: 5610 #line 3124 "fortran.y" /* yacc.c:1646 */5611 { sprintf((yyval.na),"%s%s%s",(yyvsp[-2].na),(yyvsp[-1].na),(yyvsp[0].na)); }5612 #line 5 613 "fortran.tab.c" /* yacc.c:1646 */5742 #line 3124 "fortran.y" 5743 { sprintf((yyval.na),"%s%s%s",(yyvsp[-2].na),(yyvsp[-1].na),(yyvsp[0].na)); } 5744 #line 5745 "fortran.tab.c" 5613 5745 break; 5614 5746 5615 5747 case 619: 5616 #line 3127 "fortran.y" /* yacc.c:1646 */5617 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); }5618 #line 5 619 "fortran.tab.c" /* yacc.c:1646 */5748 #line 3127 "fortran.y" 5749 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); } 5750 #line 5751 "fortran.tab.c" 5619 5751 break; 5620 5752 5621 5753 case 621: 5622 #line 3136 "fortran.y" /* yacc.c:1646 */5623 {strcpy((yyval.na),"*");}5624 #line 5 625 "fortran.tab.c" /* yacc.c:1646 */5754 #line 3136 "fortran.y" 5755 {strcpy((yyval.na),"*");} 5756 #line 5757 "fortran.tab.c" 5625 5757 break; 5626 5758 5627 5759 case 623: 5628 #line 3142 "fortran.y" /* yacc.c:1646 */5629 {strcpy((yyval.na),"+");}5630 #line 5 631 "fortran.tab.c" /* yacc.c:1646 */5760 #line 3142 "fortran.y" 5761 {strcpy((yyval.na),"+");} 5762 #line 5763 "fortran.tab.c" 5631 5763 break; 5632 5764 5633 5765 case 624: 5634 #line 3144 "fortran.y" /* yacc.c:1646 */5635 {strcpy((yyval.na),"-");}5636 #line 5 637 "fortran.tab.c" /* yacc.c:1646 */5766 #line 3144 "fortran.y" 5767 {strcpy((yyval.na),"-");} 5768 #line 5769 "fortran.tab.c" 5637 5769 break; 5638 5770 5639 5771 case 626: 5640 #line 3150 "fortran.y" /* yacc.c:1646 */5641 { sprintf((yyval.na),"%s%s%s",(yyvsp[-2].na),(yyvsp[-1].na),(yyvsp[0].na)); }5642 #line 5 643 "fortran.tab.c" /* yacc.c:1646 */5772 #line 3150 "fortran.y" 5773 { sprintf((yyval.na),"%s%s%s",(yyvsp[-2].na),(yyvsp[-1].na),(yyvsp[0].na)); } 5774 #line 5775 "fortran.tab.c" 5643 5775 break; 5644 5776 5645 5777 case 629: 5646 #line 3159 "fortran.y" /* yacc.c:1646 */5647 { sprintf((yyval.na),"%s%s%s",(yyvsp[-2].na),(yyvsp[-1].na),(yyvsp[0].na)); }5648 #line 5 649 "fortran.tab.c" /* yacc.c:1646 */5778 #line 3159 "fortran.y" 5779 { sprintf((yyval.na),"%s%s%s",(yyvsp[-2].na),(yyvsp[-1].na),(yyvsp[0].na)); } 5780 #line 5781 "fortran.tab.c" 5649 5781 break; 5650 5782 5651 5783 case 638: 5652 #line 3172 "fortran.y" /* yacc.c:1646 */5653 {strcpy((yyval.na),"<");}5654 #line 5 655 "fortran.tab.c" /* yacc.c:1646 */5784 #line 3172 "fortran.y" 5785 {strcpy((yyval.na),"<");} 5786 #line 5787 "fortran.tab.c" 5655 5787 break; 5656 5788 5657 5789 case 640: 5658 #line 3175 "fortran.y" /* yacc.c:1646 */5659 {strcpy((yyval.na),">");}5660 #line 5 661 "fortran.tab.c" /* yacc.c:1646 */5790 #line 3175 "fortran.y" 5791 {strcpy((yyval.na),">");} 5792 #line 5793 "fortran.tab.c" 5661 5793 break; 5662 5794 5663 5795 case 643: 5664 #line 3183 "fortran.y" /* yacc.c:1646 */5665 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); }5666 #line 5 667 "fortran.tab.c" /* yacc.c:1646 */5796 #line 3183 "fortran.y" 5797 { sprintf((yyval.na),"%s%s",(yyvsp[-1].na),(yyvsp[0].na)); } 5798 #line 5799 "fortran.tab.c" 5667 5799 break; 5668 5800 5669 5801 case 645: 5670 #line 3190 "fortran.y" /* yacc.c:1646 */5671 { sprintf((yyval.na),"%s%s%s",(yyvsp[-2].na),(yyvsp[-1].na),(yyvsp[0].na)); }5672 #line 5 673 "fortran.tab.c" /* yacc.c:1646 */5802 #line 3190 "fortran.y" 5803 { sprintf((yyval.na),"%s%s%s",(yyvsp[-2].na),(yyvsp[-1].na),(yyvsp[0].na)); } 5804 #line 5805 "fortran.tab.c" 5673 5805 break; 5674 5806 5675 5807 case 647: 5676 #line 3197 "fortran.y" /* yacc.c:1646 */5677 { sprintf((yyval.na),"%s%s%s",(yyvsp[-2].na),(yyvsp[-1].na),(yyvsp[0].na)); }5678 #line 5 679 "fortran.tab.c" /* yacc.c:1646 */5808 #line 3197 "fortran.y" 5809 { sprintf((yyval.na),"%s%s%s",(yyvsp[-2].na),(yyvsp[-1].na),(yyvsp[0].na)); } 5810 #line 5811 "fortran.tab.c" 5679 5811 break; 5680 5812 5681 5813 case 649: 5682 #line 3203 "fortran.y" /* yacc.c:1646 */5683 { sprintf((yyval.na),"%s%s%s",(yyvsp[-2].na),(yyvsp[-1].na),(yyvsp[0].na)); }5684 #line 5 685 "fortran.tab.c" /* yacc.c:1646 */5814 #line 3203 "fortran.y" 5815 { sprintf((yyval.na),"%s%s%s",(yyvsp[-2].na),(yyvsp[-1].na),(yyvsp[0].na)); } 5816 #line 5817 "fortran.tab.c" 5685 5817 break; 5686 5818 5687 5819 case 659: 5688 #line 3239 "fortran.y" /* yacc.c:1646 */5689 {strcpy((yyval.na),"");}5690 #line 5 691 "fortran.tab.c" /* yacc.c:1646 */5820 #line 3239 "fortran.y" 5821 {strcpy((yyval.na),"");} 5822 #line 5823 "fortran.tab.c" 5691 5823 break; 5692 5824 5693 5825 case 662: 5694 #line 3248 "fortran.y" /* yacc.c:1646 */5695 {5826 #line 3248 "fortran.y" 5827 { 5696 5828 strcpy((yyval.na),(yyvsp[0].na)); 5697 5829 } 5698 #line 5 699 "fortran.tab.c" /* yacc.c:1646 */5830 #line 5831 "fortran.tab.c" 5699 5831 break; 5700 5832 5701 5833 case 663: 5702 #line 3255 "fortran.y" /* yacc.c:1646 */5703 {strcpy((yyval.na),(yyvsp[0].na));}5704 #line 5 705 "fortran.tab.c" /* yacc.c:1646 */5834 #line 3255 "fortran.y" 5835 {strcpy((yyval.na),(yyvsp[0].na));} 5836 #line 5837 "fortran.tab.c" 5705 5837 break; 5706 5838 5707 5839 case 792: 5708 #line 3628 "fortran.y" /* yacc.c:1646 */5709 {in_select_case_stmt++;}5710 #line 5 711 "fortran.tab.c" /* yacc.c:1646 */5840 #line 3628 "fortran.y" 5841 {in_select_case_stmt++;} 5842 #line 5843 "fortran.tab.c" 5711 5843 break; 5712 5844 5713 5845 case 794: 5714 #line 3629 "fortran.y" /* yacc.c:1646 */5715 {in_select_case_stmt++;}5716 #line 5 717 "fortran.tab.c" /* yacc.c:1646 */5846 #line 3629 "fortran.y" 5847 {in_select_case_stmt++;} 5848 #line 5849 "fortran.tab.c" 5717 5849 break; 5718 5850 5719 5851 case 798: 5720 #line 3638 "fortran.y" /* yacc.c:1646 */5721 {in_select_case_stmt--;}5722 #line 5 723 "fortran.tab.c" /* yacc.c:1646 */5852 #line 3638 "fortran.y" 5853 {in_select_case_stmt--;} 5854 #line 5855 "fortran.tab.c" 5723 5855 break; 5724 5856 5725 5857 case 800: 5726 #line 3639 "fortran.y" /* yacc.c:1646 */5727 {in_select_case_stmt--;}5728 #line 5 729 "fortran.tab.c" /* yacc.c:1646 */5858 #line 3639 "fortran.y" 5859 {in_select_case_stmt--;} 5860 #line 5861 "fortran.tab.c" 5729 5861 break; 5730 5862 5731 5863 case 802: 5732 #line 3644 "fortran.y" /* yacc.c:1646 */5733 {in_complex_literal=0;}5734 #line 5 735 "fortran.tab.c" /* yacc.c:1646 */5864 #line 3644 "fortran.y" 5865 {in_complex_literal=0;} 5866 #line 5867 "fortran.tab.c" 5735 5867 break; 5736 5868 5737 5869 case 826: 5738 #line 3707 "fortran.y" /* yacc.c:1646 */5739 {close_or_connect = 1;}5740 #line 5 741 "fortran.tab.c" /* yacc.c:1646 */5870 #line 3707 "fortran.y" 5871 {close_or_connect = 1;} 5872 #line 5873 "fortran.tab.c" 5741 5873 break; 5742 5874 5743 5875 case 827: 5744 #line 3707 "fortran.y" /* yacc.c:1646 */ 5745 {close_or_connect = 0;} 5746 #line 5747 "fortran.tab.c" /* yacc.c:1646 */ 5747 break; 5748 5749 case 844: 5750 #line 3737 "fortran.y" /* yacc.c:1646 */ 5751 {close_or_connect = 1;} 5752 #line 5753 "fortran.tab.c" /* yacc.c:1646 */ 5876 #line 3707 "fortran.y" 5877 {close_or_connect = 0;} 5878 #line 5879 "fortran.tab.c" 5753 5879 break; 5754 5880 5755 5881 case 845: 5756 #line 3738 "fortran.y" /* yacc.c:1646 */ 5757 {close_or_connect = 0;} 5758 #line 5759 "fortran.tab.c" /* yacc.c:1646 */ 5759 break; 5760 5761 case 853: 5762 #line 3755 "fortran.y" /* yacc.c:1646 */ 5763 { 5882 #line 3738 "fortran.y" 5883 {close_or_connect = 1;} 5884 #line 5885 "fortran.tab.c" 5885 break; 5886 5887 case 846: 5888 #line 3739 "fortran.y" 5889 {close_or_connect = 0;} 5890 #line 5891 "fortran.tab.c" 5891 break; 5892 5893 case 855: 5894 #line 3757 "fortran.y" 5895 { 5764 5896 in_io_control_spec = 0; 5765 5897 } 5766 #line 5 767 "fortran.tab.c" /* yacc.c:1646 */5767 break; 5768 5769 case 85 5:5770 #line 376 0 "fortran.y" /* yacc.c:1646 */5771 {5898 #line 5899 "fortran.tab.c" 5899 break; 5900 5901 case 857: 5902 #line 3762 "fortran.y" 5903 { 5772 5904 in_io_control_spec = 0; 5773 5905 } 5774 #line 5 775 "fortran.tab.c" /* yacc.c:1646 */5775 break; 5776 5777 case 8 59:5778 #line 377 0 "fortran.y" /* yacc.c:1646 */5779 {5906 #line 5907 "fortran.tab.c" 5907 break; 5908 5909 case 861: 5910 #line 3772 "fortran.y" 5911 { 5780 5912 in_io_control_spec = 0; 5781 5913 } 5782 #line 5 783 "fortran.tab.c" /* yacc.c:1646 */5783 break; 5784 5785 case 86 1:5786 #line 377 5 "fortran.y" /* yacc.c:1646 */5787 {5914 #line 5915 "fortran.tab.c" 5915 break; 5916 5917 case 863: 5918 #line 3777 "fortran.y" 5919 { 5788 5920 in_io_control_spec = 0; 5789 5921 } 5790 #line 5791 "fortran.tab.c" /* yacc.c:1646 */ 5791 break; 5792 5793 case 914: 5794 #line 3892 "fortran.y" /* yacc.c:1646 */ 5795 {in_inquire=0;} 5796 #line 5797 "fortran.tab.c" /* yacc.c:1646 */ 5797 break; 5798 5799 case 916: 5800 #line 3895 "fortran.y" /* yacc.c:1646 */ 5801 {in_inquire=0;} 5802 #line 5803 "fortran.tab.c" /* yacc.c:1646 */ 5803 break; 5804 5805 case 918: 5806 #line 3899 "fortran.y" /* yacc.c:1646 */ 5807 {in_inquire=1;} 5808 #line 5809 "fortran.tab.c" /* yacc.c:1646 */ 5809 break; 5810 5811 case 933: 5812 #line 3926 "fortran.y" /* yacc.c:1646 */ 5813 {pos_endsubroutine=setposcur();} 5814 #line 5815 "fortran.tab.c" /* yacc.c:1646 */ 5922 #line 5923 "fortran.tab.c" 5923 break; 5924 5925 case 917: 5926 #line 3895 "fortran.y" 5927 {in_inquire=0;} 5928 #line 5929 "fortran.tab.c" 5929 break; 5930 5931 case 919: 5932 #line 3898 "fortran.y" 5933 {in_inquire=0;} 5934 #line 5935 "fortran.tab.c" 5935 break; 5936 5937 case 921: 5938 #line 3902 "fortran.y" 5939 {in_inquire=1;} 5940 #line 5941 "fortran.tab.c" 5815 5941 break; 5816 5942 5817 5943 case 937: 5818 #line 3935 "fortran.y" /* yacc.c:1646 */ 5819 { 5944 #line 3930 "fortran.y" 5945 {pos_endsubroutine=setposcur();} 5946 #line 5947 "fortran.tab.c" 5947 break; 5948 5949 case 941: 5950 #line 3939 "fortran.y" 5951 { 5820 5952 GlobalDeclaration = 0; 5821 5953 strcpy(curmodulename,(yyvsp[0].na)); … … 5832 5964 } 5833 5965 } 5834 #line 5 835 "fortran.tab.c" /* yacc.c:1646 */5835 break; 5836 5837 case 9 39:5838 #line 395 5 "fortran.y" /* yacc.c:1646 */5839 {5966 #line 5967 "fortran.tab.c" 5967 break; 5968 5969 case 943: 5970 #line 3959 "fortran.y" 5971 { 5840 5972 /* if we never meet the contains keyword */ 5841 5973 if ( firstpass == 0 ) … … 5858 5990 GlobalDeclaration = 0 ; 5859 5991 } 5860 #line 5 861 "fortran.tab.c" /* yacc.c:1646 */5861 break; 5862 5863 case 95 4:5864 #line 40 07 "fortran.y" /* yacc.c:1646 */5865 {if (firstpass == 0 && oldfortran_out) pos_curuseold = setposcurname(oldfortran_out);}5866 #line 5 867 "fortran.tab.c" /* yacc.c:1646 */5867 break; 5868 5869 case 95 5:5870 #line 401 2 "fortran.y" /* yacc.c:1646 */5992 #line 5993 "fortran.tab.c" 5993 break; 5994 5995 case 958: 5996 #line 4011 "fortran.y" 5997 {if (firstpass == 0 && oldfortran_out) pos_curuseold = setposcurname(oldfortran_out);} 5998 #line 5999 "fortran.tab.c" 5999 break; 6000 6001 case 959: 6002 #line 4016 "fortran.y" 5871 6003 { 5872 6004 if ( firstpass ) … … 5905 6037 } 5906 6038 } 5907 #line 5908 "fortran.tab.c" /* yacc.c:1646 */5908 break; 5909 5910 case 9 57:5911 #line 405 0 "fortran.y" /* yacc.c:1646 */6039 #line 6040 "fortran.tab.c" 6040 break; 6041 6042 case 961: 6043 #line 4054 "fortran.y" 5912 6044 { 5913 6045 if ( firstpass ) … … 5958 6090 } 5959 6091 } 5960 #line 5961 "fortran.tab.c" /* yacc.c:1646 */5961 break; 5962 5963 case 96 2:5964 #line 41 07 "fortran.y" /* yacc.c:1646 */6092 #line 6093 "fortran.tab.c" 6093 break; 6094 6095 case 966: 6096 #line 4111 "fortran.y" 5965 6097 {(yyval.lc)=NULL;} 5966 #line 5967 "fortran.tab.c" /* yacc.c:1646 */5967 break; 5968 5969 case 96 3:5970 #line 41 09 "fortran.y" /* yacc.c:1646 */6098 #line 6099 "fortran.tab.c" 6099 break; 6100 6101 case 967: 6102 #line 4113 "fortran.y" 5971 6103 {(yyval.lc)=(yyvsp[0].lc);} 5972 #line 5973 "fortran.tab.c" /* yacc.c:1646 */5973 break; 5974 5975 case 9 69:5976 #line 41 26 "fortran.y" /* yacc.c:1646 */5977 {6104 #line 6105 "fortran.tab.c" 6105 break; 6106 6107 case 973: 6108 #line 4130 "fortran.y" 6109 { 5978 6110 strcpy(subroutinename,(yyvsp[0].na)); 5979 6111 insubroutinedeclare = 1; … … 5984 6116 WriteBeginof_SubLoop(); 5985 6117 } 5986 #line 5987 "fortran.tab.c" /* yacc.c:1646 */5987 break; 5988 5989 case 97 1:5990 #line 41 39 "fortran.y" /* yacc.c:1646 */5991 {pos_endsubroutine=my_position_before;}5992 #line 5993 "fortran.tab.c" /* yacc.c:1646 */5993 break; 5994 5995 case 97 2:5996 #line 414 0 "fortran.y" /* yacc.c:1646 */5997 {6118 #line 6119 "fortran.tab.c" 6119 break; 6120 6121 case 975: 6122 #line 4143 "fortran.y" 6123 {pos_endsubroutine=my_position_before;} 6124 #line 6125 "fortran.tab.c" 6125 break; 6126 6127 case 976: 6128 #line 4144 "fortran.y" 6129 { 5998 6130 insubroutinedeclare = 0; 5999 6131 inprogramdeclare = 0; … … 6003 6135 strcpy(subroutinename,""); 6004 6136 } 6005 #line 6 006 "fortran.tab.c" /* yacc.c:1646 */6006 break; 6007 6008 case 9 79:6009 #line 416 2 "fortran.y" /* yacc.c:1646 */6137 #line 6138 "fortran.tab.c" 6138 break; 6139 6140 case 983: 6141 #line 4166 "fortran.y" 6010 6142 { 6011 6143 (yyval.lc)=NULL; 6012 6144 } 6013 #line 6 014 "fortran.tab.c" /* yacc.c:1646 */6014 break; 6015 6016 case 98 0:6017 #line 41 66 "fortran.y" /* yacc.c:1646 */6145 #line 6146 "fortran.tab.c" 6146 break; 6147 6148 case 984: 6149 #line 4170 "fortran.y" 6018 6150 { 6019 6151 (yyval.lc)=(yyvsp[0].lc); 6020 6152 } 6021 #line 6 022 "fortran.tab.c" /* yacc.c:1646 */6022 break; 6023 6024 case 98 1:6025 #line 417 2 "fortran.y" /* yacc.c:1646 */6026 {6153 #line 6154 "fortran.tab.c" 6154 break; 6155 6156 case 985: 6157 #line 4176 "fortran.y" 6158 { 6027 6159 (yyval.lc)=(yyvsp[0].lc); 6028 6160 } 6029 #line 6 030 "fortran.tab.c" /* yacc.c:1646 */6030 break; 6031 6032 case 98 2:6033 #line 41 76 "fortran.y" /* yacc.c:1646 */6034 {6161 #line 6162 "fortran.tab.c" 6162 break; 6163 6164 case 986: 6165 #line 4180 "fortran.y" 6166 { 6035 6167 /* insert the variable in the list $1 */ 6036 6168 (yyvsp[0].lc)->suiv = (yyvsp[-2].lc); 6037 6169 (yyval.lc)=(yyvsp[0].lc); 6038 6170 } 6039 #line 6 040 "fortran.tab.c" /* yacc.c:1646 */6040 break; 6041 6042 case 98 3:6043 #line 418 5 "fortran.y" /* yacc.c:1646 */6044 {6171 #line 6172 "fortran.tab.c" 6172 break; 6173 6174 case 987: 6175 #line 4189 "fortran.y" 6176 { 6045 6177 coupletmp = (listcouple *) calloc(1,sizeof(listcouple)); 6046 6178 strcpy(coupletmp->c_namevar,(yyvsp[-2].na)); … … 6049 6181 (yyval.lc) = coupletmp; 6050 6182 } 6051 #line 6 052 "fortran.tab.c" /* yacc.c:1646 */6052 break; 6053 6054 case 98 4:6055 #line 419 5 "fortran.y" /* yacc.c:1646 */6056 {(yyval.lc)=(yyvsp[0].lc);}6057 #line 6 058 "fortran.tab.c" /* yacc.c:1646 */6058 break; 6059 6060 case 98 5:6061 #line 4 197 "fortran.y" /* yacc.c:1646 */6062 {6183 #line 6184 "fortran.tab.c" 6184 break; 6185 6186 case 988: 6187 #line 4199 "fortran.y" 6188 {(yyval.lc)=(yyvsp[0].lc);} 6189 #line 6190 "fortran.tab.c" 6190 break; 6191 6192 case 989: 6193 #line 4201 "fortran.y" 6194 { 6063 6195 /* insert the variable in the list $1 */ 6064 6196 (yyvsp[0].lc)->suiv = (yyvsp[-2].lc); 6065 6197 (yyval.lc) = (yyvsp[0].lc); 6066 6198 } 6067 #line 6 068 "fortran.tab.c" /* yacc.c:1646 */6068 break; 6069 6070 case 9 86:6071 #line 42 06 "fortran.y" /* yacc.c:1646 */6072 {6199 #line 6200 "fortran.tab.c" 6200 break; 6201 6202 case 990: 6203 #line 4210 "fortran.y" 6204 { 6073 6205 coupletmp = (listcouple *)calloc(1,sizeof(listcouple)); 6074 6206 strcpy(coupletmp->c_namevar,(yyvsp[0].na)); … … 6077 6209 (yyval.lc) = coupletmp; 6078 6210 } 6079 #line 6 080 "fortran.tab.c" /* yacc.c:1646 */6080 break; 6081 6082 case 9 87:6083 #line 421 4 "fortran.y" /* yacc.c:1646 */6084 {6211 #line 6212 "fortran.tab.c" 6212 break; 6213 6214 case 991: 6215 #line 4218 "fortran.y" 6216 { 6085 6217 coupletmp = (listcouple *)calloc(1,sizeof(listcouple)); 6086 6218 strcpy(coupletmp->c_namevar,(yyvsp[0].na)); … … 6089 6221 (yyval.lc) = coupletmp; 6090 6222 } 6091 #line 6 092 "fortran.tab.c" /* yacc.c:1646 */6092 break; 6093 6094 case 9 88:6095 #line 422 2 "fortran.y" /* yacc.c:1646 */6096 {6223 #line 6224 "fortran.tab.c" 6224 break; 6225 6226 case 992: 6227 #line 4226 "fortran.y" 6228 { 6097 6229 (yyval.lc)=(yyvsp[0].lc); 6098 6230 pointedvar = 1; 6099 6231 Add_UsedInSubroutine_Var_1((yyvsp[0].lc)->c_namevar); 6100 6232 } 6101 #line 6 102 "fortran.tab.c" /* yacc.c:1646 */6102 break; 6103 6104 case 100 1:6105 #line 426 2 "fortran.y" /* yacc.c:1646 */6106 {in_complex_literal=0;}6107 #line 6 108 "fortran.tab.c" /* yacc.c:1646 */6108 break; 6109 6110 case 100 2:6111 #line 426 3 "fortran.y" /* yacc.c:1646 */6112 {sprintf((yyval.na),"%s(%s)",(yyvsp[-4].na),(yyvsp[-1].na));}6113 #line 6 114 "fortran.tab.c" /* yacc.c:1646 */6114 break; 6115 6116 case 100 3:6117 #line 42 69 "fortran.y" /* yacc.c:1646 */6118 {6233 #line 6234 "fortran.tab.c" 6234 break; 6235 6236 case 1005: 6237 #line 4266 "fortran.y" 6238 {in_complex_literal=0;} 6239 #line 6240 "fortran.tab.c" 6240 break; 6241 6242 case 1006: 6243 #line 4267 "fortran.y" 6244 {sprintf((yyval.na),"%s(%s)",(yyvsp[-4].na),(yyvsp[-1].na));} 6245 #line 6246 "fortran.tab.c" 6246 break; 6247 6248 case 1007: 6249 #line 4273 "fortran.y" 6250 { 6119 6251 inagrifcallargument = 0 ; 6120 6252 incalldeclare=0; … … 6127 6259 Instanciation_0(sameagrifname); 6128 6260 } 6129 #line 6 130 "fortran.tab.c" /* yacc.c:1646 */6130 break; 6131 6132 case 100 5:6133 #line 428 2 "fortran.y" /* yacc.c:1646 */6134 {6261 #line 6262 "fortran.tab.c" 6262 break; 6263 6264 case 1009: 6265 #line 4286 "fortran.y" 6266 { 6135 6267 inagrifcallargument = 0 ; 6136 6268 incalldeclare=0; … … 6143 6275 Instanciation_0(sameagrifname); 6144 6276 } 6145 #line 6 146 "fortran.tab.c" /* yacc.c:1646 */6146 break; 6147 6148 case 10 07:6149 #line 429 4 "fortran.y" /* yacc.c:1646 */6150 {in_complex_literal=0;}6151 #line 6 152 "fortran.tab.c" /* yacc.c:1646 */6152 break; 6153 6154 case 10 08:6155 #line 429 5 "fortran.y" /* yacc.c:1646 */6156 {6277 #line 6278 "fortran.tab.c" 6278 break; 6279 6280 case 1011: 6281 #line 4298 "fortran.y" 6282 {in_complex_literal=0;} 6283 #line 6284 "fortran.tab.c" 6284 break; 6285 6286 case 1012: 6287 #line 4299 "fortran.y" 6288 { 6157 6289 inagrifcallargument = 0 ; 6158 6290 incalldeclare=0; … … 6165 6297 Instanciation_0(sameagrifname); 6166 6298 } 6167 #line 6 168 "fortran.tab.c" /* yacc.c:1646 */6168 break; 6169 6170 case 101 0:6171 #line 43 09 "fortran.y" /* yacc.c:1646 */6172 {pos_curcall=my_position_before-strlen((yyvsp[-1].na))-4;}6173 #line 6 174 "fortran.tab.c" /* yacc.c:1646 */6174 break; 6175 6176 case 101 1:6177 #line 431 0 "fortran.y" /* yacc.c:1646 */6178 {6299 #line 6300 "fortran.tab.c" 6300 break; 6301 6302 case 1014: 6303 #line 4313 "fortran.y" 6304 {pos_curcall=my_position_before-strlen((yyvsp[-1].na))-4;} 6305 #line 6306 "fortran.tab.c" 6306 break; 6307 6308 case 1015: 6309 #line 4314 "fortran.y" 6310 { 6179 6311 if (!strcasecmp((yyvsp[0].na),"MPI_Init") ) callmpiinit = 1; 6180 6312 else callmpiinit = 0; … … 6196 6328 } 6197 6329 } 6198 #line 6 199 "fortran.tab.c" /* yacc.c:1646 */6199 break; 6200 6201 case 10 16:6202 #line 434 1 "fortran.y" /* yacc.c:1646 */6203 {sprintf((yyval.na),"%s,%s",(yyvsp[-2].na),(yyvsp[0].na));}6204 #line 6 205 "fortran.tab.c" /* yacc.c:1646 */6205 break; 6206 6207 case 10 17:6208 #line 43 46 "fortran.y" /* yacc.c:1646 */6209 {6330 #line 6331 "fortran.tab.c" 6331 break; 6332 6333 case 1020: 6334 #line 4345 "fortran.y" 6335 {sprintf((yyval.na),"%s,%s",(yyvsp[-2].na),(yyvsp[0].na));} 6336 #line 6337 "fortran.tab.c" 6337 break; 6338 6339 case 1021: 6340 #line 4350 "fortran.y" 6341 { 6210 6342 if ( callmpiinit == 1 ) 6211 6343 { … … 6214 6346 } 6215 6347 } 6216 #line 6 217 "fortran.tab.c" /* yacc.c:1646 */6217 break; 6218 6219 case 10 18:6220 #line 435 4 "fortran.y" /* yacc.c:1646 */6221 {sprintf((yyval.na),"%s = %s",(yyvsp[-2].na),(yyvsp[0].na));6348 #line 6349 "fortran.tab.c" 6349 break; 6350 6351 case 1022: 6352 #line 4358 "fortran.y" 6353 {sprintf((yyval.na),"%s = %s",(yyvsp[-2].na),(yyvsp[0].na)); 6222 6354 if ( callmpiinit == 1 ) 6223 6355 { … … 6226 6358 } 6227 6359 } 6228 #line 6 229 "fortran.tab.c" /* yacc.c:1646 */6229 break; 6230 6231 case 102 0:6232 #line 43 66 "fortran.y" /* yacc.c:1646 */6233 {6360 #line 6361 "fortran.tab.c" 6361 break; 6362 6363 case 1024: 6364 #line 4370 "fortran.y" 6365 { 6234 6366 strcpy((yyval.na),(yyvsp[0].v)->v_nomvar); 6235 6367 if ((yyvsp[0].v)->v_initialvalue_array) … … 6240 6372 } 6241 6373 } 6242 #line 6243 "fortran.tab.c" /* yacc.c:1646 */ 6243 break; 6244 6245 case 1022: 6246 #line 4378 "fortran.y" /* yacc.c:1646 */ 6247 {isrecursive = 0;} 6248 #line 6249 "fortran.tab.c" /* yacc.c:1646 */ 6374 #line 6375 "fortran.tab.c" 6249 6375 break; 6250 6376 6251 6377 case 1026: 6252 #line 4389 "fortran.y" /* yacc.c:1646 */ 6253 {isrecursive = 0; functiondeclarationisdone = 1;} 6254 #line 6255 "fortran.tab.c" /* yacc.c:1646 */ 6255 break; 6256 6257 case 1027: 6258 #line 4391 "fortran.y" /* yacc.c:1646 */ 6259 {isrecursive = 0;} 6260 #line 6261 "fortran.tab.c" /* yacc.c:1646 */ 6261 break; 6262 6263 case 1028: 6264 #line 4393 "fortran.y" /* yacc.c:1646 */ 6265 {isrecursive = 1;} 6266 #line 6267 "fortran.tab.c" /* yacc.c:1646 */ 6378 #line 4382 "fortran.y" 6379 {isrecursive = 0;} 6380 #line 6381 "fortran.tab.c" 6267 6381 break; 6268 6382 6269 6383 case 1030: 6270 #line 4 402 "fortran.y" /* yacc.c:1646 */6271 {in_complex_literal=0;}6272 #line 6 273 "fortran.tab.c" /* yacc.c:1646 */6384 #line 4393 "fortran.y" 6385 {isrecursive = 0; functiondeclarationisdone = 1;} 6386 #line 6387 "fortran.tab.c" 6273 6387 break; 6274 6388 6275 6389 case 1031: 6276 #line 4403 "fortran.y" /* yacc.c:1646 */ 6277 { 6390 #line 4395 "fortran.y" 6391 {isrecursive = 0;} 6392 #line 6393 "fortran.tab.c" 6393 break; 6394 6395 case 1032: 6396 #line 4397 "fortran.y" 6397 {isrecursive = 1;} 6398 #line 6399 "fortran.tab.c" 6399 break; 6400 6401 case 1034: 6402 #line 4406 "fortran.y" 6403 {in_complex_literal=0;} 6404 #line 6405 "fortran.tab.c" 6405 break; 6406 6407 case 1035: 6408 #line 4407 "fortran.y" 6409 { 6278 6410 insubroutinedeclare = 1; 6279 6411 suborfun = 0; … … 6296 6428 strcpy(NamePrecision,""); 6297 6429 } 6298 #line 6 299 "fortran.tab.c" /* yacc.c:1646 */6299 break; 6300 6301 case 103 3:6302 #line 44 28 "fortran.y" /* yacc.c:1646 */6303 {6430 #line 6431 "fortran.tab.c" 6431 break; 6432 6433 case 1037: 6434 #line 4432 "fortran.y" 6435 { 6304 6436 if (strcmp(subroutinename,"")) 6305 6437 { … … 6313 6445 strcpy((yyval.na),(yyvsp[0].na));strcpy(subroutinename,(yyvsp[0].na)); 6314 6446 } 6315 #line 6 316 "fortran.tab.c" /* yacc.c:1646 */6316 break; 6317 6318 case 103 4:6319 #line 445 3 "fortran.y" /* yacc.c:1646 */6320 {strcpy((yyval.na),(yyvsp[0].na));}6321 #line 6 322 "fortran.tab.c" /* yacc.c:1646 */6322 break; 6323 6324 case 103 5:6325 #line 44 57 "fortran.y" /* yacc.c:1646 */6326 {is_result_present = 0; }6327 #line 6 328 "fortran.tab.c" /* yacc.c:1646 */6328 break; 6329 6330 case 10 37:6331 #line 446 3 "fortran.y" /* yacc.c:1646 */6332 {is_result_present = 1;6447 #line 6448 "fortran.tab.c" 6448 break; 6449 6450 case 1038: 6451 #line 4457 "fortran.y" 6452 {strcpy((yyval.na),(yyvsp[0].na));} 6453 #line 6454 "fortran.tab.c" 6454 break; 6455 6456 case 1039: 6457 #line 4461 "fortran.y" 6458 {is_result_present = 0; } 6459 #line 6460 "fortran.tab.c" 6460 break; 6461 6462 case 1041: 6463 #line 4467 "fortran.y" 6464 {is_result_present = 1; 6333 6465 if ( firstpass == 1 ) 6334 6466 { … … 6342 6474 } 6343 6475 } 6344 #line 6 345 "fortran.tab.c" /* yacc.c:1646 */6345 break; 6346 6347 case 10 38:6348 #line 44 79 "fortran.y" /* yacc.c:1646 */6349 {strcpy(DeclType, "");}6350 #line 6 351 "fortran.tab.c" /* yacc.c:1646 */6351 break; 6352 6353 case 104 3:6354 #line 449 3 "fortran.y" /* yacc.c:1646 */6355 {6476 #line 6477 "fortran.tab.c" 6477 break; 6478 6479 case 1042: 6480 #line 4483 "fortran.y" 6481 {strcpy(DeclType, "");} 6482 #line 6483 "fortran.tab.c" 6483 break; 6484 6485 case 1047: 6486 #line 4497 "fortran.y" 6487 { 6356 6488 insubroutinedeclare = 1; 6357 6489 suborfun = 1; … … 6363 6495 } 6364 6496 } 6365 #line 6 366 "fortran.tab.c" /* yacc.c:1646 */6366 break; 6367 6368 case 104 5:6369 #line 45 08 "fortran.y" /* yacc.c:1646 */6370 {6497 #line 6498 "fortran.tab.c" 6498 break; 6499 6500 case 1049: 6501 #line 4512 "fortran.y" 6502 { 6371 6503 if (strcmp(subroutinename,"")) 6372 6504 { … … 6380 6512 strcpy((yyval.na),(yyvsp[0].na));strcpy(subroutinename,(yyvsp[0].na)); 6381 6513 } 6382 #line 6 383 "fortran.tab.c" /* yacc.c:1646 */6383 break; 6384 6385 case 10 47:6386 #line 45 29 "fortran.y" /* yacc.c:1646 */6387 {pos_endsubroutine = my_position;6514 #line 6515 "fortran.tab.c" 6515 break; 6516 6517 case 1051: 6518 #line 4533 "fortran.y" 6519 {pos_endsubroutine = my_position; 6388 6520 GlobalDeclaration = 0 ; 6389 6521 if ( firstpass == 0 && strcasecmp(subroutinename,"") ) … … 6428 6560 } 6429 6561 } 6430 #line 6431 "fortran.tab.c" /* yacc.c:1646 */ 6431 break; 6432 6433 case 1050: 6434 #line 4578 "fortran.y" /* yacc.c:1646 */ 6435 {if (firstpass) (yyval.l)=NULL;} 6436 #line 6437 "fortran.tab.c" /* yacc.c:1646 */ 6437 break; 6438 6439 case 1051: 6440 #line 4579 "fortran.y" /* yacc.c:1646 */ 6441 {in_complex_literal=0;} 6442 #line 6443 "fortran.tab.c" /* yacc.c:1646 */ 6443 break; 6444 6445 case 1052: 6446 #line 4580 "fortran.y" /* yacc.c:1646 */ 6447 {if (firstpass) (yyval.l)=(yyvsp[-1].l);} 6448 #line 6449 "fortran.tab.c" /* yacc.c:1646 */ 6449 break; 6450 6451 case 1053: 6452 #line 4584 "fortran.y" /* yacc.c:1646 */ 6453 {if (firstpass) (yyval.l)=NULL;} 6454 #line 6455 "fortran.tab.c" /* yacc.c:1646 */ 6562 #line 6563 "fortran.tab.c" 6455 6563 break; 6456 6564 6457 6565 case 1054: 6458 #line 458 6 "fortran.y" /* yacc.c:1646 */6459 {if (firstpass) (yyval.l)=(yyvsp[0].l);}6460 #line 6 461 "fortran.tab.c" /* yacc.c:1646 */6566 #line 4582 "fortran.y" 6567 {if (firstpass) (yyval.l)=NULL;} 6568 #line 6569 "fortran.tab.c" 6461 6569 break; 6462 6570 6463 6571 case 1055: 6464 #line 4591 "fortran.y" /* yacc.c:1646 */ 6465 { 6572 #line 4583 "fortran.y" 6573 {in_complex_literal=0;} 6574 #line 6575 "fortran.tab.c" 6575 break; 6576 6577 case 1056: 6578 #line 4584 "fortran.y" 6579 {if (firstpass) (yyval.l)=(yyvsp[-1].l);} 6580 #line 6581 "fortran.tab.c" 6581 break; 6582 6583 case 1057: 6584 #line 4588 "fortran.y" 6585 {if (firstpass) (yyval.l)=NULL;} 6586 #line 6587 "fortran.tab.c" 6587 break; 6588 6589 case 1058: 6590 #line 4590 "fortran.y" 6591 {if (firstpass) (yyval.l)=(yyvsp[0].l);} 6592 #line 6593 "fortran.tab.c" 6593 break; 6594 6595 case 1059: 6596 #line 4595 "fortran.y" 6597 { 6466 6598 if ( firstpass == 1 ) 6467 6599 { … … 6474 6606 } 6475 6607 } 6476 #line 6 477 "fortran.tab.c" /* yacc.c:1646 */6477 break; 6478 6479 case 10 56:6480 #line 460 3 "fortran.y" /* yacc.c:1646 */6481 {6608 #line 6609 "fortran.tab.c" 6609 break; 6610 6611 case 1060: 6612 #line 4607 "fortran.y" 6613 { 6482 6614 if ( firstpass == 1 ) 6483 6615 { … … 6489 6621 } 6490 6622 } 6491 #line 6492 "fortran.tab.c" /* yacc.c:1646 */ 6492 break; 6493 6494 case 1057: 6495 #line 4617 "fortran.y" /* yacc.c:1646 */ 6496 {strcpy((yyval.na),(yyvsp[0].na));} 6497 #line 6498 "fortran.tab.c" /* yacc.c:1646 */ 6498 break; 6499 6500 case 1058: 6501 #line 4619 "fortran.y" /* yacc.c:1646 */ 6502 {strcpy((yyval.na),"*");} 6503 #line 6504 "fortran.tab.c" /* yacc.c:1646 */ 6623 #line 6624 "fortran.tab.c" 6504 6624 break; 6505 6625 6506 6626 case 1061: 6507 #line 4629 "fortran.y" /* yacc.c:1646 */ 6508 { 6627 #line 4621 "fortran.y" 6628 {strcpy((yyval.na),(yyvsp[0].na));} 6629 #line 6630 "fortran.tab.c" 6630 break; 6631 6632 case 1062: 6633 #line 4623 "fortran.y" 6634 {strcpy((yyval.na),"*");} 6635 #line 6636 "fortran.tab.c" 6636 break; 6637 6638 case 1065: 6639 #line 4633 "fortran.y" 6640 { 6509 6641 if ( inside_type_declare ) break; 6510 6642 if ( inmoduledeclare ) … … 6534 6666 else printf("l.%4d -- TOK_CONTAINS -- MHCHECK\n",line_num_input); 6535 6667 } 6536 #line 6537 "fortran.tab.c" /* yacc.c:1646 */ 6537 break; 6538 6539 case 1063: 6540 #line 4664 "fortran.y" /* yacc.c:1646 */ 6541 {strcpy((yyval.na),"");} 6542 #line 6543 "fortran.tab.c" /* yacc.c:1646 */ 6543 break; 6544 6545 case 1064: 6546 #line 4665 "fortran.y" /* yacc.c:1646 */ 6547 {strcpy((yyval.na),(yyvsp[0].na));} 6548 #line 6549 "fortran.tab.c" /* yacc.c:1646 */ 6549 break; 6550 6551 case 1070: 6552 #line 4793 "fortran.y" /* yacc.c:1646 */ 6553 { afterpercent = 1; } 6554 #line 6555 "fortran.tab.c" /* yacc.c:1646 */ 6555 break; 6556 6557 6558 #line 6559 "fortran.tab.c" /* yacc.c:1646 */ 6668 #line 6669 "fortran.tab.c" 6669 break; 6670 6671 case 1067: 6672 #line 4668 "fortran.y" 6673 {strcpy((yyval.na),"");} 6674 #line 6675 "fortran.tab.c" 6675 break; 6676 6677 case 1068: 6678 #line 4669 "fortran.y" 6679 {strcpy((yyval.na),(yyvsp[0].na));} 6680 #line 6681 "fortran.tab.c" 6681 break; 6682 6683 case 1074: 6684 #line 4797 "fortran.y" 6685 { afterpercent = 1; } 6686 #line 6687 "fortran.tab.c" 6687 break; 6688 6689 6690 #line 6691 "fortran.tab.c" 6691 6559 6692 default: break; 6560 6693 } … … 6581 6714 that goes to, based on the state we popped back to and the rule 6582 6715 number reduced by. */ 6583 6584 yyn = yyr1[yyn]; 6585 6586 yystate = yypgoto[yyn - YYNTOKENS] + *yyssp; 6587 if (0 <= yystate && yystate <= YYLAST && yycheck[yystate] == *yyssp) 6588 yystate = yytable[yystate]; 6589 else 6590 yystate = yydefgoto[yyn - YYNTOKENS]; 6716 { 6717 const int yylhs = yyr1[yyn] - YYNTOKENS; 6718 const int yyi = yypgoto[yylhs] + *yyssp; 6719 yystate = (0 <= yyi && yyi <= YYLAST && yycheck[yyi] == *yyssp 6720 ? yytable[yyi] 6721 : yydefgoto[yylhs]); 6722 } 6591 6723 6592 6724 goto yynewstate; … … 6620 6752 if (yymsg != yymsgbuf) 6621 6753 YYSTACK_FREE (yymsg); 6622 yymsg = (char *) YYSTACK_ALLOC (yymsg_alloc);6754 yymsg = YY_CAST (char *, YYSTACK_ALLOC (YY_CAST (YYSIZE_T, yymsg_alloc))); 6623 6755 if (!yymsg) 6624 6756 { … … 6671 6803 `---------------------------------------------------*/ 6672 6804 yyerrorlab: 6673 6674 /* Pacify compilers like GCC when the user code never invokes 6675 YYERROR and the label yyerrorlab therefore never appears in user 6676 code. */ 6677 if (/*CONSTCOND*/ 0) 6678 goto yyerrorlab; 6805 /* Pacify compilers when the user code never invokes YYERROR and the 6806 label yyerrorlab therefore never appears in user code. */ 6807 if (0) 6808 YYERROR; 6679 6809 6680 6810 /* Do not reclaim the symbols of the rule whose action triggered … … 6738 6868 goto yyreturn; 6739 6869 6870 6740 6871 /*-----------------------------------. 6741 6872 | yyabortlab -- YYABORT comes here. | … … 6744 6875 yyresult = 1; 6745 6876 goto yyreturn; 6877 6746 6878 6747 6879 #if !defined yyoverflow || YYERROR_VERBOSE … … 6755 6887 #endif 6756 6888 6889 6890 /*-----------------------------------------------------. 6891 | yyreturn -- parsing is finished, return the result. | 6892 `-----------------------------------------------------*/ 6757 6893 yyreturn: 6758 6894 if (yychar != YYEMPTY) … … 6771 6907 { 6772 6908 yydestruct ("Cleanup: popping", 6773 yystos[ *yyssp], yyvsp);6909 yystos[+*yyssp], yyvsp); 6774 6910 YYPOPSTACK (1); 6775 6911 } … … 6784 6920 return yyresult; 6785 6921 } 6786 #line 489 0 "fortran.y" /* yacc.c:1906 */6922 #line 4894 "fortran.y" 6787 6923 6788 6924 … … 6866 7002 #define yy_create_buffer fortran__create_buffer 6867 7003 #define yy_delete_buffer fortran__delete_buffer 6868 #define yy_flex_debug fortran__flex_debug 7004 #define yy_scan_buffer fortran__scan_buffer 7005 #define yy_scan_string fortran__scan_string 7006 #define yy_scan_bytes fortran__scan_bytes 6869 7007 #define yy_init_buffer fortran__init_buffer 6870 7008 #define yy_flush_buffer fortran__flush_buffer 6871 7009 #define yy_load_buffer_state fortran__load_buffer_state 6872 7010 #define yy_switch_to_buffer fortran__switch_to_buffer 7011 #define yypush_buffer_state fortran_push_buffer_state 7012 #define yypop_buffer_state fortran_pop_buffer_state 7013 #define yyensure_buffer_stack fortran_ensure_buffer_stack 7014 #define yy_flex_debug fortran__flex_debug 6873 7015 #define yyin fortran_in 6874 7016 #define yyleng fortran_leng … … 6885 7027 #define FLEX_SCANNER 6886 7028 #define YY_FLEX_MAJOR_VERSION 2 6887 #define YY_FLEX_MINOR_VERSION 56888 #define YY_FLEX_SUBMINOR_VERSION 377029 #define YY_FLEX_MINOR_VERSION 6 7030 #define YY_FLEX_SUBMINOR_VERSION 4 6889 7031 #if YY_FLEX_SUBMINOR_VERSION > 0 6890 7032 #define FLEX_BETA 7033 #endif 7034 7035 #ifdef yy_create_buffer 7036 #define fortran__create_buffer_ALREADY_DEFINED 7037 #else 7038 #define yy_create_buffer fortran__create_buffer 7039 #endif 7040 7041 #ifdef yy_delete_buffer 7042 #define fortran__delete_buffer_ALREADY_DEFINED 7043 #else 7044 #define yy_delete_buffer fortran__delete_buffer 7045 #endif 7046 7047 #ifdef yy_scan_buffer 7048 #define fortran__scan_buffer_ALREADY_DEFINED 7049 #else 7050 #define yy_scan_buffer fortran__scan_buffer 7051 #endif 7052 7053 #ifdef yy_scan_string 7054 #define fortran__scan_string_ALREADY_DEFINED 7055 #else 7056 #define yy_scan_string fortran__scan_string 7057 #endif 7058 7059 #ifdef yy_scan_bytes 7060 #define fortran__scan_bytes_ALREADY_DEFINED 7061 #else 7062 #define yy_scan_bytes fortran__scan_bytes 7063 #endif 7064 7065 #ifdef yy_init_buffer 7066 #define fortran__init_buffer_ALREADY_DEFINED 7067 #else 7068 #define yy_init_buffer fortran__init_buffer 7069 #endif 7070 7071 #ifdef yy_flush_buffer 7072 #define fortran__flush_buffer_ALREADY_DEFINED 7073 #else 7074 #define yy_flush_buffer fortran__flush_buffer 7075 #endif 7076 7077 #ifdef yy_load_buffer_state 7078 #define fortran__load_buffer_state_ALREADY_DEFINED 7079 #else 7080 #define yy_load_buffer_state fortran__load_buffer_state 7081 #endif 7082 7083 #ifdef yy_switch_to_buffer 7084 #define fortran__switch_to_buffer_ALREADY_DEFINED 7085 #else 7086 #define yy_switch_to_buffer fortran__switch_to_buffer 7087 #endif 7088 7089 #ifdef yypush_buffer_state 7090 #define fortran_push_buffer_state_ALREADY_DEFINED 7091 #else 7092 #define yypush_buffer_state fortran_push_buffer_state 7093 #endif 7094 7095 #ifdef yypop_buffer_state 7096 #define fortran_pop_buffer_state_ALREADY_DEFINED 7097 #else 7098 #define yypop_buffer_state fortran_pop_buffer_state 7099 #endif 7100 7101 #ifdef yyensure_buffer_stack 7102 #define fortran_ensure_buffer_stack_ALREADY_DEFINED 7103 #else 7104 #define yyensure_buffer_stack fortran_ensure_buffer_stack 7105 #endif 7106 7107 #ifdef yylex 7108 #define fortran_lex_ALREADY_DEFINED 7109 #else 7110 #define yylex fortran_lex 7111 #endif 7112 7113 #ifdef yyrestart 7114 #define fortran_restart_ALREADY_DEFINED 7115 #else 7116 #define yyrestart fortran_restart 7117 #endif 7118 7119 #ifdef yylex_init 7120 #define fortran_lex_init_ALREADY_DEFINED 7121 #else 7122 #define yylex_init fortran_lex_init 7123 #endif 7124 7125 #ifdef yylex_init_extra 7126 #define fortran_lex_init_extra_ALREADY_DEFINED 7127 #else 7128 #define yylex_init_extra fortran_lex_init_extra 7129 #endif 7130 7131 #ifdef yylex_destroy 7132 #define fortran_lex_destroy_ALREADY_DEFINED 7133 #else 7134 #define yylex_destroy fortran_lex_destroy 7135 #endif 7136 7137 #ifdef yyget_debug 7138 #define fortran_get_debug_ALREADY_DEFINED 7139 #else 7140 #define yyget_debug fortran_get_debug 7141 #endif 7142 7143 #ifdef yyset_debug 7144 #define fortran_set_debug_ALREADY_DEFINED 7145 #else 7146 #define yyset_debug fortran_set_debug 7147 #endif 7148 7149 #ifdef yyget_extra 7150 #define fortran_get_extra_ALREADY_DEFINED 7151 #else 7152 #define yyget_extra fortran_get_extra 7153 #endif 7154 7155 #ifdef yyset_extra 7156 #define fortran_set_extra_ALREADY_DEFINED 7157 #else 7158 #define yyset_extra fortran_set_extra 7159 #endif 7160 7161 #ifdef yyget_in 7162 #define fortran_get_in_ALREADY_DEFINED 7163 #else 7164 #define yyget_in fortran_get_in 7165 #endif 7166 7167 #ifdef yyset_in 7168 #define fortran_set_in_ALREADY_DEFINED 7169 #else 7170 #define yyset_in fortran_set_in 7171 #endif 7172 7173 #ifdef yyget_out 7174 #define fortran_get_out_ALREADY_DEFINED 7175 #else 7176 #define yyget_out fortran_get_out 7177 #endif 7178 7179 #ifdef yyset_out 7180 #define fortran_set_out_ALREADY_DEFINED 7181 #else 7182 #define yyset_out fortran_set_out 7183 #endif 7184 7185 #ifdef yyget_leng 7186 #define fortran_get_leng_ALREADY_DEFINED 7187 #else 7188 #define yyget_leng fortran_get_leng 7189 #endif 7190 7191 #ifdef yyget_text 7192 #define fortran_get_text_ALREADY_DEFINED 7193 #else 7194 #define yyget_text fortran_get_text 7195 #endif 7196 7197 #ifdef yyget_lineno 7198 #define fortran_get_lineno_ALREADY_DEFINED 7199 #else 7200 #define yyget_lineno fortran_get_lineno 7201 #endif 7202 7203 #ifdef yyset_lineno 7204 #define fortran_set_lineno_ALREADY_DEFINED 7205 #else 7206 #define yyset_lineno fortran_set_lineno 7207 #endif 7208 7209 #ifdef yywrap 7210 #define fortran_wrap_ALREADY_DEFINED 7211 #else 7212 #define yywrap fortran_wrap 7213 #endif 7214 7215 #ifdef yyalloc 7216 #define fortran_alloc_ALREADY_DEFINED 7217 #else 7218 #define yyalloc fortran_alloc 7219 #endif 7220 7221 #ifdef yyrealloc 7222 #define fortran_realloc_ALREADY_DEFINED 7223 #else 7224 #define yyrealloc fortran_realloc 7225 #endif 7226 7227 #ifdef yyfree 7228 #define fortran_free_ALREADY_DEFINED 7229 #else 7230 #define yyfree fortran_free 7231 #endif 7232 7233 #ifdef yytext 7234 #define fortran_text_ALREADY_DEFINED 7235 #else 7236 #define yytext fortran_text 7237 #endif 7238 7239 #ifdef yyleng 7240 #define fortran_leng_ALREADY_DEFINED 7241 #else 7242 #define yyleng fortran_leng 7243 #endif 7244 7245 #ifdef yyin 7246 #define fortran_in_ALREADY_DEFINED 7247 #else 7248 #define yyin fortran_in 7249 #endif 7250 7251 #ifdef yyout 7252 #define fortran_out_ALREADY_DEFINED 7253 #else 7254 #define yyout fortran_out 7255 #endif 7256 7257 #ifdef yy_flex_debug 7258 #define fortran__flex_debug_ALREADY_DEFINED 7259 #else 7260 #define yy_flex_debug fortran__flex_debug 7261 #endif 7262 7263 #ifdef yylineno 7264 #define fortran_lineno_ALREADY_DEFINED 7265 #else 7266 #define yylineno fortran_lineno 6891 7267 #endif 6892 7268 … … 6961 7337 #endif 6962 7338 7339 #ifndef SIZE_MAX 7340 #define SIZE_MAX (~(size_t)0) 7341 #endif 7342 6963 7343 #endif /* ! C99 */ 6964 7344 6965 7345 #endif /* ! FLEXINT_H */ 6966 7346 6967 #ifdef __cplusplus 6968 6969 /* The "const" storage-class-modifier is valid. */ 6970 #define YY_USE_CONST 6971 6972 #else /* ! __cplusplus */ 6973 6974 /* C99 requires __STDC__ to be defined as 1. */ 6975 #if defined (__STDC__) 6976 6977 #define YY_USE_CONST 6978 6979 #endif /* defined (__STDC__) */ 6980 #endif /* ! __cplusplus */ 6981 6982 #ifdef YY_USE_CONST 7347 /* begin standard C++ headers. */ 7348 7349 /* TODO: this is always defined, so inline it */ 6983 7350 #define yyconst const 7351 7352 #if defined(__GNUC__) && __GNUC__ >= 3 7353 #define yynoreturn __attribute__((__noreturn__)) 6984 7354 #else 6985 #define yy const7355 #define yynoreturn 6986 7356 #endif 6987 7357 … … 6989 7359 #define YY_NULL 0 6990 7360 6991 /* Promotes a possibly negative, possibly signed char to an unsigned 6992 * integer for use as an array index. If the signed char is negative, 6993 * we want to instead treat it as an 8-bit unsigned char, hence the 6994 * double cast. 7361 /* Promotes a possibly negative, possibly signed char to an 7362 * integer in range [0..255] for use as an array index. 6995 7363 */ 6996 #define YY_SC_TO_UI(c) (( unsigned int) (unsigned char) c)7364 #define YY_SC_TO_UI(c) ((YY_CHAR) (c)) 6997 7365 6998 7366 /* Enter a start condition. This macro really ought to take a parameter, … … 7001 7369 */ 7002 7370 #define BEGIN (yy_start) = 1 + 2 * 7003 7004 7371 /* Translate the current start state into a value that can be later handed 7005 7372 * to BEGIN to return to the state. The YYSTATE alias is for lex … … 7008 7375 #define YY_START (((yy_start) - 1) / 2) 7009 7376 #define YYSTATE YY_START 7010 7011 7377 /* Action number for EOF rule of a given start state. */ 7012 7378 #define YY_STATE_EOF(state) (YY_END_OF_BUFFER + state + 1) 7013 7014 7379 /* Special action meaning "start processing a new file". */ 7015 #define YY_NEW_FILE fortran_restart(fortran_in ) 7016 7380 #define YY_NEW_FILE yyrestart( yyin ) 7017 7381 #define YY_END_OF_BUFFER_CHAR 0 7018 7382 7019 7383 /* Size of default input buffer. */ 7020 7384 #ifndef YY_BUF_SIZE 7385 #ifdef __ia64__ 7386 /* On IA-64, the buffer size is 16k, not 8k. 7387 * Moreover, YY_BUF_SIZE is 2*YY_READ_BUF_SIZE in the general case. 7388 * Ditto for the __ia64__ case accordingly. 7389 */ 7390 #define YY_BUF_SIZE 32768 7391 #else 7021 7392 #define YY_BUF_SIZE 16384 7393 #endif /* __ia64__ */ 7022 7394 #endif 7023 7395 … … 7036 7408 #endif 7037 7409 7038 extern yy_size_t fortran_leng;7039 7040 extern FILE * fortran_in, *fortran_out;7410 extern int yyleng; 7411 7412 extern FILE *yyin, *yyout; 7041 7413 7042 7414 #define EOB_ACT_CONTINUE_SCAN 0 7043 7415 #define EOB_ACT_END_OF_FILE 1 7044 7416 #define EOB_ACT_LAST_MATCH 2 7045 7417 7046 7418 #define YY_LESS_LINENO(n) 7419 #define YY_LINENO_REWIND_TO(ptr) 7047 7420 7048 7421 /* Return all but the first "n" matched characters back to the input stream. */ … … 7050 7423 do \ 7051 7424 { \ 7052 /* Undo effects of setting up fortran_text. */ \7425 /* Undo effects of setting up yytext. */ \ 7053 7426 int yyless_macro_arg = (n); \ 7054 7427 YY_LESS_LINENO(yyless_macro_arg);\ … … 7056 7429 YY_RESTORE_YY_MORE_OFFSET \ 7057 7430 (yy_c_buf_p) = yy_cp = yy_bp + yyless_macro_arg - YY_MORE_ADJ; \ 7058 YY_DO_BEFORE_ACTION; /* set up fortran_text again */ \7431 YY_DO_BEFORE_ACTION; /* set up yytext again */ \ 7059 7432 } \ 7060 7433 while ( 0 ) 7061 7062 7434 #define unput(c) yyunput( c, (yytext_ptr) ) 7063 7435 … … 7074 7446 * characters. 7075 7447 */ 7076 yy_size_t yy_buf_size;7448 int yy_buf_size; 7077 7449 7078 7450 /* Number of characters read into yy_ch_buf, not including EOB 7079 7451 * characters. 7080 7452 */ 7081 yy_size_t yy_n_chars;7453 int yy_n_chars; 7082 7454 7083 7455 /* Whether we "own" the buffer - i.e., we know we created it, … … 7102 7474 int yy_bs_lineno; /**< The line count. */ 7103 7475 int yy_bs_column; /**< The column count. */ 7104 7476 7105 7477 /* Whether to try to fill the input buffer when we reach the 7106 7478 * end of it. … … 7119 7491 * 7120 7492 * When we actually see the EOF, we change the status to "new" 7121 * (via fortran_restart()), so that the user can continue scanning by7122 * just pointing fortran_in at a new input file.7493 * (via yyrestart()), so that the user can continue scanning by 7494 * just pointing yyin at a new input file. 7123 7495 */ 7124 7496 #define YY_BUFFER_EOF_PENDING 2 … … 7130 7502 static size_t yy_buffer_stack_top = 0; /**< index of top of stack. */ 7131 7503 static size_t yy_buffer_stack_max = 0; /**< capacity of stack. */ 7132 static YY_BUFFER_STATE * yy_buffer_stack = 0; /**< Stack as an array. */7504 static YY_BUFFER_STATE * yy_buffer_stack = NULL; /**< Stack as an array. */ 7133 7505 7134 7506 /* We provide macros for accessing buffer states in case in the … … 7141 7513 ? (yy_buffer_stack)[(yy_buffer_stack_top)] \ 7142 7514 : NULL) 7143 7144 7515 /* Same as previous macro, but useful when we know that the buffer stack is not 7145 7516 * NULL or when we need an lvalue. For internal use only. … … 7147 7518 #define YY_CURRENT_BUFFER_LVALUE (yy_buffer_stack)[(yy_buffer_stack_top)] 7148 7519 7149 /* yy_hold_char holds the character lost when fortran_text is formed. */7520 /* yy_hold_char holds the character lost when yytext is formed. */ 7150 7521 static char yy_hold_char; 7151 static yy_size_t yy_n_chars; /* number of characters read into yy_ch_buf */7152 yy_size_t fortran_leng;7522 static int yy_n_chars; /* number of characters read into yy_ch_buf */ 7523 int yyleng; 7153 7524 7154 7525 /* Points to current character in buffer. */ 7155 static char *yy_c_buf_p = (char *) 0;7526 static char *yy_c_buf_p = NULL; 7156 7527 static int yy_init = 0; /* whether we need to initialize */ 7157 7528 static int yy_start = 0; /* start state number */ 7158 7529 7159 /* Flag which is used to allow fortran_wrap()'s to do buffer switches7160 * instead of setting up a fresh fortran_in. A bit of a hack ...7530 /* Flag which is used to allow yywrap()'s to do buffer switches 7531 * instead of setting up a fresh yyin. A bit of a hack ... 7161 7532 */ 7162 7533 static int yy_did_buffer_switch_on_eof; 7163 7534 7164 void fortran_restart (FILE *input_file ); 7165 void fortran__switch_to_buffer (YY_BUFFER_STATE new_buffer ); 7166 YY_BUFFER_STATE fortran__create_buffer (FILE *file,int size ); 7167 void fortran__delete_buffer (YY_BUFFER_STATE b ); 7168 void fortran__flush_buffer (YY_BUFFER_STATE b ); 7169 void fortran_push_buffer_state (YY_BUFFER_STATE new_buffer ); 7170 void fortran_pop_buffer_state (void ); 7171 7172 static void fortran_ensure_buffer_stack (void ); 7173 static void fortran__load_buffer_state (void ); 7174 static void fortran__init_buffer (YY_BUFFER_STATE b,FILE *file ); 7175 7176 #define YY_FLUSH_BUFFER fortran__flush_buffer(YY_CURRENT_BUFFER ) 7177 7178 YY_BUFFER_STATE fortran__scan_buffer (char *base,yy_size_t size ); 7179 YY_BUFFER_STATE fortran__scan_string (yyconst char *yy_str ); 7180 YY_BUFFER_STATE fortran__scan_bytes (yyconst char *bytes,yy_size_t len ); 7181 7182 void *fortran_alloc (yy_size_t ); 7183 void *fortran_realloc (void *,yy_size_t ); 7184 void fortran_free (void * ); 7185 7186 #define yy_new_buffer fortran__create_buffer 7187 7535 void yyrestart ( FILE *input_file ); 7536 void yy_switch_to_buffer ( YY_BUFFER_STATE new_buffer ); 7537 YY_BUFFER_STATE yy_create_buffer ( FILE *file, int size ); 7538 void yy_delete_buffer ( YY_BUFFER_STATE b ); 7539 void yy_flush_buffer ( YY_BUFFER_STATE b ); 7540 void yypush_buffer_state ( YY_BUFFER_STATE new_buffer ); 7541 void yypop_buffer_state ( void ); 7542 7543 static void yyensure_buffer_stack ( void ); 7544 static void yy_load_buffer_state ( void ); 7545 static void yy_init_buffer ( YY_BUFFER_STATE b, FILE *file ); 7546 #define YY_FLUSH_BUFFER yy_flush_buffer( YY_CURRENT_BUFFER ) 7547 7548 YY_BUFFER_STATE yy_scan_buffer ( char *base, yy_size_t size ); 7549 YY_BUFFER_STATE yy_scan_string ( const char *yy_str ); 7550 YY_BUFFER_STATE yy_scan_bytes ( const char *bytes, int len ); 7551 7552 void *yyalloc ( yy_size_t ); 7553 void *yyrealloc ( void *, yy_size_t ); 7554 void yyfree ( void * ); 7555 7556 #define yy_new_buffer yy_create_buffer 7188 7557 #define yy_set_interactive(is_interactive) \ 7189 7558 { \ 7190 7559 if ( ! YY_CURRENT_BUFFER ){ \ 7191 fortran_ensure_buffer_stack (); \7560 yyensure_buffer_stack (); \ 7192 7561 YY_CURRENT_BUFFER_LVALUE = \ 7193 fortran__create_buffer(fortran_in,YY_BUF_SIZE ); \7562 yy_create_buffer( yyin, YY_BUF_SIZE ); \ 7194 7563 } \ 7195 7564 YY_CURRENT_BUFFER_LVALUE->yy_is_interactive = is_interactive; \ 7196 7565 } 7197 7198 7566 #define yy_set_bol(at_bol) \ 7199 7567 { \ 7200 7568 if ( ! YY_CURRENT_BUFFER ){\ 7201 fortran_ensure_buffer_stack (); \7569 yyensure_buffer_stack (); \ 7202 7570 YY_CURRENT_BUFFER_LVALUE = \ 7203 fortran__create_buffer(fortran_in,YY_BUF_SIZE ); \7571 yy_create_buffer( yyin, YY_BUF_SIZE ); \ 7204 7572 } \ 7205 7573 YY_CURRENT_BUFFER_LVALUE->yy_at_bol = at_bol; \ 7206 7574 } 7207 7208 7575 #define YY_AT_BOL() (YY_CURRENT_BUFFER_LVALUE->yy_at_bol) 7209 7576 7210 7577 /* Begin user sect3 */ 7211 7578 7212 #define fortran_wrap() 17579 #define fortran_wrap() (/*CONSTCOND*/1) 7213 7580 #define YY_SKIP_YYWRAP 7214 7215 typedef unsigned char YY_CHAR; 7216 7217 FILE *fortran_in = (FILE *) 0, *fortran_out = (FILE *) 0; 7581 typedef flex_uint8_t YY_CHAR; 7582 7583 FILE *yyin = NULL, *yyout = NULL; 7218 7584 7219 7585 typedef int yy_state_type; 7220 7586 7221 extern int fortran_lineno; 7222 7223 int fortran_lineno = 1; 7224 7225 extern char *fortran_text; 7226 #define yytext_ptr fortran_text 7227 7228 static yy_state_type yy_get_previous_state (void ); 7229 static yy_state_type yy_try_NUL_trans (yy_state_type current_state ); 7230 static int yy_get_next_buffer (void ); 7231 static void yy_fatal_error (yyconst char msg[] ); 7587 extern int yylineno; 7588 int yylineno = 1; 7589 7590 extern char *yytext; 7591 #ifdef yytext_ptr 7592 #undef yytext_ptr 7593 #endif 7594 #define yytext_ptr yytext 7595 7596 static yy_state_type yy_get_previous_state ( void ); 7597 static yy_state_type yy_try_NUL_trans ( yy_state_type current_state ); 7598 static int yy_get_next_buffer ( void ); 7599 static void yynoreturn yy_fatal_error ( const char* msg ); 7232 7600 7233 7601 /* Done after the current pattern has been matched and before the 7234 * corresponding action - sets up fortran_text.7602 * corresponding action - sets up yytext. 7235 7603 */ 7236 7604 #define YY_DO_BEFORE_ACTION \ 7237 7605 (yytext_ptr) = yy_bp; \ 7238 fortran_leng = (size_t) (yy_cp - yy_bp); \7606 yyleng = (int) (yy_cp - yy_bp); \ 7239 7607 (yy_hold_char) = *yy_cp; \ 7240 7608 *yy_cp = '\0'; \ 7241 7609 (yy_c_buf_p) = yy_cp; 7242 7243 7610 #define YY_NUM_RULES 179 7244 7611 #define YY_END_OF_BUFFER 180 … … 7250 7617 flex_int32_t yy_nxt; 7251 7618 }; 7252 static yyconst flex_int16_t yy_acclist[1606] =7619 static const flex_int16_t yy_acclist[1606] = 7253 7620 { 0, 7254 7621 144, 144, 180, 179, 168, 179, 167, 179, 178, 179, … … 7431 7798 } ; 7432 7799 7433 static yyconst flex_int16_t yy_accept[1899] =7800 static const flex_int16_t yy_accept[1899] = 7434 7801 { 0, 7435 7802 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, … … 7644 8011 } ; 7645 8012 7646 static yyconst flex_int32_tyy_ec[256] =8013 static const YY_CHAR yy_ec[256] = 7647 8014 { 0, 7648 8015 1, 1, 1, 1, 1, 1, 1, 1, 2, 3, … … 7676 8043 } ; 7677 8044 7678 static yyconst flex_int32_tyy_meta[81] =8045 static const YY_CHAR yy_meta[81] = 7679 8046 { 0, 7680 8047 1, 2, 3, 2, 4, 5, 4, 4, 1, 4, … … 7688 8055 } ; 7689 8056 7690 static yyconst flex_int16_t yy_base[2066] =8057 static const flex_int16_t yy_base[2066] = 7691 8058 { 0, 7692 8059 0, 79, 0, 0, 0, 151, 2917, 82, 2913, 86, … … 7919 8286 } ; 7920 8287 7921 static yyconst flex_int16_t yy_def[2066] =8288 static const flex_int16_t yy_def[2066] = 7922 8289 { 0, 7923 8290 1897, 1, 1898, 1898, 1, 1, 1899, 1899, 1900, 1900, … … 8150 8517 } ; 8151 8518 8152 static yyconst flex_int16_t yy_nxt[9721] =8519 static const flex_int16_t yy_nxt[9721] = 8153 8520 { 0, 8154 8521 18, 19, 20, 19, 21, 22, 18, 23, 24, 25, … … 9223 9590 } ; 9224 9591 9225 static yyconst flex_int16_t yy_chk[9721] =9592 static const flex_int16_t yy_chk[9721] = 9226 9593 { 0, 9227 9594 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, … … 10296 10663 } ; 10297 10664 10298 extern int fortran__flex_debug;10299 int fortran__flex_debug = 0;10665 extern int yy_flex_debug; 10666 int yy_flex_debug = 0; 10300 10667 10301 10668 static yy_state_type *yy_state_buf=0, *yy_state_ptr=0; … … 10309 10676 #define REJECT \ 10310 10677 { \ 10311 *yy_cp = (yy_hold_char); /* undo effects of setting up fortran_text */ \10678 *yy_cp = (yy_hold_char); /* undo effects of setting up yytext */ \ 10312 10679 yy_cp = (yy_full_match); /* restore poss. backed-over text */ \ 10313 10680 (yy_lp) = (yy_full_lp); /* restore orig. accepting pos. */ \ … … 10321 10688 #define YY_MORE_ADJ 0 10322 10689 #define YY_RESTORE_YY_MORE_OFFSET 10323 char * fortran_text;10690 char *yytext; 10324 10691 #line 1 "fortran.lex" 10325 10692 /******************************************************************************/ … … 10368 10735 #include <stdlib.h> 10369 10736 #include <string.h> 10370 extern FILE * fortran_in;10737 extern FILE * yyin; 10371 10738 #define MAX_INCLUDE_DEPTH 30 10372 10739 #define YY_BUF_SIZE 64000 … … 10397 10764 void out_of_donottreat(void); 10398 10765 10399 #line 3543 "fortran.yy.c" 10766 #line 3774 "fortran.yy.c" 10767 #line 3775 "fortran.yy.c" 10400 10768 10401 10769 #define INITIAL 0 … … 10420 10788 #endif 10421 10789 10422 static int yy_init_globals ( void );10790 static int yy_init_globals ( void ); 10423 10791 10424 10792 /* Accessor methods to globals. 10425 10793 These are made visible to non-reentrant scanners for convenience. */ 10426 10794 10427 int fortran_lex_destroy (void );10428 10429 int fortran_get_debug (void );10430 10431 void fortran_set_debug (int debug_flag );10432 10433 YY_EXTRA_TYPE fortran_get_extra (void );10434 10435 void fortran_set_extra (YY_EXTRA_TYPE user_defined );10436 10437 FILE * fortran_get_in (void );10438 10439 void fortran_set_in (FILE *in_str );10440 10441 FILE * fortran_get_out (void );10442 10443 void fortran_set_out (FILE *out_str );10444 10445 yy_size_t fortran_get_leng (void );10446 10447 char * fortran_get_text (void );10448 10449 int fortran_get_lineno (void );10450 10451 void fortran_set_lineno (intline_number );10795 int yylex_destroy ( void ); 10796 10797 int yyget_debug ( void ); 10798 10799 void yyset_debug ( int debug_flag ); 10800 10801 YY_EXTRA_TYPE yyget_extra ( void ); 10802 10803 void yyset_extra ( YY_EXTRA_TYPE user_defined ); 10804 10805 FILE *yyget_in ( void ); 10806 10807 void yyset_in ( FILE * _in_str ); 10808 10809 FILE *yyget_out ( void ); 10810 10811 void yyset_out ( FILE * _out_str ); 10812 10813 int yyget_leng ( void ); 10814 10815 char *yyget_text ( void ); 10816 10817 int yyget_lineno ( void ); 10818 10819 void yyset_lineno ( int _line_number ); 10452 10820 10453 10821 /* Macros after this point can all be overridden by user definitions in … … 10457 10825 #ifndef YY_SKIP_YYWRAP 10458 10826 #ifdef __cplusplus 10459 extern "C" int fortran_wrap (void );10827 extern "C" int yywrap ( void ); 10460 10828 #else 10461 extern int fortran_wrap (void );10829 extern int yywrap ( void ); 10462 10830 #endif 10463 10831 #endif 10464 10832 10465 static void yyunput (int c,char *buf_ptr ); 10833 #ifndef YY_NO_UNPUT 10466 10834 10835 static void yyunput ( int c, char *buf_ptr ); 10836 10837 #endif 10838 10467 10839 #ifndef yytext_ptr 10468 static void yy_flex_strncpy ( char *,yyconst char *,int );10840 static void yy_flex_strncpy ( char *, const char *, int ); 10469 10841 #endif 10470 10842 10471 10843 #ifdef YY_NEED_STRLEN 10472 static int yy_flex_strlen ( yyconst char * );10844 static int yy_flex_strlen ( const char * ); 10473 10845 #endif 10474 10846 10475 10847 #ifndef YY_NO_INPUT 10476 10477 10848 #ifdef __cplusplus 10478 static int yyinput ( void );10849 static int yyinput ( void ); 10479 10850 #else 10480 static int input ( void );10851 static int input ( void ); 10481 10852 #endif 10482 10853 … … 10485 10856 /* Amount of stuff to slurp up with each read. */ 10486 10857 #ifndef YY_READ_BUF_SIZE 10858 #ifdef __ia64__ 10859 /* On IA-64, the buffer size is 16k, not 8k */ 10860 #define YY_READ_BUF_SIZE 16384 10861 #else 10487 10862 #define YY_READ_BUF_SIZE 8192 10863 #endif /* __ia64__ */ 10488 10864 #endif 10489 10865 … … 10493 10869 * we now use fwrite(). 10494 10870 */ 10495 #define ECHO do { if (fwrite( fortran_text, fortran_leng, 1, fortran_out )) {} } while (0)10871 #define ECHO do { if (fwrite( yytext, (size_t) yyleng, 1, yyout )) {} } while (0) 10496 10872 #endif 10497 10873 … … 10504 10880 { \ 10505 10881 int c = '*'; \ 10506 size_t n; \10882 int n; \ 10507 10883 for ( n = 0; n < max_size && \ 10508 (c = getc( fortran_in )) != EOF && c != '\n'; ++n ) \10884 (c = getc( yyin )) != EOF && c != '\n'; ++n ) \ 10509 10885 buf[n] = (char) c; \ 10510 10886 if ( c == '\n' ) \ 10511 10887 buf[n++] = (char) c; \ 10512 if ( c == EOF && ferror( fortran_in ) ) \10888 if ( c == EOF && ferror( yyin ) ) \ 10513 10889 YY_FATAL_ERROR( "input in flex scanner failed" ); \ 10514 10890 result = n; \ … … 10517 10893 { \ 10518 10894 errno=0; \ 10519 while ( (result = fread(buf, 1, max_size, fortran_in))==0 && ferror(fortran_in)) \10895 while ( (result = (int) fread(buf, 1, (yy_size_t) max_size, yyin)) == 0 && ferror(yyin)) \ 10520 10896 { \ 10521 10897 if( errno != EINTR) \ … … 10525 10901 } \ 10526 10902 errno=0; \ 10527 clearerr( fortran_in); \10903 clearerr(yyin); \ 10528 10904 } \ 10529 10905 }\ … … 10558 10934 #define YY_DECL_IS_OURS 1 10559 10935 10560 extern int fortran_lex (void);10561 10562 #define YY_DECL int fortran_lex (void)10936 extern int yylex (void); 10937 10938 #define YY_DECL int yylex (void) 10563 10939 #endif /* !YY_DECL */ 10564 10940 10565 /* Code executed at the beginning of each rule, after fortran_text and fortran_leng10941 /* Code executed at the beginning of each rule, after yytext and yyleng 10566 10942 * have been set up. 10567 10943 */ … … 10572 10948 /* Code executed at the end of each rule. */ 10573 10949 #ifndef YY_BREAK 10574 #define YY_BREAK break;10950 #define YY_BREAK /*LINTED*/break; 10575 10951 #endif 10576 10952 10577 10953 #define YY_RULE_SETUP \ 10578 if ( fortran_leng > 0 ) \10954 if ( yyleng > 0 ) \ 10579 10955 YY_CURRENT_BUFFER_LVALUE->yy_at_bol = \ 10580 ( fortran_text[fortran_leng - 1] == '\n'); \10956 (yytext[yyleng - 1] == '\n'); \ 10581 10957 YY_USER_ACTION 10582 10958 … … 10585 10961 YY_DECL 10586 10962 { 10587 registeryy_state_type yy_current_state;10588 registerchar *yy_cp, *yy_bp;10589 registerint yy_act;10963 yy_state_type yy_current_state; 10964 char *yy_cp, *yy_bp; 10965 int yy_act; 10590 10966 10591 #line 101 "fortran.lex"10592 10593 if (infixed) BEGIN(fortran77style) ;10594 if (infree) BEGIN(fortran90style) ;10595 10596 #line 3740 "fortran.yy.c"10597 10598 10967 if ( !(yy_init) ) 10599 10968 { … … 10606 10975 /* Create the reject buffer large enough to save one state per allowed character. */ 10607 10976 if ( ! (yy_state_buf) ) 10608 (yy_state_buf) = (yy_state_type *) fortran_alloc(YY_STATE_BUF_SIZE );10977 (yy_state_buf) = (yy_state_type *)yyalloc(YY_STATE_BUF_SIZE ); 10609 10978 if ( ! (yy_state_buf) ) 10610 YY_FATAL_ERROR( "out of dynamic memory in fortran_lex()" );10979 YY_FATAL_ERROR( "out of dynamic memory in yylex()" ); 10611 10980 10612 10981 if ( ! (yy_start) ) 10613 10982 (yy_start) = 1; /* first start state */ 10614 10983 10615 if ( ! fortran_in )10616 fortran_in = stdin;10617 10618 if ( ! fortran_out )10619 fortran_out = stdout;10984 if ( ! yyin ) 10985 yyin = stdin; 10986 10987 if ( ! yyout ) 10988 yyout = stdout; 10620 10989 10621 10990 if ( ! YY_CURRENT_BUFFER ) { 10622 fortran_ensure_buffer_stack ();10991 yyensure_buffer_stack (); 10623 10992 YY_CURRENT_BUFFER_LVALUE = 10624 fortran__create_buffer(fortran_in,YY_BUF_SIZE );10993 yy_create_buffer( yyin, YY_BUF_SIZE ); 10625 10994 } 10626 10995 10627 fortran__load_buffer_state();10996 yy_load_buffer_state( ); 10628 10997 } 10629 10998 10630 while ( 1 ) /* loops until end-of-file is reached */ 10999 { 11000 #line 101 "fortran.lex" 11001 11002 #line 103 "fortran.lex" 11003 if (infixed) BEGIN(fortran77style) ; 11004 if (infree) BEGIN(fortran90style) ; 11005 11006 #line 4014 "fortran.yy.c" 11007 11008 while ( /*CONSTCOND*/1 ) /* loops until end-of-file is reached */ 10631 11009 { 10632 11010 yy_cp = (yy_c_buf_p); 10633 11011 10634 /* Support of fortran_text. */11012 /* Support of yytext. */ 10635 11013 *yy_cp = (yy_hold_char); 10636 11014 … … 10649 11027 do 10650 11028 { 10651 register YY_CHAR yy_c = yy_ec[YY_SC_TO_UI(*yy_cp)];11029 YY_CHAR yy_c = yy_ec[YY_SC_TO_UI(*yy_cp)] ; 10652 11030 while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state ) 10653 11031 { 10654 11032 yy_current_state = (int) yy_def[yy_current_state]; 10655 11033 if ( yy_current_state >= 1898 ) 10656 yy_c = yy_meta[ (unsigned int)yy_c];11034 yy_c = yy_meta[yy_c]; 10657 11035 } 10658 yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int)yy_c];11036 yy_current_state = yy_nxt[yy_base[yy_current_state] + yy_c]; 10659 11037 *(yy_state_ptr)++ = yy_current_state; 10660 11038 ++yy_cp; … … 10709 11087 case 1: 10710 11088 YY_RULE_SETUP 10711 #line 10 5"fortran.lex"11089 #line 106 "fortran.lex" 10712 11090 { return TOK_SUBROUTINE; } 10713 11091 YY_BREAK 10714 11092 case 2: 10715 11093 YY_RULE_SETUP 10716 #line 10 6"fortran.lex"11094 #line 107 "fortran.lex" 10717 11095 { return TOK_PROGRAM; } 10718 11096 YY_BREAK 10719 11097 case 3: 10720 11098 YY_RULE_SETUP 10721 #line 10 7"fortran.lex"11099 #line 108 "fortran.lex" 10722 11100 { inallocate = 1; return TOK_ALLOCATE; } 10723 11101 YY_BREAK 10724 11102 case 4: 10725 11103 YY_RULE_SETUP 10726 #line 10 8"fortran.lex"11104 #line 109 "fortran.lex" 10727 11105 { return TOK_CONTINUE; } 10728 11106 YY_BREAK 10729 11107 case 5: 10730 11108 YY_RULE_SETUP 10731 #line 1 09"fortran.lex"11109 #line 110 "fortran.lex" 10732 11110 { return TOK_NULLIFY; } 10733 11111 YY_BREAK 10734 11112 case 6: 10735 11113 YY_RULE_SETUP 10736 #line 11 0"fortran.lex"11114 #line 111 "fortran.lex" 10737 11115 { inallocate = 1; return TOK_DEALLOCATE; } 10738 11116 YY_BREAK 10739 11117 case 7: 10740 11118 YY_RULE_SETUP 10741 #line 11 1"fortran.lex"11119 #line 112 "fortran.lex" 10742 11120 { return TOK_RESULT; } 10743 11121 YY_BREAK 10744 11122 case 8: 10745 11123 YY_RULE_SETUP 10746 #line 11 2"fortran.lex"11124 #line 113 "fortran.lex" 10747 11125 { return TOK_FUNCTION; } 10748 11126 YY_BREAK 10749 11127 case 9: 10750 11128 YY_RULE_SETUP 10751 #line 11 3"fortran.lex"11129 #line 114 "fortran.lex" 10752 11130 { strcpy(yylval.na,fortran_text); return TOK_ENDUNIT;} 10753 11131 YY_BREAK 10754 11132 case 10: 10755 11133 YY_RULE_SETUP 10756 #line 11 4"fortran.lex"11134 #line 115 "fortran.lex" 10757 11135 { pos_curinclude = setposcur()-9; BEGIN(includestate); } 10758 11136 YY_BREAK 10759 11137 case 11: 10760 11138 YY_RULE_SETUP 10761 #line 11 5"fortran.lex"11139 #line 116 "fortran.lex" 10762 11140 { return TOK_USE;} 10763 11141 YY_BREAK 10764 11142 case 12: 10765 11143 YY_RULE_SETUP 10766 #line 11 6"fortran.lex"11144 #line 117 "fortran.lex" 10767 11145 { return TOK_REWIND; } 10768 11146 YY_BREAK 10769 11147 case 13: 10770 11148 YY_RULE_SETUP 10771 #line 11 7"fortran.lex"11149 #line 118 "fortran.lex" 10772 11150 { return TOK_IMPLICIT; } 10773 11151 YY_BREAK 10774 11152 case 14: 10775 11153 YY_RULE_SETUP 10776 #line 11 8"fortran.lex"11154 #line 119 "fortran.lex" 10777 11155 { return TOK_NONE; } 10778 11156 YY_BREAK 10779 11157 case 15: 10780 11158 YY_RULE_SETUP 10781 #line 1 19"fortran.lex"11159 #line 120 "fortran.lex" 10782 11160 { return TOK_CALL; } 10783 11161 YY_BREAK 10784 11162 case 16: 10785 11163 YY_RULE_SETUP 10786 #line 12 0"fortran.lex"11164 #line 121 "fortran.lex" 10787 11165 { strcpy(yylval.na,fortran_text); return TOK_TRUE; } 10788 11166 YY_BREAK 10789 11167 case 17: 10790 11168 YY_RULE_SETUP 10791 #line 12 1"fortran.lex"11169 #line 122 "fortran.lex" 10792 11170 { strcpy(yylval.na,fortran_text); return TOK_FALSE; } 10793 11171 YY_BREAK 10794 11172 case 18: 10795 11173 YY_RULE_SETUP 10796 #line 12 2"fortran.lex"11174 #line 123 "fortran.lex" 10797 11175 { return TOK_POINT_TO; } 10798 11176 YY_BREAK 10799 11177 case 19: 10800 11178 YY_RULE_SETUP 10801 #line 12 3"fortran.lex"11179 #line 124 "fortran.lex" 10802 11180 { strcpy(yylval.na,fortran_text); return TOK_ASSIGNTYPE;} 10803 11181 YY_BREAK 10804 11182 case 20: 10805 11183 YY_RULE_SETUP 10806 #line 12 4"fortran.lex"11184 #line 125 "fortran.lex" 10807 11185 { strcpy(yylval.na,fortran_text); return TOK_DASTER; } 10808 11186 YY_BREAK 10809 11187 case 21: 10810 11188 YY_RULE_SETUP 10811 #line 12 5"fortran.lex"11189 #line 126 "fortran.lex" 10812 11190 { strcpy(yylval.na,fortran_text); return TOK_EQV; } 10813 11191 YY_BREAK 10814 11192 case 22: 10815 11193 YY_RULE_SETUP 10816 #line 12 6"fortran.lex"11194 #line 127 "fortran.lex" 10817 11195 { strcpy(yylval.na,fortran_text); return TOK_EQ; } 10818 11196 YY_BREAK 10819 11197 case 23: 10820 11198 YY_RULE_SETUP 10821 #line 12 7"fortran.lex"11199 #line 128 "fortran.lex" 10822 11200 { strcpy(yylval.na,fortran_text); return TOK_GT; } 10823 11201 YY_BREAK 10824 11202 case 24: 10825 11203 YY_RULE_SETUP 10826 #line 12 8"fortran.lex"11204 #line 129 "fortran.lex" 10827 11205 { strcpy(yylval.na,fortran_text); return TOK_GE; } 10828 11206 YY_BREAK 10829 11207 case 25: 10830 11208 YY_RULE_SETUP 10831 #line 1 29"fortran.lex"11209 #line 130 "fortran.lex" 10832 11210 { strcpy(yylval.na,fortran_text); return TOK_LT; } 10833 11211 YY_BREAK 10834 11212 case 26: 10835 11213 YY_RULE_SETUP 10836 #line 13 0"fortran.lex"11214 #line 131 "fortran.lex" 10837 11215 { strcpy(yylval.na,fortran_text); return TOK_LE; } 10838 11216 YY_BREAK 10839 11217 case 27: 10840 11218 YY_RULE_SETUP 10841 #line 13 1"fortran.lex"11219 #line 132 "fortran.lex" 10842 11220 { strcpy(yylval.na,fortran_text); return TOK_NEQV;} 10843 11221 YY_BREAK 10844 11222 case 28: 10845 11223 YY_RULE_SETUP 10846 #line 13 2"fortran.lex"11224 #line 133 "fortran.lex" 10847 11225 { strcpy(yylval.na,fortran_text); return TOK_NE; } 10848 11226 YY_BREAK 10849 11227 case 29: 10850 11228 YY_RULE_SETUP 10851 #line 13 3"fortran.lex"11229 #line 134 "fortran.lex" 10852 11230 { strcpy(yylval.na,fortran_text); return TOK_NOT; } 10853 11231 YY_BREAK 10854 11232 case 30: 10855 11233 YY_RULE_SETUP 10856 #line 13 4"fortran.lex"11234 #line 135 "fortran.lex" 10857 11235 { strcpy(yylval.na,fortran_text); return TOK_OR; } 10858 11236 YY_BREAK 10859 11237 case 31: 10860 11238 YY_RULE_SETUP 10861 #line 13 5"fortran.lex"11239 #line 136 "fortran.lex" 10862 11240 { strcpy(yylval.na,fortran_text); return TOK_XOR; } 10863 11241 YY_BREAK 10864 11242 case 32: 10865 11243 YY_RULE_SETUP 10866 #line 13 6"fortran.lex"11244 #line 137 "fortran.lex" 10867 11245 { strcpy(yylval.na,fortran_text); return TOK_AND; } 10868 11246 YY_BREAK 10869 11247 case 33: 10870 11248 YY_RULE_SETUP 10871 #line 13 7"fortran.lex"11249 #line 138 "fortran.lex" 10872 11250 { strcpy(yylval.na,fortran_text); return TOK_EQUALEQUAL; } 10873 11251 YY_BREAK 10874 11252 case 34: 10875 11253 YY_RULE_SETUP 10876 #line 13 8"fortran.lex"11254 #line 139 "fortran.lex" 10877 11255 { strcpy(yylval.na,fortran_text); return TOK_SLASHEQUAL; } 10878 11256 YY_BREAK 10879 11257 case 35: 10880 11258 YY_RULE_SETUP 10881 #line 1 39"fortran.lex"11259 #line 140 "fortran.lex" 10882 11260 { strcpy(yylval.na,fortran_text); return TOK_INFEQUAL; } 10883 11261 YY_BREAK 10884 11262 case 36: 10885 11263 YY_RULE_SETUP 10886 #line 14 0"fortran.lex"11264 #line 141 "fortran.lex" 10887 11265 { strcpy(yylval.na,fortran_text); return TOK_SUPEQUAL; } 10888 11266 YY_BREAK 10889 11267 case 37: 10890 11268 YY_RULE_SETUP 10891 #line 14 1"fortran.lex"11269 #line 142 "fortran.lex" 10892 11270 { return TOK_MODULE; } 10893 11271 YY_BREAK 10894 11272 case 38: 10895 11273 YY_RULE_SETUP 10896 #line 14 2"fortran.lex"11274 #line 143 "fortran.lex" 10897 11275 { return TOK_WHILE; } 10898 11276 YY_BREAK 10899 11277 case 39: 10900 11278 YY_RULE_SETUP 10901 #line 14 3"fortran.lex"11279 #line 144 "fortran.lex" 10902 11280 { return TOK_CONCURRENT; } 10903 11281 YY_BREAK 10904 11282 case 40: 10905 11283 YY_RULE_SETUP 10906 #line 14 4"fortran.lex"11284 #line 145 "fortran.lex" 10907 11285 { return TOK_ENDDO; } 10908 11286 YY_BREAK 10909 11287 case 41: 10910 11288 YY_RULE_SETUP 10911 #line 14 5"fortran.lex"11289 #line 146 "fortran.lex" 10912 11290 { strcpy(yylval.na,&fortran_text[2]); 10913 11291 if (testandextractfromlist(&List_Do_labels,&fortran_text[2]) == 1) … … 10924 11302 case 42: 10925 11303 YY_RULE_SETUP 10926 #line 15 6"fortran.lex"11304 #line 157 "fortran.lex" 10927 11305 { increment_nbtokens = 0; return TOK_PLAINDO;} 10928 11306 YY_BREAK 10929 11307 case 43: 10930 11308 YY_RULE_SETUP 10931 #line 15 7"fortran.lex"11309 #line 158 "fortran.lex" 10932 11310 { strcpy(yylval.na,fortran_text); return TOK_REAL; } 10933 11311 YY_BREAK 10934 11312 case 44: 10935 11313 YY_RULE_SETUP 10936 #line 15 8"fortran.lex"11314 #line 159 "fortran.lex" 10937 11315 { strcpy(yylval.na,fortran_text); return TOK_INTEGER; } 10938 11316 YY_BREAK 10939 11317 case 45: 10940 11318 YY_RULE_SETUP 10941 #line 1 59"fortran.lex"11319 #line 160 "fortran.lex" 10942 11320 { strcpy(yylval.na,fortran_text); return TOK_LOGICAL; } 10943 11321 YY_BREAK 10944 11322 case 46: 10945 11323 YY_RULE_SETUP 10946 #line 16 0"fortran.lex"11324 #line 161 "fortran.lex" 10947 11325 { strcpy(yylval.na,fortran_text); return TOK_CHARACTER; } 10948 11326 YY_BREAK 10949 11327 case 47: 10950 11328 YY_RULE_SETUP 10951 #line 16 1"fortran.lex"11329 #line 162 "fortran.lex" 10952 11330 { strcpy(yylval.na,fortran_text); return TOK_HEXA;} 10953 11331 YY_BREAK 10954 11332 case 48: 10955 11333 YY_RULE_SETUP 10956 #line 16 2"fortran.lex"11334 #line 163 "fortran.lex" 10957 11335 { strcpy(yylval.na,fortran_text); return TOK_DOUBLEPRECISION; } 10958 11336 YY_BREAK 10959 11337 case 49: 10960 11338 YY_RULE_SETUP 10961 #line 16 3"fortran.lex"11339 #line 164 "fortran.lex" 10962 11340 { strcpy(yylval.na,fortran_text); return TOK_DOUBLECOMPLEX; } 10963 11341 YY_BREAK 10964 11342 case 50: 10965 11343 YY_RULE_SETUP 10966 #line 16 4"fortran.lex"11344 #line 165 "fortran.lex" 10967 11345 { strcpy(yylval.na,fortran_text); return TOK_COMPLEX; } 10968 11346 YY_BREAK 10969 11347 case 51: 10970 11348 YY_RULE_SETUP 10971 #line 16 5"fortran.lex"11349 #line 166 "fortran.lex" 10972 11350 { return TOK_ALLOCATABLE; } 10973 11351 YY_BREAK 10974 11352 case 52: 10975 11353 YY_RULE_SETUP 10976 #line 16 6"fortran.lex"11354 #line 167 "fortran.lex" 10977 11355 { return TOK_CONTIGUOUS; } 10978 11356 YY_BREAK 10979 11357 case 53: 10980 11358 YY_RULE_SETUP 10981 #line 16 7"fortran.lex"11359 #line 168 "fortran.lex" 10982 11360 { return TOK_CLOSE; } 10983 11361 YY_BREAK 10984 11362 case 54: 10985 11363 YY_RULE_SETUP 10986 #line 16 8"fortran.lex"11364 #line 169 "fortran.lex" 10987 11365 { return TOK_INQUIRE; } 10988 11366 YY_BREAK 10989 11367 case 55: 10990 11368 YY_RULE_SETUP 10991 #line 1 69"fortran.lex"11369 #line 170 "fortran.lex" 10992 11370 { return TOK_DIMENSION; } 10993 11371 YY_BREAK 10994 11372 case 56: 10995 11373 YY_RULE_SETUP 10996 #line 17 0"fortran.lex"11374 #line 171 "fortran.lex" 10997 11375 { return TOK_PAUSE; } 10998 11376 YY_BREAK 10999 11377 case 57: 11000 11378 YY_RULE_SETUP 11001 #line 17 1"fortran.lex"11379 #line 172 "fortran.lex" 11002 11380 { return TOK_EQUIVALENCE; } 11003 11381 YY_BREAK 11004 11382 case 58: 11005 11383 YY_RULE_SETUP 11006 #line 17 2"fortran.lex"11384 #line 173 "fortran.lex" 11007 11385 { return TOK_STOP; } 11008 11386 YY_BREAK 11009 11387 case 59: 11010 11388 YY_RULE_SETUP 11011 #line 17 3"fortran.lex"11389 #line 174 "fortran.lex" 11012 11390 { return TOK_WHERE; } 11013 11391 YY_BREAK 11014 11392 case 60: 11015 11393 YY_RULE_SETUP 11016 #line 17 4"fortran.lex"11394 #line 175 "fortran.lex" 11017 11395 { return TOK_ENDWHERE; } 11018 11396 YY_BREAK 11019 11397 case 61: 11020 11398 YY_RULE_SETUP 11021 #line 17 5"fortran.lex"11399 #line 176 "fortran.lex" 11022 11400 { return TOK_ELSEWHEREPAR; } 11023 11401 YY_BREAK 11024 11402 case 62: 11025 11403 YY_RULE_SETUP 11026 #line 17 6"fortran.lex"11404 #line 177 "fortran.lex" 11027 11405 { return TOK_ELSEWHERE; } 11028 11406 YY_BREAK 11029 11407 case 63: 11030 11408 YY_RULE_SETUP 11031 #line 17 7"fortran.lex"11409 #line 178 "fortran.lex" 11032 11410 { return TOK_CONTAINS; } 11033 11411 YY_BREAK 11034 11412 case 64: 11035 11413 YY_RULE_SETUP 11036 #line 17 8"fortran.lex"11414 #line 179 "fortran.lex" 11037 11415 { return TOK_ONLY; } 11038 11416 YY_BREAK 11039 11417 case 65: 11040 11418 YY_RULE_SETUP 11041 #line 1 79"fortran.lex"11419 #line 180 "fortran.lex" 11042 11420 { return TOK_PARAMETER; } 11043 11421 YY_BREAK 11044 11422 case 66: 11045 11423 YY_RULE_SETUP 11046 #line 18 0"fortran.lex"11424 #line 181 "fortran.lex" 11047 11425 { return TOK_RECURSIVE; } 11048 11426 YY_BREAK 11049 11427 case 67: 11050 11428 YY_RULE_SETUP 11051 #line 18 1"fortran.lex"11429 #line 182 "fortran.lex" 11052 11430 { return TOK_COMMON; } 11053 11431 YY_BREAK 11054 11432 case 68: 11055 11433 YY_RULE_SETUP 11056 #line 18 2"fortran.lex"11434 #line 183 "fortran.lex" 11057 11435 { return TOK_GLOBAL; } 11058 11436 YY_BREAK 11059 11437 case 69: 11060 11438 YY_RULE_SETUP 11061 #line 18 3"fortran.lex"11439 #line 184 "fortran.lex" 11062 11440 { return TOK_EXTERNAL; } 11063 11441 YY_BREAK 11064 11442 case 70: 11065 11443 YY_RULE_SETUP 11066 #line 18 4"fortran.lex"11444 #line 185 "fortran.lex" 11067 11445 { intent_spec = 1; return TOK_INTENT; } 11068 11446 YY_BREAK 11069 11447 case 71: 11070 11448 YY_RULE_SETUP 11071 #line 18 5"fortran.lex"11449 #line 186 "fortran.lex" 11072 11450 { return TOK_POINTER; } 11073 11451 YY_BREAK 11074 11452 case 72: 11075 11453 YY_RULE_SETUP 11076 #line 18 6"fortran.lex"11454 #line 187 "fortran.lex" 11077 11455 { return TOK_OPTIONAL; } 11078 11456 YY_BREAK 11079 11457 case 73: 11080 11458 YY_RULE_SETUP 11081 #line 18 7"fortran.lex"11459 #line 188 "fortran.lex" 11082 11460 { return TOK_SAVE; } 11083 11461 YY_BREAK 11084 11462 case 74: 11085 11463 YY_RULE_SETUP 11086 #line 18 8"fortran.lex"11464 #line 189 "fortran.lex" 11087 11465 { pos_cur_decl = setposcur()-strlen(fortran_text); return TOK_TYPEPAR; } 11088 11466 YY_BREAK 11089 11467 case 75: 11090 11468 YY_RULE_SETUP 11091 #line 1 89"fortran.lex"11469 #line 190 "fortran.lex" 11092 11470 { return TOK_TYPE; } 11093 11471 YY_BREAK 11094 11472 case 76: 11095 11473 YY_RULE_SETUP 11096 #line 19 0"fortran.lex"11474 #line 191 "fortran.lex" 11097 11475 { return TOK_ENDTYPE; } 11098 11476 YY_BREAK 11099 11477 case 77: 11100 11478 YY_RULE_SETUP 11101 #line 19 1"fortran.lex"11479 #line 192 "fortran.lex" 11102 11480 { if (inallocate == 1) return TOK_STAT; else { strcpy(yylval.na,fortran_text); return TOK_NAME; } } 11103 11481 YY_BREAK 11104 11482 case 78: 11105 11483 YY_RULE_SETUP 11106 #line 19 2"fortran.lex"11484 #line 193 "fortran.lex" 11107 11485 { return TOK_OPEN; } 11108 11486 YY_BREAK 11109 11487 case 79: 11110 11488 YY_RULE_SETUP 11111 #line 19 3"fortran.lex"11489 #line 194 "fortran.lex" 11112 11490 { return TOK_RETURN; } 11113 11491 YY_BREAK 11114 11492 case 80: 11115 11493 YY_RULE_SETUP 11116 #line 19 4"fortran.lex"11494 #line 195 "fortran.lex" 11117 11495 { return TOK_EXIT; } 11118 11496 YY_BREAK 11119 11497 case 81: 11120 11498 YY_RULE_SETUP 11121 #line 19 5"fortran.lex"11499 #line 196 "fortran.lex" 11122 11500 { return TOK_PRINT; } 11123 11501 YY_BREAK 11124 11502 case 82: 11125 11503 YY_RULE_SETUP 11126 #line 19 6"fortran.lex"11504 #line 197 "fortran.lex" 11127 11505 { return TOK_PROCEDURE; } 11128 11506 YY_BREAK 11129 11507 case 83: 11130 11508 YY_RULE_SETUP 11131 #line 19 7"fortran.lex"11509 #line 198 "fortran.lex" 11132 11510 { in_io_control_spec = 1; return TOK_READ_PAR; } 11133 11511 YY_BREAK 11134 11512 case 84: 11135 11513 YY_RULE_SETUP 11136 #line 19 8"fortran.lex"11514 #line 199 "fortran.lex" 11137 11515 { return TOK_READ; } 11138 11516 YY_BREAK 11139 11517 case 85: 11140 11518 YY_RULE_SETUP 11141 #line 199"fortran.lex"11519 #line 200 "fortran.lex" 11142 11520 { return TOK_NAMELIST; } 11143 11521 YY_BREAK 11144 11522 case 86: 11145 11523 YY_RULE_SETUP 11146 #line 20 0"fortran.lex"11524 #line 201 "fortran.lex" 11147 11525 { in_io_control_spec = 1; return TOK_WRITE_PAR; } 11148 11526 YY_BREAK 11149 11527 case 87: 11150 11528 YY_RULE_SETUP 11151 #line 20 1"fortran.lex"11529 #line 202 "fortran.lex" 11152 11530 { return TOK_WRITE; } 11153 11531 YY_BREAK 11154 11532 case 88: 11155 11533 YY_RULE_SETUP 11156 #line 20 2"fortran.lex"11534 #line 203 "fortran.lex" 11157 11535 { strcpy(yylval.na,fortran_text); return TOK_FLUSH; } 11158 11536 YY_BREAK 11159 11537 case 89: 11160 11538 YY_RULE_SETUP 11161 #line 20 3"fortran.lex"11539 #line 204 "fortran.lex" 11162 11540 { return TOK_TARGET; } 11163 11541 YY_BREAK 11164 11542 case 90: 11165 11543 YY_RULE_SETUP 11166 #line 20 4"fortran.lex"11544 #line 205 "fortran.lex" 11167 11545 { return TOK_PUBLIC; } 11168 11546 YY_BREAK 11169 11547 case 91: 11170 11548 YY_RULE_SETUP 11171 #line 20 5"fortran.lex"11549 #line 206 "fortran.lex" 11172 11550 { return TOK_PRIVATE; } 11173 11551 YY_BREAK 11174 11552 case 92: 11175 11553 YY_RULE_SETUP 11176 #line 20 6"fortran.lex"11554 #line 207 "fortran.lex" 11177 11555 { strcpy(yylval.na,fortran_text); 11178 11556 if (intent_spec==1) … … 11186 11564 case 93: 11187 11565 YY_RULE_SETUP 11188 #line 21 4"fortran.lex"11566 #line 215 "fortran.lex" 11189 11567 { pos_curdata = setposcur()-strlen(fortran_text); /*Init_List_Data_Var();*/ return TOK_DATA; } 11190 11568 YY_BREAK 11191 11569 case 94: 11192 11570 YY_RULE_SETUP 11193 #line 21 5"fortran.lex"11571 #line 216 "fortran.lex" 11194 11572 { return TOK_PLAINGOTO; } 11195 11573 YY_BREAK 11196 11574 case 95: 11197 11575 YY_RULE_SETUP 11198 #line 21 6"fortran.lex"11576 #line 217 "fortran.lex" 11199 11577 { strcpy(yylval.na,fortran_text); 11200 11578 if (intent_spec==1) … … 11208 11586 case 96: 11209 11587 YY_RULE_SETUP 11210 #line 22 4"fortran.lex"11588 #line 225 "fortran.lex" 11211 11589 { strcpy(yylval.na,fortran_text); 11212 11590 if (intent_spec==1) … … 11220 11598 case 97: 11221 11599 YY_RULE_SETUP 11222 #line 23 2"fortran.lex"11600 #line 233 "fortran.lex" 11223 11601 { return TOK_INTRINSIC; } 11224 11602 YY_BREAK 11225 11603 case 98: 11226 11604 YY_RULE_SETUP 11227 #line 23 3"fortran.lex"11605 #line 234 "fortran.lex" 11228 11606 { return TOK_THEN; } 11229 11607 YY_BREAK 11230 11608 case 99: 11231 11609 YY_RULE_SETUP 11232 #line 23 4"fortran.lex"11610 #line 235 "fortran.lex" 11233 11611 { return TOK_ELSEIF; } 11234 11612 YY_BREAK 11235 11613 case 100: 11236 11614 YY_RULE_SETUP 11237 #line 23 5"fortran.lex"11615 #line 236 "fortran.lex" 11238 11616 { return TOK_ELSE; } 11239 11617 YY_BREAK 11240 11618 case 101: 11241 11619 YY_RULE_SETUP 11242 #line 23 6"fortran.lex"11620 #line 237 "fortran.lex" 11243 11621 { return TOK_ENDIF; } 11244 11622 YY_BREAK 11245 11623 case 102: 11246 11624 YY_RULE_SETUP 11247 #line 23 7"fortran.lex"11625 #line 238 "fortran.lex" 11248 11626 {strcpy(yylval.na,fortran_text); 11249 11627 return TOK_LOGICALIF_PAR; … … 11252 11630 case 103: 11253 11631 /* rule 103 can match eol */ 11254 *yy_cp = (yy_hold_char); /* undo effects of setting up fortran_text */ 11632 *yy_cp = (yy_hold_char); /* undo effects of setting up yytext */ 11633 YY_LINENO_REWIND_TO(yy_bp + 2); 11255 11634 (yy_c_buf_p) = yy_cp = yy_bp + 2; 11256 YY_DO_BEFORE_ACTION; /* set up fortran_text again */11257 YY_RULE_SETUP 11258 #line 24 0"fortran.lex"11635 YY_DO_BEFORE_ACTION; /* set up yytext again */ 11636 YY_RULE_SETUP 11637 #line 241 "fortran.lex" 11259 11638 {strcpy(yylval.na,fortran_text); 11260 11639 return TOK_NAME; … … 11263 11642 case 104: 11264 11643 YY_RULE_SETUP 11265 #line 24 3"fortran.lex"11644 #line 244 "fortran.lex" 11266 11645 {strcpy(yylval.na,fortran_text); 11267 11646 return TOK_LOGICALIF_PAR; … … 11270 11649 case 105: 11271 11650 YY_RULE_SETUP 11272 #line 24 6"fortran.lex"11651 #line 247 "fortran.lex" 11273 11652 { return TOK_SELECTCASE; } 11274 11653 YY_BREAK 11275 11654 case 106: 11276 11655 YY_RULE_SETUP 11277 #line 24 7"fortran.lex"11656 #line 248 "fortran.lex" 11278 11657 { if (in_select_case_stmt > 0) return TOK_CASE ; else return TOK_NAME;} 11279 11658 YY_BREAK 11280 11659 case 107: 11281 11660 YY_RULE_SETUP 11282 #line 24 8"fortran.lex"11661 #line 249 "fortran.lex" 11283 11662 { return TOK_DEFAULT; } 11284 11663 YY_BREAK 11285 11664 case 108: 11286 11665 YY_RULE_SETUP 11287 #line 2 49"fortran.lex"11666 #line 250 "fortran.lex" 11288 11667 { return TOK_ENDSELECT; } 11289 11668 YY_BREAK 11290 11669 case 109: 11291 11670 YY_RULE_SETUP 11292 #line 25 0"fortran.lex"11671 #line 251 "fortran.lex" 11293 11672 { return TOK_FILE; } 11294 11673 YY_BREAK 11295 11674 case 110: 11296 11675 YY_RULE_SETUP 11297 #line 25 1"fortran.lex"11676 #line 252 "fortran.lex" 11298 11677 { return TOK_ACCESS; } 11299 11678 YY_BREAK 11300 11679 case 111: 11301 11680 YY_RULE_SETUP 11302 #line 25 2"fortran.lex"11681 #line 253 "fortran.lex" 11303 11682 { return TOK_ACTION; } 11304 11683 YY_BREAK 11305 11684 case 112: 11306 11685 YY_RULE_SETUP 11307 #line 25 3"fortran.lex"11686 #line 254 "fortran.lex" 11308 11687 { return TOK_IOLENGTH; } 11309 11688 YY_BREAK 11310 11689 case 113: 11311 11690 YY_RULE_SETUP 11312 #line 25 4"fortran.lex"11691 #line 255 "fortran.lex" 11313 11692 { return TOK_UNIT; } 11314 11693 YY_BREAK 11315 11694 case 114: 11316 11695 YY_RULE_SETUP 11317 #line 25 5"fortran.lex"11696 #line 256 "fortran.lex" 11318 11697 { return TOK_OPENED; } 11319 11698 YY_BREAK 11320 11699 case 115: 11321 11700 YY_RULE_SETUP 11322 #line 25 6"fortran.lex"11701 #line 257 "fortran.lex" 11323 11702 { return TOK_FMT; } 11324 11703 YY_BREAK 11325 11704 case 116: 11326 11705 YY_RULE_SETUP 11327 #line 25 7"fortran.lex"11706 #line 258 "fortran.lex" 11328 11707 { return TOK_NML; } 11329 11708 YY_BREAK 11330 11709 case 117: 11331 11710 YY_RULE_SETUP 11332 #line 25 8"fortran.lex"11711 #line 259 "fortran.lex" 11333 11712 { return TOK_END; } 11334 11713 YY_BREAK 11335 11714 case 118: 11336 11715 YY_RULE_SETUP 11337 #line 2 59"fortran.lex"11716 #line 260 "fortran.lex" 11338 11717 { return TOK_EOR; } 11339 11718 YY_BREAK 11340 11719 case 119: 11341 *yy_cp = (yy_hold_char); /* undo effects of setting up fortran_text */11720 *yy_cp = (yy_hold_char); /* undo effects of setting up yytext */ 11342 11721 (yy_c_buf_p) = yy_cp = yy_bp + 3; 11343 YY_DO_BEFORE_ACTION; /* set up fortran_text again */11344 YY_RULE_SETUP 11345 #line 26 0"fortran.lex"11722 YY_DO_BEFORE_ACTION; /* set up yytext again */ 11723 YY_RULE_SETUP 11724 #line 261 "fortran.lex" 11346 11725 { 11347 11726 if (in_char_selector ==1) … … 11354 11733 YY_BREAK 11355 11734 case 120: 11356 *yy_cp = (yy_hold_char); /* undo effects of setting up fortran_text */11735 *yy_cp = (yy_hold_char); /* undo effects of setting up yytext */ 11357 11736 (yy_c_buf_p) = yy_cp = yy_bp + 4; 11358 YY_DO_BEFORE_ACTION; /* set up fortran_text again */11359 YY_RULE_SETUP 11360 #line 26 8"fortran.lex"11737 YY_DO_BEFORE_ACTION; /* set up yytext again */ 11738 YY_RULE_SETUP 11739 #line 269 "fortran.lex" 11361 11740 { 11362 11741 if ((in_char_selector==1) || (in_kind_selector == 1)) … … 11370 11749 case 121: 11371 11750 YY_RULE_SETUP 11372 #line 27 6"fortran.lex"11751 #line 277 "fortran.lex" 11373 11752 { return TOK_ERRMSG; } 11374 11753 YY_BREAK 11375 11754 case 122: 11376 11755 YY_RULE_SETUP 11377 #line 27 7"fortran.lex"11756 #line 278 "fortran.lex" 11378 11757 { return TOK_MOLD; } 11379 11758 YY_BREAK 11380 11759 case 123: 11381 11760 YY_RULE_SETUP 11382 #line 27 8"fortran.lex"11761 #line 279 "fortran.lex" 11383 11762 { return TOK_SOURCE; } 11384 11763 YY_BREAK 11385 11764 case 124: 11386 11765 YY_RULE_SETUP 11387 #line 2 79"fortran.lex"11766 #line 280 "fortran.lex" 11388 11767 { return TOK_POSITION; } 11389 11768 YY_BREAK 11390 11769 case 125: 11391 11770 YY_RULE_SETUP 11392 #line 28 0"fortran.lex"11771 #line 281 "fortran.lex" 11393 11772 { return TOK_IOMSG; } 11394 11773 YY_BREAK 11395 11774 case 126: 11396 11775 YY_RULE_SETUP 11397 #line 28 1"fortran.lex"11776 #line 282 "fortran.lex" 11398 11777 { return TOK_IOSTAT; } 11399 11778 YY_BREAK 11400 11779 case 127: 11401 11780 YY_RULE_SETUP 11402 #line 28 2"fortran.lex"11781 #line 283 "fortran.lex" 11403 11782 { return TOK_ERR; } 11404 11783 YY_BREAK 11405 11784 case 128: 11406 11785 YY_RULE_SETUP 11407 #line 28 3"fortran.lex"11786 #line 284 "fortran.lex" 11408 11787 { return TOK_FORM; } 11409 11788 YY_BREAK 11410 11789 case 129: 11411 *yy_cp = (yy_hold_char); /* undo effects of setting up fortran_text */11790 *yy_cp = (yy_hold_char); /* undo effects of setting up yytext */ 11412 11791 (yy_c_buf_p) = yy_cp = yy_bp + 4; 11413 YY_DO_BEFORE_ACTION; /* set up fortran_text again */11414 YY_RULE_SETUP 11415 #line 28 4"fortran.lex"11792 YY_DO_BEFORE_ACTION; /* set up yytext again */ 11793 YY_RULE_SETUP 11794 #line 285 "fortran.lex" 11416 11795 { 11417 11796 if (in_inquire==1) … … 11425 11804 case 130: 11426 11805 YY_RULE_SETUP 11427 #line 29 2"fortran.lex"11806 #line 293 "fortran.lex" 11428 11807 { return TOK_RECL; } 11429 11808 YY_BREAK 11430 11809 case 131: 11431 *yy_cp = (yy_hold_char); /* undo effects of setting up fortran_text */11810 *yy_cp = (yy_hold_char); /* undo effects of setting up yytext */ 11432 11811 (yy_c_buf_p) = yy_cp = yy_bp + 3; 11433 YY_DO_BEFORE_ACTION; /* set up fortran_text again */11434 YY_RULE_SETUP 11435 #line 29 3"fortran.lex"11812 YY_DO_BEFORE_ACTION; /* set up yytext again */ 11813 YY_RULE_SETUP 11814 #line 294 "fortran.lex" 11436 11815 { if (in_io_control_spec == 1) 11437 11816 return TOK_REC; … … 11443 11822 YY_BREAK 11444 11823 case 132: 11445 *yy_cp = (yy_hold_char); /* undo effects of setting up fortran_text */11824 *yy_cp = (yy_hold_char); /* undo effects of setting up yytext */ 11446 11825 (yy_c_buf_p) = yy_cp = yy_bp + 6; 11447 YY_DO_BEFORE_ACTION; /* set up fortran_text again */11448 YY_RULE_SETUP 11449 #line 30 0"fortran.lex"11826 YY_DO_BEFORE_ACTION; /* set up yytext again */ 11827 YY_RULE_SETUP 11828 #line 301 "fortran.lex" 11450 11829 { if (close_or_connect == 1) 11451 11830 return TOK_STATUS; … … 11458 11837 case 133: 11459 11838 YY_RULE_SETUP 11460 #line 30 7"fortran.lex"11839 #line 308 "fortran.lex" 11461 11840 { strcpy(yylval.na,fortran_text); return TOK_NAME;} 11462 11841 YY_BREAK 11463 11842 case 134: 11464 11843 YY_RULE_SETUP 11465 #line 30 8"fortran.lex"11844 #line 309 "fortran.lex" 11466 11845 { return TOK_EXIST; } 11467 11846 YY_BREAK 11468 11847 case 135: 11469 11848 YY_RULE_SETUP 11470 #line 3 09"fortran.lex"11849 #line 310 "fortran.lex" 11471 11850 { return TOK_CYCLE; } 11472 11851 YY_BREAK 11473 11852 case 136: 11474 11853 YY_RULE_SETUP 11475 #line 31 0"fortran.lex"11854 #line 311 "fortran.lex" 11476 11855 { return TOK_BACKSPACE; } 11477 11856 YY_BREAK 11478 11857 case 137: 11479 11858 YY_RULE_SETUP 11480 #line 31 1"fortran.lex"11859 #line 312 "fortran.lex" 11481 11860 { return TOK_FOURDOTS; } 11482 11861 YY_BREAK … … 11484 11863 /* rule 138 can match eol */ 11485 11864 YY_RULE_SETUP 11486 #line 31 2"fortran.lex"11865 #line 313 "fortran.lex" 11487 11866 { strcpy(yylval.na,fortran_text); return TOK_DSLASH; } 11488 11867 YY_BREAK 11489 11868 case 139: 11490 11869 YY_RULE_SETUP 11491 #line 31 3"fortran.lex"11870 #line 314 "fortran.lex" 11492 11871 { return TOK_LEFTAB; } 11493 11872 YY_BREAK 11494 11873 case 140: 11495 11874 YY_RULE_SETUP 11496 #line 31 4"fortran.lex"11875 #line 315 "fortran.lex" 11497 11876 { return TOK_RIGHTAB; } 11498 11877 YY_BREAK 11499 11878 case 141: 11500 11879 YY_RULE_SETUP 11501 #line 31 5"fortran.lex"11880 #line 316 "fortran.lex" 11502 11881 { strcpy(yylval.na,fortran_text); return TOK_SLASH; } 11503 11882 YY_BREAK … … 11505 11884 /* rule 142 can match eol */ 11506 11885 YY_RULE_SETUP 11507 #line 31 6"fortran.lex"11886 #line 317 "fortran.lex" 11508 11887 { 11509 11888 INCREMENT_LINE_NUM() ; strcpy(yylval.na,fortran_text); return TOK_CHAR_CUT; } … … 11512 11891 /* rule 143 can match eol */ 11513 11892 YY_RULE_SETUP 11514 #line 31 8"fortran.lex"11893 #line 319 "fortran.lex" 11515 11894 {Add_Include_1(fortran_text);} 11516 11895 YY_BREAK 11517 11896 case 144: 11518 11897 YY_RULE_SETUP 11519 #line 3 19"fortran.lex"11898 #line 320 "fortran.lex" 11520 11899 {} 11521 11900 YY_BREAK … … 11523 11902 /* rule 145 can match eol */ 11524 11903 YY_RULE_SETUP 11525 #line 32 0"fortran.lex"11904 #line 321 "fortran.lex" 11526 11905 { 11527 11906 if (inmoduledeclare == 0 ) … … 11536 11915 /* rule 146 can match eol */ 11537 11916 YY_RULE_SETUP 11538 #line 32 8"fortran.lex"11917 #line 329 "fortran.lex" 11539 11918 { strcpy(yylval.na,fortran_text);return TOK_CHAR_CONSTANT; } 11540 11919 YY_BREAK … … 11542 11921 /* rule 147 can match eol */ 11543 11922 YY_RULE_SETUP 11544 #line 3 29"fortran.lex"11923 #line 330 "fortran.lex" 11545 11924 { strcpy(yylval.na,fortran_text);return TOK_CHAR_MESSAGE; } 11546 11925 YY_BREAK 11547 11926 case 148: 11548 11927 YY_RULE_SETUP 11549 #line 33 0"fortran.lex"11928 #line 331 "fortran.lex" 11550 11929 { BEGIN(donottreat_interface); } 11551 11930 YY_BREAK … … 11553 11932 /* rule 149 can match eol */ 11554 11933 YY_RULE_SETUP 11555 #line 33 1"fortran.lex"11934 #line 332 "fortran.lex" 11556 11935 { out_of_donottreat(); return '\n'; } 11557 11936 YY_BREAK … … 11559 11938 /* rule 150 can match eol */ 11560 11939 YY_RULE_SETUP 11561 #line 33 2"fortran.lex"11940 #line 333 "fortran.lex" 11562 11941 {INCREMENT_LINE_NUM() ; } 11563 11942 YY_BREAK … … 11565 11944 /* rule 151 can match eol */ 11566 11945 YY_RULE_SETUP 11567 #line 33 3"fortran.lex"11946 #line 334 "fortran.lex" 11568 11947 {strcpy(yylval.na,fortran_text); removenewline(yylval.na); 11569 11948 return TOK_NAME; } … … 11571 11950 case 152: 11572 11951 YY_RULE_SETUP 11573 #line 33 5"fortran.lex"11952 #line 336 "fortran.lex" 11574 11953 { strcpy(yylval.na,fortran_text); return TOK_NAME; } 11575 11954 YY_BREAK 11576 11955 case 153: 11577 11956 YY_RULE_SETUP 11578 #line 33 6"fortran.lex"11957 #line 337 "fortran.lex" 11579 11958 {strcpy(yylval.na,fortran_text); return TOK_CSTREAL; } 11580 11959 YY_BREAK 11581 11960 case 154: 11582 11961 /* rule 154 can match eol */ 11583 *yy_cp = (yy_hold_char); /* undo effects of setting up fortran_text */ 11962 *yy_cp = (yy_hold_char); /* undo effects of setting up yytext */ 11963 YY_LINENO_REWIND_TO(yy_cp - 1); 11584 11964 (yy_c_buf_p) = yy_cp -= 1; 11585 YY_DO_BEFORE_ACTION; /* set up fortran_text again */11586 YY_RULE_SETUP 11587 #line 33 7"fortran.lex"11965 YY_DO_BEFORE_ACTION; /* set up yytext again */ 11966 YY_RULE_SETUP 11967 #line 338 "fortran.lex" 11588 11968 { // REAL1 11589 11969 strcpy(yylval.na,fortran_text); return TOK_CSTREAL; } … … 11591 11971 case 155: 11592 11972 YY_RULE_SETUP 11593 #line 3 39"fortran.lex"11973 #line 340 "fortran.lex" 11594 11974 { // REAL2 11595 11975 strcpy(yylval.na,fortran_text); return TOK_CSTREAL; } … … 11597 11977 case 156: 11598 11978 YY_RULE_SETUP 11599 #line 34 1"fortran.lex"11979 #line 342 "fortran.lex" 11600 11980 { strcpy(yylval.na,fortran_text); 11601 11981 if (lastwasendofstmt == 0) … … 11615 11995 case 157: 11616 11996 YY_RULE_SETUP 11617 #line 355 "fortran.lex"11618 {}11619 YY_BREAK11620 case 158:11621 YY_RULE_SETUP11622 11997 #line 356 "fortran.lex" 11623 11998 {} 11624 11999 YY_BREAK 12000 case 158: 12001 YY_RULE_SETUP 12002 #line 357 "fortran.lex" 12003 {} 12004 YY_BREAK 11625 12005 case 159: 11626 *yy_cp = (yy_hold_char); /* undo effects of setting up fortran_text */12006 *yy_cp = (yy_hold_char); /* undo effects of setting up yytext */ 11627 12007 (yy_c_buf_p) = yy_cp = yy_bp + 1; 11628 YY_DO_BEFORE_ACTION; /* set up fortran_text again */11629 YY_RULE_SETUP 11630 #line 35 7"fortran.lex"12008 YY_DO_BEFORE_ACTION; /* set up yytext again */ 12009 YY_RULE_SETUP 12010 #line 358 "fortran.lex" 11631 12011 { 11632 12012 in_complex_literal = -1; … … 11636 12016 case 160: 11637 12017 YY_RULE_SETUP 11638 #line 361 "fortran.lex"11639 { strcpy(yylval.na,fortran_text); return (int) *fortran_text; }11640 YY_BREAK11641 case 161:11642 YY_RULE_SETUP11643 12018 #line 362 "fortran.lex" 11644 12019 { strcpy(yylval.na,fortran_text); return (int) *fortran_text; } 11645 12020 YY_BREAK 12021 case 161: 12022 YY_RULE_SETUP 12023 #line 363 "fortran.lex" 12024 { strcpy(yylval.na,fortran_text); return (int) *fortran_text; } 12025 YY_BREAK 11646 12026 case 162: 11647 12027 YY_RULE_SETUP 11648 #line 36 3"fortran.lex"12028 #line 364 "fortran.lex" 11649 12029 { lastwasendofstmt=1; token_since_endofstmt = 0; return TOK_SEMICOLON; } 11650 12030 YY_BREAK 11651 12031 case 163: 11652 12032 YY_RULE_SETUP 11653 #line 36 4"fortran.lex"12033 #line 365 "fortran.lex" 11654 12034 { if (in_complex_literal==-1) {return TOK_COMMACOMPLEX; in_complex_literal=0;} else; return (int) *fortran_text; } 11655 12035 YY_BREAK 11656 12036 case 164: 11657 YY_RULE_SETUP11658 #line 365 "fortran.lex"11659 { return (int) *fortran_text; }11660 YY_BREAK11661 case 165:11662 12037 YY_RULE_SETUP 11663 12038 #line 366 "fortran.lex" 11664 12039 { return (int) *fortran_text; } 11665 12040 YY_BREAK 11666 case 16 6:12041 case 165: 11667 12042 YY_RULE_SETUP 11668 12043 #line 367 "fortran.lex" 11669 12044 { return (int) *fortran_text; } 11670 12045 YY_BREAK 12046 case 166: 12047 YY_RULE_SETUP 12048 #line 368 "fortran.lex" 12049 { return (int) *fortran_text; } 12050 YY_BREAK 11671 12051 case 167: 11672 12052 /* rule 167 can match eol */ 11673 12053 YY_RULE_SETUP 11674 #line 36 8"fortran.lex"12054 #line 369 "fortran.lex" 11675 12055 { INCREMENT_LINE_NUM() ; lastwasendofstmt=1; token_since_endofstmt = 0; increment_nbtokens = 0; return '\n'; } 11676 12056 YY_BREAK 11677 12057 case 168: 11678 12058 YY_RULE_SETUP 11679 #line 3 69"fortran.lex"12059 #line 370 "fortran.lex" 11680 12060 {increment_nbtokens = 0;} 11681 12061 YY_BREAK … … 11683 12063 /* rule 169 can match eol */ 11684 12064 YY_RULE_SETUP 11685 #line 37 0"fortran.lex"12065 #line 371 "fortran.lex" 11686 12066 { 11687 12067 return TOK_LABEL_FORMAT; } … … 11690 12070 /* rule 170 can match eol */ 11691 12071 YY_RULE_SETUP 11692 #line 37 2"fortran.lex"12072 #line 373 "fortran.lex" 11693 12073 {return TOK_LABEL_FORMAT; } 11694 12074 YY_BREAK … … 11696 12076 /* rule 171 can match eol */ 11697 12077 YY_RULE_SETUP 11698 #line 37 3"fortran.lex"12078 #line 374 "fortran.lex" 11699 12079 { INCREMENT_LINE_NUM() ; newlinef90=1; } 11700 12080 YY_BREAK … … 11702 12082 /* rule 172 can match eol */ 11703 12083 YY_RULE_SETUP 11704 #line 37 4"fortran.lex"12084 #line 375 "fortran.lex" 11705 12085 { INCREMENT_LINE_NUM() ;} 11706 12086 YY_BREAK … … 11708 12088 /* rule 173 can match eol */ 11709 12089 YY_RULE_SETUP 11710 #line 37 6"fortran.lex"12090 #line 377 "fortran.lex" 11711 12091 {INCREMENT_LINE_NUM() ; BEGIN(donottreat); } 11712 12092 YY_BREAK … … 11714 12094 /* rule 174 can match eol */ 11715 12095 YY_RULE_SETUP 11716 #line 37 7"fortran.lex"12096 #line 378 "fortran.lex" 11717 12097 {out_of_donottreat(); return '\n'; } 11718 12098 YY_BREAK … … 11720 12100 /* rule 175 can match eol */ 11721 12101 YY_RULE_SETUP 11722 #line 37 8"fortran.lex"12102 #line 379 "fortran.lex" 11723 12103 {INCREMENT_LINE_NUM() ; } 11724 12104 YY_BREAK … … 11726 12106 /* rule 176 can match eol */ 11727 12107 YY_RULE_SETUP 11728 #line 3 79"fortran.lex"12108 #line 380 "fortran.lex" 11729 12109 {INCREMENT_LINE_NUM() ; increment_nbtokens = 0;} 11730 12110 YY_BREAK … … 11732 12112 /* rule 177 can match eol */ 11733 12113 YY_RULE_SETUP 11734 #line 38 0"fortran.lex"12114 #line 381 "fortran.lex" 11735 12115 {INCREMENT_LINE_NUM() ; increment_nbtokens = 0;} 11736 12116 YY_BREAK 11737 12117 case 178: 11738 12118 YY_RULE_SETUP 11739 #line 38 1"fortran.lex"12119 #line 382 "fortran.lex" 11740 12120 {increment_nbtokens = 0;} 11741 12121 YY_BREAK … … 11748 12128 case YY_STATE_EOF(fortran77style): 11749 12129 case YY_STATE_EOF(fortran90style): 11750 #line 38 2"fortran.lex"12130 #line 383 "fortran.lex" 11751 12131 {endoffile = 1; yyterminate();} 11752 12132 YY_BREAK 11753 12133 case 179: 11754 12134 YY_RULE_SETUP 11755 #line 38 3"fortran.lex"12135 #line 384 "fortran.lex" 11756 12136 ECHO; 11757 12137 YY_BREAK 11758 #line 4902"fortran.yy.c"12138 #line 5146 "fortran.yy.c" 11759 12139 11760 12140 case YY_END_OF_BUFFER: … … 11771 12151 /* We're scanning a new file or input source. It's 11772 12152 * possible that this happened because the user 11773 * just pointed fortran_in at a new source and called11774 * fortran_lex(). If so, then we have to assure12153 * just pointed yyin at a new source and called 12154 * yylex(). If so, then we have to assure 11775 12155 * consistency between YY_CURRENT_BUFFER and our 11776 12156 * globals. Here is the right place to do so, because … … 11779 12159 */ 11780 12160 (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_n_chars; 11781 YY_CURRENT_BUFFER_LVALUE->yy_input_file = fortran_in;12161 YY_CURRENT_BUFFER_LVALUE->yy_input_file = yyin; 11782 12162 YY_CURRENT_BUFFER_LVALUE->yy_buffer_status = YY_BUFFER_NORMAL; 11783 12163 } … … 11832 12212 (yy_did_buffer_switch_on_eof) = 0; 11833 12213 11834 if ( fortran_wrap() )12214 if ( yywrap( ) ) 11835 12215 { 11836 12216 /* Note: because we've taken care in 11837 12217 * yy_get_next_buffer() to have set up 11838 * fortran_text, we can now set up12218 * yytext, we can now set up 11839 12219 * yy_c_buf_p so that if some total 11840 12220 * hoser (like flex itself) wants to … … 11885 12265 } /* end of action switch */ 11886 12266 } /* end of scanning one token */ 11887 } /* end of fortran_lex */ 12267 } /* end of user's declarations */ 12268 } /* end of yylex */ 11888 12269 11889 12270 /* yy_get_next_buffer - try to read in a new buffer … … 11896 12277 static int yy_get_next_buffer (void) 11897 12278 { 11898 registerchar *dest = YY_CURRENT_BUFFER_LVALUE->yy_ch_buf;11899 registerchar *source = (yytext_ptr);11900 registerint number_to_move, i;12279 char *dest = YY_CURRENT_BUFFER_LVALUE->yy_ch_buf; 12280 char *source = (yytext_ptr); 12281 int number_to_move, i; 11901 12282 int ret_val; 11902 12283 … … 11927 12308 11928 12309 /* First move last chars to start of buffer. */ 11929 number_to_move = (int) ((yy_c_buf_p) - (yytext_ptr) ) - 1;12310 number_to_move = (int) ((yy_c_buf_p) - (yytext_ptr) - 1); 11930 12311 11931 12312 for ( i = 0; i < number_to_move; ++i ) … … 11940 12321 else 11941 12322 { 11942 yy_size_t num_to_read =12323 int num_to_read = 11943 12324 YY_CURRENT_BUFFER_LVALUE->yy_buf_size - number_to_move - 1; 11944 12325 … … 11966 12347 { 11967 12348 ret_val = EOB_ACT_END_OF_FILE; 11968 fortran_restart(fortran_in );12349 yyrestart( yyin ); 11969 12350 } 11970 12351 … … 11980 12361 ret_val = EOB_ACT_CONTINUE_SCAN; 11981 12362 11982 if (( yy_size_t) ((yy_n_chars) + number_to_move) > YY_CURRENT_BUFFER_LVALUE->yy_buf_size) {12363 if (((yy_n_chars) + number_to_move) > YY_CURRENT_BUFFER_LVALUE->yy_buf_size) { 11983 12364 /* Extend the array by 50%, plus the number we really need. */ 11984 yy_size_t new_size = (yy_n_chars) + number_to_move + ((yy_n_chars) >> 1); 11985 YY_CURRENT_BUFFER_LVALUE->yy_ch_buf = (char *) fortran_realloc((void *) YY_CURRENT_BUFFER_LVALUE->yy_ch_buf,new_size ); 12365 int new_size = (yy_n_chars) + number_to_move + ((yy_n_chars) >> 1); 12366 YY_CURRENT_BUFFER_LVALUE->yy_ch_buf = (char *) yyrealloc( 12367 (void *) YY_CURRENT_BUFFER_LVALUE->yy_ch_buf, (yy_size_t) new_size ); 11986 12368 if ( ! YY_CURRENT_BUFFER_LVALUE->yy_ch_buf ) 11987 12369 YY_FATAL_ERROR( "out of dynamic memory in yy_get_next_buffer()" ); 12370 /* "- 2" to take care of EOB's */ 12371 YY_CURRENT_BUFFER_LVALUE->yy_buf_size = (int) (new_size - 2); 11988 12372 } 11989 12373 … … 12001 12385 static yy_state_type yy_get_previous_state (void) 12002 12386 { 12003 registeryy_state_type yy_current_state;12004 registerchar *yy_cp;12387 yy_state_type yy_current_state; 12388 char *yy_cp; 12005 12389 12006 12390 yy_current_state = (yy_start); … … 12012 12396 for ( yy_cp = (yytext_ptr) + YY_MORE_ADJ; yy_cp < (yy_c_buf_p); ++yy_cp ) 12013 12397 { 12014 registerYY_CHAR yy_c = (*yy_cp ? yy_ec[YY_SC_TO_UI(*yy_cp)] : 1);12398 YY_CHAR yy_c = (*yy_cp ? yy_ec[YY_SC_TO_UI(*yy_cp)] : 1); 12015 12399 while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state ) 12016 12400 { 12017 12401 yy_current_state = (int) yy_def[yy_current_state]; 12018 12402 if ( yy_current_state >= 1898 ) 12019 yy_c = yy_meta[ (unsigned int)yy_c];12403 yy_c = yy_meta[yy_c]; 12020 12404 } 12021 yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int)yy_c];12405 yy_current_state = yy_nxt[yy_base[yy_current_state] + yy_c]; 12022 12406 *(yy_state_ptr)++ = yy_current_state; 12023 12407 } … … 12033 12417 static yy_state_type yy_try_NUL_trans (yy_state_type yy_current_state ) 12034 12418 { 12035 registerint yy_is_jam;12419 int yy_is_jam; 12036 12420 12037 registerYY_CHAR yy_c = 1;12421 YY_CHAR yy_c = 1; 12038 12422 while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state ) 12039 12423 { 12040 12424 yy_current_state = (int) yy_def[yy_current_state]; 12041 12425 if ( yy_current_state >= 1898 ) 12042 yy_c = yy_meta[ (unsigned int)yy_c];12426 yy_c = yy_meta[yy_c]; 12043 12427 } 12044 yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int)yy_c];12428 yy_current_state = yy_nxt[yy_base[yy_current_state] + yy_c]; 12045 12429 yy_is_jam = (yy_current_state == 1897); 12046 12430 if ( ! yy_is_jam ) … … 12050 12434 } 12051 12435 12052 static void yyunput (int c, register char * yy_bp ) 12436 #ifndef YY_NO_UNPUT 12437 12438 static void yyunput (int c, char * yy_bp ) 12053 12439 { 12054 registerchar *yy_cp;12440 char *yy_cp; 12055 12441 12056 12442 yy_cp = (yy_c_buf_p); 12057 12443 12058 /* undo effects of setting up fortran_text */12444 /* undo effects of setting up yytext */ 12059 12445 *yy_cp = (yy_hold_char); 12060 12446 … … 12062 12448 { /* need to shift things up to make room */ 12063 12449 /* +2 for EOB chars. */ 12064 register yy_size_t number_to_move = (yy_n_chars) + 2;12065 registerchar *dest = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[12450 int number_to_move = (yy_n_chars) + 2; 12451 char *dest = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[ 12066 12452 YY_CURRENT_BUFFER_LVALUE->yy_buf_size + 2]; 12067 registerchar *source =12453 char *source = 12068 12454 &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[number_to_move]; 12069 12455 … … 12074 12460 yy_bp += (int) (dest - source); 12075 12461 YY_CURRENT_BUFFER_LVALUE->yy_n_chars = 12076 (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_buf_size;12462 (yy_n_chars) = (int) YY_CURRENT_BUFFER_LVALUE->yy_buf_size; 12077 12463 12078 12464 if ( yy_cp < YY_CURRENT_BUFFER_LVALUE->yy_ch_buf + 2 ) … … 12086 12472 (yy_c_buf_p) = yy_cp; 12087 12473 } 12474 12475 #endif 12088 12476 12089 12477 #ifndef YY_NO_INPUT … … 12111 12499 else 12112 12500 { /* need more input */ 12113 yy_size_t offset = (yy_c_buf_p) - (yytext_ptr);12501 int offset = (int) ((yy_c_buf_p) - (yytext_ptr)); 12114 12502 ++(yy_c_buf_p); 12115 12503 … … 12128 12516 12129 12517 /* Reset buffer status. */ 12130 fortran_restart(fortran_in );12518 yyrestart( yyin ); 12131 12519 12132 12520 /*FALLTHROUGH*/ … … 12134 12522 case EOB_ACT_END_OF_FILE: 12135 12523 { 12136 if ( fortran_wrap() )12137 return EOF;12524 if ( yywrap( ) ) 12525 return 0; 12138 12526 12139 12527 if ( ! (yy_did_buffer_switch_on_eof) ) … … 12154 12542 12155 12543 c = *(unsigned char *) (yy_c_buf_p); /* cast for 8-bit char's */ 12156 *(yy_c_buf_p) = '\0'; /* preserve fortran_text */12544 *(yy_c_buf_p) = '\0'; /* preserve yytext */ 12157 12545 (yy_hold_char) = *++(yy_c_buf_p); 12158 12546 … … 12168 12556 * @note This function does not reset the start condition to @c INITIAL . 12169 12557 */ 12170 void fortran_restart (FILE * input_file )12558 void yyrestart (FILE * input_file ) 12171 12559 { 12172 12560 12173 12561 if ( ! YY_CURRENT_BUFFER ){ 12174 fortran_ensure_buffer_stack ();12562 yyensure_buffer_stack (); 12175 12563 YY_CURRENT_BUFFER_LVALUE = 12176 fortran__create_buffer(fortran_in,YY_BUF_SIZE );12564 yy_create_buffer( yyin, YY_BUF_SIZE ); 12177 12565 } 12178 12566 12179 fortran__init_buffer(YY_CURRENT_BUFFER,input_file );12180 fortran__load_buffer_state();12567 yy_init_buffer( YY_CURRENT_BUFFER, input_file ); 12568 yy_load_buffer_state( ); 12181 12569 } 12182 12570 … … 12185 12573 * 12186 12574 */ 12187 void fortran__switch_to_buffer (YY_BUFFER_STATE new_buffer )12575 void yy_switch_to_buffer (YY_BUFFER_STATE new_buffer ) 12188 12576 { 12189 12577 12190 12578 /* TODO. We should be able to replace this entire function body 12191 12579 * with 12192 * fortran_pop_buffer_state();12193 * fortran_push_buffer_state(new_buffer);12580 * yypop_buffer_state(); 12581 * yypush_buffer_state(new_buffer); 12194 12582 */ 12195 fortran_ensure_buffer_stack ();12583 yyensure_buffer_stack (); 12196 12584 if ( YY_CURRENT_BUFFER == new_buffer ) 12197 12585 return; … … 12206 12594 12207 12595 YY_CURRENT_BUFFER_LVALUE = new_buffer; 12208 fortran__load_buffer_state();12596 yy_load_buffer_state( ); 12209 12597 12210 12598 /* We don't actually know whether we did this switch during 12211 * EOF ( fortran_wrap()) processing, but the only time this flag12212 * is looked at is after fortran_wrap() is called, so it's safe12599 * EOF (yywrap()) processing, but the only time this flag 12600 * is looked at is after yywrap() is called, so it's safe 12213 12601 * to go ahead and always set it. 12214 12602 */ … … 12216 12604 } 12217 12605 12218 static void fortran__load_buffer_state (void)12606 static void yy_load_buffer_state (void) 12219 12607 { 12220 12608 (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_n_chars; 12221 12609 (yytext_ptr) = (yy_c_buf_p) = YY_CURRENT_BUFFER_LVALUE->yy_buf_pos; 12222 fortran_in = YY_CURRENT_BUFFER_LVALUE->yy_input_file;12610 yyin = YY_CURRENT_BUFFER_LVALUE->yy_input_file; 12223 12611 (yy_hold_char) = *(yy_c_buf_p); 12224 12612 } … … 12230 12618 * @return the allocated buffer state. 12231 12619 */ 12232 YY_BUFFER_STATE fortran__create_buffer (FILE * file, int size )12620 YY_BUFFER_STATE yy_create_buffer (FILE * file, int size ) 12233 12621 { 12234 12622 YY_BUFFER_STATE b; 12235 12623 12236 b = (YY_BUFFER_STATE) fortran_alloc(sizeof( struct yy_buffer_state ) );12624 b = (YY_BUFFER_STATE) yyalloc( sizeof( struct yy_buffer_state ) ); 12237 12625 if ( ! b ) 12238 YY_FATAL_ERROR( "out of dynamic memory in fortran__create_buffer()" );12626 YY_FATAL_ERROR( "out of dynamic memory in yy_create_buffer()" ); 12239 12627 12240 12628 b->yy_buf_size = size; … … 12243 12631 * we need to put in 2 end-of-buffer characters. 12244 12632 */ 12245 b->yy_ch_buf = (char *) fortran_alloc(b->yy_buf_size + 2);12633 b->yy_ch_buf = (char *) yyalloc( (yy_size_t) (b->yy_buf_size + 2) ); 12246 12634 if ( ! b->yy_ch_buf ) 12247 YY_FATAL_ERROR( "out of dynamic memory in fortran__create_buffer()" );12635 YY_FATAL_ERROR( "out of dynamic memory in yy_create_buffer()" ); 12248 12636 12249 12637 b->yy_is_our_buffer = 1; 12250 12638 12251 fortran__init_buffer(b,file );12639 yy_init_buffer( b, file ); 12252 12640 12253 12641 return b; … … 12255 12643 12256 12644 /** Destroy the buffer. 12257 * @param b a buffer created with fortran__create_buffer()12645 * @param b a buffer created with yy_create_buffer() 12258 12646 * 12259 12647 */ 12260 void fortran__delete_buffer (YY_BUFFER_STATE b )12648 void yy_delete_buffer (YY_BUFFER_STATE b ) 12261 12649 { 12262 12650 … … 12268 12656 12269 12657 if ( b->yy_is_our_buffer ) 12270 fortran_free((void *) b->yy_ch_buf );12271 12272 fortran_free((void *) b );12658 yyfree( (void *) b->yy_ch_buf ); 12659 12660 yyfree( (void *) b ); 12273 12661 } 12274 12662 12275 12663 /* Initializes or reinitializes a buffer. 12276 12664 * This function is sometimes called more than once on the same buffer, 12277 * such as during a fortran_restart() or at EOF.12665 * such as during a yyrestart() or at EOF. 12278 12666 */ 12279 static void fortran__init_buffer (YY_BUFFER_STATE b, FILE * file )12667 static void yy_init_buffer (YY_BUFFER_STATE b, FILE * file ) 12280 12668 12281 12669 { 12282 12670 int oerrno = errno; 12283 12671 12284 fortran__flush_buffer(b );12672 yy_flush_buffer( b ); 12285 12673 12286 12674 b->yy_input_file = file; 12287 12675 b->yy_fill_buffer = 1; 12288 12676 12289 /* If b is the current buffer, then fortran__init_buffer was _probably_12290 * called from fortran_restart() or through yy_get_next_buffer.12677 /* If b is the current buffer, then yy_init_buffer was _probably_ 12678 * called from yyrestart() or through yy_get_next_buffer. 12291 12679 * In that case, we don't want to reset the lineno or column. 12292 12680 */ … … 12305 12693 * 12306 12694 */ 12307 void fortran__flush_buffer (YY_BUFFER_STATE b )12695 void yy_flush_buffer (YY_BUFFER_STATE b ) 12308 12696 { 12309 12697 if ( ! b ) … … 12325 12713 12326 12714 if ( b == YY_CURRENT_BUFFER ) 12327 fortran__load_buffer_state();12715 yy_load_buffer_state( ); 12328 12716 } 12329 12717 … … 12334 12722 * 12335 12723 */ 12336 void fortran_push_buffer_state (YY_BUFFER_STATE new_buffer )12724 void yypush_buffer_state (YY_BUFFER_STATE new_buffer ) 12337 12725 { 12338 12726 if (new_buffer == NULL) 12339 12727 return; 12340 12728 12341 fortran_ensure_buffer_stack();12342 12343 /* This block is copied from fortran__switch_to_buffer. */12729 yyensure_buffer_stack(); 12730 12731 /* This block is copied from yy_switch_to_buffer. */ 12344 12732 if ( YY_CURRENT_BUFFER ) 12345 12733 { … … 12355 12743 YY_CURRENT_BUFFER_LVALUE = new_buffer; 12356 12744 12357 /* copied from fortran__switch_to_buffer. */12358 fortran__load_buffer_state();12745 /* copied from yy_switch_to_buffer. */ 12746 yy_load_buffer_state( ); 12359 12747 (yy_did_buffer_switch_on_eof) = 1; 12360 12748 } … … 12364 12752 * 12365 12753 */ 12366 void fortran_pop_buffer_state (void)12754 void yypop_buffer_state (void) 12367 12755 { 12368 12756 if (!YY_CURRENT_BUFFER) 12369 12757 return; 12370 12758 12371 fortran__delete_buffer(YY_CURRENT_BUFFER );12759 yy_delete_buffer(YY_CURRENT_BUFFER ); 12372 12760 YY_CURRENT_BUFFER_LVALUE = NULL; 12373 12761 if ((yy_buffer_stack_top) > 0) … … 12375 12763 12376 12764 if (YY_CURRENT_BUFFER) { 12377 fortran__load_buffer_state();12765 yy_load_buffer_state( ); 12378 12766 (yy_did_buffer_switch_on_eof) = 1; 12379 12767 } … … 12383 12771 * Guarantees space for at least one push. 12384 12772 */ 12385 static void fortran_ensure_buffer_stack (void)12773 static void yyensure_buffer_stack (void) 12386 12774 { 12387 12775 yy_size_t num_to_alloc; … … 12393 12781 * immediate realloc on the next call. 12394 12782 */ 12395 num_to_alloc = 1; 12396 (yy_buffer_stack) = (struct yy_buffer_state**) fortran_alloc12783 num_to_alloc = 1; /* After all that talk, this was set to 1 anyways... */ 12784 (yy_buffer_stack) = (struct yy_buffer_state**)yyalloc 12397 12785 (num_to_alloc * sizeof(struct yy_buffer_state*) 12398 12786 ); 12399 12787 if ( ! (yy_buffer_stack) ) 12400 YY_FATAL_ERROR( "out of dynamic memory in fortran_ensure_buffer_stack()" );12401 12788 YY_FATAL_ERROR( "out of dynamic memory in yyensure_buffer_stack()" ); 12789 12402 12790 memset((yy_buffer_stack), 0, num_to_alloc * sizeof(struct yy_buffer_state*)); 12403 12791 12404 12792 (yy_buffer_stack_max) = num_to_alloc; 12405 12793 (yy_buffer_stack_top) = 0; … … 12410 12798 12411 12799 /* Increase the buffer to prepare for a possible push. */ 12412 int grow_size = 8 /* arbitrary grow size */;12800 yy_size_t grow_size = 8 /* arbitrary grow size */; 12413 12801 12414 12802 num_to_alloc = (yy_buffer_stack_max) + grow_size; 12415 (yy_buffer_stack) = (struct yy_buffer_state**) fortran_realloc12803 (yy_buffer_stack) = (struct yy_buffer_state**)yyrealloc 12416 12804 ((yy_buffer_stack), 12417 12805 num_to_alloc * sizeof(struct yy_buffer_state*) 12418 12806 ); 12419 12807 if ( ! (yy_buffer_stack) ) 12420 YY_FATAL_ERROR( "out of dynamic memory in fortran_ensure_buffer_stack()" );12808 YY_FATAL_ERROR( "out of dynamic memory in yyensure_buffer_stack()" ); 12421 12809 12422 12810 /* zero only the new slots.*/ … … 12430 12818 * @param size the size in bytes of the character buffer 12431 12819 * 12432 * @return the newly allocated buffer state object. 12820 * @return the newly allocated buffer state object. 12433 12821 */ 12434 YY_BUFFER_STATE fortran__scan_buffer (char * base, yy_size_t size )12822 YY_BUFFER_STATE yy_scan_buffer (char * base, yy_size_t size ) 12435 12823 { 12436 12824 YY_BUFFER_STATE b; … … 12440 12828 base[size-1] != YY_END_OF_BUFFER_CHAR ) 12441 12829 /* They forgot to leave room for the EOB's. */ 12442 return 0;12443 12444 b = (YY_BUFFER_STATE) fortran_alloc(sizeof( struct yy_buffer_state ) );12830 return NULL; 12831 12832 b = (YY_BUFFER_STATE) yyalloc( sizeof( struct yy_buffer_state ) ); 12445 12833 if ( ! b ) 12446 YY_FATAL_ERROR( "out of dynamic memory in fortran__scan_buffer()" );12447 12448 b->yy_buf_size = size - 2; /* "- 2" to take care of EOB's */12834 YY_FATAL_ERROR( "out of dynamic memory in yy_scan_buffer()" ); 12835 12836 b->yy_buf_size = (int) (size - 2); /* "- 2" to take care of EOB's */ 12449 12837 b->yy_buf_pos = b->yy_ch_buf = base; 12450 12838 b->yy_is_our_buffer = 0; 12451 b->yy_input_file = 0;12839 b->yy_input_file = NULL; 12452 12840 b->yy_n_chars = b->yy_buf_size; 12453 12841 b->yy_is_interactive = 0; … … 12456 12844 b->yy_buffer_status = YY_BUFFER_NEW; 12457 12845 12458 fortran__switch_to_buffer(b );12846 yy_switch_to_buffer( b ); 12459 12847 12460 12848 return b; 12461 12849 } 12462 12850 12463 /** Setup the input buffer state to scan a string. The next call to fortran_lex() will12851 /** Setup the input buffer state to scan a string. The next call to yylex() will 12464 12852 * scan from a @e copy of @a str. 12465 12853 * @param yystr a NUL-terminated string to scan … … 12467 12855 * @return the newly allocated buffer state object. 12468 12856 * @note If you want to scan bytes that may contain NUL values, then use 12469 * fortran__scan_bytes() instead.12857 * yy_scan_bytes() instead. 12470 12858 */ 12471 YY_BUFFER_STATE fortran__scan_string (yyconst char * yystr )12859 YY_BUFFER_STATE yy_scan_string (const char * yystr ) 12472 12860 { 12473 12861 12474 return fortran__scan_bytes(yystr,strlen(yystr) );12862 return yy_scan_bytes( yystr, (int) strlen(yystr) ); 12475 12863 } 12476 12864 12477 /** Setup the input buffer state to scan the given bytes. The next call to fortran_lex() will12865 /** Setup the input buffer state to scan the given bytes. The next call to yylex() will 12478 12866 * scan from a @e copy of @a bytes. 12479 12867 * @param yybytes the byte buffer to scan … … 12482 12870 * @return the newly allocated buffer state object. 12483 12871 */ 12484 YY_BUFFER_STATE fortran__scan_bytes (yyconst char * yybytes, yy_size_t _yybytes_len )12872 YY_BUFFER_STATE yy_scan_bytes (const char * yybytes, int _yybytes_len ) 12485 12873 { 12486 12874 YY_BUFFER_STATE b; 12487 12875 char *buf; 12488 12876 yy_size_t n; 12489 yy_size_t i;12877 int i; 12490 12878 12491 12879 /* Get memory for full buffer, including space for trailing EOB's. */ 12492 n = _yybytes_len + 2;12493 buf = (char *) fortran_alloc(n );12880 n = (yy_size_t) (_yybytes_len + 2); 12881 buf = (char *) yyalloc( n ); 12494 12882 if ( ! buf ) 12495 YY_FATAL_ERROR( "out of dynamic memory in fortran__scan_bytes()" );12883 YY_FATAL_ERROR( "out of dynamic memory in yy_scan_bytes()" ); 12496 12884 12497 12885 for ( i = 0; i < _yybytes_len; ++i ) … … 12500 12888 buf[_yybytes_len] = buf[_yybytes_len+1] = YY_END_OF_BUFFER_CHAR; 12501 12889 12502 b = fortran__scan_buffer(buf,n );12890 b = yy_scan_buffer( buf, n ); 12503 12891 if ( ! b ) 12504 YY_FATAL_ERROR( "bad buffer in fortran__scan_bytes()" );12892 YY_FATAL_ERROR( "bad buffer in yy_scan_bytes()" ); 12505 12893 12506 12894 /* It's okay to grow etc. this buffer, and we should throw it … … 12516 12904 #endif 12517 12905 12518 static void yy _fatal_error (yyconst char* msg )12906 static void yynoreturn yy_fatal_error (const char* msg ) 12519 12907 { 12520 (void)fprintf( stderr, "%s\n", msg );12908 fprintf( stderr, "%s\n", msg ); 12521 12909 exit( YY_EXIT_FAILURE ); 12522 12910 } … … 12528 12916 do \ 12529 12917 { \ 12530 /* Undo effects of setting up fortran_text. */ \12918 /* Undo effects of setting up yytext. */ \ 12531 12919 int yyless_macro_arg = (n); \ 12532 12920 YY_LESS_LINENO(yyless_macro_arg);\ 12533 fortran_text[fortran_leng] = (yy_hold_char); \12534 (yy_c_buf_p) = fortran_text + yyless_macro_arg; \12921 yytext[yyleng] = (yy_hold_char); \ 12922 (yy_c_buf_p) = yytext + yyless_macro_arg; \ 12535 12923 (yy_hold_char) = *(yy_c_buf_p); \ 12536 12924 *(yy_c_buf_p) = '\0'; \ 12537 fortran_leng = yyless_macro_arg; \12925 yyleng = yyless_macro_arg; \ 12538 12926 } \ 12539 12927 while ( 0 ) … … 12544 12932 * 12545 12933 */ 12546 int fortran_get_lineno (void)12934 int yyget_lineno (void) 12547 12935 { 12548 12549 return fortran_lineno;12936 12937 return yylineno; 12550 12938 } 12551 12939 … … 12553 12941 * 12554 12942 */ 12555 FILE * fortran_get_in (void)12943 FILE *yyget_in (void) 12556 12944 { 12557 return fortran_in;12945 return yyin; 12558 12946 } 12559 12947 … … 12561 12949 * 12562 12950 */ 12563 FILE * fortran_get_out (void)12951 FILE *yyget_out (void) 12564 12952 { 12565 return fortran_out;12953 return yyout; 12566 12954 } 12567 12955 … … 12569 12957 * 12570 12958 */ 12571 yy_size_t fortran_get_leng (void)12959 int yyget_leng (void) 12572 12960 { 12573 return fortran_leng;12961 return yyleng; 12574 12962 } 12575 12963 … … 12578 12966 */ 12579 12967 12580 char * fortran_get_text (void)12968 char *yyget_text (void) 12581 12969 { 12582 return fortran_text;12970 return yytext; 12583 12971 } 12584 12972 12585 12973 /** Set the current line number. 12586 * @param line_number12974 * @param _line_number line number 12587 12975 * 12588 12976 */ 12589 void fortran_set_lineno (intline_number )12977 void yyset_lineno (int _line_number ) 12590 12978 { 12591 12979 12592 fortran_lineno =line_number;12980 yylineno = _line_number; 12593 12981 } 12594 12982 12595 12983 /** Set the input stream. This does not discard the current 12596 12984 * input buffer. 12597 * @param in_str A readable stream.12985 * @param _in_str A readable stream. 12598 12986 * 12599 * @see fortran__switch_to_buffer12987 * @see yy_switch_to_buffer 12600 12988 */ 12601 void fortran_set_in (FILE *in_str )12989 void yyset_in (FILE * _in_str ) 12602 12990 { 12603 fortran_in =in_str ;12991 yyin = _in_str ; 12604 12992 } 12605 12993 12606 void fortran_set_out (FILE *out_str )12994 void yyset_out (FILE * _out_str ) 12607 12995 { 12608 fortran_out =out_str ;12996 yyout = _out_str ; 12609 12997 } 12610 12998 12611 int fortran_get_debug (void)12999 int yyget_debug (void) 12612 13000 { 12613 return fortran__flex_debug;13001 return yy_flex_debug; 12614 13002 } 12615 13003 12616 void fortran_set_debug (intbdebug )13004 void yyset_debug (int _bdebug ) 12617 13005 { 12618 fortran__flex_debug =bdebug ;13006 yy_flex_debug = _bdebug ; 12619 13007 } 12620 13008 … … 12622 13010 { 12623 13011 /* Initialization is the same as for the non-reentrant scanner. 12624 * This function is called from fortran_lex_destroy(), so don't allocate here.13012 * This function is called from yylex_destroy(), so don't allocate here. 12625 13013 */ 12626 13014 12627 (yy_buffer_stack) = 0;13015 (yy_buffer_stack) = NULL; 12628 13016 (yy_buffer_stack_top) = 0; 12629 13017 (yy_buffer_stack_max) = 0; 12630 (yy_c_buf_p) = (char *) 0;13018 (yy_c_buf_p) = NULL; 12631 13019 (yy_init) = 0; 12632 13020 (yy_start) = 0; … … 12639 13027 /* Defined in main.c */ 12640 13028 #ifdef YY_STDINIT 12641 fortran_in = stdin;12642 fortran_out = stdout;13029 yyin = stdin; 13030 yyout = stdout; 12643 13031 #else 12644 fortran_in = (FILE *) 0;12645 fortran_out = (FILE *) 0;13032 yyin = NULL; 13033 yyout = NULL; 12646 13034 #endif 12647 13035 12648 13036 /* For future reference: Set errno on error, since we are called by 12649 * fortran_lex_init()13037 * yylex_init() 12650 13038 */ 12651 13039 return 0; 12652 13040 } 12653 13041 12654 /* fortran_lex_destroy is for both reentrant and non-reentrant scanners. */12655 int fortran_lex_destroy (void)13042 /* yylex_destroy is for both reentrant and non-reentrant scanners. */ 13043 int yylex_destroy (void) 12656 13044 { 12657 13045 12658 13046 /* Pop the buffer stack, destroying each element. */ 12659 13047 while(YY_CURRENT_BUFFER){ 12660 fortran__delete_buffer(YY_CURRENT_BUFFER );13048 yy_delete_buffer( YY_CURRENT_BUFFER ); 12661 13049 YY_CURRENT_BUFFER_LVALUE = NULL; 12662 fortran_pop_buffer_state();13050 yypop_buffer_state(); 12663 13051 } 12664 13052 12665 13053 /* Destroy the stack itself. */ 12666 fortran_free((yy_buffer_stack) );13054 yyfree((yy_buffer_stack) ); 12667 13055 (yy_buffer_stack) = NULL; 12668 13056 12669 fortran_free ( (yy_state_buf) );13057 yyfree ( (yy_state_buf) ); 12670 13058 (yy_state_buf) = NULL; 12671 13059 12672 13060 /* Reset the globals. This is important in a non-reentrant scanner so the next time 12673 * fortran_lex() is called, initialization will occur. */13061 * yylex() is called, initialization will occur. */ 12674 13062 yy_init_globals( ); 12675 13063 … … 12682 13070 12683 13071 #ifndef yytext_ptr 12684 static void yy_flex_strncpy (char* s1, yyconst char * s2, int n )13072 static void yy_flex_strncpy (char* s1, const char * s2, int n ) 12685 13073 { 12686 register int i; 13074 13075 int i; 12687 13076 for ( i = 0; i < n; ++i ) 12688 13077 s1[i] = s2[i]; … … 12691 13080 12692 13081 #ifdef YY_NEED_STRLEN 12693 static int yy_flex_strlen ( yyconst char * s )13082 static int yy_flex_strlen (const char * s ) 12694 13083 { 12695 registerint n;13084 int n; 12696 13085 for ( n = 0; s[n]; ++n ) 12697 13086 ; … … 12701 13090 #endif 12702 13091 12703 void * fortran_alloc (yy_size_t size )13092 void *yyalloc (yy_size_t size ) 12704 13093 { 12705 return (void *) malloc( size);13094 return malloc(size); 12706 13095 } 12707 13096 12708 void * fortran_realloc (void * ptr, yy_size_t size )13097 void *yyrealloc (void * ptr, yy_size_t size ) 12709 13098 { 13099 12710 13100 /* The cast to (char *) in the following accommodates both 12711 13101 * implementations that use char* generic pointers, and those … … 12715 13105 * as though doing an assignment. 12716 13106 */ 12717 return (void *) realloc( (char *) ptr, size);13107 return realloc(ptr, size); 12718 13108 } 12719 13109 12720 void fortran_free (void * ptr )13110 void yyfree (void * ptr ) 12721 13111 { 12722 free( (char *) ptr ); /* see fortran_realloc() for (char *) cast */13112 free( (char *) ptr ); /* see yyrealloc() for (char *) cast */ 12723 13113 } 12724 13114 12725 13115 #define YYTABLES_NAME "yytables" 12726 13116 12727 #line 383 "fortran.lex" 12728 13117 #line 384 "fortran.lex" 12729 13118 12730 13119 -
vendors/AGRIF/dev_r14608_AGRIF_domcfg/LIB/main.c
r14431 r14621 1 /* A Bison parser, made by GNU Bison 3. 0.4. */1 /* A Bison parser, made by GNU Bison 3.5.1. */ 2 2 3 3 /* Bison implementation for Yacc-like parsers in C 4 4 5 Copyright (C) 1984, 1989-1990, 2000-2015 Free Software Foundation, Inc. 5 Copyright (C) 1984, 1989-1990, 2000-2015, 2018-2020 Free Software Foundation, 6 Inc. 6 7 7 8 This program is free software: you can redistribute it and/or modify … … 41 42 USER NAME SPACE" below. */ 42 43 44 /* Undocumented macros, especially those whose name start with YY_, 45 are private implementation details. Do not rely on them. */ 46 43 47 /* Identify Bison output. */ 44 48 #define YYBISON 1 45 49 46 50 /* Bison version. */ 47 #define YYBISON_VERSION "3. 0.4"51 #define YYBISON_VERSION "3.5.1" 48 52 49 53 /* Skeleton name. */ … … 66 70 #define yydebug convert_debug 67 71 #define yynerrs convert_nerrs 68 69 72 #define yylval convert_lval 70 73 #define yychar convert_char 71 74 72 /* Copy the first part of user declarations. */73 #line 35 "convert.y" /* yacc.c:339 */75 /* First part of user prologue. */ 76 #line 35 "convert.y" 74 77 75 78 #include <stdlib.h> … … 88 91 89 92 90 #line 91 "convert.tab.c" /* yacc.c:339 */ 91 93 #line 94 "convert.tab.c" 94 95 # ifndef YY_CAST 96 # ifdef __cplusplus 97 # define YY_CAST(Type, Val) static_cast<Type> (Val) 98 # define YY_REINTERPRET_CAST(Type, Val) reinterpret_cast<Type> (Val) 99 # else 100 # define YY_CAST(Type, Val) ((Type) (Val)) 101 # define YY_REINTERPRET_CAST(Type, Val) ((Type) (Val)) 102 # endif 103 # endif 92 104 # ifndef YY_NULLPTR 93 # if defined __cplusplus && 201103L <= __cplusplus 94 # define YY_NULLPTR nullptr 105 # if defined __cplusplus 106 # if 201103L <= __cplusplus 107 # define YY_NULLPTR nullptr 108 # else 109 # define YY_NULLPTR 0 110 # endif 95 111 # else 96 # define YY_NULLPTR 0112 # define YY_NULLPTR ((void*)0) 97 113 # endif 98 114 # endif … … 135 151 /* Value type. */ 136 152 #if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED 137 138 153 union YYSTYPE 139 154 { 140 #line 52 "convert.y" /* yacc.c:355 */155 #line 52 "convert.y" 141 156 142 157 char na[LONG_M]; 143 158 144 #line 145 "convert.tab.c" /* yacc.c:355 */ 159 #line 160 "convert.tab.c" 160 145 161 }; 146 147 162 typedef union YYSTYPE YYSTYPE; 148 163 # define YYSTYPE_IS_TRIVIAL 1 … … 157 172 158 173 159 /* Copy the second part of user declarations. */ 160 161 #line 162 "convert.tab.c" /* yacc.c:358 */ 174 162 175 163 176 #ifdef short … … 165 178 #endif 166 179 167 #ifdef YYTYPE_UINT8 168 typedef YYTYPE_UINT8 yytype_uint8; 169 #else 180 /* On compilers that do not define __PTRDIFF_MAX__ etc., make sure 181 <limits.h> and (if available) <stdint.h> are included 182 so that the code can choose integer types of a good width. */ 183 184 #ifndef __PTRDIFF_MAX__ 185 # include <limits.h> /* INFRINGES ON USER NAME SPACE */ 186 # if defined __STDC_VERSION__ && 199901 <= __STDC_VERSION__ 187 # include <stdint.h> /* INFRINGES ON USER NAME SPACE */ 188 # define YY_STDINT_H 189 # endif 190 #endif 191 192 /* Narrow types that promote to a signed type and that can represent a 193 signed or unsigned integer of at least N bits. In tables they can 194 save space and decrease cache pressure. Promoting to a signed type 195 helps avoid bugs in integer arithmetic. */ 196 197 #ifdef __INT_LEAST8_MAX__ 198 typedef __INT_LEAST8_TYPE__ yytype_int8; 199 #elif defined YY_STDINT_H 200 typedef int_least8_t yytype_int8; 201 #else 202 typedef signed char yytype_int8; 203 #endif 204 205 #ifdef __INT_LEAST16_MAX__ 206 typedef __INT_LEAST16_TYPE__ yytype_int16; 207 #elif defined YY_STDINT_H 208 typedef int_least16_t yytype_int16; 209 #else 210 typedef short yytype_int16; 211 #endif 212 213 #if defined __UINT_LEAST8_MAX__ && __UINT_LEAST8_MAX__ <= __INT_MAX__ 214 typedef __UINT_LEAST8_TYPE__ yytype_uint8; 215 #elif (!defined __UINT_LEAST8_MAX__ && defined YY_STDINT_H \ 216 && UINT_LEAST8_MAX <= INT_MAX) 217 typedef uint_least8_t yytype_uint8; 218 #elif !defined __UINT_LEAST8_MAX__ && UCHAR_MAX <= INT_MAX 170 219 typedef unsigned char yytype_uint8; 171 #endif 172 173 #ifdef YYTYPE_INT8 174 typedef YYTYPE_INT8 yytype_int8; 175 #else 176 typedef signed char yytype_int8; 177 #endif 178 179 #ifdef YYTYPE_UINT16 180 typedef YYTYPE_UINT16 yytype_uint16; 181 #else 182 typedef unsigned short int yytype_uint16; 183 #endif 184 185 #ifdef YYTYPE_INT16 186 typedef YYTYPE_INT16 yytype_int16; 187 #else 188 typedef short int yytype_int16; 220 #else 221 typedef short yytype_uint8; 222 #endif 223 224 #if defined __UINT_LEAST16_MAX__ && __UINT_LEAST16_MAX__ <= __INT_MAX__ 225 typedef __UINT_LEAST16_TYPE__ yytype_uint16; 226 #elif (!defined __UINT_LEAST16_MAX__ && defined YY_STDINT_H \ 227 && UINT_LEAST16_MAX <= INT_MAX) 228 typedef uint_least16_t yytype_uint16; 229 #elif !defined __UINT_LEAST16_MAX__ && USHRT_MAX <= INT_MAX 230 typedef unsigned short yytype_uint16; 231 #else 232 typedef int yytype_uint16; 233 #endif 234 235 #ifndef YYPTRDIFF_T 236 # if defined __PTRDIFF_TYPE__ && defined __PTRDIFF_MAX__ 237 # define YYPTRDIFF_T __PTRDIFF_TYPE__ 238 # define YYPTRDIFF_MAXIMUM __PTRDIFF_MAX__ 239 # elif defined PTRDIFF_MAX 240 # ifndef ptrdiff_t 241 # include <stddef.h> /* INFRINGES ON USER NAME SPACE */ 242 # endif 243 # define YYPTRDIFF_T ptrdiff_t 244 # define YYPTRDIFF_MAXIMUM PTRDIFF_MAX 245 # else 246 # define YYPTRDIFF_T long 247 # define YYPTRDIFF_MAXIMUM LONG_MAX 248 # endif 189 249 #endif 190 250 … … 194 254 # elif defined size_t 195 255 # define YYSIZE_T size_t 196 # elif ! defined YYSIZE_T256 # elif defined __STDC_VERSION__ && 199901 <= __STDC_VERSION__ 197 257 # include <stddef.h> /* INFRINGES ON USER NAME SPACE */ 198 258 # define YYSIZE_T size_t 199 259 # else 200 # define YYSIZE_T unsigned int260 # define YYSIZE_T unsigned 201 261 # endif 202 262 #endif 203 263 204 #define YYSIZE_MAXIMUM ((YYSIZE_T) -1) 264 #define YYSIZE_MAXIMUM \ 265 YY_CAST (YYPTRDIFF_T, \ 266 (YYPTRDIFF_MAXIMUM < YY_CAST (YYSIZE_T, -1) \ 267 ? YYPTRDIFF_MAXIMUM \ 268 : YY_CAST (YYSIZE_T, -1))) 269 270 #define YYSIZEOF(X) YY_CAST (YYPTRDIFF_T, sizeof (X)) 271 272 /* Stored state numbers (used for stacks). */ 273 typedef yytype_int8 yy_state_t; 274 275 /* State numbers in computations. */ 276 typedef int yy_state_fast_t; 205 277 206 278 #ifndef YY_ … … 216 288 #endif 217 289 218 #ifndef YY_ATTRIBUTE 219 # if (defined __GNUC__ \ 220 && (2 < __GNUC__ || (__GNUC__ == 2 && 96 <= __GNUC_MINOR__))) \ 221 || defined __SUNPRO_C && 0x5110 <= __SUNPRO_C 222 # define YY_ATTRIBUTE(Spec) __attribute__(Spec) 290 #ifndef YY_ATTRIBUTE_PURE 291 # if defined __GNUC__ && 2 < __GNUC__ + (96 <= __GNUC_MINOR__) 292 # define YY_ATTRIBUTE_PURE __attribute__ ((__pure__)) 223 293 # else 224 # define YY_ATTRIBUTE (Spec) /* empty */294 # define YY_ATTRIBUTE_PURE 225 295 # endif 226 296 #endif 227 297 228 #ifndef YY_ATTRIBUTE_PURE229 # define YY_ATTRIBUTE_PURE YY_ATTRIBUTE ((__pure__))230 #endif231 232 298 #ifndef YY_ATTRIBUTE_UNUSED 233 # define YY_ATTRIBUTE_UNUSED YY_ATTRIBUTE ((__unused__)) 234 #endif 235 236 #if !defined _Noreturn \ 237 && (!defined __STDC_VERSION__ || __STDC_VERSION__ < 201112) 238 # if defined _MSC_VER && 1200 <= _MSC_VER 239 # define _Noreturn __declspec (noreturn) 299 # if defined __GNUC__ && 2 < __GNUC__ + (7 <= __GNUC_MINOR__) 300 # define YY_ATTRIBUTE_UNUSED __attribute__ ((__unused__)) 240 301 # else 241 # define _Noreturn YY_ATTRIBUTE ((__noreturn__))302 # define YY_ATTRIBUTE_UNUSED 242 303 # endif 243 304 #endif … … 250 311 #endif 251 312 252 #if defined __GNUC__ && 407 <= __GNUC__ * 100 + __GNUC_MINOR__313 #if defined __GNUC__ && ! defined __ICC && 407 <= __GNUC__ * 100 + __GNUC_MINOR__ 253 314 /* Suppress an incorrect diagnostic about yylval being uninitialized. */ 254 # define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN \255 _Pragma ("GCC diagnostic push") \256 _Pragma ("GCC diagnostic ignored \"-Wuninitialized\"") \315 # define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN \ 316 _Pragma ("GCC diagnostic push") \ 317 _Pragma ("GCC diagnostic ignored \"-Wuninitialized\"") \ 257 318 _Pragma ("GCC diagnostic ignored \"-Wmaybe-uninitialized\"") 258 # define YY_IGNORE_MAYBE_UNINITIALIZED_END \319 # define YY_IGNORE_MAYBE_UNINITIALIZED_END \ 259 320 _Pragma ("GCC diagnostic pop") 260 321 #else … … 269 330 #endif 270 331 332 #if defined __cplusplus && defined __GNUC__ && ! defined __ICC && 6 <= __GNUC__ 333 # define YY_IGNORE_USELESS_CAST_BEGIN \ 334 _Pragma ("GCC diagnostic push") \ 335 _Pragma ("GCC diagnostic ignored \"-Wuseless-cast\"") 336 # define YY_IGNORE_USELESS_CAST_END \ 337 _Pragma ("GCC diagnostic pop") 338 #endif 339 #ifndef YY_IGNORE_USELESS_CAST_BEGIN 340 # define YY_IGNORE_USELESS_CAST_BEGIN 341 # define YY_IGNORE_USELESS_CAST_END 342 #endif 343 344 345 #define YY_ASSERT(E) ((void) (0 && (E))) 271 346 272 347 #if ! defined yyoverflow || YYERROR_VERBOSE … … 345 420 union yyalloc 346 421 { 347 yy type_int16yyss_alloc;422 yy_state_t yyss_alloc; 348 423 YYSTYPE yyvs_alloc; 349 424 }; 350 425 351 426 /* The size of the maximum gap between one aligned stack and the next. */ 352 # define YYSTACK_GAP_MAXIMUM ( sizeof(union yyalloc) - 1)427 # define YYSTACK_GAP_MAXIMUM (YYSIZEOF (union yyalloc) - 1) 353 428 354 429 /* The size of an array large to enough to hold all stacks, each with 355 430 N elements. */ 356 431 # define YYSTACK_BYTES(N) \ 357 ((N) * ( sizeof (yytype_int16) + sizeof(YYSTYPE)) \432 ((N) * (YYSIZEOF (yy_state_t) + YYSIZEOF (YYSTYPE)) \ 358 433 + YYSTACK_GAP_MAXIMUM) 359 434 … … 368 443 do \ 369 444 { \ 370 YY SIZE_T yynewbytes;\445 YYPTRDIFF_T yynewbytes; \ 371 446 YYCOPY (&yyptr->Stack_alloc, Stack, yysize); \ 372 447 Stack = &yyptr->Stack_alloc; \ 373 yynewbytes = yystacksize * sizeof(*Stack) + YYSTACK_GAP_MAXIMUM; \374 yyptr += yynewbytes / sizeof (*yyptr);\448 yynewbytes = yystacksize * YYSIZEOF (*Stack) + YYSTACK_GAP_MAXIMUM; \ 449 yyptr += yynewbytes / YYSIZEOF (*yyptr); \ 375 450 } \ 376 451 while (0) … … 384 459 # if defined __GNUC__ && 1 < __GNUC__ 385 460 # define YYCOPY(Dst, Src, Count) \ 386 __builtin_memcpy (Dst, Src, (Count) * sizeof (*(Src)))461 __builtin_memcpy (Dst, Src, YY_CAST (YYSIZE_T, (Count)) * sizeof (*(Src))) 387 462 # else 388 463 # define YYCOPY(Dst, Src, Count) \ 389 464 do \ 390 465 { \ 391 YY SIZE_T yyi;\466 YYPTRDIFF_T yyi; \ 392 467 for (yyi = 0; yyi < (Count); yyi++) \ 393 468 (Dst)[yyi] = (Src)[yyi]; \ … … 412 487 #define YYNSTATES 29 413 488 414 /* YYTRANSLATE[YYX] -- Symbol number corresponding to YYX as returned415 by yylex, with out-of-bounds checking. */416 489 #define YYUNDEFTOK 2 417 490 #define YYMAXUTOK 267 418 491 492 493 /* YYTRANSLATE(TOKEN-NUM) -- Symbol number corresponding to TOKEN-NUM 494 as returned by yylex, with out-of-bounds checking. */ 419 495 #define YYTRANSLATE(YYX) \ 420 ( (unsigned int)(YYX) <= YYMAXUTOK ? yytranslate[YYX] : YYUNDEFTOK)496 (0 <= (YYX) && (YYX) <= YYMAXUTOK ? yytranslate[YYX] : YYUNDEFTOK) 421 497 422 498 /* YYTRANSLATE[TOKEN-NUM] -- Symbol number corresponding to TOKEN-NUM 423 as returned by yylex , without out-of-bounds checking. */424 static const yytype_ uint8 yytranslate[] =499 as returned by yylex. */ 500 static const yytype_int8 yytranslate[] = 425 501 { 426 502 0, 2, 2, 2, 2, 2, 2, 2, 2, 2, … … 455 531 #if YYDEBUG 456 532 /* YYRLINE[YYN] -- Source line where rule number YYN was defined. */ 457 static const yytype_ uint8 yyrline[] =533 static const yytype_int8 yyrline[] = 458 534 { 459 535 0, 71, 71, 72, 75, 76, 77, 78, 79, 84, … … 477 553 /* YYTOKNUM[NUM] -- (External) token number corresponding to the 478 554 (internal) symbol number NUM (which must be that of a token). */ 479 static const yytype_ uint16 yytoknum[] =555 static const yytype_int16 yytoknum[] = 480 556 { 481 557 0, 256, 257, 258, 259, 260, 261, 262, 263, 264, … … 484 560 # endif 485 561 486 #define YYPACT_NINF -13487 488 #define yypact_value_is_default(Yy state) \489 ( !!((Yystate) == (-13)))490 491 #define YYTABLE_NINF -1492 493 #define yytable_value_is_error(Yy table_value) \562 #define YYPACT_NINF (-13) 563 564 #define yypact_value_is_default(Yyn) \ 565 ((Yyn) == YYPACT_NINF) 566 567 #define YYTABLE_NINF (-1) 568 569 #define yytable_value_is_error(Yyn) \ 494 570 0 495 571 … … 506 582 Performed when YYTABLE does not specify something else to do. Zero 507 583 means the default is an error. */ 508 static const yytype_ uint8 yydefact[] =584 static const yytype_int8 yydefact[] = 509 585 { 510 586 2, 0, 1, 0, 0, 0, 0, 0, 4, 3, … … 528 604 positive, shift that token. If negative, reduce the rule whose 529 605 number is the opposite. If YYTABLE_NINF, syntax error. */ 530 static const yytype_ uint8 yytable[] =606 static const yytype_int8 yytable[] = 531 607 { 532 608 2, 19, 20, 10, 3, 12, 4, 5, 6, 25, … … 544 620 /* YYSTOS[STATE-NUM] -- The (internal number of the) accessing 545 621 symbol of state STATE-NUM. */ 546 static const yytype_ uint8 yystos[] =622 static const yytype_int8 yystos[] = 547 623 { 548 624 0, 17, 0, 4, 6, 7, 8, 12, 15, 18, … … 552 628 553 629 /* YYR1[YYN] -- Symbol number of symbol that rule YYN derives. */ 554 static const yytype_ uint8 yyr1[] =630 static const yytype_int8 yyr1[] = 555 631 { 556 632 0, 16, 17, 17, 18, 18, 18, 18, 18, 18, … … 559 635 560 636 /* YYR2[YYN] -- Number of symbols on the right hand side of rule YYN. */ 561 static const yytype_ uint8 yyr2[] =637 static const yytype_int8 yyr2[] = 562 638 { 563 639 0, 2, 0, 2, 1, 3, 5, 7, 3, 5, … … 578 654 #define YYRECOVERING() (!!yyerrstatus) 579 655 580 #define YYBACKUP(Token, Value) \581 do \582 if (yychar == YYEMPTY) \583 { \584 yychar = (Token); \585 yylval = (Value); \586 YYPOPSTACK (yylen); \587 yystate = *yyssp; \588 goto yybackup; \589 } \590 else \591 { \592 yyerror (YY_("syntax error: cannot back up")); \593 YYERROR; \594 } \595 while (0)656 #define YYBACKUP(Token, Value) \ 657 do \ 658 if (yychar == YYEMPTY) \ 659 { \ 660 yychar = (Token); \ 661 yylval = (Value); \ 662 YYPOPSTACK (yylen); \ 663 yystate = *yyssp; \ 664 goto yybackup; \ 665 } \ 666 else \ 667 { \ 668 yyerror (YY_("syntax error: cannot back up")); \ 669 YYERROR; \ 670 } \ 671 while (0) 596 672 597 673 /* Error token number */ … … 633 709 634 710 635 /*----------------------------------- -----.636 | Print this symbol's value on YYO UTPUT. |637 `----------------------------------- -----*/711 /*-----------------------------------. 712 | Print this symbol's value on YYO. | 713 `-----------------------------------*/ 638 714 639 715 static void 640 yy_symbol_value_print (FILE *yyo utput, int yytype, YYSTYPE const * const yyvaluep)641 { 642 FILE *yyo = yyoutput;643 YYUSE (yyo );716 yy_symbol_value_print (FILE *yyo, int yytype, YYSTYPE const * const yyvaluep) 717 { 718 FILE *yyoutput = yyo; 719 YYUSE (yyoutput); 644 720 if (!yyvaluep) 645 721 return; 646 722 # ifdef YYPRINT 647 723 if (yytype < YYNTOKENS) 648 YYPRINT (yyo utput, yytoknum[yytype], *yyvaluep);724 YYPRINT (yyo, yytoknum[yytype], *yyvaluep); 649 725 # endif 726 YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN 650 727 YYUSE (yytype); 651 } 652 653 654 /*--------------------------------. 655 | Print this symbol on YYOUTPUT. | 656 `--------------------------------*/ 728 YY_IGNORE_MAYBE_UNINITIALIZED_END 729 } 730 731 732 /*---------------------------. 733 | Print this symbol on YYO. | 734 `---------------------------*/ 657 735 658 736 static void 659 yy_symbol_print (FILE *yyo utput, int yytype, YYSTYPE const * const yyvaluep)660 { 661 YYFPRINTF (yyo utput, "%s %s (",737 yy_symbol_print (FILE *yyo, int yytype, YYSTYPE const * const yyvaluep) 738 { 739 YYFPRINTF (yyo, "%s %s (", 662 740 yytype < YYNTOKENS ? "token" : "nterm", yytname[yytype]); 663 741 664 yy_symbol_value_print (yyo utput, yytype, yyvaluep);665 YYFPRINTF (yyo utput, ")");742 yy_symbol_value_print (yyo, yytype, yyvaluep); 743 YYFPRINTF (yyo, ")"); 666 744 } 667 745 … … 672 750 673 751 static void 674 yy_stack_print (yy type_int16 *yybottom, yytype_int16*yytop)752 yy_stack_print (yy_state_t *yybottom, yy_state_t *yytop) 675 753 { 676 754 YYFPRINTF (stderr, "Stack now"); … … 695 773 696 774 static void 697 yy_reduce_print (yy type_int16*yyssp, YYSTYPE *yyvsp, int yyrule)698 { 699 unsigned longint yylno = yyrline[yyrule];775 yy_reduce_print (yy_state_t *yyssp, YYSTYPE *yyvsp, int yyrule) 776 { 777 int yylno = yyrline[yyrule]; 700 778 int yynrhs = yyr2[yyrule]; 701 779 int yyi; 702 YYFPRINTF (stderr, "Reducing stack by rule %d (line % lu):\n",780 YYFPRINTF (stderr, "Reducing stack by rule %d (line %d):\n", 703 781 yyrule - 1, yylno); 704 782 /* The symbols being reduced. */ … … 707 785 YYFPRINTF (stderr, " $%d = ", yyi + 1); 708 786 yy_symbol_print (stderr, 709 yystos[ yyssp[yyi + 1 - yynrhs]],710 & (yyvsp[(yyi + 1) - (yynrhs)])787 yystos[+yyssp[yyi + 1 - yynrhs]], 788 &yyvsp[(yyi + 1) - (yynrhs)] 711 789 ); 712 790 YYFPRINTF (stderr, "\n"); … … 752 830 # ifndef yystrlen 753 831 # if defined __GLIBC__ && defined _STRING_H 754 # define yystrlen strlen832 # define yystrlen(S) (YY_CAST (YYPTRDIFF_T, strlen (S))) 755 833 # else 756 834 /* Return the length of YYSTR. */ 757 static YY SIZE_T835 static YYPTRDIFF_T 758 836 yystrlen (const char *yystr) 759 837 { 760 YY SIZE_T yylen;838 YYPTRDIFF_T yylen; 761 839 for (yylen = 0; yystr[yylen]; yylen++) 762 840 continue; … … 794 872 null, do not copy; instead, return the length of what the result 795 873 would have been. */ 796 static YY SIZE_T874 static YYPTRDIFF_T 797 875 yytnamerr (char *yyres, const char *yystr) 798 876 { 799 877 if (*yystr == '"') 800 878 { 801 YY SIZE_T yyn = 0;879 YYPTRDIFF_T yyn = 0; 802 880 char const *yyp = yystr; 803 881 … … 812 890 if (*++yyp != '\\') 813 891 goto do_not_strip_quotes; 814 /* Fall through. */ 892 else 893 goto append; 894 895 append: 815 896 default: 816 897 if (yyres) … … 827 908 } 828 909 829 if (! yyres) 910 if (yyres) 911 return yystpcpy (yyres, yystr) - yyres; 912 else 830 913 return yystrlen (yystr); 831 832 return yystpcpy (yyres, yystr) - yyres;833 914 } 834 915 # endif … … 843 924 required number of bytes is too large to store. */ 844 925 static int 845 yysyntax_error (YYSIZE_T *yymsg_alloc, char **yymsg, 846 yytype_int16 *yyssp, int yytoken) 847 { 848 YYSIZE_T yysize0 = yytnamerr (YY_NULLPTR, yytname[yytoken]); 849 YYSIZE_T yysize = yysize0; 926 yysyntax_error (YYPTRDIFF_T *yymsg_alloc, char **yymsg, 927 yy_state_t *yyssp, int yytoken) 928 { 850 929 enum { YYERROR_VERBOSE_ARGS_MAXIMUM = 5 }; 851 930 /* Internationalized format string. */ 852 931 const char *yyformat = YY_NULLPTR; 853 /* Arguments of yyformat. */ 932 /* Arguments of yyformat: reported tokens (one for the "unexpected", 933 one per "expected"). */ 854 934 char const *yyarg[YYERROR_VERBOSE_ARGS_MAXIMUM]; 855 /* Number of reported tokens (one for the "unexpected", one per 856 "expected"). */ 935 /* Actual size of YYARG. */ 857 936 int yycount = 0; 937 /* Cumulated lengths of YYARG. */ 938 YYPTRDIFF_T yysize = 0; 858 939 859 940 /* There are many possibilities here to consider: … … 882 963 if (yytoken != YYEMPTY) 883 964 { 884 int yyn = yypact[*yyssp]; 965 int yyn = yypact[+*yyssp]; 966 YYPTRDIFF_T yysize0 = yytnamerr (YY_NULLPTR, yytname[yytoken]); 967 yysize = yysize0; 885 968 yyarg[yycount++] = yytname[yytoken]; 886 969 if (!yypact_value_is_default (yyn)) … … 907 990 yyarg[yycount++] = yytname[yyx]; 908 991 { 909 YYSIZE_T yysize1 = yysize + yytnamerr (YY_NULLPTR, yytname[yyx]); 910 if (! (yysize <= yysize1 911 && yysize1 <= YYSTACK_ALLOC_MAXIMUM)) 992 YYPTRDIFF_T yysize1 993 = yysize + yytnamerr (YY_NULLPTR, yytname[yyx]); 994 if (yysize <= yysize1 && yysize1 <= YYSTACK_ALLOC_MAXIMUM) 995 yysize = yysize1; 996 else 912 997 return 2; 913 yysize = yysize1;914 998 } 915 999 } … … 923 1007 yyformat = S; \ 924 1008 break 1009 default: /* Avoid compiler warnings. */ 925 1010 YYCASE_(0, YY_("syntax error")); 926 1011 YYCASE_(1, YY_("syntax error, unexpected %s")); … … 933 1018 934 1019 { 935 YYSIZE_T yysize1 = yysize + yystrlen (yyformat); 936 if (! (yysize <= yysize1 && yysize1 <= YYSTACK_ALLOC_MAXIMUM)) 1020 /* Don't count the "%s"s in the final size, but reserve room for 1021 the terminator. */ 1022 YYPTRDIFF_T yysize1 = yysize + (yystrlen (yyformat) - 2 * yycount) + 1; 1023 if (yysize <= yysize1 && yysize1 <= YYSTACK_ALLOC_MAXIMUM) 1024 yysize = yysize1; 1025 else 937 1026 return 2; 938 yysize = yysize1;939 1027 } 940 1028 … … 962 1050 else 963 1051 { 964 yyp++;965 yyformat++;1052 ++yyp; 1053 ++yyformat; 966 1054 } 967 1055 } … … 1006 1094 yyparse (void) 1007 1095 { 1008 int yystate;1096 yy_state_fast_t yystate; 1009 1097 /* Number of tokens to shift before error messages enabled. */ 1010 1098 int yyerrstatus; … … 1018 1106 1019 1107 /* The state stack. */ 1020 yy type_int16yyssa[YYINITDEPTH];1021 yy type_int16*yyss;1022 yy type_int16*yyssp;1108 yy_state_t yyssa[YYINITDEPTH]; 1109 yy_state_t *yyss; 1110 yy_state_t *yyssp; 1023 1111 1024 1112 /* The semantic value stack. */ … … 1027 1115 YYSTYPE *yyvsp; 1028 1116 1029 YY SIZE_T yystacksize;1117 YYPTRDIFF_T yystacksize; 1030 1118 1031 1119 int yyn; … … 1041 1129 char yymsgbuf[128]; 1042 1130 char *yymsg = yymsgbuf; 1043 YY SIZE_T yymsg_alloc = sizeof yymsgbuf;1131 YYPTRDIFF_T yymsg_alloc = sizeof yymsgbuf; 1044 1132 #endif 1045 1133 … … 1062 1150 goto yysetstate; 1063 1151 1152 1064 1153 /*------------------------------------------------------------. 1065 | yynewstate -- Push a new state, which is found in yystate. |1154 | yynewstate -- push a new state, which is found in yystate. | 1066 1155 `------------------------------------------------------------*/ 1067 1156 yynewstate: 1068 1157 /* In all cases, when you get here, the value and location stacks 1069 1158 have just been pushed. So pushing a state here evens the stacks. */ 1070 1159 yyssp++; 1071 1160 1072 yysetstate: 1073 *yyssp = yystate; 1161 1162 /*--------------------------------------------------------------------. 1163 | yysetstate -- set current state (the top of the stack) to yystate. | 1164 `--------------------------------------------------------------------*/ 1165 yysetstate: 1166 YYDPRINTF ((stderr, "Entering state %d\n", yystate)); 1167 YY_ASSERT (0 <= yystate && yystate < YYNSTATES); 1168 YY_IGNORE_USELESS_CAST_BEGIN 1169 *yyssp = YY_CAST (yy_state_t, yystate); 1170 YY_IGNORE_USELESS_CAST_END 1074 1171 1075 1172 if (yyss + yystacksize - 1 <= yyssp) 1173 #if !defined yyoverflow && !defined YYSTACK_RELOCATE 1174 goto yyexhaustedlab; 1175 #else 1076 1176 { 1077 1177 /* Get the current used size of the three stacks, in elements. */ 1078 YY SIZE_T yysize = yyssp - yyss + 1;1079 1080 # ifdefyyoverflow1178 YYPTRDIFF_T yysize = yyssp - yyss + 1; 1179 1180 # if defined yyoverflow 1081 1181 { 1082 1182 /* Give user a chance to reallocate the stack. Use copies of 1083 1183 these so that the &'s don't force the real ones into 1084 1184 memory. */ 1185 yy_state_t *yyss1 = yyss; 1085 1186 YYSTYPE *yyvs1 = yyvs; 1086 yytype_int16 *yyss1 = yyss;1087 1187 1088 1188 /* Each stack pointer address is followed by the size of the … … 1091 1191 be undefined if yyoverflow is a macro. */ 1092 1192 yyoverflow (YY_("memory exhausted"), 1093 &yyss1, yysize * sizeof(*yyssp),1094 &yyvs1, yysize * sizeof(*yyvsp),1193 &yyss1, yysize * YYSIZEOF (*yyssp), 1194 &yyvs1, yysize * YYSIZEOF (*yyvsp), 1095 1195 &yystacksize); 1096 1097 1196 yyss = yyss1; 1098 1197 yyvs = yyvs1; 1099 1198 } 1100 #else /* no yyoverflow */ 1101 # ifndef YYSTACK_RELOCATE 1102 goto yyexhaustedlab; 1103 # else 1199 # else /* defined YYSTACK_RELOCATE */ 1104 1200 /* Extend the stack our own way. */ 1105 1201 if (YYMAXDEPTH <= yystacksize) … … 1110 1206 1111 1207 { 1112 yy type_int16*yyss1 = yyss;1208 yy_state_t *yyss1 = yyss; 1113 1209 union yyalloc *yyptr = 1114 (union yyalloc *) YYSTACK_ALLOC (YYSTACK_BYTES (yystacksize)); 1210 YY_CAST (union yyalloc *, 1211 YYSTACK_ALLOC (YY_CAST (YYSIZE_T, YYSTACK_BYTES (yystacksize)))); 1115 1212 if (! yyptr) 1116 1213 goto yyexhaustedlab; 1117 1214 YYSTACK_RELOCATE (yyss_alloc, yyss); 1118 1215 YYSTACK_RELOCATE (yyvs_alloc, yyvs); 1119 # 1216 # undef YYSTACK_RELOCATE 1120 1217 if (yyss1 != yyssa) 1121 1218 YYSTACK_FREE (yyss1); 1122 1219 } 1123 1220 # endif 1124 #endif /* no yyoverflow */1125 1221 1126 1222 yyssp = yyss + yysize - 1; 1127 1223 yyvsp = yyvs + yysize - 1; 1128 1224 1129 YYDPRINTF ((stderr, "Stack size increased to %lu\n", 1130 (unsigned long int) yystacksize)); 1225 YY_IGNORE_USELESS_CAST_BEGIN 1226 YYDPRINTF ((stderr, "Stack size increased to %ld\n", 1227 YY_CAST (long, yystacksize))); 1228 YY_IGNORE_USELESS_CAST_END 1131 1229 1132 1230 if (yyss + yystacksize - 1 <= yyssp) 1133 1231 YYABORT; 1134 1232 } 1135 1136 YYDPRINTF ((stderr, "Entering state %d\n", yystate)); 1233 #endif /* !defined yyoverflow && !defined YYSTACK_RELOCATE */ 1137 1234 1138 1235 if (yystate == YYFINAL) … … 1140 1237 1141 1238 goto yybackup; 1239 1142 1240 1143 1241 /*-----------. … … 1145 1243 `-----------*/ 1146 1244 yybackup: 1147 1148 1245 /* Do appropriate processing given the current state. Read a 1149 1246 lookahead token if we need one and don't already have one. */ … … 1195 1292 /* Shift the lookahead token. */ 1196 1293 YY_SYMBOL_PRINT ("Shifting", yytoken, &yylval, &yylloc); 1197 1198 /* Discard the shifted token. */1199 yychar = YYEMPTY;1200 1201 1294 yystate = yyn; 1202 1295 YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN … … 1204 1297 YY_IGNORE_MAYBE_UNINITIALIZED_END 1205 1298 1299 /* Discard the shifted token. */ 1300 yychar = YYEMPTY; 1206 1301 goto yynewstate; 1207 1302 … … 1218 1313 1219 1314 /*-----------------------------. 1220 | yyreduce -- Do a reduction. |1315 | yyreduce -- do a reduction. | 1221 1316 `-----------------------------*/ 1222 1317 yyreduce: … … 1238 1333 switch (yyn) 1239 1334 { 1240 1241 #line 76 "convert.y" /* yacc.c:1646 */1242 { initdimprob(1,(yyvsp[-1].na),"0","0"); }1243 #line 1 244 "convert.tab.c" /* yacc.c:1646 */1335 case 5: 1336 #line 76 "convert.y" 1337 { initdimprob(1,(yyvsp[-1].na),"0","0"); } 1338 #line 1339 "convert.tab.c" 1244 1339 break; 1245 1340 1246 1341 case 6: 1247 #line 77 "convert.y" /* yacc.c:1646 */1248 { initdimprob(2,(yyvsp[-3].na), (yyvsp[-1].na),"0"); }1249 #line 1 250 "convert.tab.c" /* yacc.c:1646 */1342 #line 77 "convert.y" 1343 { initdimprob(2,(yyvsp[-3].na), (yyvsp[-1].na),"0"); } 1344 #line 1345 "convert.tab.c" 1250 1345 break; 1251 1346 1252 1347 case 7: 1253 #line 78 "convert.y" /* yacc.c:1646 */1254 { initdimprob(3,(yyvsp[-5].na), (yyvsp[-3].na), (yyvsp[-1].na)); }1255 #line 1 256 "convert.tab.c" /* yacc.c:1646 */1348 #line 78 "convert.y" 1349 { initdimprob(3,(yyvsp[-5].na), (yyvsp[-3].na), (yyvsp[-1].na)); } 1350 #line 1351 "convert.tab.c" 1256 1351 break; 1257 1352 1258 1353 case 8: 1259 #line 80 "convert.y" /* yacc.c:1646 */1260 {1354 #line 80 "convert.y" 1355 { 1261 1356 listofmodules = Addtolistnom((yyvsp[-1].na),listofmodules,0); 1262 1357 Addmoduletothelist((yyvsp[-1].na)); 1263 1358 } 1264 #line 1 265 "convert.tab.c" /* yacc.c:1646 */1359 #line 1360 "convert.tab.c" 1265 1360 break; 1266 1361 1267 1362 case 9: 1268 #line 85 "convert.y" /* yacc.c:1646 */1269 {1363 #line 85 "convert.y" 1364 { 1270 1365 if (!strcasecmp((yyvsp[-1].na),"4")) 1271 1366 { … … 1282 1377 } 1283 1378 } 1284 #line 1 285 "convert.tab.c" /* yacc.c:1646 */1379 #line 1380 "convert.tab.c" 1285 1380 break; 1286 1381 1287 1382 case 10: 1288 #line 101 "convert.y" /* yacc.c:1646 */1289 {1383 #line 101 "convert.y" 1384 { 1290 1385 Add_NotGridDepend_Var_1((yyvsp[-1].na)); 1291 1386 } 1292 #line 1 293 "convert.tab.c" /* yacc.c:1646 */1387 #line 1388 "convert.tab.c" 1293 1388 break; 1294 1389 1295 1390 case 11: 1296 #line 105 "convert.y" /* yacc.c:1646 */1297 {1391 #line 105 "convert.y" 1392 { 1298 1393 if (!strcasecmp((yyvsp[-1].na),"FIXED_GRIDS")) fixedgrids = 1; 1299 1394 if (!strcasecmp((yyvsp[-1].na),"ONLY_FIXED_GRIDS")) onlyfixedgrids = 1; 1300 1395 } 1301 #line 13 02 "convert.tab.c" /* yacc.c:1646 */1396 #line 1397 "convert.tab.c" 1302 1397 break; 1303 1398 1304 1399 1305 #line 1306 "convert.tab.c" /* yacc.c:1646 */ 1400 #line 1401 "convert.tab.c" 1401 1306 1402 default: break; 1307 1403 } … … 1328 1424 that goes to, based on the state we popped back to and the rule 1329 1425 number reduced by. */ 1330 1331 yyn = yyr1[yyn]; 1332 1333 yystate = yypgoto[yyn - YYNTOKENS] + *yyssp; 1334 if (0 <= yystate && yystate <= YYLAST && yycheck[yystate] == *yyssp) 1335 yystate = yytable[yystate]; 1336 else 1337 yystate = yydefgoto[yyn - YYNTOKENS]; 1426 { 1427 const int yylhs = yyr1[yyn] - YYNTOKENS; 1428 const int yyi = yypgoto[yylhs] + *yyssp; 1429 yystate = (0 <= yyi && yyi <= YYLAST && yycheck[yyi] == *yyssp 1430 ? yytable[yyi] 1431 : yydefgoto[yylhs]); 1432 } 1338 1433 1339 1434 goto yynewstate; … … 1367 1462 if (yymsg != yymsgbuf) 1368 1463 YYSTACK_FREE (yymsg); 1369 yymsg = (char *) YYSTACK_ALLOC (yymsg_alloc);1464 yymsg = YY_CAST (char *, YYSTACK_ALLOC (YY_CAST (YYSIZE_T, yymsg_alloc))); 1370 1465 if (!yymsg) 1371 1466 { … … 1418 1513 `---------------------------------------------------*/ 1419 1514 yyerrorlab: 1420 1421 /* Pacify compilers like GCC when the user code never invokes 1422 YYERROR and the label yyerrorlab therefore never appears in user 1423 code. */ 1424 if (/*CONSTCOND*/ 0) 1425 goto yyerrorlab; 1515 /* Pacify compilers when the user code never invokes YYERROR and the 1516 label yyerrorlab therefore never appears in user code. */ 1517 if (0) 1518 YYERROR; 1426 1519 1427 1520 /* Do not reclaim the symbols of the rule whose action triggered … … 1485 1578 goto yyreturn; 1486 1579 1580 1487 1581 /*-----------------------------------. 1488 1582 | yyabortlab -- YYABORT comes here. | … … 1491 1585 yyresult = 1; 1492 1586 goto yyreturn; 1587 1493 1588 1494 1589 #if !defined yyoverflow || YYERROR_VERBOSE … … 1502 1597 #endif 1503 1598 1599 1600 /*-----------------------------------------------------. 1601 | yyreturn -- parsing is finished, return the result. | 1602 `-----------------------------------------------------*/ 1504 1603 yyreturn: 1505 1604 if (yychar != YYEMPTY) … … 1518 1617 { 1519 1618 yydestruct ("Cleanup: popping", 1520 yystos[ *yyssp], yyvsp);1619 yystos[+*yyssp], yyvsp); 1521 1620 YYPOPSTACK (1); 1522 1621 } … … 1531 1630 return yyresult; 1532 1631 } 1533 #line 110 "convert.y" /* yacc.c:1906 */1632 #line 110 "convert.y" 1534 1633 1535 1634 … … 1893 1992 #define yy_create_buffer convert__create_buffer 1894 1993 #define yy_delete_buffer convert__delete_buffer 1895 #define yy_flex_debug convert__flex_debug 1994 #define yy_scan_buffer convert__scan_buffer 1995 #define yy_scan_string convert__scan_string 1996 #define yy_scan_bytes convert__scan_bytes 1896 1997 #define yy_init_buffer convert__init_buffer 1897 1998 #define yy_flush_buffer convert__flush_buffer 1898 1999 #define yy_load_buffer_state convert__load_buffer_state 1899 2000 #define yy_switch_to_buffer convert__switch_to_buffer 2001 #define yypush_buffer_state convert_push_buffer_state 2002 #define yypop_buffer_state convert_pop_buffer_state 2003 #define yyensure_buffer_stack convert_ensure_buffer_stack 2004 #define yy_flex_debug convert__flex_debug 1900 2005 #define yyin convert_in 1901 2006 #define yyleng convert_leng … … 1912 2017 #define FLEX_SCANNER 1913 2018 #define YY_FLEX_MAJOR_VERSION 2 1914 #define YY_FLEX_MINOR_VERSION 51915 #define YY_FLEX_SUBMINOR_VERSION 372019 #define YY_FLEX_MINOR_VERSION 6 2020 #define YY_FLEX_SUBMINOR_VERSION 4 1916 2021 #if YY_FLEX_SUBMINOR_VERSION > 0 1917 2022 #define FLEX_BETA 2023 #endif 2024 2025 #ifdef yy_create_buffer 2026 #define convert__create_buffer_ALREADY_DEFINED 2027 #else 2028 #define yy_create_buffer convert__create_buffer 2029 #endif 2030 2031 #ifdef yy_delete_buffer 2032 #define convert__delete_buffer_ALREADY_DEFINED 2033 #else 2034 #define yy_delete_buffer convert__delete_buffer 2035 #endif 2036 2037 #ifdef yy_scan_buffer 2038 #define convert__scan_buffer_ALREADY_DEFINED 2039 #else 2040 #define yy_scan_buffer convert__scan_buffer 2041 #endif 2042 2043 #ifdef yy_scan_string 2044 #define convert__scan_string_ALREADY_DEFINED 2045 #else 2046 #define yy_scan_string convert__scan_string 2047 #endif 2048 2049 #ifdef yy_scan_bytes 2050 #define convert__scan_bytes_ALREADY_DEFINED 2051 #else 2052 #define yy_scan_bytes convert__scan_bytes 2053 #endif 2054 2055 #ifdef yy_init_buffer 2056 #define convert__init_buffer_ALREADY_DEFINED 2057 #else 2058 #define yy_init_buffer convert__init_buffer 2059 #endif 2060 2061 #ifdef yy_flush_buffer 2062 #define convert__flush_buffer_ALREADY_DEFINED 2063 #else 2064 #define yy_flush_buffer convert__flush_buffer 2065 #endif 2066 2067 #ifdef yy_load_buffer_state 2068 #define convert__load_buffer_state_ALREADY_DEFINED 2069 #else 2070 #define yy_load_buffer_state convert__load_buffer_state 2071 #endif 2072 2073 #ifdef yy_switch_to_buffer 2074 #define convert__switch_to_buffer_ALREADY_DEFINED 2075 #else 2076 #define yy_switch_to_buffer convert__switch_to_buffer 2077 #endif 2078 2079 #ifdef yypush_buffer_state 2080 #define convert_push_buffer_state_ALREADY_DEFINED 2081 #else 2082 #define yypush_buffer_state convert_push_buffer_state 2083 #endif 2084 2085 #ifdef yypop_buffer_state 2086 #define convert_pop_buffer_state_ALREADY_DEFINED 2087 #else 2088 #define yypop_buffer_state convert_pop_buffer_state 2089 #endif 2090 2091 #ifdef yyensure_buffer_stack 2092 #define convert_ensure_buffer_stack_ALREADY_DEFINED 2093 #else 2094 #define yyensure_buffer_stack convert_ensure_buffer_stack 2095 #endif 2096 2097 #ifdef yylex 2098 #define convert_lex_ALREADY_DEFINED 2099 #else 2100 #define yylex convert_lex 2101 #endif 2102 2103 #ifdef yyrestart 2104 #define convert_restart_ALREADY_DEFINED 2105 #else 2106 #define yyrestart convert_restart 2107 #endif 2108 2109 #ifdef yylex_init 2110 #define convert_lex_init_ALREADY_DEFINED 2111 #else 2112 #define yylex_init convert_lex_init 2113 #endif 2114 2115 #ifdef yylex_init_extra 2116 #define convert_lex_init_extra_ALREADY_DEFINED 2117 #else 2118 #define yylex_init_extra convert_lex_init_extra 2119 #endif 2120 2121 #ifdef yylex_destroy 2122 #define convert_lex_destroy_ALREADY_DEFINED 2123 #else 2124 #define yylex_destroy convert_lex_destroy 2125 #endif 2126 2127 #ifdef yyget_debug 2128 #define convert_get_debug_ALREADY_DEFINED 2129 #else 2130 #define yyget_debug convert_get_debug 2131 #endif 2132 2133 #ifdef yyset_debug 2134 #define convert_set_debug_ALREADY_DEFINED 2135 #else 2136 #define yyset_debug convert_set_debug 2137 #endif 2138 2139 #ifdef yyget_extra 2140 #define convert_get_extra_ALREADY_DEFINED 2141 #else 2142 #define yyget_extra convert_get_extra 2143 #endif 2144 2145 #ifdef yyset_extra 2146 #define convert_set_extra_ALREADY_DEFINED 2147 #else 2148 #define yyset_extra convert_set_extra 2149 #endif 2150 2151 #ifdef yyget_in 2152 #define convert_get_in_ALREADY_DEFINED 2153 #else 2154 #define yyget_in convert_get_in 2155 #endif 2156 2157 #ifdef yyset_in 2158 #define convert_set_in_ALREADY_DEFINED 2159 #else 2160 #define yyset_in convert_set_in 2161 #endif 2162 2163 #ifdef yyget_out 2164 #define convert_get_out_ALREADY_DEFINED 2165 #else 2166 #define yyget_out convert_get_out 2167 #endif 2168 2169 #ifdef yyset_out 2170 #define convert_set_out_ALREADY_DEFINED 2171 #else 2172 #define yyset_out convert_set_out 2173 #endif 2174 2175 #ifdef yyget_leng 2176 #define convert_get_leng_ALREADY_DEFINED 2177 #else 2178 #define yyget_leng convert_get_leng 2179 #endif 2180 2181 #ifdef yyget_text 2182 #define convert_get_text_ALREADY_DEFINED 2183 #else 2184 #define yyget_text convert_get_text 2185 #endif 2186 2187 #ifdef yyget_lineno 2188 #define convert_get_lineno_ALREADY_DEFINED 2189 #else 2190 #define yyget_lineno convert_get_lineno 2191 #endif 2192 2193 #ifdef yyset_lineno 2194 #define convert_set_lineno_ALREADY_DEFINED 2195 #else 2196 #define yyset_lineno convert_set_lineno 2197 #endif 2198 2199 #ifdef yywrap 2200 #define convert_wrap_ALREADY_DEFINED 2201 #else 2202 #define yywrap convert_wrap 2203 #endif 2204 2205 #ifdef yyalloc 2206 #define convert_alloc_ALREADY_DEFINED 2207 #else 2208 #define yyalloc convert_alloc 2209 #endif 2210 2211 #ifdef yyrealloc 2212 #define convert_realloc_ALREADY_DEFINED 2213 #else 2214 #define yyrealloc convert_realloc 2215 #endif 2216 2217 #ifdef yyfree 2218 #define convert_free_ALREADY_DEFINED 2219 #else 2220 #define yyfree convert_free 2221 #endif 2222 2223 #ifdef yytext 2224 #define convert_text_ALREADY_DEFINED 2225 #else 2226 #define yytext convert_text 2227 #endif 2228 2229 #ifdef yyleng 2230 #define convert_leng_ALREADY_DEFINED 2231 #else 2232 #define yyleng convert_leng 2233 #endif 2234 2235 #ifdef yyin 2236 #define convert_in_ALREADY_DEFINED 2237 #else 2238 #define yyin convert_in 2239 #endif 2240 2241 #ifdef yyout 2242 #define convert_out_ALREADY_DEFINED 2243 #else 2244 #define yyout convert_out 2245 #endif 2246 2247 #ifdef yy_flex_debug 2248 #define convert__flex_debug_ALREADY_DEFINED 2249 #else 2250 #define yy_flex_debug convert__flex_debug 2251 #endif 2252 2253 #ifdef yylineno 2254 #define convert_lineno_ALREADY_DEFINED 2255 #else 2256 #define yylineno convert_lineno 1918 2257 #endif 1919 2258 … … 1988 2327 #endif 1989 2328 2329 #ifndef SIZE_MAX 2330 #define SIZE_MAX (~(size_t)0) 2331 #endif 2332 1990 2333 #endif /* ! C99 */ 1991 2334 1992 2335 #endif /* ! FLEXINT_H */ 1993 2336 1994 #ifdef __cplusplus 1995 1996 /* The "const" storage-class-modifier is valid. */ 1997 #define YY_USE_CONST 1998 1999 #else /* ! __cplusplus */ 2000 2001 /* C99 requires __STDC__ to be defined as 1. */ 2002 #if defined (__STDC__) 2003 2004 #define YY_USE_CONST 2005 2006 #endif /* defined (__STDC__) */ 2007 #endif /* ! __cplusplus */ 2008 2009 #ifdef YY_USE_CONST 2337 /* begin standard C++ headers. */ 2338 2339 /* TODO: this is always defined, so inline it */ 2010 2340 #define yyconst const 2011 #else 2012 #define yyconst 2341 2342 #if defined(__GNUC__) && __GNUC__ >= 3 2343 #define yynoreturn __attribute__((__noreturn__)) 2344 #else 2345 #define yynoreturn 2013 2346 #endif 2014 2347 … … 2016 2349 #define YY_NULL 0 2017 2350 2018 /* Promotes a possibly negative, possibly signed char to an unsigned 2019 * integer for use as an array index. If the signed char is negative, 2020 * we want to instead treat it as an 8-bit unsigned char, hence the 2021 * double cast. 2351 /* Promotes a possibly negative, possibly signed char to an 2352 * integer in range [0..255] for use as an array index. 2022 2353 */ 2023 #define YY_SC_TO_UI(c) (( unsigned int) (unsigned char) c)2354 #define YY_SC_TO_UI(c) ((YY_CHAR) (c)) 2024 2355 2025 2356 /* Enter a start condition. This macro really ought to take a parameter, … … 2028 2359 */ 2029 2360 #define BEGIN (yy_start) = 1 + 2 * 2030 2031 2361 /* Translate the current start state into a value that can be later handed 2032 2362 * to BEGIN to return to the state. The YYSTATE alias is for lex … … 2035 2365 #define YY_START (((yy_start) - 1) / 2) 2036 2366 #define YYSTATE YY_START 2037 2038 2367 /* Action number for EOF rule of a given start state. */ 2039 2368 #define YY_STATE_EOF(state) (YY_END_OF_BUFFER + state + 1) 2040 2041 2369 /* Special action meaning "start processing a new file". */ 2042 #define YY_NEW_FILE convert_restart(convert_in ) 2043 2370 #define YY_NEW_FILE yyrestart( yyin ) 2044 2371 #define YY_END_OF_BUFFER_CHAR 0 2045 2372 2046 2373 /* Size of default input buffer. */ 2047 2374 #ifndef YY_BUF_SIZE 2375 #ifdef __ia64__ 2376 /* On IA-64, the buffer size is 16k, not 8k. 2377 * Moreover, YY_BUF_SIZE is 2*YY_READ_BUF_SIZE in the general case. 2378 * Ditto for the __ia64__ case accordingly. 2379 */ 2380 #define YY_BUF_SIZE 32768 2381 #else 2048 2382 #define YY_BUF_SIZE 16384 2383 #endif /* __ia64__ */ 2049 2384 #endif 2050 2385 … … 2063 2398 #endif 2064 2399 2065 extern yy_size_t convert_leng;2066 2067 extern FILE * convert_in, *convert_out;2400 extern int yyleng; 2401 2402 extern FILE *yyin, *yyout; 2068 2403 2069 2404 #define EOB_ACT_CONTINUE_SCAN 0 2070 2405 #define EOB_ACT_END_OF_FILE 1 2071 2406 #define EOB_ACT_LAST_MATCH 2 2072 2407 2073 2408 #define YY_LESS_LINENO(n) 2409 #define YY_LINENO_REWIND_TO(ptr) 2074 2410 2075 2411 /* Return all but the first "n" matched characters back to the input stream. */ … … 2077 2413 do \ 2078 2414 { \ 2079 /* Undo effects of setting up convert_text. */ \2415 /* Undo effects of setting up yytext. */ \ 2080 2416 int yyless_macro_arg = (n); \ 2081 2417 YY_LESS_LINENO(yyless_macro_arg);\ … … 2083 2419 YY_RESTORE_YY_MORE_OFFSET \ 2084 2420 (yy_c_buf_p) = yy_cp = yy_bp + yyless_macro_arg - YY_MORE_ADJ; \ 2085 YY_DO_BEFORE_ACTION; /* set up convert_text again */ \2421 YY_DO_BEFORE_ACTION; /* set up yytext again */ \ 2086 2422 } \ 2087 2423 while ( 0 ) 2088 2089 2424 #define unput(c) yyunput( c, (yytext_ptr) ) 2090 2425 … … 2101 2436 * characters. 2102 2437 */ 2103 yy_size_t yy_buf_size;2438 int yy_buf_size; 2104 2439 2105 2440 /* Number of characters read into yy_ch_buf, not including EOB 2106 2441 * characters. 2107 2442 */ 2108 yy_size_t yy_n_chars;2443 int yy_n_chars; 2109 2444 2110 2445 /* Whether we "own" the buffer - i.e., we know we created it, … … 2129 2464 int yy_bs_lineno; /**< The line count. */ 2130 2465 int yy_bs_column; /**< The column count. */ 2131 2466 2132 2467 /* Whether to try to fill the input buffer when we reach the 2133 2468 * end of it. … … 2146 2481 * 2147 2482 * When we actually see the EOF, we change the status to "new" 2148 * (via convert_restart()), so that the user can continue scanning by2149 * just pointing convert_in at a new input file.2483 * (via yyrestart()), so that the user can continue scanning by 2484 * just pointing yyin at a new input file. 2150 2485 */ 2151 2486 #define YY_BUFFER_EOF_PENDING 2 … … 2157 2492 static size_t yy_buffer_stack_top = 0; /**< index of top of stack. */ 2158 2493 static size_t yy_buffer_stack_max = 0; /**< capacity of stack. */ 2159 static YY_BUFFER_STATE * yy_buffer_stack = 0; /**< Stack as an array. */2494 static YY_BUFFER_STATE * yy_buffer_stack = NULL; /**< Stack as an array. */ 2160 2495 2161 2496 /* We provide macros for accessing buffer states in case in the … … 2168 2503 ? (yy_buffer_stack)[(yy_buffer_stack_top)] \ 2169 2504 : NULL) 2170 2171 2505 /* Same as previous macro, but useful when we know that the buffer stack is not 2172 2506 * NULL or when we need an lvalue. For internal use only. … … 2174 2508 #define YY_CURRENT_BUFFER_LVALUE (yy_buffer_stack)[(yy_buffer_stack_top)] 2175 2509 2176 /* yy_hold_char holds the character lost when convert_text is formed. */2510 /* yy_hold_char holds the character lost when yytext is formed. */ 2177 2511 static char yy_hold_char; 2178 static yy_size_t yy_n_chars; /* number of characters read into yy_ch_buf */2179 yy_size_t convert_leng;2512 static int yy_n_chars; /* number of characters read into yy_ch_buf */ 2513 int yyleng; 2180 2514 2181 2515 /* Points to current character in buffer. */ 2182 static char *yy_c_buf_p = (char *) 0;2516 static char *yy_c_buf_p = NULL; 2183 2517 static int yy_init = 0; /* whether we need to initialize */ 2184 2518 static int yy_start = 0; /* start state number */ 2185 2519 2186 /* Flag which is used to allow convert_wrap()'s to do buffer switches2187 * instead of setting up a fresh convert_in. A bit of a hack ...2520 /* Flag which is used to allow yywrap()'s to do buffer switches 2521 * instead of setting up a fresh yyin. A bit of a hack ... 2188 2522 */ 2189 2523 static int yy_did_buffer_switch_on_eof; 2190 2524 2191 void convert_restart (FILE *input_file ); 2192 void convert__switch_to_buffer (YY_BUFFER_STATE new_buffer ); 2193 YY_BUFFER_STATE convert__create_buffer (FILE *file,int size ); 2194 void convert__delete_buffer (YY_BUFFER_STATE b ); 2195 void convert__flush_buffer (YY_BUFFER_STATE b ); 2196 void convert_push_buffer_state (YY_BUFFER_STATE new_buffer ); 2197 void convert_pop_buffer_state (void ); 2198 2199 static void convert_ensure_buffer_stack (void ); 2200 static void convert__load_buffer_state (void ); 2201 static void convert__init_buffer (YY_BUFFER_STATE b,FILE *file ); 2202 2203 #define YY_FLUSH_BUFFER convert__flush_buffer(YY_CURRENT_BUFFER ) 2204 2205 YY_BUFFER_STATE convert__scan_buffer (char *base,yy_size_t size ); 2206 YY_BUFFER_STATE convert__scan_string (yyconst char *yy_str ); 2207 YY_BUFFER_STATE convert__scan_bytes (yyconst char *bytes,yy_size_t len ); 2208 2209 void *convert_alloc (yy_size_t ); 2210 void *convert_realloc (void *,yy_size_t ); 2211 void convert_free (void * ); 2212 2213 #define yy_new_buffer convert__create_buffer 2214 2525 void yyrestart ( FILE *input_file ); 2526 void yy_switch_to_buffer ( YY_BUFFER_STATE new_buffer ); 2527 YY_BUFFER_STATE yy_create_buffer ( FILE *file, int size ); 2528 void yy_delete_buffer ( YY_BUFFER_STATE b ); 2529 void yy_flush_buffer ( YY_BUFFER_STATE b ); 2530 void yypush_buffer_state ( YY_BUFFER_STATE new_buffer ); 2531 void yypop_buffer_state ( void ); 2532 2533 static void yyensure_buffer_stack ( void ); 2534 static void yy_load_buffer_state ( void ); 2535 static void yy_init_buffer ( YY_BUFFER_STATE b, FILE *file ); 2536 #define YY_FLUSH_BUFFER yy_flush_buffer( YY_CURRENT_BUFFER ) 2537 2538 YY_BUFFER_STATE yy_scan_buffer ( char *base, yy_size_t size ); 2539 YY_BUFFER_STATE yy_scan_string ( const char *yy_str ); 2540 YY_BUFFER_STATE yy_scan_bytes ( const char *bytes, int len ); 2541 2542 void *yyalloc ( yy_size_t ); 2543 void *yyrealloc ( void *, yy_size_t ); 2544 void yyfree ( void * ); 2545 2546 #define yy_new_buffer yy_create_buffer 2215 2547 #define yy_set_interactive(is_interactive) \ 2216 2548 { \ 2217 2549 if ( ! YY_CURRENT_BUFFER ){ \ 2218 convert_ensure_buffer_stack (); \2550 yyensure_buffer_stack (); \ 2219 2551 YY_CURRENT_BUFFER_LVALUE = \ 2220 convert__create_buffer(convert_in,YY_BUF_SIZE ); \2552 yy_create_buffer( yyin, YY_BUF_SIZE ); \ 2221 2553 } \ 2222 2554 YY_CURRENT_BUFFER_LVALUE->yy_is_interactive = is_interactive; \ 2223 2555 } 2224 2225 2556 #define yy_set_bol(at_bol) \ 2226 2557 { \ 2227 2558 if ( ! YY_CURRENT_BUFFER ){\ 2228 convert_ensure_buffer_stack (); \2559 yyensure_buffer_stack (); \ 2229 2560 YY_CURRENT_BUFFER_LVALUE = \ 2230 convert__create_buffer(convert_in,YY_BUF_SIZE ); \2561 yy_create_buffer( yyin, YY_BUF_SIZE ); \ 2231 2562 } \ 2232 2563 YY_CURRENT_BUFFER_LVALUE->yy_at_bol = at_bol; \ 2233 2564 } 2234 2235 2565 #define YY_AT_BOL() (YY_CURRENT_BUFFER_LVALUE->yy_at_bol) 2236 2566 2237 2567 /* Begin user sect3 */ 2238 2568 2239 #define convert_wrap() 12569 #define convert_wrap() (/*CONSTCOND*/1) 2240 2570 #define YY_SKIP_YYWRAP 2241 2242 typedef unsigned char YY_CHAR; 2243 2244 FILE *convert_in = (FILE *) 0, *convert_out = (FILE *) 0; 2571 typedef flex_uint8_t YY_CHAR; 2572 2573 FILE *yyin = NULL, *yyout = NULL; 2245 2574 2246 2575 typedef int yy_state_type; 2247 2576 2248 extern int convert_lineno; 2249 2250 int convert_lineno = 1; 2251 2252 extern char *convert_text; 2253 #define yytext_ptr convert_text 2254 2255 static yy_state_type yy_get_previous_state (void ); 2256 static yy_state_type yy_try_NUL_trans (yy_state_type current_state ); 2257 static int yy_get_next_buffer (void ); 2258 static void yy_fatal_error (yyconst char msg[] ); 2577 extern int yylineno; 2578 int yylineno = 1; 2579 2580 extern char *yytext; 2581 #ifdef yytext_ptr 2582 #undef yytext_ptr 2583 #endif 2584 #define yytext_ptr yytext 2585 2586 static yy_state_type yy_get_previous_state ( void ); 2587 static yy_state_type yy_try_NUL_trans ( yy_state_type current_state ); 2588 static int yy_get_next_buffer ( void ); 2589 static void yynoreturn yy_fatal_error ( const char* msg ); 2259 2590 2260 2591 /* Done after the current pattern has been matched and before the 2261 * corresponding action - sets up convert_text.2592 * corresponding action - sets up yytext. 2262 2593 */ 2263 2594 #define YY_DO_BEFORE_ACTION \ 2264 2595 (yytext_ptr) = yy_bp; \ 2265 convert_leng = (size_t) (yy_cp - yy_bp); \2596 yyleng = (int) (yy_cp - yy_bp); \ 2266 2597 (yy_hold_char) = *yy_cp; \ 2267 2598 *yy_cp = '\0'; \ 2268 2599 (yy_c_buf_p) = yy_cp; 2269 2270 2600 #define YY_NUM_RULES 15 2271 2601 #define YY_END_OF_BUFFER 16 … … 2277 2607 flex_int32_t yy_nxt; 2278 2608 }; 2279 static yyconst flex_int16_t yy_accept[84] =2609 static const flex_int16_t yy_accept[84] = 2280 2610 { 0, 2281 2611 0, 0, 0, 0, 16, 15, 14, 13, 15, 12, … … 2290 2620 } ; 2291 2621 2292 static yyconst flex_int32_tyy_ec[256] =2622 static const YY_CHAR yy_ec[256] = 2293 2623 { 0, 2294 2624 1, 1, 1, 1, 1, 1, 1, 1, 2, 3, … … 2322 2652 } ; 2323 2653 2324 static yyconst flex_int32_tyy_meta[56] =2654 static const YY_CHAR yy_meta[56] = 2325 2655 { 0, 2326 2656 1, 1, 2, 1, 1, 1, 1, 3, 3, 3, … … 2332 2662 } ; 2333 2663 2334 static yyconst flex_int16_t yy_base[86] =2664 static const flex_int16_t yy_base[86] = 2335 2665 { 0, 2336 2666 0, 0, 0, 0, 192, 194, 186, 194, 176, 194, … … 2345 2675 } ; 2346 2676 2347 static yyconst flex_int16_t yy_def[86] =2677 static const flex_int16_t yy_def[86] = 2348 2678 { 0, 2349 2679 83, 1, 1, 1, 83, 83, 83, 83, 84, 83, … … 2358 2688 } ; 2359 2689 2360 static yyconst flex_int16_t yy_nxt[250] =2690 static const flex_int16_t yy_nxt[250] = 2361 2691 { 0, 2362 2692 6, 7, 8, 9, 10, 10, 10, 11, 12, 13, … … 2389 2719 } ; 2390 2720 2391 static yyconst flex_int16_t yy_chk[250] =2721 static const flex_int16_t yy_chk[250] = 2392 2722 { 0, 2393 2723 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, … … 2423 2753 static char *yy_last_accepting_cpos; 2424 2754 2425 extern int convert__flex_debug;2426 int convert__flex_debug = 0;2755 extern int yy_flex_debug; 2756 int yy_flex_debug = 0; 2427 2757 2428 2758 /* The intent behind this definition is that it'll catch … … 2433 2763 #define YY_MORE_ADJ 0 2434 2764 #define YY_RESTORE_YY_MORE_OFFSET 2435 char * convert_text;2765 char *yytext; 2436 2766 #line 1 "convert.lex" 2437 2767 /******************************************************************************/ … … 2476 2806 2477 2807 #define YY_NO_INPUT 2478 #line 595 "convert.yy.c" 2808 #line 826 "convert.yy.c" 2809 #line 827 "convert.yy.c" 2479 2810 2480 2811 #define INITIAL 0 … … 2493 2824 #endif 2494 2825 2495 static int yy_init_globals ( void );2826 static int yy_init_globals ( void ); 2496 2827 2497 2828 /* Accessor methods to globals. 2498 2829 These are made visible to non-reentrant scanners for convenience. */ 2499 2830 2500 int convert_lex_destroy (void );2501 2502 int convert_get_debug (void );2503 2504 void convert_set_debug (int debug_flag );2505 2506 YY_EXTRA_TYPE convert_get_extra (void );2507 2508 void convert_set_extra (YY_EXTRA_TYPE user_defined );2509 2510 FILE * convert_get_in (void );2511 2512 void convert_set_in (FILE *in_str );2513 2514 FILE * convert_get_out (void );2515 2516 void convert_set_out (FILE *out_str );2517 2518 yy_size_t convert_get_leng (void );2519 2520 char * convert_get_text (void );2521 2522 int convert_get_lineno (void );2523 2524 void convert_set_lineno (intline_number );2831 int yylex_destroy ( void ); 2832 2833 int yyget_debug ( void ); 2834 2835 void yyset_debug ( int debug_flag ); 2836 2837 YY_EXTRA_TYPE yyget_extra ( void ); 2838 2839 void yyset_extra ( YY_EXTRA_TYPE user_defined ); 2840 2841 FILE *yyget_in ( void ); 2842 2843 void yyset_in ( FILE * _in_str ); 2844 2845 FILE *yyget_out ( void ); 2846 2847 void yyset_out ( FILE * _out_str ); 2848 2849 int yyget_leng ( void ); 2850 2851 char *yyget_text ( void ); 2852 2853 int yyget_lineno ( void ); 2854 2855 void yyset_lineno ( int _line_number ); 2525 2856 2526 2857 /* Macros after this point can all be overridden by user definitions in … … 2530 2861 #ifndef YY_SKIP_YYWRAP 2531 2862 #ifdef __cplusplus 2532 extern "C" int convert_wrap (void );2533 #else 2534 extern int convert_wrap (void );2535 #endif 2536 #endif 2537 2538 static void yyunput (int c,char *buf_ptr ); 2863 extern "C" int yywrap ( void ); 2864 #else 2865 extern int yywrap ( void ); 2866 #endif 2867 #endif 2868 2869 #ifndef YY_NO_UNPUT 2539 2870 2871 static void yyunput ( int c, char *buf_ptr ); 2872 2873 #endif 2874 2540 2875 #ifndef yytext_ptr 2541 static void yy_flex_strncpy ( char *,yyconst char *,int );2876 static void yy_flex_strncpy ( char *, const char *, int ); 2542 2877 #endif 2543 2878 2544 2879 #ifdef YY_NEED_STRLEN 2545 static int yy_flex_strlen ( yyconst char * );2880 static int yy_flex_strlen ( const char * ); 2546 2881 #endif 2547 2882 2548 2883 #ifndef YY_NO_INPUT 2549 2550 2884 #ifdef __cplusplus 2551 static int yyinput ( void );2552 #else 2553 static int input ( void );2885 static int yyinput ( void ); 2886 #else 2887 static int input ( void ); 2554 2888 #endif 2555 2889 … … 2558 2892 /* Amount of stuff to slurp up with each read. */ 2559 2893 #ifndef YY_READ_BUF_SIZE 2894 #ifdef __ia64__ 2895 /* On IA-64, the buffer size is 16k, not 8k */ 2896 #define YY_READ_BUF_SIZE 16384 2897 #else 2560 2898 #define YY_READ_BUF_SIZE 8192 2899 #endif /* __ia64__ */ 2561 2900 #endif 2562 2901 … … 2566 2905 * we now use fwrite(). 2567 2906 */ 2568 #define ECHO do { if (fwrite( convert_text, convert_leng, 1, convert_out )) {} } while (0)2907 #define ECHO do { if (fwrite( yytext, (size_t) yyleng, 1, yyout )) {} } while (0) 2569 2908 #endif 2570 2909 … … 2577 2916 { \ 2578 2917 int c = '*'; \ 2579 size_t n; \2918 int n; \ 2580 2919 for ( n = 0; n < max_size && \ 2581 (c = getc( convert_in )) != EOF && c != '\n'; ++n ) \2920 (c = getc( yyin )) != EOF && c != '\n'; ++n ) \ 2582 2921 buf[n] = (char) c; \ 2583 2922 if ( c == '\n' ) \ 2584 2923 buf[n++] = (char) c; \ 2585 if ( c == EOF && ferror( convert_in ) ) \2924 if ( c == EOF && ferror( yyin ) ) \ 2586 2925 YY_FATAL_ERROR( "input in flex scanner failed" ); \ 2587 2926 result = n; \ … … 2590 2929 { \ 2591 2930 errno=0; \ 2592 while ( (result = fread(buf, 1, max_size, convert_in))==0 && ferror(convert_in)) \2931 while ( (result = (int) fread(buf, 1, (yy_size_t) max_size, yyin)) == 0 && ferror(yyin)) \ 2593 2932 { \ 2594 2933 if( errno != EINTR) \ … … 2598 2937 } \ 2599 2938 errno=0; \ 2600 clearerr( convert_in); \2939 clearerr(yyin); \ 2601 2940 } \ 2602 2941 }\ … … 2631 2970 #define YY_DECL_IS_OURS 1 2632 2971 2633 extern int convert_lex (void);2634 2635 #define YY_DECL int convert_lex (void)2972 extern int yylex (void); 2973 2974 #define YY_DECL int yylex (void) 2636 2975 #endif /* !YY_DECL */ 2637 2976 2638 /* Code executed at the beginning of each rule, after convert_text and convert_leng2977 /* Code executed at the beginning of each rule, after yytext and yyleng 2639 2978 * have been set up. 2640 2979 */ … … 2645 2984 /* Code executed at the end of each rule. */ 2646 2985 #ifndef YY_BREAK 2647 #define YY_BREAK break;2986 #define YY_BREAK /*LINTED*/break; 2648 2987 #endif 2649 2988 … … 2655 2994 YY_DECL 2656 2995 { 2657 registeryy_state_type yy_current_state;2658 registerchar *yy_cp, *yy_bp;2659 registerint yy_act;2996 yy_state_type yy_current_state; 2997 char *yy_cp, *yy_bp; 2998 int yy_act; 2660 2999 2661 #line 54 "convert.lex"2662 2663 #line 780 "convert.yy.c"2664 2665 3000 if ( !(yy_init) ) 2666 3001 { … … 2674 3009 (yy_start) = 1; /* first start state */ 2675 3010 2676 if ( ! convert_in )2677 convert_in = stdin;2678 2679 if ( ! convert_out )2680 convert_out = stdout;3011 if ( ! yyin ) 3012 yyin = stdin; 3013 3014 if ( ! yyout ) 3015 yyout = stdout; 2681 3016 2682 3017 if ( ! YY_CURRENT_BUFFER ) { 2683 convert_ensure_buffer_stack ();3018 yyensure_buffer_stack (); 2684 3019 YY_CURRENT_BUFFER_LVALUE = 2685 convert__create_buffer(convert_in,YY_BUF_SIZE );3020 yy_create_buffer( yyin, YY_BUF_SIZE ); 2686 3021 } 2687 3022 2688 convert__load_buffer_state();3023 yy_load_buffer_state( ); 2689 3024 } 2690 3025 2691 while ( 1 ) /* loops until end-of-file is reached */ 3026 { 3027 #line 54 "convert.lex" 3028 3029 #line 1047 "convert.yy.c" 3030 3031 while ( /*CONSTCOND*/1 ) /* loops until end-of-file is reached */ 2692 3032 { 2693 3033 yy_cp = (yy_c_buf_p); 2694 3034 2695 /* Support of convert_text. */3035 /* Support of yytext. */ 2696 3036 *yy_cp = (yy_hold_char); 2697 3037 … … 2705 3045 do 2706 3046 { 2707 register YY_CHAR yy_c = yy_ec[YY_SC_TO_UI(*yy_cp)];3047 YY_CHAR yy_c = yy_ec[YY_SC_TO_UI(*yy_cp)] ; 2708 3048 if ( yy_accept[yy_current_state] ) 2709 3049 { … … 2715 3055 yy_current_state = (int) yy_def[yy_current_state]; 2716 3056 if ( yy_current_state >= 84 ) 2717 yy_c = yy_meta[ (unsigned int)yy_c];3057 yy_c = yy_meta[yy_c]; 2718 3058 } 2719 yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int)yy_c];3059 yy_current_state = yy_nxt[yy_base[yy_current_state] + yy_c]; 2720 3060 ++yy_cp; 2721 3061 } … … 2782 3122 YY_RULE_SETUP 2783 3123 #line 62 "convert.lex" 2784 { strcpy(yylval.na, convert_text); return TOK_USEITEM; }3124 { strcpy(yylval.na,yytext); return TOK_USEITEM; } 2785 3125 YY_BREAK 2786 3126 case 9: 2787 3127 YY_RULE_SETUP 2788 3128 #line 63 "convert.lex" 2789 { strcpy(yylval.na, convert_text); return TOK_PROBTYPE; } /* dimension of the problem */3129 { strcpy(yylval.na,yytext); return TOK_PROBTYPE; } /* dimension of the problem */ 2790 3130 YY_BREAK 2791 3131 case 10: 2792 3132 YY_RULE_SETUP 2793 3133 #line 64 "convert.lex" 2794 { strcpy(yylval.na, convert_text); return TOK_NAME; }3134 { strcpy(yylval.na,yytext); return TOK_NAME; } 2795 3135 YY_BREAK 2796 3136 case 11: 2797 3137 YY_RULE_SETUP 2798 3138 #line 65 "convert.lex" 2799 { strcpy(yylval.na, convert_text); return TOK_CSTINT; }3139 { strcpy(yylval.na,yytext); return TOK_CSTINT; } 2800 3140 YY_BREAK 2801 3141 case 12: 2802 3142 YY_RULE_SETUP 2803 3143 #line 66 "convert.lex" 2804 { return (int) * convert_text; }3144 { return (int) *yytext; } 2805 3145 YY_BREAK 2806 3146 case 13: … … 2808 3148 YY_RULE_SETUP 2809 3149 #line 67 "convert.lex" 2810 { line_num++; return (int) * convert_text; }3150 { line_num++; return (int) *yytext; } 2811 3151 YY_BREAK 2812 3152 case 14: … … 2820 3160 ECHO; 2821 3161 YY_BREAK 2822 #line 939"convert.yy.c"3162 #line 1180 "convert.yy.c" 2823 3163 case YY_STATE_EOF(INITIAL): 2824 3164 case YY_STATE_EOF(character): … … 2838 3178 /* We're scanning a new file or input source. It's 2839 3179 * possible that this happened because the user 2840 * just pointed convert_in at a new source and called2841 * convert_lex(). If so, then we have to assure3180 * just pointed yyin at a new source and called 3181 * yylex(). If so, then we have to assure 2842 3182 * consistency between YY_CURRENT_BUFFER and our 2843 3183 * globals. Here is the right place to do so, because … … 2846 3186 */ 2847 3187 (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_n_chars; 2848 YY_CURRENT_BUFFER_LVALUE->yy_input_file = convert_in;3188 YY_CURRENT_BUFFER_LVALUE->yy_input_file = yyin; 2849 3189 YY_CURRENT_BUFFER_LVALUE->yy_buffer_status = YY_BUFFER_NORMAL; 2850 3190 } … … 2899 3239 (yy_did_buffer_switch_on_eof) = 0; 2900 3240 2901 if ( convert_wrap() )3241 if ( yywrap( ) ) 2902 3242 { 2903 3243 /* Note: because we've taken care in 2904 3244 * yy_get_next_buffer() to have set up 2905 * convert_text, we can now set up3245 * yytext, we can now set up 2906 3246 * yy_c_buf_p so that if some total 2907 3247 * hoser (like flex itself) wants to … … 2952 3292 } /* end of action switch */ 2953 3293 } /* end of scanning one token */ 2954 } /* end of convert_lex */ 3294 } /* end of user's declarations */ 3295 } /* end of yylex */ 2955 3296 2956 3297 /* yy_get_next_buffer - try to read in a new buffer … … 2963 3304 static int yy_get_next_buffer (void) 2964 3305 { 2965 registerchar *dest = YY_CURRENT_BUFFER_LVALUE->yy_ch_buf;2966 registerchar *source = (yytext_ptr);2967 registerint number_to_move, i;3306 char *dest = YY_CURRENT_BUFFER_LVALUE->yy_ch_buf; 3307 char *source = (yytext_ptr); 3308 int number_to_move, i; 2968 3309 int ret_val; 2969 3310 … … 2994 3335 2995 3336 /* First move last chars to start of buffer. */ 2996 number_to_move = (int) ((yy_c_buf_p) - (yytext_ptr) ) - 1;3337 number_to_move = (int) ((yy_c_buf_p) - (yytext_ptr) - 1); 2997 3338 2998 3339 for ( i = 0; i < number_to_move; ++i ) … … 3007 3348 else 3008 3349 { 3009 yy_size_t num_to_read =3350 int num_to_read = 3010 3351 YY_CURRENT_BUFFER_LVALUE->yy_buf_size - number_to_move - 1; 3011 3352 … … 3021 3362 if ( b->yy_is_our_buffer ) 3022 3363 { 3023 yy_size_t new_size = b->yy_buf_size * 2;3364 int new_size = b->yy_buf_size * 2; 3024 3365 3025 3366 if ( new_size <= 0 ) … … 3030 3371 b->yy_ch_buf = (char *) 3031 3372 /* Include room in for 2 EOB chars. */ 3032 convert_realloc((void *) b->yy_ch_buf,b->yy_buf_size + 2 ); 3373 yyrealloc( (void *) b->yy_ch_buf, 3374 (yy_size_t) (b->yy_buf_size + 2) ); 3033 3375 } 3034 3376 else 3035 3377 /* Can't grow it, we don't own it. */ 3036 b->yy_ch_buf = 0;3378 b->yy_ch_buf = NULL; 3037 3379 3038 3380 if ( ! b->yy_ch_buf ) … … 3062 3404 { 3063 3405 ret_val = EOB_ACT_END_OF_FILE; 3064 convert_restart(convert_in );3406 yyrestart( yyin ); 3065 3407 } 3066 3408 … … 3076 3418 ret_val = EOB_ACT_CONTINUE_SCAN; 3077 3419 3078 if (( yy_size_t) ((yy_n_chars) + number_to_move) > YY_CURRENT_BUFFER_LVALUE->yy_buf_size) {3420 if (((yy_n_chars) + number_to_move) > YY_CURRENT_BUFFER_LVALUE->yy_buf_size) { 3079 3421 /* Extend the array by 50%, plus the number we really need. */ 3080 yy_size_t new_size = (yy_n_chars) + number_to_move + ((yy_n_chars) >> 1); 3081 YY_CURRENT_BUFFER_LVALUE->yy_ch_buf = (char *) convert_realloc((void *) YY_CURRENT_BUFFER_LVALUE->yy_ch_buf,new_size ); 3422 int new_size = (yy_n_chars) + number_to_move + ((yy_n_chars) >> 1); 3423 YY_CURRENT_BUFFER_LVALUE->yy_ch_buf = (char *) yyrealloc( 3424 (void *) YY_CURRENT_BUFFER_LVALUE->yy_ch_buf, (yy_size_t) new_size ); 3082 3425 if ( ! YY_CURRENT_BUFFER_LVALUE->yy_ch_buf ) 3083 3426 YY_FATAL_ERROR( "out of dynamic memory in yy_get_next_buffer()" ); 3427 /* "- 2" to take care of EOB's */ 3428 YY_CURRENT_BUFFER_LVALUE->yy_buf_size = (int) (new_size - 2); 3084 3429 } 3085 3430 … … 3097 3442 static yy_state_type yy_get_previous_state (void) 3098 3443 { 3099 registeryy_state_type yy_current_state;3100 registerchar *yy_cp;3444 yy_state_type yy_current_state; 3445 char *yy_cp; 3101 3446 3102 3447 yy_current_state = (yy_start); … … 3104 3449 for ( yy_cp = (yytext_ptr) + YY_MORE_ADJ; yy_cp < (yy_c_buf_p); ++yy_cp ) 3105 3450 { 3106 registerYY_CHAR yy_c = (*yy_cp ? yy_ec[YY_SC_TO_UI(*yy_cp)] : 1);3451 YY_CHAR yy_c = (*yy_cp ? yy_ec[YY_SC_TO_UI(*yy_cp)] : 1); 3107 3452 if ( yy_accept[yy_current_state] ) 3108 3453 { … … 3114 3459 yy_current_state = (int) yy_def[yy_current_state]; 3115 3460 if ( yy_current_state >= 84 ) 3116 yy_c = yy_meta[ (unsigned int)yy_c];3461 yy_c = yy_meta[yy_c]; 3117 3462 } 3118 yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int)yy_c];3463 yy_current_state = yy_nxt[yy_base[yy_current_state] + yy_c]; 3119 3464 } 3120 3465 … … 3129 3474 static yy_state_type yy_try_NUL_trans (yy_state_type yy_current_state ) 3130 3475 { 3131 registerint yy_is_jam;3132 registerchar *yy_cp = (yy_c_buf_p);3133 3134 registerYY_CHAR yy_c = 1;3476 int yy_is_jam; 3477 char *yy_cp = (yy_c_buf_p); 3478 3479 YY_CHAR yy_c = 1; 3135 3480 if ( yy_accept[yy_current_state] ) 3136 3481 { … … 3142 3487 yy_current_state = (int) yy_def[yy_current_state]; 3143 3488 if ( yy_current_state >= 84 ) 3144 yy_c = yy_meta[ (unsigned int)yy_c];3489 yy_c = yy_meta[yy_c]; 3145 3490 } 3146 yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int)yy_c];3491 yy_current_state = yy_nxt[yy_base[yy_current_state] + yy_c]; 3147 3492 yy_is_jam = (yy_current_state == 83); 3148 3493 … … 3150 3495 } 3151 3496 3152 static void yyunput (int c, register char * yy_bp ) 3153 { 3154 register char *yy_cp; 3497 #ifndef YY_NO_UNPUT 3498 3499 static void yyunput (int c, char * yy_bp ) 3500 { 3501 char *yy_cp; 3155 3502 3156 3503 yy_cp = (yy_c_buf_p); 3157 3504 3158 /* undo effects of setting up convert_text */3505 /* undo effects of setting up yytext */ 3159 3506 *yy_cp = (yy_hold_char); 3160 3507 … … 3162 3509 { /* need to shift things up to make room */ 3163 3510 /* +2 for EOB chars. */ 3164 register yy_size_t number_to_move = (yy_n_chars) + 2;3165 registerchar *dest = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[3511 int number_to_move = (yy_n_chars) + 2; 3512 char *dest = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[ 3166 3513 YY_CURRENT_BUFFER_LVALUE->yy_buf_size + 2]; 3167 registerchar *source =3514 char *source = 3168 3515 &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[number_to_move]; 3169 3516 … … 3174 3521 yy_bp += (int) (dest - source); 3175 3522 YY_CURRENT_BUFFER_LVALUE->yy_n_chars = 3176 (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_buf_size;3523 (yy_n_chars) = (int) YY_CURRENT_BUFFER_LVALUE->yy_buf_size; 3177 3524 3178 3525 if ( yy_cp < YY_CURRENT_BUFFER_LVALUE->yy_ch_buf + 2 ) … … 3186 3533 (yy_c_buf_p) = yy_cp; 3187 3534 } 3535 3536 #endif 3188 3537 3189 3538 #ifndef YY_NO_INPUT … … 3211 3560 else 3212 3561 { /* need more input */ 3213 yy_size_t offset = (yy_c_buf_p) - (yytext_ptr);3562 int offset = (int) ((yy_c_buf_p) - (yytext_ptr)); 3214 3563 ++(yy_c_buf_p); 3215 3564 … … 3228 3577 3229 3578 /* Reset buffer status. */ 3230 convert_restart(convert_in );3579 yyrestart( yyin ); 3231 3580 3232 3581 /*FALLTHROUGH*/ … … 3234 3583 case EOB_ACT_END_OF_FILE: 3235 3584 { 3236 if ( convert_wrap() )3237 return EOF;3585 if ( yywrap( ) ) 3586 return 0; 3238 3587 3239 3588 if ( ! (yy_did_buffer_switch_on_eof) ) … … 3254 3603 3255 3604 c = *(unsigned char *) (yy_c_buf_p); /* cast for 8-bit char's */ 3256 *(yy_c_buf_p) = '\0'; /* preserve convert_text */3605 *(yy_c_buf_p) = '\0'; /* preserve yytext */ 3257 3606 (yy_hold_char) = *++(yy_c_buf_p); 3258 3607 … … 3266 3615 * @note This function does not reset the start condition to @c INITIAL . 3267 3616 */ 3268 void convert_restart (FILE * input_file )3617 void yyrestart (FILE * input_file ) 3269 3618 { 3270 3619 3271 3620 if ( ! YY_CURRENT_BUFFER ){ 3272 convert_ensure_buffer_stack ();3621 yyensure_buffer_stack (); 3273 3622 YY_CURRENT_BUFFER_LVALUE = 3274 convert__create_buffer(convert_in,YY_BUF_SIZE );3623 yy_create_buffer( yyin, YY_BUF_SIZE ); 3275 3624 } 3276 3625 3277 convert__init_buffer(YY_CURRENT_BUFFER,input_file );3278 convert__load_buffer_state();3626 yy_init_buffer( YY_CURRENT_BUFFER, input_file ); 3627 yy_load_buffer_state( ); 3279 3628 } 3280 3629 … … 3283 3632 * 3284 3633 */ 3285 void convert__switch_to_buffer (YY_BUFFER_STATE new_buffer )3634 void yy_switch_to_buffer (YY_BUFFER_STATE new_buffer ) 3286 3635 { 3287 3636 3288 3637 /* TODO. We should be able to replace this entire function body 3289 3638 * with 3290 * convert_pop_buffer_state();3291 * convert_push_buffer_state(new_buffer);3639 * yypop_buffer_state(); 3640 * yypush_buffer_state(new_buffer); 3292 3641 */ 3293 convert_ensure_buffer_stack ();3642 yyensure_buffer_stack (); 3294 3643 if ( YY_CURRENT_BUFFER == new_buffer ) 3295 3644 return; … … 3304 3653 3305 3654 YY_CURRENT_BUFFER_LVALUE = new_buffer; 3306 convert__load_buffer_state();3655 yy_load_buffer_state( ); 3307 3656 3308 3657 /* We don't actually know whether we did this switch during 3309 * EOF ( convert_wrap()) processing, but the only time this flag3310 * is looked at is after convert_wrap() is called, so it's safe3658 * EOF (yywrap()) processing, but the only time this flag 3659 * is looked at is after yywrap() is called, so it's safe 3311 3660 * to go ahead and always set it. 3312 3661 */ … … 3314 3663 } 3315 3664 3316 static void convert__load_buffer_state (void)3665 static void yy_load_buffer_state (void) 3317 3666 { 3318 3667 (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_n_chars; 3319 3668 (yytext_ptr) = (yy_c_buf_p) = YY_CURRENT_BUFFER_LVALUE->yy_buf_pos; 3320 convert_in = YY_CURRENT_BUFFER_LVALUE->yy_input_file;3669 yyin = YY_CURRENT_BUFFER_LVALUE->yy_input_file; 3321 3670 (yy_hold_char) = *(yy_c_buf_p); 3322 3671 } … … 3328 3677 * @return the allocated buffer state. 3329 3678 */ 3330 YY_BUFFER_STATE convert__create_buffer (FILE * file, int size )3679 YY_BUFFER_STATE yy_create_buffer (FILE * file, int size ) 3331 3680 { 3332 3681 YY_BUFFER_STATE b; 3333 3682 3334 b = (YY_BUFFER_STATE) convert_alloc(sizeof( struct yy_buffer_state ) );3683 b = (YY_BUFFER_STATE) yyalloc( sizeof( struct yy_buffer_state ) ); 3335 3684 if ( ! b ) 3336 YY_FATAL_ERROR( "out of dynamic memory in convert__create_buffer()" );3685 YY_FATAL_ERROR( "out of dynamic memory in yy_create_buffer()" ); 3337 3686 3338 3687 b->yy_buf_size = size; … … 3341 3690 * we need to put in 2 end-of-buffer characters. 3342 3691 */ 3343 b->yy_ch_buf = (char *) convert_alloc(b->yy_buf_size + 2);3692 b->yy_ch_buf = (char *) yyalloc( (yy_size_t) (b->yy_buf_size + 2) ); 3344 3693 if ( ! b->yy_ch_buf ) 3345 YY_FATAL_ERROR( "out of dynamic memory in convert__create_buffer()" );3694 YY_FATAL_ERROR( "out of dynamic memory in yy_create_buffer()" ); 3346 3695 3347 3696 b->yy_is_our_buffer = 1; 3348 3697 3349 convert__init_buffer(b,file );3698 yy_init_buffer( b, file ); 3350 3699 3351 3700 return b; … … 3353 3702 3354 3703 /** Destroy the buffer. 3355 * @param b a buffer created with convert__create_buffer()3704 * @param b a buffer created with yy_create_buffer() 3356 3705 * 3357 3706 */ 3358 void convert__delete_buffer (YY_BUFFER_STATE b )3707 void yy_delete_buffer (YY_BUFFER_STATE b ) 3359 3708 { 3360 3709 … … 3366 3715 3367 3716 if ( b->yy_is_our_buffer ) 3368 convert_free((void *) b->yy_ch_buf );3369 3370 convert_free((void *) b );3717 yyfree( (void *) b->yy_ch_buf ); 3718 3719 yyfree( (void *) b ); 3371 3720 } 3372 3721 3373 3722 /* Initializes or reinitializes a buffer. 3374 3723 * This function is sometimes called more than once on the same buffer, 3375 * such as during a convert_restart() or at EOF.3724 * such as during a yyrestart() or at EOF. 3376 3725 */ 3377 static void convert__init_buffer (YY_BUFFER_STATE b, FILE * file )3726 static void yy_init_buffer (YY_BUFFER_STATE b, FILE * file ) 3378 3727 3379 3728 { 3380 3729 int oerrno = errno; 3381 3730 3382 convert__flush_buffer(b );3731 yy_flush_buffer( b ); 3383 3732 3384 3733 b->yy_input_file = file; 3385 3734 b->yy_fill_buffer = 1; 3386 3735 3387 /* If b is the current buffer, then convert__init_buffer was _probably_3388 * called from convert_restart() or through yy_get_next_buffer.3736 /* If b is the current buffer, then yy_init_buffer was _probably_ 3737 * called from yyrestart() or through yy_get_next_buffer. 3389 3738 * In that case, we don't want to reset the lineno or column. 3390 3739 */ … … 3403 3752 * 3404 3753 */ 3405 void convert__flush_buffer (YY_BUFFER_STATE b )3754 void yy_flush_buffer (YY_BUFFER_STATE b ) 3406 3755 { 3407 3756 if ( ! b ) … … 3423 3772 3424 3773 if ( b == YY_CURRENT_BUFFER ) 3425 convert__load_buffer_state();3774 yy_load_buffer_state( ); 3426 3775 } 3427 3776 … … 3432 3781 * 3433 3782 */ 3434 void convert_push_buffer_state (YY_BUFFER_STATE new_buffer )3783 void yypush_buffer_state (YY_BUFFER_STATE new_buffer ) 3435 3784 { 3436 3785 if (new_buffer == NULL) 3437 3786 return; 3438 3787 3439 convert_ensure_buffer_stack();3440 3441 /* This block is copied from convert__switch_to_buffer. */3788 yyensure_buffer_stack(); 3789 3790 /* This block is copied from yy_switch_to_buffer. */ 3442 3791 if ( YY_CURRENT_BUFFER ) 3443 3792 { … … 3453 3802 YY_CURRENT_BUFFER_LVALUE = new_buffer; 3454 3803 3455 /* copied from convert__switch_to_buffer. */3456 convert__load_buffer_state();3804 /* copied from yy_switch_to_buffer. */ 3805 yy_load_buffer_state( ); 3457 3806 (yy_did_buffer_switch_on_eof) = 1; 3458 3807 } … … 3462 3811 * 3463 3812 */ 3464 void convert_pop_buffer_state (void)3813 void yypop_buffer_state (void) 3465 3814 { 3466 3815 if (!YY_CURRENT_BUFFER) 3467 3816 return; 3468 3817 3469 convert__delete_buffer(YY_CURRENT_BUFFER );3818 yy_delete_buffer(YY_CURRENT_BUFFER ); 3470 3819 YY_CURRENT_BUFFER_LVALUE = NULL; 3471 3820 if ((yy_buffer_stack_top) > 0) … … 3473 3822 3474 3823 if (YY_CURRENT_BUFFER) { 3475 convert__load_buffer_state();3824 yy_load_buffer_state( ); 3476 3825 (yy_did_buffer_switch_on_eof) = 1; 3477 3826 } … … 3481 3830 * Guarantees space for at least one push. 3482 3831 */ 3483 static void convert_ensure_buffer_stack (void)3832 static void yyensure_buffer_stack (void) 3484 3833 { 3485 3834 yy_size_t num_to_alloc; … … 3491 3840 * immediate realloc on the next call. 3492 3841 */ 3493 num_to_alloc = 1; 3494 (yy_buffer_stack) = (struct yy_buffer_state**) convert_alloc3842 num_to_alloc = 1; /* After all that talk, this was set to 1 anyways... */ 3843 (yy_buffer_stack) = (struct yy_buffer_state**)yyalloc 3495 3844 (num_to_alloc * sizeof(struct yy_buffer_state*) 3496 3845 ); 3497 3846 if ( ! (yy_buffer_stack) ) 3498 YY_FATAL_ERROR( "out of dynamic memory in convert_ensure_buffer_stack()" );3499 3847 YY_FATAL_ERROR( "out of dynamic memory in yyensure_buffer_stack()" ); 3848 3500 3849 memset((yy_buffer_stack), 0, num_to_alloc * sizeof(struct yy_buffer_state*)); 3501 3850 3502 3851 (yy_buffer_stack_max) = num_to_alloc; 3503 3852 (yy_buffer_stack_top) = 0; … … 3508 3857 3509 3858 /* Increase the buffer to prepare for a possible push. */ 3510 int grow_size = 8 /* arbitrary grow size */;3859 yy_size_t grow_size = 8 /* arbitrary grow size */; 3511 3860 3512 3861 num_to_alloc = (yy_buffer_stack_max) + grow_size; 3513 (yy_buffer_stack) = (struct yy_buffer_state**) convert_realloc3862 (yy_buffer_stack) = (struct yy_buffer_state**)yyrealloc 3514 3863 ((yy_buffer_stack), 3515 3864 num_to_alloc * sizeof(struct yy_buffer_state*) 3516 3865 ); 3517 3866 if ( ! (yy_buffer_stack) ) 3518 YY_FATAL_ERROR( "out of dynamic memory in convert_ensure_buffer_stack()" );3867 YY_FATAL_ERROR( "out of dynamic memory in yyensure_buffer_stack()" ); 3519 3868 3520 3869 /* zero only the new slots.*/ … … 3528 3877 * @param size the size in bytes of the character buffer 3529 3878 * 3530 * @return the newly allocated buffer state object. 3879 * @return the newly allocated buffer state object. 3531 3880 */ 3532 YY_BUFFER_STATE convert__scan_buffer (char * base, yy_size_t size )3881 YY_BUFFER_STATE yy_scan_buffer (char * base, yy_size_t size ) 3533 3882 { 3534 3883 YY_BUFFER_STATE b; … … 3538 3887 base[size-1] != YY_END_OF_BUFFER_CHAR ) 3539 3888 /* They forgot to leave room for the EOB's. */ 3540 return 0;3541 3542 b = (YY_BUFFER_STATE) convert_alloc(sizeof( struct yy_buffer_state ) );3889 return NULL; 3890 3891 b = (YY_BUFFER_STATE) yyalloc( sizeof( struct yy_buffer_state ) ); 3543 3892 if ( ! b ) 3544 YY_FATAL_ERROR( "out of dynamic memory in convert__scan_buffer()" );3545 3546 b->yy_buf_size = size - 2; /* "- 2" to take care of EOB's */3893 YY_FATAL_ERROR( "out of dynamic memory in yy_scan_buffer()" ); 3894 3895 b->yy_buf_size = (int) (size - 2); /* "- 2" to take care of EOB's */ 3547 3896 b->yy_buf_pos = b->yy_ch_buf = base; 3548 3897 b->yy_is_our_buffer = 0; 3549 b->yy_input_file = 0;3898 b->yy_input_file = NULL; 3550 3899 b->yy_n_chars = b->yy_buf_size; 3551 3900 b->yy_is_interactive = 0; … … 3554 3903 b->yy_buffer_status = YY_BUFFER_NEW; 3555 3904 3556 convert__switch_to_buffer(b );3905 yy_switch_to_buffer( b ); 3557 3906 3558 3907 return b; 3559 3908 } 3560 3909 3561 /** Setup the input buffer state to scan a string. The next call to convert_lex() will3910 /** Setup the input buffer state to scan a string. The next call to yylex() will 3562 3911 * scan from a @e copy of @a str. 3563 3912 * @param yystr a NUL-terminated string to scan … … 3565 3914 * @return the newly allocated buffer state object. 3566 3915 * @note If you want to scan bytes that may contain NUL values, then use 3567 * convert__scan_bytes() instead.3916 * yy_scan_bytes() instead. 3568 3917 */ 3569 YY_BUFFER_STATE convert__scan_string (yyconst char * yystr )3918 YY_BUFFER_STATE yy_scan_string (const char * yystr ) 3570 3919 { 3571 3920 3572 return convert__scan_bytes(yystr,strlen(yystr) );3573 } 3574 3575 /** Setup the input buffer state to scan the given bytes. The next call to convert_lex() will3921 return yy_scan_bytes( yystr, (int) strlen(yystr) ); 3922 } 3923 3924 /** Setup the input buffer state to scan the given bytes. The next call to yylex() will 3576 3925 * scan from a @e copy of @a bytes. 3577 3926 * @param yybytes the byte buffer to scan … … 3580 3929 * @return the newly allocated buffer state object. 3581 3930 */ 3582 YY_BUFFER_STATE convert__scan_bytes (yyconst char * yybytes, yy_size_t _yybytes_len )3931 YY_BUFFER_STATE yy_scan_bytes (const char * yybytes, int _yybytes_len ) 3583 3932 { 3584 3933 YY_BUFFER_STATE b; 3585 3934 char *buf; 3586 3935 yy_size_t n; 3587 yy_size_t i;3936 int i; 3588 3937 3589 3938 /* Get memory for full buffer, including space for trailing EOB's. */ 3590 n = _yybytes_len + 2;3591 buf = (char *) convert_alloc(n );3939 n = (yy_size_t) (_yybytes_len + 2); 3940 buf = (char *) yyalloc( n ); 3592 3941 if ( ! buf ) 3593 YY_FATAL_ERROR( "out of dynamic memory in convert__scan_bytes()" );3942 YY_FATAL_ERROR( "out of dynamic memory in yy_scan_bytes()" ); 3594 3943 3595 3944 for ( i = 0; i < _yybytes_len; ++i ) … … 3598 3947 buf[_yybytes_len] = buf[_yybytes_len+1] = YY_END_OF_BUFFER_CHAR; 3599 3948 3600 b = convert__scan_buffer(buf,n );3949 b = yy_scan_buffer( buf, n ); 3601 3950 if ( ! b ) 3602 YY_FATAL_ERROR( "bad buffer in convert__scan_bytes()" );3951 YY_FATAL_ERROR( "bad buffer in yy_scan_bytes()" ); 3603 3952 3604 3953 /* It's okay to grow etc. this buffer, and we should throw it … … 3614 3963 #endif 3615 3964 3616 static void yy _fatal_error (yyconst char* msg )3617 { 3618 (void)fprintf( stderr, "%s\n", msg );3965 static void yynoreturn yy_fatal_error (const char* msg ) 3966 { 3967 fprintf( stderr, "%s\n", msg ); 3619 3968 exit( YY_EXIT_FAILURE ); 3620 3969 } … … 3626 3975 do \ 3627 3976 { \ 3628 /* Undo effects of setting up convert_text. */ \3977 /* Undo effects of setting up yytext. */ \ 3629 3978 int yyless_macro_arg = (n); \ 3630 3979 YY_LESS_LINENO(yyless_macro_arg);\ 3631 convert_text[convert_leng] = (yy_hold_char); \3632 (yy_c_buf_p) = convert_text + yyless_macro_arg; \3980 yytext[yyleng] = (yy_hold_char); \ 3981 (yy_c_buf_p) = yytext + yyless_macro_arg; \ 3633 3982 (yy_hold_char) = *(yy_c_buf_p); \ 3634 3983 *(yy_c_buf_p) = '\0'; \ 3635 convert_leng = yyless_macro_arg; \3984 yyleng = yyless_macro_arg; \ 3636 3985 } \ 3637 3986 while ( 0 ) … … 3642 3991 * 3643 3992 */ 3644 int convert_get_lineno (void)3645 { 3646 3647 return convert_lineno;3993 int yyget_lineno (void) 3994 { 3995 3996 return yylineno; 3648 3997 } 3649 3998 … … 3651 4000 * 3652 4001 */ 3653 FILE * convert_get_in (void)3654 { 3655 return convert_in;4002 FILE *yyget_in (void) 4003 { 4004 return yyin; 3656 4005 } 3657 4006 … … 3659 4008 * 3660 4009 */ 3661 FILE * convert_get_out (void)3662 { 3663 return convert_out;4010 FILE *yyget_out (void) 4011 { 4012 return yyout; 3664 4013 } 3665 4014 … … 3667 4016 * 3668 4017 */ 3669 yy_size_t convert_get_leng (void)3670 { 3671 return convert_leng;4018 int yyget_leng (void) 4019 { 4020 return yyleng; 3672 4021 } 3673 4022 … … 3676 4025 */ 3677 4026 3678 char * convert_get_text (void)3679 { 3680 return convert_text;4027 char *yyget_text (void) 4028 { 4029 return yytext; 3681 4030 } 3682 4031 3683 4032 /** Set the current line number. 3684 * @param line_number4033 * @param _line_number line number 3685 4034 * 3686 4035 */ 3687 void convert_set_lineno (intline_number )4036 void yyset_lineno (int _line_number ) 3688 4037 { 3689 4038 3690 convert_lineno =line_number;4039 yylineno = _line_number; 3691 4040 } 3692 4041 3693 4042 /** Set the input stream. This does not discard the current 3694 4043 * input buffer. 3695 * @param in_str A readable stream.4044 * @param _in_str A readable stream. 3696 4045 * 3697 * @see convert__switch_to_buffer4046 * @see yy_switch_to_buffer 3698 4047 */ 3699 void convert_set_in (FILE *in_str )3700 { 3701 convert_in =in_str ;3702 } 3703 3704 void convert_set_out (FILE *out_str )3705 { 3706 convert_out =out_str ;3707 } 3708 3709 int convert_get_debug (void)3710 { 3711 return convert__flex_debug;3712 } 3713 3714 void convert_set_debug (intbdebug )3715 { 3716 convert__flex_debug =bdebug ;4048 void yyset_in (FILE * _in_str ) 4049 { 4050 yyin = _in_str ; 4051 } 4052 4053 void yyset_out (FILE * _out_str ) 4054 { 4055 yyout = _out_str ; 4056 } 4057 4058 int yyget_debug (void) 4059 { 4060 return yy_flex_debug; 4061 } 4062 4063 void yyset_debug (int _bdebug ) 4064 { 4065 yy_flex_debug = _bdebug ; 3717 4066 } 3718 4067 … … 3720 4069 { 3721 4070 /* Initialization is the same as for the non-reentrant scanner. 3722 * This function is called from convert_lex_destroy(), so don't allocate here.4071 * This function is called from yylex_destroy(), so don't allocate here. 3723 4072 */ 3724 4073 3725 (yy_buffer_stack) = 0;4074 (yy_buffer_stack) = NULL; 3726 4075 (yy_buffer_stack_top) = 0; 3727 4076 (yy_buffer_stack_max) = 0; 3728 (yy_c_buf_p) = (char *) 0;4077 (yy_c_buf_p) = NULL; 3729 4078 (yy_init) = 0; 3730 4079 (yy_start) = 0; … … 3732 4081 /* Defined in main.c */ 3733 4082 #ifdef YY_STDINIT 3734 convert_in = stdin;3735 convert_out = stdout;3736 #else 3737 convert_in = (FILE *) 0;3738 convert_out = (FILE *) 0;4083 yyin = stdin; 4084 yyout = stdout; 4085 #else 4086 yyin = NULL; 4087 yyout = NULL; 3739 4088 #endif 3740 4089 3741 4090 /* For future reference: Set errno on error, since we are called by 3742 * convert_lex_init()4091 * yylex_init() 3743 4092 */ 3744 4093 return 0; 3745 4094 } 3746 4095 3747 /* convert_lex_destroy is for both reentrant and non-reentrant scanners. */3748 int convert_lex_destroy (void)4096 /* yylex_destroy is for both reentrant and non-reentrant scanners. */ 4097 int yylex_destroy (void) 3749 4098 { 3750 4099 3751 4100 /* Pop the buffer stack, destroying each element. */ 3752 4101 while(YY_CURRENT_BUFFER){ 3753 convert__delete_buffer(YY_CURRENT_BUFFER );4102 yy_delete_buffer( YY_CURRENT_BUFFER ); 3754 4103 YY_CURRENT_BUFFER_LVALUE = NULL; 3755 convert_pop_buffer_state();4104 yypop_buffer_state(); 3756 4105 } 3757 4106 3758 4107 /* Destroy the stack itself. */ 3759 convert_free((yy_buffer_stack) );4108 yyfree((yy_buffer_stack) ); 3760 4109 (yy_buffer_stack) = NULL; 3761 4110 3762 4111 /* Reset the globals. This is important in a non-reentrant scanner so the next time 3763 * convert_lex() is called, initialization will occur. */4112 * yylex() is called, initialization will occur. */ 3764 4113 yy_init_globals( ); 3765 4114 … … 3772 4121 3773 4122 #ifndef yytext_ptr 3774 static void yy_flex_strncpy (char* s1, yyconst char * s2, int n ) 3775 { 3776 register int i; 4123 static void yy_flex_strncpy (char* s1, const char * s2, int n ) 4124 { 4125 4126 int i; 3777 4127 for ( i = 0; i < n; ++i ) 3778 4128 s1[i] = s2[i]; … … 3781 4131 3782 4132 #ifdef YY_NEED_STRLEN 3783 static int yy_flex_strlen ( yyconst char * s )3784 { 3785 registerint n;4133 static int yy_flex_strlen (const char * s ) 4134 { 4135 int n; 3786 4136 for ( n = 0; s[n]; ++n ) 3787 4137 ; … … 3791 4141 #endif 3792 4142 3793 void *convert_alloc (yy_size_t size ) 3794 { 3795 return (void *) malloc( size ); 3796 } 3797 3798 void *convert_realloc (void * ptr, yy_size_t size ) 3799 { 4143 void *yyalloc (yy_size_t size ) 4144 { 4145 return malloc(size); 4146 } 4147 4148 void *yyrealloc (void * ptr, yy_size_t size ) 4149 { 4150 3800 4151 /* The cast to (char *) in the following accommodates both 3801 4152 * implementations that use char* generic pointers, and those … … 3805 4156 * as though doing an assignment. 3806 4157 */ 3807 return (void *) realloc( (char *) ptr, size);3808 } 3809 3810 void convert_free (void * ptr )3811 { 3812 free( (char *) ptr ); /* see convert_realloc() for (char *) cast */4158 return realloc(ptr, size); 4159 } 4160 4161 void yyfree (void * ptr ) 4162 { 4163 free( (char *) ptr ); /* see yyrealloc() for (char *) cast */ 3813 4164 } 3814 4165 … … 3818 4169 3819 4170 3820
Note: See TracChangeset
for help on using the changeset viewer.