* ada-lang.c (ada_evaluate_subexp): [OP_ATR_FIRST, OP_ATR_LAST]

[OP_ATR_LENGTH]: When using the attribute on a type, make sure
        to get the real type, not the associated typedef.
This commit is contained in:
Joel Brobecker 2009-03-24 01:58:22 +00:00
parent e0cfd8e38b
commit 5bc23cb38a
2 changed files with 7 additions and 1 deletions

View File

@ -1,3 +1,9 @@
2009-03-23 Joel Brobecker <brobecker@adacore.com>
* ada-lang.c (ada_evaluate_subexp): [OP_ATR_FIRST, OP_ATR_LAST]
[OP_ATR_LENGTH]: When using the attribute on a type, make sure
to get the real type, not the associated typedef.
2009-03-23 Joel Brobecker <brobecker@adacore.com>
* ada-lang.c (ada_get_field_index): Add handling of the case

View File

@ -8872,7 +8872,7 @@ ada_evaluate_subexp (struct type *expect_type, struct expression *exp,
{
evaluate_subexp (NULL_TYPE, exp, pos, EVAL_SKIP);
arg1 = NULL;
type_arg = exp->elts[pc + 2].type;
type_arg = check_typedef (exp->elts[pc + 2].type);
}
else
{