OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

[Ada] Get rid of more references to Universal_Integer in expanded code

Browse Source 
2020-06-03  Eric Botcazou  <ebotcazou@adacore.com>

gcc/ada/

	* exp_attr.adb (Attribute_Valid): Use Standard_Long_Long_Integer
	in lieu of Universal_Integer as large integer type.
	* exp_ch3.adb (Expand_Freeze_Enumeration_Type): Likewise.
This commit is contained in:
Eric Botcazou 2020-01-06 13:14:58 +01:00 committed by Pierre-Marie de Rodat
parent c35b8eed79
commit fe2684adda
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
gcc/ada/exp_attr.adb
View File

@ -6924,7 +6924,7 @@ package body Exp_Attr is
if Esize (Ptyp) <= Esize (Standard_Integer) then
PBtyp := Standard_Integer;
else
PBtyp := Universal_Integer;
PBtyp := Standard_Long_Long_Integer;
end if;
Rewrite (N, Make_Range_Test);

2
gcc/ada/exp_ch3.adb
View File

@ -4806,7 +4806,7 @@ package body Exp_Ch3 is
if Esize (Typ) <= Standard_Integer_Size then
Ityp := Standard_Integer;
else
Ityp := Universal_Integer;
Ityp := Standard_Long_Long_Integer;
end if;
-- Representations are unsigned