diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2020-09-21 22:04:55 +0200 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2020-10-27 05:19:30 -0400 |
| commit | 0c1eba1a6a95b339b16cfceb2d10f8d05aea9fc4 (patch) | |
| tree | fbdeafc8226b709ffedcb823312592abe3d3767e /gcc/ada/gnat1drv.adb | |
| parent | b36ec51873ba05c1ac3d5e568f400dd5f59d2cb9 (diff) | |
| download | gcc-0c1eba1a6a95b339b16cfceb2d10f8d05aea9fc4.tar.gz | |
[Ada] Remove Digits_From_Size and Width_From_Size
gcc/ada/
* ada_get_targ.adb (Digits_From_Size): Delete.
(Width_From_Size): Likewise.
* get_targ.adb (Digits_From_Size): Likewise.
(Width_From_Size): Likewise.
* get_targ.ads (Digits_From_Size): Likewise.
(Width_From_Size): Likewise.
* ttypes.ads: Remove with clause for Get_Targ.
(Standard_Short_Short_Integer_Width): Delete.
(Standard_Short_Integer_Width): Likewise.
(Standard_Integer_Width): Likewise.
(Standard_Long_Integer_Width): Likewise.
(Standard_Long_Long_Integer_Width): Likewise.
(Standard_Long_Long_Long_Integer_Width): Likewise.
(Standard_Short_Float_Digits): Likewise.
(Standard_Float_Digits): Likewise.
(Standard_Long_Float_Digits): Likewise.
(Standard_Long_Long_Float_Digits): Likewise.
* gnat1drv.adb (Adjust_Global_Switches): Adjust.
Diffstat (limited to 'gcc/ada/gnat1drv.adb')
| -rw-r--r-- | gcc/ada/gnat1drv.adb | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/gcc/ada/gnat1drv.adb b/gcc/ada/gnat1drv.adb index 1ea7d763175..65da307af6b 100644 --- a/gcc/ada/gnat1drv.adb +++ b/gcc/ada/gnat1drv.adb @@ -813,8 +813,6 @@ procedure Gnat1drv is Ttypes.Standard_Long_Long_Long_Integer_Size := Ttypes.Standard_Long_Long_Integer_Size; - Ttypes.Standard_Long_Long_Long_Integer_Width := - Ttypes.Standard_Long_Long_Integer_Width; Ttypes.System_Max_Integer_Size := Ttypes.Standard_Long_Long_Integer_Size; Ttypes.System_Max_Binary_Modulus_Power := |