* language.c (lang_bool_type): Return a builtin bool type in the

        Ada case.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index d3e9c2ca3e346bcbcbd0c69039e5339853bb5d7c..cdf308a1b2cf930542d73fa2c1a702017dff6a8e 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,8 @@
+2009-03-12  Jerome Guitton  <guitton@adacore.com>
+
+       * language.c (lang_bool_type): Return a builtin bool type in the
+       Ada case.
+
 2009-03-12  Joel Brobecker  <brobecker@adacore.com>
 
        * ada-lang.c (ada_evaluate_subexp) [OP_VAR_VALUE]: For tagged

diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c
index 072480430f81d85c905288b9eaff61944bccc7fa..0ec724f9c3ead849994cb203f52e4c8fb97d63dd 100644 (file)
--- a/gdb/ada-lang.c
+++ b/gdb/ada-lang.c
@@ -11013,7 +11013,7 @@ ada_language_arch_info (struct gdbarch *gdbarch,
   TYPE_NAME (lai->primitive_type_vector [ada_primitive_type_system_address])
     = "system__address";
 
-  lai->bool_type_symbol = "boolean";
+  lai->bool_type_symbol = NULL;
   lai->bool_type_default = builtin->builtin_bool;
 }
 \f