[Ada] Remove new problematic condition for LLVM

2020-06-17  Eric Botcazou  <ebotcazou@adacore.com>

gcc/ada/

	* exp_attr.adb (Expand_N_Attribute_Reference) <Attribute_First>:
	Remove condition added for scalar types.
This commit is contained in:
Eric Botcazou 2020-04-14 23:49:22 +02:00 committed by Pierre-Marie de Rodat
parent 14e7560824
commit cb52e9fe48

View File

@ -3470,9 +3470,7 @@ package body Exp_Attr is
Bnd := Type_High_Bound (Ptyp);
end if;
if Is_Entity_Name (Bnd)
and then Ekind (Entity (Bnd)) /= E_Discriminant
then
if Is_Entity_Name (Bnd) then
Rewrite (N, New_Occurrence_Of (Entity (Bnd), Loc));
end if;
end;