diff options
| -rw-r--r-- | gdb/ChangeLog | 5 | ||||
| -rw-r--r-- | gdb/ada-lang.c | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 7754d64..aa9fcd3 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,5 +1,10 @@ 2009-03-23 Joel Brobecker <brobecker@adacore.com> + * ada-lang.c (resolve_subexp) [UNOP_QUAL]: Resolve typedefs before + trying to resolve the type qualification. + +2009-03-23 Joel Brobecker <brobecker@adacore.com> + * ada-lang.c (ada_evaluate_subexp) [UNOP_IN_RANGE]: make sure we try to apply the attribute on the real type, rather than its associated typedef. diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c index f257fb3..6fa4cfa 100644 --- a/gdb/ada-lang.c +++ b/gdb/ada-lang.c @@ -2654,7 +2654,7 @@ resolve_subexp (struct expression **expp, int *pos, int deprocedure_p, case UNOP_QUAL: *pos += 3; - resolve_subexp (expp, pos, 1, exp->elts[pc + 1].type); + resolve_subexp (expp, pos, 1, check_typedef (exp->elts[pc + 1].type)); break; case OP_ATR_MODULUS: |