diff options
author | Joel Brobecker <brobecker@gnat.com> | 2011-01-14 19:32:56 +0000 |
---|---|---|
committer | Joel Brobecker <brobecker@gnat.com> | 2011-01-14 19:32:56 +0000 |
commit | 447b483c37a0e0a04fd88756f1f731e6a28217cd (patch) | |
tree | ffb081bcbe67a0c16e5144ee36873c4896eeae6f /gdb/c-valprint.c | |
parent | 7b64a93b0333a9520ca23d3dcbaa5b6b5eb3d6f0 (diff) | |
download | gdb-447b483c37a0e0a04fd88756f1f731e6a28217cd.zip gdb-447b483c37a0e0a04fd88756f1f731e6a28217cd.tar.gz gdb-447b483c37a0e0a04fd88756f1f731e6a28217cd.tar.bz2 |
Fix printing of Wide_Character & Wide_Wide_Character entities.
Wide_Characters and Wide_Wide_Characters are incorrectly printed.
Consider for instance:
Medium : Wide_Character := Wide_Character'Val(16#dead#);
Trying to print the value of this variable yields:
(gdb) p medium
$1 = 57005 '["ad"]'
The integer value is correct (57005 = 0xdead), but the character
representation is not, it should be:
$1 = 57005 '["dead"]'
Same for Wide_Wide_Characters.
There were two issues:
(a) The first issue was in ada-valprint, where we were assuming
that character types were 1 byte long;
(b) The second problem was in c-valprint, where we were down-casting
the integer value of the character to type `unsigned char',
causing use to lose all but the lowest byte.
gdb/ChangeLog:
* ada-valprint. (ada_printchar): Use the correct type length
in call to ada_emit_char.
* c-valprint.c (c_val_print): Remove cast in call to LA_PRINT_CHAR.
Diffstat (limited to 'gdb/c-valprint.c')
-rw-r--r-- | gdb/c-valprint.c | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/gdb/c-valprint.c b/gdb/c-valprint.c index 0c23c7e..c6d3eae 100644 --- a/gdb/c-valprint.c +++ b/gdb/c-valprint.c @@ -536,9 +536,7 @@ c_val_print (struct type *type, const gdb_byte *valaddr, if (c_textual_element_type (unresolved_type, options->format)) { fputs_filtered (" ", stream); - LA_PRINT_CHAR ((unsigned char) unpack_long (type, - valaddr - + embedded_offset), + LA_PRINT_CHAR (unpack_long (type, valaddr + embedded_offset), unresolved_type, stream); } } @@ -561,7 +559,7 @@ c_val_print (struct type *type, const gdb_byte *valaddr, else fprintf_filtered (stream, "%d", (int) val); fputs_filtered (" ", stream); - LA_PRINT_CHAR ((unsigned char) val, unresolved_type, stream); + LA_PRINT_CHAR (val, unresolved_type, stream); } break; |