diff options
| author | Per Bothner <per@bothner.com> | 1994-09-17 00:38:23 +0000 |
|---|---|---|
| committer | Per Bothner <per@bothner.com> | 1994-09-17 00:38:23 +0000 |
| commit | 6f52d064e47ea3b527b8110ba3c09e336559a204 (patch) | |
| tree | 37176969fcf18e1edf201cde1f412089480c3851 /gdb/ch-valprint.c | |
| parent | 7f4a859c429e6e15378d3d5ead436434a5f52166 (diff) | |
| download | gdb-6f52d064e47ea3b527b8110ba3c09e336559a204.zip gdb-6f52d064e47ea3b527b8110ba3c09e336559a204.tar.gz gdb-6f52d064e47ea3b527b8110ba3c09e336559a204.tar.bz2 | |
* gdbtypes.h (TYPE_INDEX_TYPE): New macro.
* ch-typeprint.c, ch-valprint.c: Use TYPE_INDEX_TYPE.
* ch-valprint.c (chill_val_print): Pass index type directly
(instead of its TYPE_TARGET_TYPE) to print_type_scalar.
* stabsread.c (read_type): Don't set TYPE_FLAG_TARGET_STUB
if the index type is a stub.
Diffstat (limited to 'gdb/ch-valprint.c')
| -rw-r--r-- | gdb/ch-valprint.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gdb/ch-valprint.c b/gdb/ch-valprint.c index 00f5565..11d1a22 100644 --- a/gdb/ch-valprint.c +++ b/gdb/ch-valprint.c @@ -294,7 +294,7 @@ chill_val_print (type, valaddr, address, stream, format, deref_ref, recurse, case TYPE_CODE_BITSTRING: case TYPE_CODE_SET: - elttype = TYPE_FIELD_TYPE (type, 0); + elttype = TYPE_INDEX_TYPE (type); check_stub_type (elttype); if (TYPE_FLAGS (elttype) & TYPE_FLAG_STUB) { @@ -323,7 +323,7 @@ chill_val_print (type, valaddr, address, stream, format, deref_ref, recurse, { if (need_comma) fputs_filtered (", ", stream); - print_type_scalar (TYPE_TARGET_TYPE (range), i, stream); + print_type_scalar (range, i, stream); need_comma = 1; /* Look for a continuous range of true elements. */ @@ -334,7 +334,7 @@ chill_val_print (type, valaddr, address, stream, format, deref_ref, recurse, while (i+1 <= high_bound && value_bit_index (type, valaddr, ++i)) j = i; - print_type_scalar (TYPE_TARGET_TYPE (range), j, stream); + print_type_scalar (range, j, stream); } } } |