1 files changed, 1 insertions, 0 deletions
diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c
index 6cea84e..289c5969 100644
--- a/gdb/ada-lang.c
+++ b/gdb/ada-lang.c
@@ -3585,6 +3585,7 @@ discrete_type_p (struct type *type)
         case TYPE_CODE_INT:
         case TYPE_CODE_RANGE:
         case TYPE_CODE_ENUM:
+        case TYPE_CODE_BOOL:
           return 1;
         default:
           return 0;