aboutsummaryrefslogtreecommitdiff
path: root/gdb/ada-lang.c
diff options
context:
space:
mode:
authorAndrew Cagney <cagney@redhat.com>2005-02-08 00:25:31 +0000
committerAndrew Cagney <cagney@redhat.com>2005-02-08 00:25:31 +0000
commit88e3b34b7c23b9a1b84abdca190f2ced0e5c4c02 (patch)
treeb4d1c12b3492ae50de2325f06346ea1273c59a17 /gdb/ada-lang.c
parent8082c5a8f1fefb503b41756677d2f46d65f8eda5 (diff)
downloadgdb-88e3b34b7c23b9a1b84abdca190f2ced0e5c4c02.zip
gdb-88e3b34b7c23b9a1b84abdca190f2ced0e5c4c02.tar.gz
gdb-88e3b34b7c23b9a1b84abdca190f2ced0e5c4c02.tar.bz2
2005-02-07 Andrew Cagney <cagney@gnu.org>
* value.h (deprecated_set_value_modifiable) (deprecated_value_modifiable): Declare. * value.c (deprecated_set_value_modifiable): Define. (deprecated_value_modifiable): Define. * ada-lang.c, valops.c, breakpoint.c, tracepoint.c: Update.
Diffstat (limited to 'gdb/ada-lang.c')
-rw-r--r--gdb/ada-lang.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c
index 3526505..b3bed52 100644
--- a/gdb/ada-lang.c
+++ b/gdb/ada-lang.c
@@ -2008,7 +2008,7 @@ ada_value_assign (struct value *toval, struct value *fromval)
struct type *type = value_type (toval);
int bits = value_bitsize (toval);
- if (!toval->modifiable)
+ if (!deprecated_value_modifiable (toval))
error (_("Left operand of assignment is not a modifiable lvalue."));
toval = coerce_ref (toval);