From: Tom Tromey <tromey@adacore.com>
Date: Thu, 4 Dec 2025 14:15:52 +0000 (-0700)
Subject: Return bool from ada_is_modular_type
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=07192f37f6e6dce9d950414ecb8921797e2775ba;p=thirdparty%2Fbinutils-gdb.git

Return bool from ada_is_modular_type

This changes ada_is_modular_type to return bool.
---

diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c
index 7f150295798..21b081854a8 100644
--- a/gdb/ada-lang.c
+++ b/gdb/ada-lang.c
@@ -11626,9 +11626,9 @@ ada_is_range_type_name (const char *name)
 
 				/* Modular types */
 
-/* True iff TYPE is an Ada modular type.  */
+/* See ada-lang.h.  */
 
-int
+bool
 ada_is_modular_type (struct type *type)
 {
   struct type *subranged_type = get_base_type (type);
diff --git a/gdb/ada-lang.h b/gdb/ada-lang.h
index 5e08c3bbbda..c7430c713fd 100644
--- a/gdb/ada-lang.h
+++ b/gdb/ada-lang.h
@@ -322,7 +322,9 @@ extern std::string ada_encode (const char *, bool fold = true);
 
 extern const char *ada_enum_name (const char *);
 
-extern int ada_is_modular_type (struct type *);
+/* True iff TYPE is an Ada modular type.  */
+
+extern bool ada_is_modular_type (struct type *);
 
 extern ULONGEST ada_modulus (struct type *);