diff options
author | Pedro Alves <palves@redhat.com> | 2011-01-24 21:28:12 +0000 |
---|---|---|
committer | Pedro Alves <palves@redhat.com> | 2011-01-24 21:28:12 +0000 |
commit | a491d753e80c10865e5fc704377ae41d9421bfe5 (patch) | |
tree | 0a684753a1865c4dda5ab764438e9a3289b8a7b7 /gdb/ada-valprint.c | |
parent | 490f124f0943a59ca6829a030164f79716600166 (diff) | |
download | binutils-gdb-a491d753e80c10865e5fc704377ae41d9421bfe5.tar.gz |
* ada-valprint.c (val_print_packed_array_elements): Pass the
correct struct value to val_print.
(ada_val_print_1): Ditto.
Diffstat (limited to 'gdb/ada-valprint.c')
-rw-r--r-- | gdb/ada-valprint.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/gdb/ada-valprint.c b/gdb/ada-valprint.c index 2b5aa44f2f9..d0810c7d79d 100644 --- a/gdb/ada-valprint.c +++ b/gdb/ada-valprint.c @@ -211,7 +211,7 @@ val_print_packed_array_elements (struct type *type, const gdb_byte *valaddr, opts.deref_ref = 0; val_print (elttype, value_contents_for_printing (v0), value_embedded_offset (v0), 0, stream, - recurse + 1, val, &opts, current_language); + recurse + 1, v0, &opts, current_language); annotate_elt_rep (i - i0); fprintf_filtered (stream, _(" <repeats %u times>"), i - i0); annotate_elt_rep_end (); @@ -242,7 +242,7 @@ val_print_packed_array_elements (struct type *type, const gdb_byte *valaddr, } val_print (elttype, value_contents_for_printing (v0), value_embedded_offset (v0), 0, stream, - recurse + 1, val, &opts, current_language); + recurse + 1, v0, &opts, current_language); annotate_elt (); } } @@ -708,7 +708,7 @@ ada_val_print_1 (struct type *type, const gdb_byte *valaddr, value_contents_for_printing (val), value_embedded_offset (val), value_address (val), stream, recurse, - NULL, options); + val, options); value_free_to_mark (mark); return retn; } @@ -770,7 +770,7 @@ ada_val_print_1 (struct type *type, const gdb_byte *valaddr, return ada_val_print_1 (target_type, value_contents_for_printing (v), value_embedded_offset (v), 0, - stream, recurse + 1, NULL, options); + stream, recurse + 1, v, options); } else return ada_val_print_1 (TYPE_TARGET_TYPE (type), @@ -915,7 +915,7 @@ ada_val_print_1 (struct type *type, const gdb_byte *valaddr, value_contents_for_printing (deref_val), value_embedded_offset (deref_val), value_address (deref_val), stream, recurse + 1, - original_value, options, current_language); + deref_val, options, current_language); } else fputs_filtered ("(null)", stream); |