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

        "Wide_Wide_Character".

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 716c12b3038dac7738f441bfe5ce00ba145a7f44..75423d6bd19b132f055fe84279916c9e7dad4e0e 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,8 @@
+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

diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c
index 83afdd70bba8b7ecd5dc4ba7674070f35544690a..c2b7d1f71aa8e4baf230e9c98a5f0e23d99ab54b 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));
 }