aboutsummaryrefslogtreecommitdiff
path: root/gdb/ada-lang.c
diff options
context:
space:
mode:
authorTom Tromey <tom@tromey.com>2023-01-31 08:24:35 -0700
committerTom Tromey <tom@tromey.com>2023-02-13 15:21:07 -0700
commit81ae560ca4f0da47729dc37a889c2f2e01c4c84e (patch)
tree9f251c4fb80f169eab6c0ff556903fd1eb301700 /gdb/ada-lang.c
parentd0c9791728caa0d3b3270a997c7fd97919976c97 (diff)
downloadbinutils-81ae560ca4f0da47729dc37a889c2f2e01c4c84e.zip
binutils-81ae560ca4f0da47729dc37a889c2f2e01c4c84e.tar.gz
binutils-81ae560ca4f0da47729dc37a889c2f2e01c4c84e.tar.bz2
Turn deprecated_set_value_type into a method
This changes deprecated_set_value_type to be a method of value. Much of this patch was written by script. Approved-By: Simon Marchi <simon.marchi@efficios.com>
Diffstat (limited to 'gdb/ada-lang.c')
-rw-r--r--gdb/ada-lang.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c
index da49149..c5b5b14 100644
--- a/gdb/ada-lang.c
+++ b/gdb/ada-lang.c
@@ -2924,7 +2924,7 @@ ada_value_assign (struct value *toval, struct value *fromval)
memcpy (value_contents_raw (val).data (),
value_contents (fromval).data (),
type->length ());
- deprecated_set_value_type (val, type);
+ val->deprecated_set_type (type);
return val;
}
@@ -3033,7 +3033,7 @@ ada_value_subscript (struct value *arr, int arity, struct value **ind)
than as an access. Another symptom of the same issue
would be that an expression trying to dereference the
element would also be improperly rejected. */
- deprecated_set_value_type (elt, saved_elt_type);
+ elt->deprecated_set_type (saved_elt_type);
}
elt_type = ada_check_typedef (elt->type ());
@@ -9334,7 +9334,7 @@ coerce_for_assign (struct type *type, struct value *val)
if (type2->target_type ()->length () != type->target_type ()->length ())
error (_("Incompatible types in assignment"));
- deprecated_set_value_type (val, type);
+ val->deprecated_set_type (type);
}
return val;
}