aboutsummaryrefslogtreecommitdiff
path: root/gdb/language.c
diff options
context:
space:
mode:
authorJoel Brobecker <brobecker@gnat.com>2007-12-28 06:13:51 +0000
committerJoel Brobecker <brobecker@gnat.com>2007-12-28 06:13:51 +0000
commit2330c6c69c988335412d95a42bf0f44eea9ad967 (patch)
tree60fa7af5aed8c7cacf54bd4a79c3b941941de6a6 /gdb/language.c
parenta6017fbaa57654299420b8ffd0e28a5842fe6be8 (diff)
downloadfsf-binutils-gdb-2330c6c69c988335412d95a42bf0f44eea9ad967.zip
fsf-binutils-gdb-2330c6c69c988335412d95a42bf0f44eea9ad967.tar.gz
fsf-binutils-gdb-2330c6c69c988335412d95a42bf0f44eea9ad967.tar.bz2
* ada-lang.c (ada_evaluate_subexp): Add cases for BINOP_LOGICAL_AND,
BINOP_LOGICAL_OR, UNOP_LOGICAL_NOT, BINOP_BITWISE_IOR, BINOP_BITWISE_XOR, BINOP_BITWISE_AND. * language.c (lang_bool_type): Add Ada case.
Diffstat (limited to 'gdb/language.c')
-rw-r--r--gdb/language.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/gdb/language.c b/gdb/language.c
index 84a095f..3355475 100644
--- a/gdb/language.c
+++ b/gdb/language.c
@@ -801,6 +801,7 @@ lang_bool_type (void)
return builtin_type_f_logical_s2;
case language_cplus:
case language_pascal:
+ case language_ada:
if (current_language->la_language==language_cplus)
{sym = lookup_symbol ("bool", NULL, VAR_DOMAIN, NULL, NULL);}
else
@@ -821,6 +822,7 @@ lang_bool_type (void)
return type;
}
return java_boolean_type;
+
default:
return builtin_type_int;
}