* ada-lang.c (ada_is_character_type): Add recognition of type

        "Wide_Wide_Character".

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 716c12b..75423d6 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,5 +1,10 @@
 2007-12-24  Joel Brobecker  <brobecker@adacore.com>
 
+       * ada-lang.c (ada_is_character_type): Add recognition of type
+       "Wide_Wide_Character".
+
+2007-12-24  Joel Brobecker  <brobecker@adacore.com>
+
        * dwarf2read.c (read_base_type): Set code to TYPE_CODE_CHAR
        for char and unsigned char types of Ada compilation units.
        * ada-lang.c (ada_is_character_type): Always return true if

diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c
index 83afdd7..c2b7d1f 100644 (file)
--- a/gdb/ada-lang.c
+++ b/gdb/ada-lang.c
@@ -7301,6 +7301,7 @@ ada_is_character_type (struct type *type)
               || TYPE_CODE (type) == TYPE_CODE_RANGE)
           && (strcmp (name, "character") == 0
               || strcmp (name, "wide_character") == 0
+              || strcmp (name, "wide_wide_character") == 0
               || strcmp (name, "unsigned char") == 0));
 }