diff options
Diffstat (limited to 'gdb/ada-lang.c')
| -rw-r--r-- | gdb/ada-lang.c | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c index da304ab..0acc1b5 100644 --- a/gdb/ada-lang.c +++ b/gdb/ada-lang.c @@ -10205,10 +10205,7 @@ ada_evaluate_subexp (struct type *expect_type, struct expression *exp, } *pos += 4; - return value_zero - (to_static_fixed_type - (static_unwrap_type (SYMBOL_TYPE (exp->elts[pc + 2].symbol))), - not_lval); + return value_zero (to_static_fixed_type (type), not_lval); } else { |