diff options
| author | Daniel Jacobowitz <drow@false.org> | 2008-04-30 21:13:49 +0000 |
|---|---|---|
| committer | Daniel Jacobowitz <drow@false.org> | 2008-04-30 21:13:49 +0000 |
| commit | 9214ee5f5f55de5082571ea066ea6060497fa229 (patch) | |
| tree | 6b661593eb61332347bf60ccafeb3be5d2ac5067 /gdb/ada-lang.c | |
| parent | 8d4e307105edd5f21154824fd5839896ae6e6d84 (diff) | |
| download | gdb-9214ee5f5f55de5082571ea066ea6060497fa229.zip gdb-9214ee5f5f55de5082571ea066ea6060497fa229.tar.gz gdb-9214ee5f5f55de5082571ea066ea6060497fa229.tar.bz2 | |
* ada-lang.c (ada_value_primitive_packed_val): Only check
value_lazy for memory lvals.
* findvar.c (value_of_register_lazy): New function.
(locate_var_value): Only check value_lazy for memory lvals.
* valarith.c (value_subscripted_rvalue): Likewise.
* valops.c (value_fetch_lazy): Handle both memory and register
lvals.
(search_struct_field, value_slice): Only check value_lazy for memory
lvals.
* value.c (struct value): Update comment for lazy.
(value_primitive_field): Only check value_lazy for memory lvals.
* value.h (value_lazy): Update comment.
(value_of_register_lazy): Declare.
Diffstat (limited to 'gdb/ada-lang.c')
| -rw-r--r-- | gdb/ada-lang.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c index 01f8bbd..d6441c4 100644 --- a/gdb/ada-lang.c +++ b/gdb/ada-lang.c @@ -2039,7 +2039,7 @@ ada_value_primitive_packed_val (struct value *obj, const gdb_byte *valaddr, v = allocate_value (type); bytes = (unsigned char *) (valaddr + offset); } - else if (value_lazy (obj)) + else if (VALUE_LVAL (obj) == lval_memory && value_lazy (obj)) { v = value_at (type, VALUE_ADDRESS (obj) + value_offset (obj) + offset); |