diff options
author | Bob Duff <duff@adacore.com> | 2021-11-05 08:54:23 -0400 |
---|---|---|
committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2021-11-10 08:57:42 +0000 |
commit | 76a71469f3ea7a6cb9257cec9a34a8c8687f3d15 (patch) | |
tree | 4fc912f56dfdd1908b76529d40aa0adabcea3859 | |
parent | ab6101146d82e14922753ae848a44774232f462b (diff) | |
download | gcc-76a71469f3ea7a6cb9257cec9a34a8c8687f3d15.zip gcc-76a71469f3ea7a6cb9257cec9a34a8c8687f3d15.tar.gz gcc-76a71469f3ea7a6cb9257cec9a34a8c8687f3d15.tar.bz2 |
[Ada] Avoid warnings regarding rep clauses in generics -- follow-on
gcc/ada/
* repinfo.adb (List_Component_Layout): Initialize Sbit.
-rw-r--r-- | gcc/ada/repinfo.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/repinfo.adb b/gcc/ada/repinfo.adb index a11057a..75af649 100644 --- a/gcc/ada/repinfo.adb +++ b/gcc/ada/repinfo.adb @@ -1123,7 +1123,7 @@ package body Repinfo is Npos : constant Uint := Normalized_Position (Ent); Fbit : constant Uint := Normalized_First_Bit (Ent); Spos : Uint; - Sbit : Uint; + Sbit : Uint := No_Uint; Lbit : Uint; begin |