diff options
| author | Andrew Cagney <cagney@redhat.com> | 2005-02-07 20:17:28 +0000 |
|---|---|---|
| committer | Andrew Cagney <cagney@redhat.com> | 2005-02-07 20:17:28 +0000 |
| commit | b44d461b0ebcb9f30595e5c3e4c748775349ecf1 (patch) | |
| tree | 5516e9a3e7396b8030af773272ece7280c8f11b1 /gdb/valops.c | |
| parent | 4ee4d24937d552e97baee32e10575e716707226c (diff) | |
| download | gdb-b44d461b0ebcb9f30595e5c3e4c748775349ecf1.zip gdb-b44d461b0ebcb9f30595e5c3e4c748775349ecf1.tar.gz gdb-b44d461b0ebcb9f30595e5c3e4c748775349ecf1.tar.bz2 | |
2005-02-07 Andrew Cagney <cagney@gnu.org>
* value.h (VALUE_POINTED_TO_OFFSET): Delete.
(set_value_pointed_to_offset, value_pointed_to_offset): Declare.
* value.c (set_value_pointed_to_offset): Define
(value_pointed_to_offset): Define.
* valops.c: Update.
Diffstat (limited to 'gdb/valops.c')
| -rw-r--r-- | gdb/valops.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/gdb/valops.c b/gdb/valops.c index 502cfa6..942ef16 100644 --- a/gdb/valops.c +++ b/gdb/valops.c @@ -407,7 +407,7 @@ value_cast (struct type *type, struct value *arg2) } arg2->type = type; arg2 = value_change_enclosing_type (arg2, type); - VALUE_POINTED_TO_OFFSET (arg2) = 0; /* pai: chk_val */ + set_value_pointed_to_offset (arg2, 0); /* pai: chk_val */ return arg2; } else if (VALUE_LVAL (arg2) == lval_memory) @@ -545,7 +545,7 @@ value_assign (struct value *toval, struct value *fromval) val = value_copy (VALUE_INTERNALVAR (toval)->value); val = value_change_enclosing_type (val, value_enclosing_type (fromval)); set_value_embedded_offset (val, value_embedded_offset (fromval)); - VALUE_POINTED_TO_OFFSET (val) = VALUE_POINTED_TO_OFFSET (fromval); + set_value_pointed_to_offset (val, value_pointed_to_offset (fromval)); return val; case lval_internalvar_component: @@ -733,7 +733,7 @@ value_assign (struct value *toval, struct value *fromval) val->type = type; val = value_change_enclosing_type (val, value_enclosing_type (fromval)); set_value_embedded_offset (val, value_embedded_offset (fromval)); - VALUE_POINTED_TO_OFFSET (val) = VALUE_POINTED_TO_OFFSET (fromval); + set_value_pointed_to_offset (val, value_pointed_to_offset (fromval)); return val; } @@ -874,7 +874,7 @@ value_addr (struct value *arg1) full derived object's type ... */ arg2 = value_change_enclosing_type (arg2, lookup_pointer_type (value_enclosing_type (arg1))); /* ... and also the relative position of the subobject in the full object */ - VALUE_POINTED_TO_OFFSET (arg2) = value_embedded_offset (arg1); + set_value_pointed_to_offset (arg2, value_embedded_offset (arg1)); return arg2; } @@ -909,12 +909,12 @@ value_ind (struct value *arg1) enc_type = TYPE_TARGET_TYPE (enc_type); /* Retrieve the enclosing object pointed to */ arg2 = value_at_lazy (enc_type, (value_as_address (arg1) - - VALUE_POINTED_TO_OFFSET (arg1))); + - value_pointed_to_offset (arg1))); /* Re-adjust type */ arg2->type = TYPE_TARGET_TYPE (base_type); /* Add embedding info */ arg2 = value_change_enclosing_type (arg2, enc_type); - set_value_embedded_offset (arg2, VALUE_POINTED_TO_OFFSET (arg1)); + set_value_embedded_offset (arg2, value_pointed_to_offset (arg1)); /* We may be pointing to an object of some derived type */ arg2 = value_full_object (arg2, NULL, 0, 0, 0); |