aboutsummaryrefslogtreecommitdiff
path: root/gdb/ada-lang.c
diff options
context:
space:
mode:
authorJoel Brobecker <brobecker@gnat.com>2009-11-19 22:45:56 +0000
committerJoel Brobecker <brobecker@gnat.com>2009-11-19 22:45:56 +0000
commit872f0337802a081229fb2947f271c0acccac9800 (patch)
treee74b74e7d1cab0a28248a2437b2329b91e1a1071 /gdb/ada-lang.c
parent2d9c5cff789a81c2539ca0c95ea63be571a563b5 (diff)
downloadgdb-872f0337802a081229fb2947f271c0acccac9800.zip
gdb-872f0337802a081229fb2947f271c0acccac9800.tar.gz
gdb-872f0337802a081229fb2947f271c0acccac9800.tar.bz2
* ada-lang.c (discrete_type_p): TYPE_CODE_BOOL is also a discrete type.
Diffstat (limited to 'gdb/ada-lang.c')
-rw-r--r--gdb/ada-lang.c1
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;