diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2020-01-06 13:14:58 +0100 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2020-06-03 06:01:28 -0400 |
| commit | fe2684adda4c471b48e1cb1a69a8ea3d02bf4e1a (patch) | |
| tree | 42ca4b9a8d734f3028adfefe94499acae21dc194 /gcc/ada/exp_ch3.adb | |
| parent | c35b8eed79041b1d8f6001904a4c55d6e56ebb21 (diff) | |
| download | gcc-fe2684adda4c471b48e1cb1a69a8ea3d02bf4e1a.zip gcc-fe2684adda4c471b48e1cb1a69a8ea3d02bf4e1a.tar.gz gcc-fe2684adda4c471b48e1cb1a69a8ea3d02bf4e1a.tar.bz2 | |
[Ada] Get rid of more references to Universal_Integer in expanded code
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.
Diffstat (limited to 'gcc/ada/exp_ch3.adb')
| -rw-r--r-- | gcc/ada/exp_ch3.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/exp_ch3.adb b/gcc/ada/exp_ch3.adb index 5ecda62..0a18d0d 100644 --- a/gcc/ada/exp_ch3.adb +++ b/gcc/ada/exp_ch3.adb @@ -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 |