52#define YYBISON_VERSION "3.8.2"
55#define YYSKELETON_NAME "yacc.c"
87#define parse_type(ps) builtin_type (ps->gdbarch ())
91#define GDB_YY_REMAP_PREFIX ada_
111static int yylex (
void);
113static void yyerror (
const char *);
118 const struct block *,
const char *,
int,
124 const struct block *,
132 const struct block *,
const char *,
int);
160 return res->
replace (std::move (result),
173ada_pop (
bool deprocedure_p =
true,
struct type *context_type =
nullptr)
195 operation_up addr = make_operation<unop_addr_operation> (std::move (arg));
197 = make_operation<ada_wrapped_operation> (std::move (addr));
199 wrapped = make_operation<unop_cast_operation> (std::move (wrapped),
type);
210 struct value *args[2];
213 args[0] = lhs->evaluate (
nullptr,
pstate->
expout.get (),
219 args[1] = rhs->evaluate (
nullptr,
pstate->
expout.get (),
231 operation_up callee = make_operation<ada_var_value_operation> (fn);
233 std::vector<operation_up> argvec;
234 argvec.push_back (std::move (lhs));
236 argvec.push_back (std::move (rhs));
237 return make_operation<ada_funcall_operation> (std::move (callee),
252 call = make_operation<T> (std::move (arg));
267 if (wrapped ==
nullptr)
269 wrapped = make_operation<T> (std::move (lhs), std::move (rhs));
270 wrapped = make_operation<ada_wrapped_operation> (std::move (wrapped));
286 call = make_operation<T> (std::move (lhs), std::move (rhs));
301 call = make_operation<T> (op, std::move (lhs), std::move (rhs));
314 pstate->
push_new<
T> (std::move (lhs), std::move (mid), std::move (rhs));
334 struct type *callee_t =
nullptr;
338 struct value *callee_v = callee->evaluate (
nullptr,
345 for (
int i = 0; i < nargs; ++i)
347 struct type *subtype =
nullptr;
350 args[i] =
resolve (std::move (args[i]),
true, subtype);
353 std::unique_ptr<ada_funcall_operation> funcall
365template<
typename T,
typename... Arg>
369 components.emplace_back (
new T (std::forward<Arg> (args)...));
380 return gdb::checked_static_cast<ada_choices_component *> (last);
395static std::vector<ada_component_up>
398 std::vector<ada_component_up> result (n);
399 for (
int i = 1; i <= n; ++i)
409template<
typename T,
typename... Arg>
413 associations.emplace_back (
new T (std::forward<Arg> (args)...));
428static std::vector<ada_association_up>
431 std::vector<ada_association_up> result (n);
432 for (
int i = 1; i <= n; ++i)
454static std::unique_ptr<expr_completion_base>
457 return (std::unique_ptr<expr_completion_base>
462#line 463 "ada-exp.c.tmp"
466# define YY_CAST(Type, Val) static_cast<Type> (Val)
467# define YY_REINTERPRET_CAST(Type, Val) reinterpret_cast<Type> (Val)
469# define YY_CAST(Type, Val) ((Type) (Val))
470# define YY_REINTERPRET_CAST(Type, Val) ((Type) (Val))
473# ifndef YY_NULLPTRPTR
474# if defined __cplusplus
475# if 201103L <= __cplusplus
476# define YY_NULLPTRPTR nullptr
478# define YY_NULLPTRPTR 0
481# define YY_NULLPTRPTR ((void*)0)
563#define TRUEKEYWORD 262
564#define FALSEKEYWORD 263
565#define COLONCOLON 264
569#define TICK_COMPLETE 268
570#define DOT_COMPLETE 269
571#define NAME_COMPLETE 270
572#define DOLLAR_VARIABLE 271
592#define TICK_ACCESS 291
593#define TICK_ADDRESS 292
594#define TICK_FIRST 293
596#define TICK_LENGTH 295
599#define TICK_MODULUS 298
601#define TICK_RANGE 300
609#if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED
629#line 630 "ada-exp.c.tmp"
633# define YYSTYPE_IS_TRIVIAL 1
634# define YYSTYPE_IS_DECLARED 1
759#ifndef __PTRDIFF_MAX__
761# if defined __STDC_VERSION__ && 199901 <= __STDC_VERSION__
772#ifdef __INT_LEAST8_MAX__
774#elif defined YY_STDINT_H
780#ifdef __INT_LEAST16_MAX__
782#elif defined YY_STDINT_H
794# undef UINT_LEAST8_MAX
795# undef UINT_LEAST16_MAX
796# define UINT_LEAST8_MAX 255
797# define UINT_LEAST16_MAX 65535
800#if defined __UINT_LEAST8_MAX__ && __UINT_LEAST8_MAX__ <= __INT_MAX__
802#elif (!defined __UINT_LEAST8_MAX__ && defined YY_STDINT_H \
803 && UINT_LEAST8_MAX <= INT_MAX)
805#elif !defined __UINT_LEAST8_MAX__ && UCHAR_MAX <= INT_MAX
811#if defined __UINT_LEAST16_MAX__ && __UINT_LEAST16_MAX__ <= __INT_MAX__
813#elif (!defined __UINT_LEAST16_MAX__ && defined YY_STDINT_H \
814 && UINT_LEAST16_MAX <= INT_MAX)
816#elif !defined __UINT_LEAST16_MAX__ && USHRT_MAX <= INT_MAX
823# if defined __PTRDIFF_TYPE__ && defined __PTRDIFF_MAX__
824# define YYPTRDIFF_T __PTRDIFF_TYPE__
825# define YYPTRDIFF_MAXIMUM __PTRDIFF_MAX__
826# elif defined PTRDIFF_MAX
830# define YYPTRDIFF_T ptrdiff_t
831# define YYPTRDIFF_MAXIMUM PTRDIFF_MAX
833# define YYPTRDIFF_T long
834# define YYPTRDIFF_MAXIMUM LONG_MAX
840# define YYSIZE_T __SIZE_TYPE__
842# define YYSIZE_T size_t
843# elif defined __STDC_VERSION__ && 199901 <= __STDC_VERSION__
845# define YYSIZE_T size_t
847# define YYSIZE_T unsigned
851#define YYSIZE_MAXIMUM \
852 YY_CAST (YYPTRDIFF_T, \
853 (YYPTRDIFF_MAXIMUM < YY_CAST (YYSIZE_T, -1) \
854 ? YYPTRDIFF_MAXIMUM \
855 : YY_CAST (YYSIZE_T, -1)))
857#define YYSIZEOF(X) YY_CAST (YYPTRDIFF_T, sizeof (X))
867# if defined YYENABLE_NLS && YYENABLE_NLS
870# define YY_(Msgid) dgettext ("bison-runtime", Msgid)
874# define YY_(Msgid) Msgid
879#ifndef YY_ATTRIBUTE_PURE
880# if defined __GNUC__ && 2 < __GNUC__ + (96 <= __GNUC_MINOR__)
881# define YY_ATTRIBUTE_PURE __attribute__ ((__pure__))
883# define YY_ATTRIBUTE_PURE
887#ifndef YY_ATTRIBUTE_UNUSED
888# if defined __GNUC__ && 2 < __GNUC__ + (7 <= __GNUC_MINOR__)
889# define YY_ATTRIBUTE_UNUSED __attribute__ ((__unused__))
891# define YY_ATTRIBUTE_UNUSED
896#if ! defined lint || defined __GNUC__
897# define YY_USE(E) ((void) (E))
903#if defined __GNUC__ && ! defined __ICC && 406 <= __GNUC__ * 100 + __GNUC_MINOR__
904# if __GNUC__ * 100 + __GNUC_MINOR__ < 407
905# define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN \
906 _Pragma ("GCC diagnostic push") \
907 _Pragma ("GCC diagnostic ignored \"-Wuninitialized\"")
909# define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN \
910 _Pragma ("GCC diagnostic push") \
911 _Pragma ("GCC diagnostic ignored \"-Wuninitialized\"") \
912 _Pragma ("GCC diagnostic ignored \"-Wmaybe-uninitialized\"")
914# define YY_IGNORE_MAYBE_UNINITIALIZED_END \
915 _Pragma ("GCC diagnostic pop")
917# define YY_INITIAL_VALUE(Value) Value
919#ifndef YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
920# define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
921# define YY_IGNORE_MAYBE_UNINITIALIZED_END
923#ifndef YY_INITIAL_VALUE
924# define YY_INITIAL_VALUE(Value)
927#if defined __cplusplus && defined __GNUC__ && ! defined __ICC && 6 <= __GNUC__
928# define YY_IGNORE_USELESS_CAST_BEGIN \
929 _Pragma ("GCC diagnostic push") \
930 _Pragma ("GCC diagnostic ignored \"-Wuseless-cast\"")
931# define YY_IGNORE_USELESS_CAST_END \
932 _Pragma ("GCC diagnostic pop")
934#ifndef YY_IGNORE_USELESS_CAST_BEGIN
935# define YY_IGNORE_USELESS_CAST_BEGIN
936# define YY_IGNORE_USELESS_CAST_END
940#define YY_ASSERT(E) ((void) (0 && (E)))
942#if !defined yyoverflow
946# ifdef YYSTACK_USE_ALLOCA
947# if YYSTACK_USE_ALLOCA
949# define YYSTACK_ALLOC __builtin_alloca
950# elif defined __BUILTIN_VA_ARG_INCR
953# define YYSTACK_ALLOC __alloca
954# elif defined _MSC_VER
955# define alloca _alloca
957# define YYSTACK_ALLOC alloca
958# if ! defined _ALLOCA_H && ! defined EXIT_SUCCESS
962# define EXIT_SUCCESS 0
971# define YYSTACK_FREE(Ptr) do { ; } while (0)
972# ifndef YYSTACK_ALLOC_MAXIMUM
977# define YYSTACK_ALLOC_MAXIMUM 4032
980# define YYSTACK_ALLOC YYMALLOC
981# define YYSTACK_FREE YYFREE
982# ifndef YYSTACK_ALLOC_MAXIMUM
983# define YYSTACK_ALLOC_MAXIMUM YYSIZE_MAXIMUM
985# if (defined __cplusplus && ! defined EXIT_SUCCESS \
986 && ! ((defined YYMALLOC || defined xmalloc) \
987 && (defined YYFREE || defined xfree)))
990# define EXIT_SUCCESS 0
994# define YYMALLOC xmalloc
995# if ! defined xmalloc && ! defined EXIT_SUCCESS
1000# define YYFREE xfree
1001# if ! defined xfree && ! defined EXIT_SUCCESS
1008#if (! defined yyoverflow \
1009 && (! defined __cplusplus \
1010 || (defined YYSTYPE_IS_TRIVIAL && YYSTYPE_IS_TRIVIAL)))
1020# define YYSTACK_GAP_MAXIMUM (YYSIZEOF (union yyalloc) - 1)
1024# define YYSTACK_BYTES(N) \
1025 ((N) * (YYSIZEOF (yy_state_t) + YYSIZEOF (YYSTYPE)) \
1026 + YYSTACK_GAP_MAXIMUM)
1028# define YYCOPY_NEEDED 1
1035# define YYSTACK_RELOCATE(Stack_alloc, Stack) \
1038 YYPTRDIFF_T yynewbytes; \
1039 YYCOPY (&yyptr->Stack_alloc, Stack, yysize); \
1040 Stack = &yyptr->Stack_alloc; \
1041 yynewbytes = yystacksize * YYSIZEOF (*Stack) + YYSTACK_GAP_MAXIMUM; \
1042 yyptr += yynewbytes / YYSIZEOF (*yyptr); \
1048#if defined YYCOPY_NEEDED && YYCOPY_NEEDED
1052# if defined __GNUC__ && 1 < __GNUC__
1053# define YYCOPY(Dst, Src, Count) \
1054 __builtin_memcpy (Dst, Src, YY_CAST (YYSIZE_T, (Count)) * sizeof (*(Src)))
1056# define YYCOPY(Dst, Src, Count) \
1060 for (yyi = 0; yyi < (Count); yyi++) \
1061 (Dst)[yyi] = (Src)[yyi]; \
1080#define YYNSTATES 230
1083#define YYMAXUTOK 305
1088#define YYTRANSLATE(YYX) \
1089 (0 <= (YYX) && (YYX) <= YYMAXUTOK \
1090 ? YY_CAST (yysymbol_kind_t, yytranslate[YYX]) \
1097 0, 2, 2, 2, 2, 2, 2, 2, 2, 2,
1098 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
1099 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
1100 2, 2, 2, 2, 2, 2, 2, 2, 34, 66,
1101 60, 65, 36, 32, 67, 33, 59, 37, 2, 2,
1102 2, 2, 2, 2, 2, 2, 2, 2, 2, 64,
1103 25, 23, 26, 2, 31, 2, 2, 2, 2, 2,
1104 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
1105 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
1106 2, 61, 2, 70, 2, 2, 2, 2, 2, 2,
1107 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
1108 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
1109 2, 2, 2, 68, 45, 69, 2, 2, 2, 2,
1110 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
1111 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
1112 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
1113 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
1114 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
1115 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
1116 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
1117 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
1118 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
1119 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
1120 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
1121 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
1122 2, 2, 2, 2, 2, 2, 1, 2, 3, 4,
1123 5, 6, 7, 8, 9, 10, 11, 12, 13, 14,
1124 15, 16, 17, 18, 19, 20, 21, 22, 24, 27,
1125 28, 29, 30, 35, 38, 39, 40, 41, 42, 43,
1126 44, 46, 47, 48, 49, 50, 51, 52, 53, 54,
1127 55, 56, 57, 58, 62, 63
1134 0, 491, 491, 495, 496, 498, 514, 527, 541, 543,
1135 558, 570, 572, 580, 591, 597, 601, 608, 611, 615,
1136 631, 638, 642, 645, 647, 649, 651, 655, 668, 672,
1137 676, 680, 684, 688, 692, 696, 700, 704, 707, 711,
1138 715, 719, 721, 728, 736, 739, 747, 758, 762, 766,
1139 770, 771, 772, 773, 774, 775, 779, 782, 788, 791,
1140 797, 800, 806, 808, 812, 815, 828, 830, 832, 836,
1141 842, 848, 854, 856, 858, 860, 862, 864, 870, 880,
1142 882, 887, 896, 899, 903, 907, 913, 924, 932, 939,
1143 941, 945, 949, 951, 957, 959, 965, 973, 984, 986,
1144 991, 1002, 1003, 1009, 1014, 1020, 1029, 1030, 1031, 1035,
1145 1042, 1055, 1061, 1067, 1076, 1081, 1086, 1100, 1102, 1104
1150#define YY_ACCESSING_SYMBOL(State) YY_CAST (yysymbol_kind_t, yystos[State])
1161 "\"end of file\"",
"error",
"\"invalid token\"",
"INT",
"NULL_PTR",
1162 "CHARLIT",
"FLOAT",
"TRUEKEYWORD",
"FALSEKEYWORD",
"COLONCOLON",
1163 "STRING",
"NAME",
"DOT_ID",
"TICK_COMPLETE",
"DOT_COMPLETE",
1164 "NAME_COMPLETE",
"DOLLAR_VARIABLE",
"ASSIGN",
"_AND_",
"OR",
"XOR",
1165 "THEN",
"ELSE",
"'='",
"NOTEQUAL",
"'<'",
"'>'",
"LEQ",
"GEQ",
"IN",
1166 "DOTDOT",
"'@'",
"'+'",
"'-'",
"'&'",
"UNARY",
"'*'",
"'/'",
"MOD",
1167 "REM",
"STARSTAR",
"ABS",
"NOT",
"VAR",
"ARROW",
"'|'",
"TICK_ACCESS",
1168 "TICK_ADDRESS",
"TICK_FIRST",
"TICK_LAST",
"TICK_LENGTH",
"TICK_MAX",
1169 "TICK_MIN",
"TICK_MODULUS",
"TICK_POS",
"TICK_RANGE",
"TICK_SIZE",
1170 "TICK_TAG",
"TICK_VAL",
"'.'",
"'('",
"'['",
"NEW",
"OTHERS",
"';'",
1171 "')'",
"'\\''",
"','",
"'{'",
"'}'",
"']'",
"$accept",
"start",
"exp1",
1172 "primary",
"simple_exp",
"arglist",
"relation",
"exp",
"and_exp",
1173 "and_then_exp",
"or_exp",
"or_else_exp",
"xor_exp",
"tick_arglist",
1174 "type_prefix",
"opt_type_prefix",
"var_or_type",
"block",
"aggregate",
1175 "aggregate_component_list",
"positional_list",
"component_groups",
1176 "others",
"component_group",
"component_associations",
YY_NULLPTRPTR
1186#define YYPACT_NINF (-106)
1188#define yypact_value_is_default(Yyn) \
1189 ((Yyn) == YYPACT_NINF)
1191#define YYTABLE_NINF (-82)
1193#define yytable_value_is_error(Yyn) \
1200 421, -106, -106, -106, -106, -106, -106, -106, 6, -106,
1201 -106, 421, 421, 541, 541, 421, 421, 274, 45, 17,
1202 61, 10, 566, 723, 26, -106, 48, 52, 57, 60,
1203 76, -32, 49, 99, 32, -106, -106, -106, 621, 2,
1204 2, -7, -7, 2, 2, 4, 54, -29, 660, 35,
1205 39, 274, -106, -106, 38, -106, -106, 37, -106, 421,
1206 -106, -106, -106, 421, -106, -106, 51, 51, 51, -106,
1207 -106, 260, 421, 421, 421, 421, 421, 421, 421, 421,
1208 421, 421, 421, 421, 421, 421, 421, 421, 421, 79,
1209 340, 381, 421, 421, 92, 421, 94, 421, -106, 71,
1210 72, 73, 75, 260, 77, 22, -106, 421, 461, 421,
1211 -106, 421, 421, 461, -106, -106, 47, -106, 274, 541,
1212 -106, -106, 114, -106, -106, -106, 16, 683, -38, -106,
1213 66, 553, 553, 553, 553, 553, 553, 582, 534, 171,
1214 761, 2, 2, 2, 98, 98, 98, 98, 98, 421,
1215 421, -106, 421, -106, -106, -106, 421, -106, 421, -106,
1216 421, 421, 421, 421, 703, -10, 421, -106, -106, -106,
1217 736, -106, -106, 326, -106, -106, -106, -106, -7, 89,
1218 421, 421, -106, 501, -106, 51, 421, 605, 752, 192,
1219 -106, -106, -106, -106, 93, 97, 100, 103, 421, -106,
1220 105, 421, 461, -106, -106, 90, 21, -106, -106, 553,
1221 51, 421, -106, 421, 421, -106, 109, -106, -106, -106,
1222 -106, 421, -106, 553, 107, 108, -106, -106, -106, -106
1230 83, 84, 87, 85, 86, 89, 90, 88, 92, 93,
1231 15, 83, 83, 83, 83, 83, 83, 83, 0, 0,
1232 0, 2, 17, 37, 50, 3, 51, 52, 53, 54,
1233 55, 82, 0, 14, 0, 16, 98, 96, 17, 19,
1234 18, 118, 117, 21, 20, 92, 0, 0, 37, 3,
1235 0, 83, 101, 106, 107, 110, 91, 0, 1, 83,
1236 6, 68, 7, 83, 66, 67, 79, 79, 79, 72,
1237 73, 83, 83, 83, 83, 83, 83, 83, 83, 83,
1238 83, 83, 83, 83, 83, 83, 83, 83, 83, 0,
1239 83, 83, 83, 83, 0, 83, 0, 83, 78, 0,
1240 0, 0, 0, 83, 0, 94, 95, 83, 83, 83,
1241 13, 83, 83, 83, 104, 100, 102, 103, 83, 83,
1242 4, 5, 0, 69, 70, 71, 92, 37, 0, 23,
1243 0, 38, 39, 48, 49, 40, 47, 17, 0, 14,
1244 33, 34, 36, 35, 29, 30, 32, 31, 28, 83,
1245 83, 56, 83, 60, 64, 57, 83, 61, 83, 65,
1246 83, 83, 83, 83, 37, 0, 83, 99, 97, 111,
1247 0, 114, 109, 0, 112, 115, 105, 108, 27, 0,
1248 83, 83, 8, 83, 119, 79, 83, 17, 0, 14,
1249 58, 62, 59, 63, 0, 0, 0, 0, 83, 9,
1250 0, 83, 83, 80, 24, 0, 92, 25, 42, 41,
1251 79, 83, 77, 83, 83, 76, 0, 10, 113, 116,
1252 11, 83, 45, 44, 0, 0, 12, 26, 75, 74
1258 -106, -106, 158, 20, 7, 74, -81, 0, -106, -106,
1259 -106, -106, -106, -66, -106, -106, -15, -106, -106, -106,
1260 -106, -45, -106, -106, -105
1266 0, 20, 21, 38, 23, 128, 24, 129, 26, 27,
1267 28, 29, 30, 123, 31, 32, 33, 34, 35, 50,
1276 25, 124, 125, 171, 57, 60, 117, 62, 175, 151,
1277 153, 154, 155, 36, 157, 36, 159, 49, 39, 40,
1278 22, 98, 43, 44, 48, 36, 99, 182, 8, 183,
1279 36, 167, 9, 41, 42, 59, 110, 22, 84, 85,
1280 86, 87, 88, 105, 90, 91, 92, 106, 107, 108,
1281 37, 116, 37, 71, 72, 199, 56, 183, 48, 120,
1282 180, 58, 37, 121, 139, 221, 93, 37, 168, 190,
1283 94, 191, 130, 177, 59, 192, 95, 193, 127, 96,
1284 131, 132, 133, 134, 135, 136, 138, 140, 141, 142,
1285 143, 144, 145, 146, 147, 148, 97, 219, 109, 137,
1286 100, 101, 114, 102, 115, 118, 119, 169, 149, 172,
1287 164, 122, 174, 156, 176, 170, 158, 179, 173, 208,
1288 170, 80, 81, 82, 83, 170, 84, 85, 86, 87,
1289 88, 160, 161, 162, 189, 163, 184, 166, 88, 178,
1290 80, 81, 82, 83, 222, 84, 85, 86, 87, 88,
1291 -81, -81, -81, -81, 203, 220, 188, -81, 212, 103,
1292 194, 195, 196, 197, 213, 104, 200, 214, 215, 187,
1293 217, -43, 228, 229, 226, 47, 0, 165, 0, 0,
1294 204, 0, 0, 207, 0, 0, 0, 0, 205, -43,
1295 -43, -43, -46, 209, 0, 0, 0, 0, 0, 0,
1296 0, 218, 0, 0, 0, 216, 0, 0, 0, 170,
1297 -46, -46, -46, 224, 225, 0, 0, 0, 223, 0,
1298 0, 227, -81, -81, -81, -81, 0, 0, 0, -81,
1299 0, 103, 0, 0, 0, -43, -43, 104, -43, 0,
1300 0, -43, 0, -81, -81, -81, -81, 0, 0, 0,
1301 -81, 0, 103, 0, 0, 0, -46, -46, 104, -46,
1302 0, 0, -46, 1, 2, 3, 4, 5, 6, 0,
1303 7, 126, 0, 0, 0, 9, 10, 1, 2, 3,
1304 4, 5, 6, 0, 7, 45, 0, 0, 0, 9,
1305 10, 0, 11, 12, 13, 0, 14, 0, 0, 0,
1306 0, 15, 16, 0, 0, 0, 11, 12, 13, 0,
1307 14, 0, 0, 0, 0, 15, 16, 0, 0, 0,
1308 17, 0, 18, 0, 0, -22, 0, -22, 19, 0,
1309 0, 0, 0, 0, 17, 0, 18, 46, 0, 0,
1310 0, 0, 19, 1, 2, 3, 4, 5, 6, 0,
1311 7, 8, 0, 0, 0, 9, 10, 80, 81, 82,
1312 83, 150, 84, 85, 86, 87, 88, 0, 0, 0,
1313 201, 202, 11, 12, 13, 0, 14, 0, 0, 0,
1314 0, 15, 16, 0, 1, 2, 3, 4, 5, 6,
1315 0, 7, 8, 0, 0, 0, 9, 10, 0, 0,
1316 17, 0, 18, 152, 0, 0, 0, 0, 19, 0,
1317 0, 0, 0, 11, 12, 13, 0, 14, 0, 0,
1318 0, 0, 15, 16, 1, 2, 3, 4, 5, 6,
1319 0, 7, 8, 0, 0, 0, 9, 10, 0, 0,
1320 0, 17, 0, 18, 0, 0, 0, 0, 0, 19,
1321 0, 0, 0, 11, 12, 13, 0, 14, 0, 0,
1322 0, 0, 15, 16, 1, 2, 3, 4, 5, 6,
1323 0, 7, 45, 0, 0, 0, 9, 10, 0, 0,
1324 0, 17, 0, 18, 0, 0, 0, 0, 0, 19,
1325 0, 0, 0, 11, 12, 13, 0, 14, 0, 0,
1326 0, 0, 15, 16, 1, 2, 3, 4, 5, 6,
1327 0, 7, 206, 0, 0, 0, 9, 10, 0, 0,
1328 0, 17, 0, 18, 0, 0, 0, 0, 0, 19,
1329 0, 0, 0, 11, 12, 13, 0, 14, 0, 0,
1330 0, 0, 15, 16, 1, 2, 3, 4, 5, 6,
1331 0, 7, 8, 0, 0, 0, 9, 10, 0, 0,
1332 0, 17, 0, 18, 186, 80, 81, 82, 83, 19,
1333 84, 85, 86, 87, 88, 13, 0, 14, 60, 61,
1334 62, 0, 0, 63, 80, 81, 82, 83, 0, 84,
1335 85, 86, 87, 88, 60, 61, 62, 0, 0, 0,
1336 0, 17, 0, 18, 0, 0, 0, 0, 0, 19,
1337 0, 0, 64, 65, 66, 67, 68, 60, 61, 62,
1338 0, 0, 69, 70, 0, 0, 71, 72, 64, 65,
1339 66, 67, 68, 60, 61, 62, 0, 185, 69, 70,
1340 0, 0, 71, 72, 0, 0, 0, 0, 0, 0,
1341 0, 64, 65, 66, 67, 68, 0, 0, 0, 0,
1342 210, 69, 70, 0, 0, 71, 72, 64, 65, 66,
1343 67, 68, 0, 0, 0, 0, 0, 69, 70, 0,
1344 0, 71, 72, 73, 74, 75, 76, 77, 78, 79,
1345 111, 80, 81, 82, 83, 0, 84, 85, 86, 87,
1346 88, 0, 89, 0, 112, 113, 73, 74, 75, 76,
1347 77, 78, 79, 181, 80, 81, 82, 83, 0, 84,
1348 85, 86, 87, 88, 0, 89, 73, 74, 75, 76,
1349 77, 78, 79, 198, 80, 81, 82, 83, 0, 84,
1350 85, 86, 87, 88, 0, 89, 73, 74, 75, 76,
1351 77, 78, 79, 0, 80, 81, 82, 83, 0, 84,
1352 85, 86, 87, 88, 0, 89, 111, 80, 81, 82,
1353 83, 0, 84, 85, 86, 87, 88, 0, 0, 0,
1354 112, 113, 211, 80, 81, 82, 83, 0, 84, 85,
1355 86, 87, 88, 81, 82, 83, 0, 84, 85, 86,
1361 0, 67, 68, 108, 19, 12, 51, 14, 113, 90,
1362 91, 92, 93, 9, 95, 9, 97, 17, 11, 12,
1363 0, 53, 15, 16, 17, 9, 58, 65, 11, 67,
1364 9, 9, 15, 13, 14, 64, 65, 17, 36, 37,
1365 38, 39, 40, 11, 18, 19, 20, 15, 44, 45,
1366 46, 51, 46, 60, 61, 65, 11, 67, 51, 59,
1367 44, 0, 46, 63, 79, 44, 18, 46, 46, 150,
1368 18, 152, 72, 118, 64, 156, 19, 158, 71, 19,
1369 73, 74, 75, 76, 77, 78, 79, 80, 81, 82,
1370 83, 84, 85, 86, 87, 88, 20, 202, 44, 79,
1371 51, 52, 67, 54, 65, 67, 69, 107, 29, 109,
1372 103, 60, 112, 21, 67, 108, 22, 3, 111, 185,
1373 113, 31, 32, 33, 34, 118, 36, 37, 38, 39,
1374 40, 60, 60, 60, 149, 60, 70, 60, 40, 119,
1375 31, 32, 33, 34, 210, 36, 37, 38, 39, 40,
1376 51, 52, 53, 54, 65, 65, 149, 58, 65, 60,
1377 160, 161, 162, 163, 67, 66, 166, 67, 65, 149,
1378 65, 0, 65, 65, 65, 17, -1, 103, -1, -1,
1379 180, -1, -1, 183, -1, -1, -1, -1, 181, 18,
1380 19, 20, 0, 186, -1, -1, -1, -1, -1, -1,
1381 -1, 201, -1, -1, -1, 198, -1, -1, -1, 202,
1382 18, 19, 20, 213, 214, -1, -1, -1, 211, -1,
1383 -1, 221, 51, 52, 53, 54, -1, -1, -1, 58,
1384 -1, 60, -1, -1, -1, 64, 65, 66, 67, -1,
1385 -1, 70, -1, 51, 52, 53, 54, -1, -1, -1,
1386 58, -1, 60, -1, -1, -1, 64, 65, 66, 67,
1387 -1, -1, 70, 3, 4, 5, 6, 7, 8, -1,
1388 10, 11, -1, -1, -1, 15, 16, 3, 4, 5,
1389 6, 7, 8, -1, 10, 11, -1, -1, -1, 15,
1390 16, -1, 32, 33, 34, -1, 36, -1, -1, -1,
1391 -1, 41, 42, -1, -1, -1, 32, 33, 34, -1,
1392 36, -1, -1, -1, -1, 41, 42, -1, -1, -1,
1393 60, -1, 62, -1, -1, 65, -1, 67, 68, -1,
1394 -1, -1, -1, -1, 60, -1, 62, 63, -1, -1,
1395 -1, -1, 68, 3, 4, 5, 6, 7, 8, -1,
1396 10, 11, -1, -1, -1, 15, 16, 31, 32, 33,
1397 34, 21, 36, 37, 38, 39, 40, -1, -1, -1,
1398 44, 45, 32, 33, 34, -1, 36, -1, -1, -1,
1399 -1, 41, 42, -1, 3, 4, 5, 6, 7, 8,
1400 -1, 10, 11, -1, -1, -1, 15, 16, -1, -1,
1401 60, -1, 62, 22, -1, -1, -1, -1, 68, -1,
1402 -1, -1, -1, 32, 33, 34, -1, 36, -1, -1,
1403 -1, -1, 41, 42, 3, 4, 5, 6, 7, 8,
1404 -1, 10, 11, -1, -1, -1, 15, 16, -1, -1,
1405 -1, 60, -1, 62, -1, -1, -1, -1, -1, 68,
1406 -1, -1, -1, 32, 33, 34, -1, 36, -1, -1,
1407 -1, -1, 41, 42, 3, 4, 5, 6, 7, 8,
1408 -1, 10, 11, -1, -1, -1, 15, 16, -1, -1,
1409 -1, 60, -1, 62, -1, -1, -1, -1, -1, 68,
1410 -1, -1, -1, 32, 33, 34, -1, 36, -1, -1,
1411 -1, -1, 41, 42, 3, 4, 5, 6, 7, 8,
1412 -1, 10, 11, -1, -1, -1, 15, 16, -1, -1,
1413 -1, 60, -1, 62, -1, -1, -1, -1, -1, 68,
1414 -1, -1, -1, 32, 33, 34, -1, 36, -1, -1,
1415 -1, -1, 41, 42, 3, 4, 5, 6, 7, 8,
1416 -1, 10, 11, -1, -1, -1, 15, 16, -1, -1,
1417 -1, 60, -1, 62, 30, 31, 32, 33, 34, 68,
1418 36, 37, 38, 39, 40, 34, -1, 36, 12, 13,
1419 14, -1, -1, 17, 31, 32, 33, 34, -1, 36,
1420 37, 38, 39, 40, 12, 13, 14, -1, -1, -1,
1421 -1, 60, -1, 62, -1, -1, -1, -1, -1, 68,
1422 -1, -1, 46, 47, 48, 49, 50, 12, 13, 14,
1423 -1, -1, 56, 57, -1, -1, 60, 61, 46, 47,
1424 48, 49, 50, 12, 13, 14, -1, 55, 56, 57,
1425 -1, -1, 60, 61, -1, -1, -1, -1, -1, -1,
1426 -1, 46, 47, 48, 49, 50, -1, -1, -1, -1,
1427 55, 56, 57, -1, -1, 60, 61, 46, 47, 48,
1428 49, 50, -1, -1, -1, -1, -1, 56, 57, -1,
1429 -1, 60, 61, 23, 24, 25, 26, 27, 28, 29,
1430 30, 31, 32, 33, 34, -1, 36, 37, 38, 39,
1431 40, -1, 42, -1, 44, 45, 23, 24, 25, 26,
1432 27, 28, 29, 30, 31, 32, 33, 34, -1, 36,
1433 37, 38, 39, 40, -1, 42, 23, 24, 25, 26,
1434 27, 28, 29, 30, 31, 32, 33, 34, -1, 36,
1435 37, 38, 39, 40, -1, 42, 23, 24, 25, 26,
1436 27, 28, 29, -1, 31, 32, 33, 34, -1, 36,
1437 37, 38, 39, 40, -1, 42, 30, 31, 32, 33,
1438 34, -1, 36, 37, 38, 39, 40, -1, -1, -1,
1439 44, 45, 30, 31, 32, 33, 34, -1, 36, 37,
1440 38, 39, 40, 32, 33, 34, -1, 36, 37, 38,
1448 0, 3, 4, 5, 6, 7, 8, 10, 11, 15,
1449 16, 32, 33, 34, 36, 41, 42, 60, 62, 68,
1450 72, 73, 74, 75, 77, 78, 79, 80, 81, 82,
1451 83, 85, 86, 87, 88, 89, 9, 46, 74, 75,
1452 75, 74, 74, 75, 75, 11, 63, 73, 75, 78,
1453 90, 91, 92, 93, 94, 95, 11, 87, 0, 64,
1454 12, 13, 14, 17, 46, 47, 48, 49, 50, 56,
1455 57, 60, 61, 23, 24, 25, 26, 27, 28, 29,
1456 31, 32, 33, 34, 36, 37, 38, 39, 40, 42,
1457 18, 19, 20, 18, 18, 19, 19, 20, 53, 58,
1458 51, 52, 54, 60, 66, 11, 15, 44, 45, 44,
1459 65, 30, 44, 45, 67, 65, 78, 92, 67, 69,
1460 78, 78, 60, 84, 84, 84, 11, 75, 76, 78,
1461 78, 75, 75, 75, 75, 75, 75, 74, 75, 87,
1462 75, 75, 75, 75, 75, 75, 75, 75, 75, 29,
1463 21, 77, 22, 77, 77, 77, 21, 77, 22, 77,
1464 60, 60, 60, 60, 75, 76, 60, 9, 46, 78,
1465 75, 95, 78, 75, 78, 95, 67, 92, 74, 3,
1466 44, 30, 65, 67, 70, 55, 30, 74, 75, 87,
1467 77, 77, 77, 77, 78, 78, 78, 78, 30, 65,
1468 78, 44, 45, 65, 78, 75, 11, 78, 84, 75,
1469 55, 30, 65, 67, 67, 65, 75, 65, 78, 95,
1470 65, 44, 84, 75, 78, 78, 65, 78, 65, 65
1476 0, 71, 72, 73, 73, 73, 74, 74, 74, 74,
1477 74, 74, 74, 74, 74, 74, 74, 75, 75, 75,
1478 75, 75, 76, 76, 76, 76, 76, 74, 75, 75,
1479 75, 75, 75, 75, 75, 75, 75, 77, 77, 77,
1480 77, 77, 77, 77, 77, 77, 77, 77, 77, 77,
1481 78, 78, 78, 78, 78, 78, 79, 79, 80, 80,
1482 81, 81, 82, 82, 83, 83, 74, 74, 74, 74,
1483 74, 74, 74, 74, 74, 74, 74, 74, 74, 84,
1484 84, 85, 86, 86, 74, 74, 74, 74, 74, 74,
1485 74, 74, 87, 87, 87, 87, 87, 87, 88, 88,
1486 89, 90, 90, 90, 91, 91, 92, 92, 92, 93,
1487 94, 95, 95, 95, 95, 95, 95, 74, 74, 74
1493 0, 2, 1, 1, 3, 3, 2, 2, 4, 4,
1494 5, 6, 6, 3, 1, 1, 1, 1, 2, 2,
1495 2, 2, 0, 1, 3, 3, 5, 4, 3, 3,
1496 3, 3, 3, 3, 3, 3, 3, 1, 3, 3,
1497 3, 5, 5, 3, 6, 6, 4, 3, 3, 3,
1498 1, 1, 1, 1, 1, 1, 3, 3, 4, 4,
1499 3, 3, 4, 4, 3, 3, 2, 2, 2, 3,
1500 3, 3, 2, 2, 7, 7, 5, 5, 2, 0,
1501 3, 1, 1, 0, 1, 1, 1, 1, 1, 1,
1502 1, 2, 1, 1, 2, 2, 2, 3, 2, 3,
1503 3, 1, 2, 2, 2, 3, 1, 1, 3, 3,
1504 1, 3, 3, 5, 3, 3, 5, 2, 2, 4
1510#define yyerrok (yyerrstatus = 0)
1511#define yyclearin (yychar = YYEMPTY)
1513#define YYACCEPT goto yyacceptlab
1514#define YYABORT goto yyabortlab
1515#define YYERROR goto yyerrorlab
1516#define YYNOMEM goto yyexhaustedlab
1519#define YYRECOVERING() (!!yyerrstatus)
1521#define YYBACKUP(Token, Value) \
1523 if (yychar == YYEMPTY) \
1527 YYPOPSTACK (yylen); \
1533 yyerror (YY_("syntax error: cannot back up")); \
1540#define YYERRCODE YYUNDEF
1548# define YYFPRINTF fprintf
1551# define YYDPRINTF(Args) \
1560# define YY_SYMBOL_PRINT(Title, Kind, Value, Location) \
1564 YYFPRINTF (stderr, "%s ", Title); \
1565 yy_symbol_print (stderr, \
1567 YYFPRINTF (stderr, "\n"); \
1580 FILE *yyoutput = yyo;
1614 for (; yybottom <= yytop; yybottom++)
1616 int yybot = *yybottom;
1622# define YY_STACK_PRINT(Bottom, Top) \
1625 yy_stack_print ((Bottom), (Top)); \
1640 YYFPRINTF (stderr,
"Reducing stack by rule %d (line %d):\n",
1643 for (yyi = 0; yyi < yynrhs; yyi++)
1648 &
yyvsp[(yyi + 1) - (yynrhs)]);
1653# define YY_REDUCE_PRINT(Rule) \
1656 yy_reduce_print (yyssp, yyvsp, Rule); \
1663# define YYDPRINTF(Args) ((void) 0)
1664# define YY_SYMBOL_PRINT(Title, Kind, Value, Location)
1665# define YY_STACK_PRINT(Bottom, Top)
1666# define YY_REDUCE_PRINT(Rule)
1672# define YYINITDEPTH 200
1683# define YYMAXDEPTH 10000
1730 int yyerrstatus = 0;
1759#define YYPOPSTACK(N) (yyvsp -= (N), yyssp -= (N))
1765 YYDPRINTF ((stderr,
"Starting parse\n"));
1793#if !defined yyoverflow && !defined YYSTACK_RELOCATE
1800# if defined yyoverflow
1812 yyoverflow (
YY_(
"memory exhausted"),
1836# undef YYSTACK_RELOCATE
1846 YYDPRINTF ((stderr,
"Stack size increased to %ld\n",
1879 YYDPRINTF ((stderr,
"Reading a token\n"));
1887 YYDPRINTF ((stderr,
"Now at end of input.\n"));
1968#line 497 "ada-exp.y"
1969 { ada_wrap2<comma_operation> (BINOP_COMMA); }
1970#line 1972 "ada-exp.c.tmp"
1974#line 499 "ada-exp.y"
1981 rhs =
resolve (std::move (rhs),
true,
1984 (std::move (lhs), std::move (rhs));
1986#line 1988 "ada-exp.c.tmp"
1990#line 515 "ada-exp.y"
1992 if (strcmp ((
yyvsp[0].sval).ptr,
"all") == 0)
1993 ada_wrap<ada_unop_ind_operation> ();
2001#line 2003 "ada-exp.c.tmp"
2005#line 528 "ada-exp.y"
2017#line 2019 "ada-exp.c.tmp"
2021#line 542 "ada-exp.y"
2023#line 2025 "ada-exp.c.tmp"
2027#line 544 "ada-exp.y"
2029 if ((
yyvsp[-3].tval) != NULL)
2031 if ((
yyvsp[-1].lval) != 1)
2032 error (_(
"Invalid conversion"));
2035 (std::move (arg), (
yyvsp[-3].tval));
2040#line 2042 "ada-exp.c.tmp"
2044#line 559 "ada-exp.y"
2046 if ((
yyvsp[-4].tval) == NULL)
2047 error (_(
"Type required for qualification"));
2051 (std::move (arg), (
yyvsp[-4].tval));
2053#line 2055 "ada-exp.c.tmp"
2057#line 571 "ada-exp.y"
2058 { ada_wrap3<ada_ternop_slice_operation> (); }
2059#line 2061 "ada-exp.c.tmp"
2063#line 573 "ada-exp.y"
2064 {
if ((
yyvsp[-5].tval) == NULL)
2065 ada_wrap3<ada_ternop_slice_operation> ();
2067 error (_(
"Cannot slice a type"));
2069#line 2071 "ada-exp.c.tmp"
2073#line 580 "ada-exp.y"
2075#line 2077 "ada-exp.c.tmp"
2079#line 592 "ada-exp.y"
2080 {
if ((
yyvsp[0].tval) != NULL)
2083#line 2085 "ada-exp.c.tmp"
2087#line 598 "ada-exp.y"
2089#line 2091 "ada-exp.c.tmp"
2093#line 602 "ada-exp.y"
2098#line 2100 "ada-exp.c.tmp"
2102#line 612 "ada-exp.y"
2103 { ada_wrap_overload<ada_neg_operation> (UNOP_NEG); }
2104#line 2106 "ada-exp.c.tmp"
2108#line 616 "ada-exp.y"
2118 if (call !=
nullptr)
2119 arg = std::move (call);
2122#line 2124 "ada-exp.c.tmp"
2126#line 632 "ada-exp.y"
2128 ada_wrap_overload<unary_logical_not_operation>
2131#line 2133 "ada-exp.c.tmp"
2135#line 639 "ada-exp.y"
2136 { ada_wrap_overload<ada_abs_operation> (UNOP_ABS); }
2137#line 2139 "ada-exp.c.tmp"
2141#line 642 "ada-exp.y"
2142 { (
yyval.lval) = 0; }
2143#line 2145 "ada-exp.c.tmp"
2147#line 646 "ada-exp.y"
2148 { (
yyval.lval) = 1; }
2149#line 2151 "ada-exp.c.tmp"
2153#line 648 "ada-exp.y"
2154 { (
yyval.lval) = 1; }
2155#line 2157 "ada-exp.c.tmp"
2159#line 650 "ada-exp.y"
2161#line 2163 "ada-exp.c.tmp"
2165#line 652 "ada-exp.y"
2167#line 2169 "ada-exp.c.tmp"
2171#line 657 "ada-exp.y"
2173 if ((
yyvsp[-2].tval) == NULL)
2174 error (_(
"Type required within braces in coercion"));
2177 (std::move (arg), (
yyvsp[-2].tval));
2179#line 2181 "ada-exp.c.tmp"
2183#line 669 "ada-exp.y"
2184 { ada_wrap2<ada_binop_exp_operation> (BINOP_EXP); }
2185#line 2187 "ada-exp.c.tmp"
2189#line 673 "ada-exp.y"
2190 { ada_wrap2<ada_binop_mul_operation> (BINOP_MUL); }
2191#line 2193 "ada-exp.c.tmp"
2195#line 677 "ada-exp.y"
2196 { ada_wrap2<ada_binop_div_operation> (BINOP_DIV); }
2197#line 2199 "ada-exp.c.tmp"
2201#line 681 "ada-exp.y"
2202 { ada_wrap2<ada_binop_rem_operation> (BINOP_REM); }
2203#line 2205 "ada-exp.c.tmp"
2207#line 685 "ada-exp.y"
2208 { ada_wrap2<ada_binop_mod_operation> (BINOP_MOD); }
2209#line 2211 "ada-exp.c.tmp"
2213#line 689 "ada-exp.y"
2214 { ada_wrap2<repeat_operation> (BINOP_REPEAT); }
2215#line 2217 "ada-exp.c.tmp"
2219#line 693 "ada-exp.y"
2220 { ada_wrap_op<ada_binop_addsub_operation> (BINOP_ADD); }
2221#line 2223 "ada-exp.c.tmp"
2225#line 697 "ada-exp.y"
2226 { ada_wrap2<ada_concat_operation> (BINOP_CONCAT); }
2227#line 2229 "ada-exp.c.tmp"
2231#line 701 "ada-exp.y"
2232 { ada_wrap_op<ada_binop_addsub_operation> (BINOP_SUB); }
2233#line 2235 "ada-exp.c.tmp"
2237#line 708 "ada-exp.y"
2238 { ada_wrap_op<ada_binop_equal_operation> (BINOP_EQUAL); }
2239#line 2241 "ada-exp.c.tmp"
2243#line 712 "ada-exp.y"
2244 { ada_wrap_op<ada_binop_equal_operation> (BINOP_NOTEQUAL); }
2245#line 2247 "ada-exp.c.tmp"
2249#line 716 "ada-exp.y"
2250 { ada_un_wrap2<leq_operation> (BINOP_LEQ); }
2251#line 2253 "ada-exp.c.tmp"
2255#line 720 "ada-exp.y"
2256 { ada_wrap3<ada_ternop_range_operation> (); }
2257#line 2259 "ada-exp.c.tmp"
2261#line 722 "ada-exp.y"
2266 (std::move (lhs), std::move (rhs), (
yyvsp[0].lval));
2268#line 2270 "ada-exp.c.tmp"
2272#line 729 "ada-exp.y"
2274 if ((
yyvsp[0].tval) == NULL)
2275 error (_(
"Right operand of 'in' must be type"));
2278 (std::move (arg), (
yyvsp[0].tval));
2280#line 2282 "ada-exp.c.tmp"
2284#line 737 "ada-exp.y"
2285 { ada_wrap3<ada_ternop_range_operation> ();
2286 ada_wrap<unary_logical_not_operation> (); }
2287#line 2289 "ada-exp.c.tmp"
2291#line 740 "ada-exp.y"
2296 (std::move (lhs), std::move (rhs), (
yyvsp[0].lval));
2297 ada_wrap<unary_logical_not_operation> ();
2299#line 2301 "ada-exp.c.tmp"
2303#line 748 "ada-exp.y"
2305 if ((
yyvsp[0].tval) == NULL)
2306 error (_(
"Right operand of 'in' must be type"));
2309 (std::move (arg), (
yyvsp[0].tval));
2310 ada_wrap<unary_logical_not_operation> ();
2312#line 2314 "ada-exp.c.tmp"
2316#line 759 "ada-exp.y"
2317 { ada_un_wrap2<geq_operation> (BINOP_GEQ); }
2318#line 2320 "ada-exp.c.tmp"
2322#line 763 "ada-exp.y"
2323 { ada_un_wrap2<less_operation> (BINOP_LESS); }
2324#line 2326 "ada-exp.c.tmp"
2328#line 767 "ada-exp.y"
2329 { ada_un_wrap2<gtr_operation> (BINOP_GTR); }
2330#line 2332 "ada-exp.c.tmp"
2334#line 780 "ada-exp.y"
2335 { ada_wrap2<ada_bitwise_and_operation>
2336 (BINOP_BITWISE_AND); }
2337#line 2339 "ada-exp.c.tmp"
2341#line 783 "ada-exp.y"
2342 { ada_wrap2<ada_bitwise_and_operation>
2343 (BINOP_BITWISE_AND); }
2344#line 2346 "ada-exp.c.tmp"
2348#line 789 "ada-exp.y"
2349 { ada_wrap2<logical_and_operation>
2350 (BINOP_LOGICAL_AND); }
2351#line 2353 "ada-exp.c.tmp"
2355#line 792 "ada-exp.y"
2356 { ada_wrap2<logical_and_operation>
2357 (BINOP_LOGICAL_AND); }
2358#line 2360 "ada-exp.c.tmp"
2362#line 798 "ada-exp.y"
2363 { ada_wrap2<ada_bitwise_ior_operation>
2364 (BINOP_BITWISE_IOR); }
2365#line 2367 "ada-exp.c.tmp"
2369#line 801 "ada-exp.y"
2370 { ada_wrap2<ada_bitwise_ior_operation>
2371 (BINOP_BITWISE_IOR); }
2372#line 2374 "ada-exp.c.tmp"
2376#line 807 "ada-exp.y"
2377 { ada_wrap2<logical_or_operation> (BINOP_LOGICAL_OR); }
2378#line 2380 "ada-exp.c.tmp"
2382#line 809 "ada-exp.y"
2383 { ada_wrap2<logical_or_operation> (BINOP_LOGICAL_OR); }
2384#line 2386 "ada-exp.c.tmp"
2388#line 813 "ada-exp.y"
2389 { ada_wrap2<ada_bitwise_xor_operation>
2390 (BINOP_BITWISE_XOR); }
2391#line 2393 "ada-exp.c.tmp"
2395#line 816 "ada-exp.y"
2396 { ada_wrap2<ada_bitwise_xor_operation>
2397 (BINOP_BITWISE_XOR); }
2398#line 2400 "ada-exp.c.tmp"
2402#line 829 "ada-exp.y"
2404#line 2406 "ada-exp.c.tmp"
2408#line 831 "ada-exp.y"
2410#line 2412 "ada-exp.c.tmp"
2414#line 833 "ada-exp.y"
2418#line 2420 "ada-exp.c.tmp"
2422#line 837 "ada-exp.y"
2426 (std::move (arg), OP_ATR_FIRST, (
yyvsp[0].lval));
2428#line 2430 "ada-exp.c.tmp"
2432#line 843 "ada-exp.y"
2436 (std::move (arg), OP_ATR_LAST, (
yyvsp[0].lval));
2438#line 2440 "ada-exp.c.tmp"
2442#line 849 "ada-exp.y"
2446 (std::move (arg), OP_ATR_LENGTH, (
yyvsp[0].lval));
2448#line 2450 "ada-exp.c.tmp"
2452#line 855 "ada-exp.y"
2453 { ada_wrap<ada_atr_size_operation> (); }
2454#line 2456 "ada-exp.c.tmp"
2458#line 857 "ada-exp.y"
2459 { ada_wrap<ada_atr_tag_operation> (); }
2460#line 2462 "ada-exp.c.tmp"
2464#line 859 "ada-exp.y"
2465 { ada_wrap2<ada_binop_min_operation> (BINOP_MIN); }
2466#line 2468 "ada-exp.c.tmp"
2470#line 861 "ada-exp.y"
2471 { ada_wrap2<ada_binop_max_operation> (BINOP_MAX); }
2472#line 2474 "ada-exp.c.tmp"
2476#line 863 "ada-exp.y"
2477 { ada_wrap<ada_pos_operation> (); }
2478#line 2480 "ada-exp.c.tmp"
2482#line 865 "ada-exp.y"
2486 ((
yyvsp[-4].tval), std::move (arg));
2488#line 2490 "ada-exp.c.tmp"
2492#line 871 "ada-exp.y"
2496 error (_(
"'modulus must be applied to modular type"));
2500#line 2502 "ada-exp.c.tmp"
2504#line 881 "ada-exp.y"
2505 { (
yyval.lval) = 1; }
2506#line 2508 "ada-exp.c.tmp"
2510#line 883 "ada-exp.y"
2511 { (
yyval.lval) = (
yyvsp[-1].typed_val).val; }
2512#line 2514 "ada-exp.c.tmp"
2516#line 888 "ada-exp.y"
2518 if ((
yyvsp[0].tval) == NULL)
2519 error (_(
"Prefix must be type"));
2522#line 2524 "ada-exp.c.tmp"
2526#line 897 "ada-exp.y"
2528#line 2530 "ada-exp.c.tmp"
2532#line 899 "ada-exp.y"
2534#line 2536 "ada-exp.c.tmp"
2538#line 904 "ada-exp.y"
2540#line 2542 "ada-exp.c.tmp"
2544#line 908 "ada-exp.y"
2548#line 2550 "ada-exp.c.tmp"
2552#line 914 "ada-exp.y"
2558 ((
yyvsp[0].typed_val_float).
type, data);
2559 ada_wrap<ada_wrapped_operation> ();
2561#line 2563 "ada-exp.c.tmp"
2565#line 925 "ada-exp.y"
2567 struct type *null_ptr_type
2571#line 2573 "ada-exp.c.tmp"
2575#line 933 "ada-exp.y"
2580#line 2582 "ada-exp.c.tmp"
2584#line 940 "ada-exp.y"
2586#line 2588 "ada-exp.c.tmp"
2590#line 942 "ada-exp.y"
2592#line 2594 "ada-exp.c.tmp"
2596#line 946 "ada-exp.y"
2597 { error (_(
"NEW not implemented.")); }
2598#line 2600 "ada-exp.c.tmp"
2602#line 950 "ada-exp.y"
2604#line 2606 "ada-exp.c.tmp"
2608#line 952 "ada-exp.y"
2614#line 2616 "ada-exp.c.tmp"
2618#line 958 "ada-exp.y"
2620#line 2622 "ada-exp.c.tmp"
2624#line 960 "ada-exp.y"
2630#line 2632 "ada-exp.c.tmp"
2634#line 966 "ada-exp.y"
2637 if ((
yyval.tval) == NULL)
2642#line 2644 "ada-exp.c.tmp"
2646#line 974 "ada-exp.y"
2649 if ((
yyval.tval) == NULL)
2654#line 2656 "ada-exp.c.tmp"
2658#line 985 "ada-exp.y"
2660#line 2662 "ada-exp.c.tmp"
2664#line 987 "ada-exp.y"
2666#line 2668 "ada-exp.c.tmp"
2670#line 992 "ada-exp.y"
2675 push_component<ada_aggregate_component>
2678#line 2680 "ada-exp.c.tmp"
2682#line 1002 "ada-exp.y"
2684#line 2686 "ada-exp.c.tmp"
2688#line 1004 "ada-exp.y"
2690 push_component<ada_positional_component>
2694#line 2696 "ada-exp.c.tmp"
2698#line 1010 "ada-exp.y"
2700#line 2702 "ada-exp.c.tmp"
2704#line 1015 "ada-exp.y"
2706 push_component<ada_positional_component>
2710#line 2712 "ada-exp.c.tmp"
2714#line 1021 "ada-exp.y"
2716 push_component<ada_positional_component>
2720#line 2722 "ada-exp.c.tmp"
2724#line 1029 "ada-exp.y"
2725 { (
yyval.lval) = 1; }
2726#line 2728 "ada-exp.c.tmp"
2730#line 1030 "ada-exp.y"
2731 { (
yyval.lval) = 1; }
2732#line 2734 "ada-exp.c.tmp"
2736#line 1032 "ada-exp.y"
2738#line 2740 "ada-exp.c.tmp"
2742#line 1036 "ada-exp.y"
2744 push_component<ada_others_component> (
ada_pop ());
2746#line 2748 "ada-exp.c.tmp"
2750#line 1043 "ada-exp.y"
2755#line 2757 "ada-exp.c.tmp"
2759#line 1056 "ada-exp.y"
2761 push_component<ada_choices_component> (
ada_pop ());
2765#line 2767 "ada-exp.c.tmp"
2769#line 1062 "ada-exp.y"
2771 push_component<ada_choices_component> (
ada_pop ());
2772 push_association<ada_name_association> (
ada_pop ());
2775#line 2777 "ada-exp.c.tmp"
2779#line 1068 "ada-exp.y"
2781 push_component<ada_choices_component> (
ada_pop ());
2784 push_association<ada_discrete_range_association>
2785 (std::move (lhs), std::move (rhs));
2788#line 2790 "ada-exp.c.tmp"
2792#line 1077 "ada-exp.y"
2797#line 2799 "ada-exp.c.tmp"
2801#line 1082 "ada-exp.y"
2803 push_association<ada_name_association> (
ada_pop ());
2806#line 2808 "ada-exp.c.tmp"
2810#line 1088 "ada-exp.y"
2814 push_association<ada_discrete_range_association>
2815 (std::move (lhs), std::move (rhs));
2818#line 2820 "ada-exp.c.tmp"
2822#line 1101 "ada-exp.y"
2823 { ada_wrap<ada_unop_ind_operation> (); }
2824#line 2826 "ada-exp.c.tmp"
2828#line 1103 "ada-exp.y"
2830#line 2832 "ada-exp.c.tmp"
2834#line 1105 "ada-exp.y"
2836 ada_wrap2<subscript_operation> (BINOP_SUBSCRIPT);
2837 ada_wrap<ada_wrapped_operation> ();
2839#line 2841 "ada-exp.c.tmp"
2843#line 2845 "ada-exp.c.tmp"
2893 if (yyerrstatus == 3)
3036#line 1111 "ada-exp.y"
3048#define yy_create_buffer ada_yy_create_buffer
3049#define yy_delete_buffer ada_yy_delete_buffer
3050#define yy_init_buffer ada_yy_init_buffer
3051#define yy_load_buffer_state ada_yy_load_buffer_state
3052#define yy_switch_to_buffer ada_yy_switch_to_buffer
3053#define yyrestart ada_yyrestart
3054#define yytext ada_yytext
3060#define qsort __qsort__dummy
3067 scoped_restore pstate_restore = make_scoped_restore (&
pstate);
3068 gdb_assert (par_state != NULL);
3072 scoped_restore restore_yydebug = make_scoped_restore (&
yydebug,
3084 struct type *context_type =
nullptr;
3086 context_type =
parse_type (par_state)->builtin_void;
3095 error (_(
"Error in expression, near `%s'."),
pstate->
lexptr);
3116 ada_wrap<ada_wrapped_operation> ();
3132 const struct block *orig_left_context,
3133 const char *renamed_entity,
int renamed_entity_len,
3134 const char *renaming_expr,
int max_depth)
3137 enum { SIMPLE_INDEX, LOWER_BOUND, UPPER_BOUND } slice_state;
3141 error (_(
"Could not find renamed symbol"));
3143 if (orig_left_context == NULL)
3147 renamed_entity_len);
3149 if (sym_info.
symbol == NULL)
3150 error (_(
"Could not find renamed variable: %s"),
ada_decode (
name).c_str ());
3154 sym_info.
block = orig_left_context;
3157 const char *inner_renamed_entity;
3158 int inner_renamed_entity_len;
3159 const char *inner_renaming_expr;
3162 &inner_renamed_entity_len,
3163 &inner_renaming_expr))
3170 inner_renamed_entity, inner_renamed_entity_len,
3171 inner_renaming_expr, max_depth - 1);
3178 slice_state = SIMPLE_INDEX;
3179 while (*renaming_expr ==
'X')
3183 switch (*renaming_expr) {
3186 ada_wrap<ada_unop_ind_operation> ();
3189 slice_state = LOWER_BOUND;
3193 if (isdigit (*renaming_expr))
3196 long val = strtol (renaming_expr, &next, 10);
3197 if (next == renaming_expr)
3199 renaming_expr = next;
3208 end = strchr (renaming_expr,
'X');
3210 end = renaming_expr + strlen (renaming_expr);
3213 end - renaming_expr);
3214 renaming_expr = end;
3218 if (index_sym_info.
symbol == NULL)
3219 error (_(
"Could not find %s"), index_name);
3222 index_sym_info.
block = orig_left_context;
3225 if (slice_state == SIMPLE_INDEX)
3227 else if (slice_state == LOWER_BOUND)
3228 slice_state = UPPER_BOUND;
3229 else if (slice_state == UPPER_BOUND)
3231 ada_wrap3<ada_ternop_slice_operation> ();
3232 slice_state = SIMPLE_INDEX;
3242 if (slice_state != SIMPLE_INDEX)
3244 end = strchr (renaming_expr,
'X');
3246 end = renaming_expr + strlen (renaming_expr);
3250 (std::move (arg), std::string (renaming_expr,
3251 end - renaming_expr));
3252 renaming_expr = end;
3260 if (slice_state == SIMPLE_INDEX)
3264 error (_(
"Internal error in encoding of renaming declaration"));
3267static const struct block*
3272 const struct block *result = NULL;
3274 std::string name_storage;
3275 if (raw_name[0] ==
'\'')
3283 name = name_storage.c_str ();
3286 std::vector<struct block_symbol> syms
3290 && (syms.empty () || syms[0].symbol->aclass () !=
LOC_BLOCK))
3297 else if (syms.empty () || syms[0].symbol->aclass () !=
LOC_BLOCK)
3299 if (context == NULL)
3300 error (_(
"No file or function \"%s\"."), raw_name);
3302 error (_(
"No function \"%s\" in specified context."), raw_name);
3306 if (syms.size () > 1)
3307 warning (_(
"Function name \"%s\" ambiguous here"), raw_name);
3308 result = syms[0].symbol->value_block ();
3318 int preferred_index;
3319 struct type *preferred_type;
3321 preferred_index = -1; preferred_type = NULL;
3322 for (i = 0; i < syms.size (); i += 1)
3328 preferred_index = i;
3329 preferred_type = syms[i].symbol->type ();
3342 if (preferred_type == NULL)
3344 return syms[preferred_index].symbol;
3354 if (
type == NULL && strcmp (
"system__address",
name) == 0)
3362 char *expanded_name =
3363 (
char *) alloca (strlen (
name) +
sizeof (
"standard__"));
3364 strcpy (expanded_name,
"standard__");
3365 strcat (expanded_name,
name);
3378 for (i = end - 1; i > 0; i -= 1)
3379 if (
name[i] ==
'.' || (
name[i] ==
'_' &&
name[i+1] ==
'_'))
3394 if (
name[0] ==
'_' &&
name[1] ==
'_')
3408 while (*sels !=
'\0')
3412 while (*sels !=
'\0' && *sels !=
'.'
3413 && (sels[0] !=
'_' || sels[1] !=
'_'))
3417 std::string (p, sels - p));
3447 int field_name_len,
int maybe_missing)
3449 char *
field_name = (
char *) alloca ((field_name_len + 1) *
sizeof (char));
3451 strncpy (
field_name, field_name0, field_name_len);
3471 const char *subfield_name;
3488 while (*subfield_name !=
'\0' && *subfield_name !=
'.'
3489 && (subfield_name[0] !=
'_' || subfield_name[1] !=
'_'))
3492 if (subfield_name[0] ==
'\0')
3529 name_len = name_storage.size ();
3536 tail_index = name_len;
3537 while (tail_index > 0)
3540 struct symbol *renaming_sym;
3541 const char* renaming;
3543 const char* renaming_expr;
3544 int terminator = encoded_name[tail_index];
3546 encoded_name[tail_index] =
'\0';
3549 std::string decoded_name =
ada_decode (encoded_name);
3550 encoded_name[tail_index] = terminator;
3552 std::vector<struct block_symbol> syms
3557 if (type_sym != NULL)
3558 renaming_sym = type_sym;
3559 else if (syms.size () == 1)
3560 renaming_sym = syms[0].
symbol;
3562 renaming_sym = NULL;
3565 &renaming_len, &renaming_expr))
3573 int alloc_len = renaming_len + name_len - tail_index + 1;
3576 strncpy (new_name, renaming, renaming_len);
3577 strcpy (new_name + renaming_len, encoded_name + tail_index);
3578 encoded_name = new_name;
3579 name_len = renaming_len + name_len - tail_index;
3580 goto TryAfterRenaming;
3588 internal_error (_(
"impossible value from ada_parse_renaming"));
3591 if (type_sym != NULL)
3593 struct type *field_type;
3595 if (tail_index == name_len)
3596 return type_sym->
type ();
3603 if (field_type != NULL)
3606 error (_(
"Invalid attempt to select from type: \"%s\"."),
3609 else if (tail_index == name_len && syms.empty ())
3618 if (syms.size () == 1)
3624 else if (syms.empty ())
3627 if (
block !=
nullptr)
3640 if (tail_index == name_len
3641 && strncmp (encoded_name,
"standard__",
3642 sizeof (
"standard__") - 1) == 0)
3643 error (_(
"No definition of \"%s\" found."), name0.
ptr);
3657 error (_(
"No symbol table is loaded. Use the \"file\" command."));
3659 error (_(
"No definition of \"%s\" in current context."), name0.
ptr);
3661 error (_(
"No definition of \"%s\" in specified context."), name0.
ptr);
3666 error (_(
"Could not find renamed symbol \"%s\""), name0.
ptr);
3683 for (; end >
original_expr && end[-1] !=
'.' && !isspace (end[-1]); --end)
3688 const char *ptr = end;
3693 || (ptr[-1] >=
'a' && ptr[-1] <=
'z')
3694 || (ptr[-1] >=
'A' && ptr[-1] <=
'Z')
3695 || (ptr[-1] & 0xff) >= 0x80);
3701 ptr = skip_spaces (ptr);
3703 return std::string (ptr, end);
3717 if (tail_index == -1)
3720 std::string copy (name0.
ptr, tail_index);
3723 (
int) copy.length () });
3726 if (
type !=
nullptr)
3730 name0.
ptr + tail_index);
3754 if (strchr (
name.ptr,
'.') == NULL)
3756 std::vector<struct block_symbol> syms
3761 if (syms.size () != 1 || syms[0].symbol->aclass () ==
LOC_TYPEDEF)
3768 error (_(
"Invalid use of type."));
3770 push_association<ada_name_association> (
ada_pop ());
3788 return parse_type (par_state)->builtin_long_long;
3794 return parse_type (par_state)->builtin_long_double;
3803 else if (
value <= 0xffff)
3809 "wide_wide_character");
static const char * yysymbol_name(yysymbol_kind_t yysymbol) YY_ATTRIBUTE_UNUSED
void ada_wrap_overload(enum exp_opcode op)
static struct type * type_long_double(struct parser_state *)
static struct type * type_boolean(struct parser_state *)
static ada_component_up pop_component()
#define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
static std::string find_completion_bounds(struct parser_state *)
static const yytype_int8 yytranslate[]
@ YYSYMBOL_positional_list
@ YYSYMBOL_component_groups
@ YYSYMBOL_aggregate_component_list
@ YYSYMBOL_component_associations
@ YYSYMBOL_component_group
@ YYSYMBOL_DOLLAR_VARIABLE
@ YYSYMBOL_opt_type_prefix
static void yy_symbol_print(FILE *yyo, yysymbol_kind_t yykind, YYSTYPE const *const yyvaluep)
void ada_wrap_op(enum exp_opcode op)
static struct type * write_var_or_type(struct parser_state *, const struct block *, struct stoken)
#define YY_IGNORE_MAYBE_UNINITIALIZED_END
static const yytype_int8 yydefact[]
static ada_structop_operation * write_selectors(struct parser_state *par_state, const char *sels)
#define YY_IGNORE_USELESS_CAST_END
static const char * chop_separator(const char *name)
static int chop_selector(const char *name, int end)
int ada_parse(struct parser_state *par_state)
static struct type * write_var_or_type_completion(struct parser_state *, const struct block *, struct stoken)
static struct type * type_system_address(struct parser_state *)
void _initialize_ada_exp()
static const yytype_int16 yyrline[]
static void write_int(struct parser_state *, LONGEST, struct type *)
#define YY_REDUCE_PRINT(Rule)
#define YY_CAST(Type, Val)
static const struct block * block_lookup(const struct block *, const char *)
static void yydestruct(const char *yymsg, yysymbol_kind_t yykind, YYSTYPE *yyvaluep)
static std::vector< ada_association_up > pop_associations(int n)
static struct parser_state * pstate
static const yytype_int16 yypact[]
static struct type * type_long(struct parser_state *)
static std::unique_ptr< expr_completion_base > make_tick_completer(struct stoken tok)
static const yytype_uint8 yydefgoto[]
static struct type * type_for_char(struct parser_state *, ULONGEST)
static struct obstack temp_parse_space
#define YY_ACCESSING_SYMBOL(State)
#define YY_SYMBOL_PRINT(Title, Kind, Value, Location)
void ada_un_wrap2(enum exp_opcode op)
static const yytype_int16 yypgoto[]
static struct type * type_int(struct parser_state *)
void push_component(Arg... args)
static struct type * get_symbol_field_type(struct symbol *sym, const char *encoded_field_name)
#define YY_STACK_PRINT(Bottom, Top)
static void yy_symbol_value_print(FILE *yyo, yysymbol_kind_t yykind, YYSTYPE const *const yyvaluep)
static ada_choices_component * choice_component()
static std::vector< ada_association_up > associations
#define YY_IGNORE_USELESS_CAST_BEGIN
static operation_up ada_pop(bool deprocedure_p=true, struct type *context_type=nullptr)
static operation_up maybe_overload(enum exp_opcode op, operation_up &lhs, operation_up &rhs)
static const yytype_int8 yyr2[]
static ada_association_up pop_association()
static void yy_reduce_print(yy_state_t *yyssp, YYSTYPE *yyvsp, int yyrule)
static struct symbol * select_possible_type_sym(const std::vector< struct block_symbol > &syms)
void ada_wrap2(enum exp_opcode op)
static const yytype_int16 yytable[]
#define yytable_value_is_error(Yyn)
static void ada_funcall(int nargs)
static const yytype_int8 yystos[]
#define YY_ATTRIBUTE_UNUSED
static void write_name_assoc(struct parser_state *, struct stoken)
static const char *const yytname[]
static void write_var_from_sym(struct parser_state *par_state, block_symbol sym)
static int ada_nget_field_index(const struct type *type, const char *field_name0, int field_name_len, int maybe_missing)
static const yytype_int8 yyr1[]
static const char * original_expr
enum yytokentype yytoken_kind_t
static std::vector< ada_component_up > components
void push_association(Arg... args)
static void write_object_renaming(struct parser_state *, const struct block *, const char *, int, const char *, int)
static struct type * type_long_long(struct parser_state *)
#define YYSTACK_RELOCATE(Stack_alloc, Stack)
#define yypact_value_is_default(Yyn)
static void write_ambiguous_var(struct parser_state *, const struct block *, const char *, int)
static std::vector< ada_component_up > pop_components(int n)
static void ada_addrof(struct type *type=nullptr)
static void yy_stack_print(yy_state_t *yybottom, yy_state_t *yytop)
static const yytype_int16 yycheck[]
static struct type * find_primitive_type(struct parser_state *par_state, const char *name)
std::string ada_decode(const char *encoded, bool wrap, bool operators)
struct type * ada_index_type(struct type *type, int n, const char *name)
struct bound_minimal_symbol ada_lookup_simple_minsym(const char *name, struct objfile *objfile)
int ada_prefer_type(struct type *type0, struct type *type1)
std::string ada_encode(const char *decoded, bool fold)
ULONGEST ada_modulus(struct type *type)
int ada_is_modular_type(struct type *type)
block_symbol ada_find_operator_symbol(enum exp_opcode op, bool parse_completion, int nargs, value *argvec[])
enum ada_renaming_category ada_parse_renaming(struct symbol *sym, const char **renamed_entity, int *len, const char **renaming_expr)
void ada_lookup_encoded_symbol(const char *name, const struct block *block, domain_enum domain, struct block_symbol *info)
std::vector< struct block_symbol > ada_lookup_symbol_list(const char *name, const struct block *block, domain_enum domain)
struct type * ada_check_typedef(struct type *type)
struct block_symbol ada_lookup_symbol(const char *name, const struct block *block0, domain_enum domain)
int ada_get_field_index(const struct type *type, const char *field_name, int maybe_missing)
int ada_array_arity(struct type *type)
@ ADA_SUBPROGRAM_RENAMING
#define MAX_RENAMING_CHAIN_LENGTH
static void lexer_init(FILE *inp)
struct objfile * block_objfile(const struct block *block)
void set_associations(std::vector< ada_association_up > &&assoc)
void set_prefix(std::string &&prefix)
symbol * get_symbol() const
void update(const struct block *b, innermost_block_tracker_types t)
@ INNERMOST_BLOCK_FOR_SYMBOLS
@ EVAL_AVOID_SIDE_EFFECTS
int symbol_read_needs_frame(struct symbol *sym)
const struct block * get_selected_block(CORE_ADDR *addr_in_block)
struct type * lookup_pointer_type(struct type *type)
struct type * check_typedef(struct type *type)
struct type * language_lookup_primitive_type(const struct language_defn *la, struct gdbarch *gdbarch, const char *name)
struct type * language_string_char_type(const struct language_defn *la, struct gdbarch *gdbarch)
std::unique_ptr< operation > operation_up
std::unique_ptr< ada_association > ada_association_up
std::array< gdb_byte, 16 > float_data
std::unique_ptr< ada_component > ada_component_up
int have_partial_symbols(void)
int have_full_symbols(void)
std::string copy_name(struct stoken token)
static gdbpy_ref field_name(struct type *type, int field)
bool complete(struct expression *exp, completion_tracker &tracker) override
ada_tick_completer(std::string &&name)
const struct block * block
struct block * static_block()
struct minimal_symbol * minsym
struct blockvector * blockvector()
virtual operation_up replace(operation_up &&owner, struct expression *exp, bool deprocedure_p, bool parse_completion, innermost_block_tracker *tracker, struct type *context_type)
void set_operation(expr::operation_up &&op)
const struct language_defn * language()
struct gdbarch * gdbarch()
struct type * type() const
void set_language(enum language language, struct obstack *obstack)
void set_linkage_name(const char *linkage_name)
struct minimal_symbol * msym
const struct block * block
void push_new(Arg... args)
const struct block *const expression_context_block
std::vector< expr::operation_up > pop_vector(int n)
void push_dollar(struct stoken str)
void mark_completion(std::unique_ptr< expr_completion_base > completer)
innermost_block_tracker * block_tracker
void push(expr::operation_up &&op)
void mark_struct_expression(expr::structop_base_operation *op)
address_class aclass() const
struct type * type() const
domain_enum domain() const
void set_domain(domain_enum domain)
struct compunit_symtab * compunit() const
struct type * target_type() const
struct field & field(int idx) const
struct symtab * lookup_symtab(const char *name)
struct YYSTYPE::@3 typed_val_float
const struct block * bval
struct internalvar * ivar
struct YYSTYPE::@2 typed_val
struct type * value_type(const struct value *value)