diff options
author | Tom Tromey <tom@tromey.com> | 2023-01-31 10:17:10 -0700 |
---|---|---|
committer | Tom Tromey <tom@tromey.com> | 2023-02-13 15:21:07 -0700 |
commit | 4b53ca88831137e94a6882f224d755a2d32ab8ef (patch) | |
tree | d4a4f240db65c78ba1729fa68c01abe082b01114 /gdb/ada-lang.c | |
parent | 76675c4d0bc454ed1ae369f98ad848754d0e81a0 (diff) | |
download | binutils-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.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 ()); |