aboutsummaryrefslogtreecommitdiff
path: root/gdb/ada-lang.c
diff options
context:
space:
mode:
authorTom Tromey <tom@tromey.com>2023-01-31 10:17:10 -0700
committerTom Tromey <tom@tromey.com>2023-02-13 15:21:07 -0700
commit4b53ca88831137e94a6882f224d755a2d32ab8ef (patch)
treed4a4f240db65c78ba1729fa68c01abe082b01114 /gdb/ada-lang.c
parent76675c4d0bc454ed1ae369f98ad848754d0e81a0 (diff)
downloadbinutils-4b53ca88831137e94a6882f224d755a2d32ab8ef.zip
binutils-4b53ca88831137e94a6882f224d755a2d32ab8ef.tar.gz
binutils-4b53ca88831137e94a6882f224d755a2d32ab8ef.tar.bz2
Turn deprecated_value_modifiable into method
This changes deprecated_value_modifiable to be a method of value. Approved-By: Simon Marchi <simon.marchi@efficios.com>
Diffstat (limited to 'gdb/ada-lang.c')
-rw-r--r--gdb/ada-lang.c4
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 ());