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

        Ada case.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index d3e9c2c..cdf308a 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 0724804..0ec724f 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