[Ada] Fix printing of Wide_Wide_Strings
authorJoel Brobecker <brobecker@gnat.com>
Thu, 13 Jan 2011 23:01:22 +0000 (23:01 +0000)
committerJoel Brobecker <brobecker@gnat.com>
Thu, 13 Jan 2011 23:01:22 +0000 (23:01 +0000)
commit4ffa5a33921b942a16f4c2d14177d2e5d9d075d3
treed4310067bc04b5b916e0d1f85fb8d95122dc4a01
parentde8fa76c44b010437d7ceafd20e2b0fb0d47e961
[Ada] Fix printing of Wide_Wide_Strings

This fixes the printing of Wide_Wide_String objects.  For instance,
consider:

    My_WWS : Wide_Wide_String := " helo";

Before this patch is applied, GDB prints:

    (gdb) print my_wws
    $1 = " ["00"]h["00"]e"

gdb/ChangeLog:

        * ada-valprint.c (ada_emit_char): Remove strange code.
        Check that c is <= UCHAR_MAX before passing it to isascii.
        (char_at): Do not assume that TYPE_LEN is either 1 or 2.
gdb/ChangeLog
gdb/ada-valprint.c