https://gcc.gnu.org/g:5aa2239ff0cb1388f6921cb591ced7336c1948c6
commit r16-1448-g5aa2239ff0cb1388f6921cb591ced7336c1948c6
Author: Ronan Desplanques <desplanq...@adacore.com>
Date: Mon Mar 31 15:17:26 2025 +0200
ada: Remove obsolete test
A previous change cleaned up the Ekind field of record component
entities. That made a particular test obsolete, so this patch removes
that test.
gcc/ada/ChangeLog:
* einfo-utils.adb (Set_Convention): Remove obsolete test.
Diff:
---
gcc/ada/einfo-utils.adb | 9 +--------
1 file changed, 1 insertion(+), 8 deletions(-)
diff --git a/gcc/ada/einfo-utils.adb b/gcc/ada/einfo-utils.adb
index 15f5b9908481..91d273cb32d9 100644
--- a/gcc/ada/einfo-utils.adb
+++ b/gcc/ada/einfo-utils.adb
@@ -2639,14 +2639,7 @@ package body Einfo.Utils is
-- anonymous protected types, since protected types always have the
-- default convention.
- if Present (Etype (E))
- and then (Is_Object (E)
-
- -- Allow E_Void (happens for pragma Convention appearing
- -- in the middle of a record applying to a component)
-
- or else Ekind (E) = E_Void)
- then
+ if Present (Etype (E)) and then Is_Object (E) then
declare
Typ : constant Entity_Id := Etype (E);
