diff options
| author | David Taylor <taylor@redhat.com> | 1998-12-28 23:06:13 +0000 |
|---|---|---|
| committer | David Taylor <taylor@redhat.com> | 1998-12-28 23:06:13 +0000 |
| commit | 4ef1f4677390c085543fe80eec41b0fe5d58ddca (patch) | |
| tree | d0e8320e4871a81733155e8ce653507dd3d64825 /gdb/ch-valprint.c | |
| parent | d6fdf61c78fbce1dad62cd1022e606fdaaad4202 (diff) | |
| download | gdb-4ef1f4677390c085543fe80eec41b0fe5d58ddca.zip gdb-4ef1f4677390c085543fe80eec41b0fe5d58ddca.tar.gz gdb-4ef1f4677390c085543fe80eec41b0fe5d58ddca.tar.bz2 | |
hp merge changes -- too numerous to mention here; see ChangeLog and
ChangeLog-gdbtk for details.
Diffstat (limited to 'gdb/ch-valprint.c')
| -rw-r--r-- | gdb/ch-valprint.c | 24 |
1 files changed, 13 insertions, 11 deletions
diff --git a/gdb/ch-valprint.c b/gdb/ch-valprint.c index 9c67d09..663ba64 100644 --- a/gdb/ch-valprint.c +++ b/gdb/ch-valprint.c @@ -161,7 +161,7 @@ chill_val_print_array_elements (type, valaddr, address, stream, chill_print_type_scalar (index_type, low_bound + i + reps - 1, stream); fputs_filtered ("): ", stream); - val_print (elttype, valaddr + i * eltlen, 0, stream, format, + val_print (elttype, valaddr + i * eltlen, 0, 0, stream, format, deref_ref, recurse + 1, pretty); i = rep1 - 1; @@ -170,7 +170,7 @@ chill_val_print_array_elements (type, valaddr, address, stream, else { fputs_filtered ("): ", stream); - val_print (elttype, valaddr + i * eltlen, 0, stream, format, + val_print (elttype, valaddr + i * eltlen, 0, 0, stream, format, deref_ref, recurse + 1, pretty); annotate_elt (); things_printed++; @@ -197,10 +197,11 @@ chill_val_print_array_elements (type, valaddr, address, stream, The PRETTY parameter controls prettyprinting. */ int -chill_val_print (type, valaddr, address, stream, format, deref_ref, recurse, - pretty) +chill_val_print (type, valaddr, embedded_offset, address, + stream, format, deref_ref, recurse, pretty) struct type *type; char *valaddr; + int embedded_offset; CORE_ADDR address; GDB_FILE *stream; int format; @@ -466,6 +467,7 @@ chill_val_print (type, valaddr, address, stream, format, deref_ref, recurse, NULL); val_print (VALUE_TYPE (deref_val), VALUE_CONTENTS (deref_val), + 0, VALUE_ADDRESS (deref_val), stream, format, deref_ref, recurse + 1, pretty); } @@ -475,13 +477,13 @@ chill_val_print (type, valaddr, address, stream, format, deref_ref, recurse, break; case TYPE_CODE_ENUM: - c_val_print (type, valaddr, address, stream, format, + c_val_print (type, valaddr, 0, address, stream, format, deref_ref, recurse, pretty); break; case TYPE_CODE_RANGE: if (TYPE_TARGET_TYPE (type)) - chill_val_print (TYPE_TARGET_TYPE (type), valaddr, address, stream, + chill_val_print (TYPE_TARGET_TYPE (type), valaddr, 0, address, stream, format, deref_ref, recurse, pretty); break; @@ -493,7 +495,7 @@ chill_val_print (type, valaddr, address, stream, format, deref_ref, recurse, default: /* Let's defer printing to the C printer, rather than print an error message. FIXME! */ - c_val_print (type, valaddr, address, stream, format, + c_val_print (type, valaddr, 0, address, stream, format, deref_ref, recurse, pretty); } gdb_flush (stream); @@ -562,13 +564,13 @@ chill_print_value_fields (type, valaddr, stream, format, recurse, pretty, v = value_from_longest (TYPE_FIELD_TYPE (type, i), unpack_field_as_long (type, valaddr, i)); - chill_val_print (TYPE_FIELD_TYPE (type, i), VALUE_CONTENTS (v), 0, + chill_val_print (TYPE_FIELD_TYPE (type, i), VALUE_CONTENTS (v), 0, 0, stream, format, 0, recurse + 1, pretty); } else { chill_val_print (TYPE_FIELD_TYPE (type, i), - valaddr + TYPE_FIELD_BITPOS (type, i) / 8, + valaddr + TYPE_FIELD_BITPOS (type, i) / 8, 0, 0, stream, format, 0, recurse + 1, pretty); } } @@ -615,13 +617,13 @@ chill_value_print (val, stream, format, pretty) fprintf_filtered (stream, ")"); } fprintf_filtered (stream, "("); - i = val_print (type, valaddr, VALUE_ADDRESS (val), + i = val_print (type, valaddr, 0, VALUE_ADDRESS (val), stream, format, 1, 0, pretty); fprintf_filtered (stream, ")"); return i; } } - return (val_print (type, VALUE_CONTENTS (val), + return (val_print (type, VALUE_CONTENTS (val), 0, VALUE_ADDRESS (val), stream, format, 1, 0, pretty)); } |