diff options
Diffstat (limited to 'gdb/ada-lang.c')
| -rw-r--r-- | gdb/ada-lang.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c index c660e74..5aec8b7 100644 --- a/gdb/ada-lang.c +++ b/gdb/ada-lang.c @@ -2888,7 +2888,7 @@ ada_value_assign (struct value *toval, struct value *fromval) if (ada_is_direct_array_type (fromval->type ())) fromval = ada_coerce_to_simple_array (fromval); - if (!deprecated_value_modifiable (toval)) + if (!toval->deprecated_modifiable ()) error (_("Left operand of assignment is not a modifiable lvalue.")); if (VALUE_LVAL (toval) == lval_memory @@ -9531,7 +9531,7 @@ ada_aggregate_operation::assign_aggregate (struct value *container, if (ada_is_direct_array_type (container->type ())) container = ada_coerce_to_simple_array (container); lhs = ada_coerce_ref (lhs); - if (!deprecated_value_modifiable (lhs)) + if (!lhs->deprecated_modifiable ()) error (_("Left operand of assignment is not a modifiable lvalue.")); lhs_type = check_typedef (lhs->type ()); |