diff options
| author | Andrew Cagney <cagney@redhat.com> | 2004-11-12 21:45:08 +0000 |
|---|---|---|
| committer | Andrew Cagney <cagney@redhat.com> | 2004-11-12 21:45:08 +0000 |
| commit | df407dfe2e8452c0a3edfcf50d55942ff0273433 (patch) | |
| tree | 11b770a7071b50d36d54f0e817d8c8c4f60ce076 /gdb/p-valprint.c | |
| parent | 69e5711542042a5b591907f8f96d28fd8d2c3c17 (diff) | |
| download | gdb-df407dfe2e8452c0a3edfcf50d55942ff0273433.zip gdb-df407dfe2e8452c0a3edfcf50d55942ff0273433.tar.gz gdb-df407dfe2e8452c0a3edfcf50d55942ff0273433.tar.bz2 | |
2004-11-12 Andrew Cagney <cagney@gnu.org>
* value.h (VALUE_TYPE, VALUE_NEXT, VALUE_OFFSET, VALUE_BITSIZE)
(VALUE_BITPOS): Delete.
(value_type, value_offset, value_bitsize, value_bitpos): Declare.
* value.c (value_type, value_offset, value_bitpos)
(value_bitsize): New functions. Update references.
* arm-tdep.c, gnu-v3-abi.c, hpacc-abi.c, gnu-v2-abi.c: Update.
* f-valprint.c, cp-valprint.c, c-valprint.c: Update.
* ada-valprint.c, typeprint.c, scm-valprint.c, scm-exp.c: Update.
* p-valprint.c, jv-valprint.c, jv-lang.c, varobj.c: Update.
* objc-lang.c, ada-lang.c, std-regs.c, stack.c: Update.
* infcall.c, linespec.c, printcmd.c, valarith.c: Update.
* valops.c, eval.c, findvar.c, breakpoint.c: Update.
* tracepoint.c, ax-gdb.c, mi/mi-main.c, cli/cli-dump.c:
* rs6000-tdep.c, ppc-sysv-tdep.c: Update.
Diffstat (limited to 'gdb/p-valprint.c')
| -rw-r--r-- | gdb/p-valprint.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/gdb/p-valprint.c b/gdb/p-valprint.c index 8b0c950..e320c19 100644 --- a/gdb/p-valprint.c +++ b/gdb/p-valprint.c @@ -238,7 +238,7 @@ pascal_val_print (struct type *type, char *valaddr, int embedded_offset, wtype = TYPE_TARGET_TYPE (type); } vt_val = value_at (wtype, vt_address); - val_print (VALUE_TYPE (vt_val), VALUE_CONTENTS (vt_val), 0, + val_print (value_type (vt_val), VALUE_CONTENTS (vt_val), 0, VALUE_ADDRESS (vt_val), stream, format, deref_ref, recurse + 1, pretty); if (pretty) @@ -290,7 +290,7 @@ pascal_val_print (struct type *type, char *valaddr, int embedded_offset, (TYPE_TARGET_TYPE (type), unpack_pointer (lookup_pointer_type (builtin_type_void), valaddr + embedded_offset)); - val_print (VALUE_TYPE (deref_val), + val_print (value_type (deref_val), VALUE_CONTENTS (deref_val), 0, VALUE_ADDRESS (deref_val), stream, format, deref_ref, recurse + 1, pretty); @@ -537,7 +537,7 @@ int pascal_value_print (struct value *val, struct ui_file *stream, int format, enum val_prettyprint pretty) { - struct type *type = VALUE_TYPE (val); + struct type *type = value_type (val); /* If it is a pointer, indicate what it points to. @@ -565,7 +565,7 @@ pascal_value_print (struct value *val, struct ui_file *stream, int format, } } return val_print (type, VALUE_CONTENTS (val), VALUE_EMBEDDED_OFFSET (val), - VALUE_ADDRESS (val) + VALUE_OFFSET (val), + VALUE_ADDRESS (val) + value_offset (val), stream, format, 1, 0, pretty); } |