From: brobecke <brobecke>
Date: Mon, 24 Dec 2007 16:52:24 +0000 (+0000)
Subject:         * ada-lang.c (ada_is_character_type): Add recognition of type
X-Git-Url: http://git.osdn.net/view?a=commitdiff_plain;h=9acdb0fb4a2072fcf42f2799d35700818e6ccd27;p=pf3gnuchains%2Fsourceware.git

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

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 716c12b303..75423d6bd1 100644
--- 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 83afdd70bb..c2b7d1f71a 100644
--- 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));
 }