diff options
| author | Andrew Cagney <cagney@redhat.com> | 2004-11-09 14:43:27 +0000 |
|---|---|---|
| committer | Andrew Cagney <cagney@redhat.com> | 2004-11-09 14:43:27 +0000 |
| commit | 20608c2f3d48f4eb78e211b2a6554a52ced1d9b4 (patch) | |
| tree | e85aa6fb6d899606d831d032296aad66d1e85be4 /gdb/p-valprint.c | |
| parent | e342613013c811327ab97922a23bb574dc4b30c3 (diff) | |
| download | gdb-20608c2f3d48f4eb78e211b2a6554a52ced1d9b4.tar.gz | |
2004-11-09 Andrew Cagney <cagney@gnu.org>
* value.h (struct value): Delete field bfd_section.
(VALUE_BFD_SECTION): Delete macro.
(COERCE_REF): Update.
(value_at, value_at_lazy): Delete asection parameter.
* printcmd.c (print_formatted, x_command): Update.
(do_examine): Delete asection parameter.
(next_section): Delete variable.
* valops.c (value_cast, value_at, value_at_lazy)
(value_coerce_function, value_addr, value_ind, value_string)
(find_rt_vbase_offset, value_full_object): Update.
* hpacc-abi.c (hpacc_virtual_fn_field)
(hpacc_value_rtti_type): Update.
* gnu-v3-abi.c (gnuv3_rtti_type, gnuv3_virtual_fn_field)
(gnuv3_baseclass_offset): Update.
* f-valprint.c (f_val_print): Update.
* c-valprint.c (c_val_print): Update.
* p-valprint.c (pascal_val_print): Update.
* jv-valprint.c (java_value_print): Update.
* jv-lang.c (java_class_from_object, evaluate_subexp_java): Update.
* ada-lang.c (ada_value_primitive_packed_val)
(ada_evaluate_subexp): Update.
* dwarf2loc.c (dwarf2_evaluate_loc_desc): Update.
* expprint.c (print_subexp_standard): Update.
* infcall.c (call_function_by_hand): Update.
* valarith.c (value_add): Update.
* eval.c (evaluate_subexp_standard): Update.
* values.c (allocate_value, value_copy, value_static_field): Update.
* findvar.c (read_var_value, locate_var_value): Update.
Diffstat (limited to 'gdb/p-valprint.c')
| -rw-r--r-- | gdb/p-valprint.c | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/gdb/p-valprint.c b/gdb/p-valprint.c index e24d6566619..8b0c950c26b 100644 --- a/gdb/p-valprint.c +++ b/gdb/p-valprint.c @@ -237,7 +237,7 @@ pascal_val_print (struct type *type, char *valaddr, int embedded_offset, { wtype = TYPE_TARGET_TYPE (type); } - vt_val = value_at (wtype, vt_address, NULL); + vt_val = value_at (wtype, vt_address); val_print (VALUE_TYPE (vt_val), VALUE_CONTENTS (vt_val), 0, VALUE_ADDRESS (vt_val), stream, format, deref_ref, recurse + 1, pretty); @@ -289,8 +289,7 @@ pascal_val_print (struct type *type, char *valaddr, int embedded_offset, value_at (TYPE_TARGET_TYPE (type), unpack_pointer (lookup_pointer_type (builtin_type_void), - valaddr + embedded_offset), - NULL); + valaddr + embedded_offset)); val_print (VALUE_TYPE (deref_val), VALUE_CONTENTS (deref_val), 0, VALUE_ADDRESS (deref_val), stream, format, |