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.
-- 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);