darkkirb/old-cross-binutils
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

* ada-valprint.c (val_print_packed_array_elements): Pass the

Browse source 
correct struct value to val_print.
	(ada_val_print_1): Ditto.
This commit is contained in:
Pedro Alves 2011-01-24 21:28:12 +00:00
parent 490f124f09
commit a491d753e8
2 changed files with 11 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
gdb/ChangeLog
View file

@ -1,3 +1,9 @@
2011-01-24 Pedro Alves <pedro@codesourcery.com>
* ada-valprint.c (val_print_packed_array_elements): Pass the
correct struct value to val_print.
(ada_val_print_1): Ditto.
2011-01-24 Pedro Alves <pedro@codesourcery.com> 2011-01-24 Pedro Alves <pedro@codesourcery.com>
Don't lose embedded_offset in printing routines throughout. Don't lose embedded_offset in printing routines throughout.

10
gdb/ada-valprint.c
View file

@ -211,7 +211,7 @@ val_print_packed_array_elements (struct type *type, const gdb_byte *valaddr,
opts.deref_ref = 0; opts.deref_ref = 0;
val_print (elttype, value_contents_for_printing (v0), val_print (elttype, value_contents_for_printing (v0),
value_embedded_offset (v0), 0, stream, value_embedded_offset (v0), 0, stream,
recurse + 1, val, &opts, current_language); recurse + 1, v0, &opts, current_language);
annotate_elt_rep (i - i0); annotate_elt_rep (i - i0);
fprintf_filtered (stream, _(" <repeats %u times>"), i - i0); fprintf_filtered (stream, _(" <repeats %u times>"), i - i0);
annotate_elt_rep_end (); 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), val_print (elttype, value_contents_for_printing (v0),
value_embedded_offset (v0), 0, stream, value_embedded_offset (v0), 0, stream,
recurse + 1, val, &opts, current_language); recurse + 1, v0, &opts, current_language);
annotate_elt (); annotate_elt ();
} }
} }
@ -708,7 +708,7 @@ ada_val_print_1 (struct type *type, const gdb_byte *valaddr,
value_contents_for_printing (val), value_contents_for_printing (val),
value_embedded_offset (val), value_embedded_offset (val),
value_address (val), stream, recurse, value_address (val), stream, recurse,
NULL, options); val, options);
value_free_to_mark (mark); value_free_to_mark (mark);
return retn; return retn;
} }
@ -770,7 +770,7 @@ ada_val_print_1 (struct type *type, const gdb_byte *valaddr,
return ada_val_print_1 (target_type, return ada_val_print_1 (target_type,
value_contents_for_printing (v), value_contents_for_printing (v),
value_embedded_offset (v), 0, value_embedded_offset (v), 0,
stream, recurse + 1, NULL, options); stream, recurse + 1, v, options);
} }
else else
return ada_val_print_1 (TYPE_TARGET_TYPE (type), 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_contents_for_printing (deref_val),
value_embedded_offset (deref_val), value_embedded_offset (deref_val),
value_address (deref_val), stream, recurse + 1, value_address (deref_val), stream, recurse + 1,
original_value, options, current_language); deref_val, options, current_language);
} }
else else
fputs_filtered ("(null)", stream); fputs_filtered ("(null)", stream);