aboutsummaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
authorBob Duff <duff@adacore.com>2021-11-05 08:54:23 -0400
committerPierre-Marie de Rodat <derodat@adacore.com>2021-11-10 08:57:42 +0000
commit76a71469f3ea7a6cb9257cec9a34a8c8687f3d15 (patch)
tree4fc912f56dfdd1908b76529d40aa0adabcea3859 /gcc
parentab6101146d82e14922753ae848a44774232f462b (diff)
downloadgcc-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.
Diffstat (limited to 'gcc')
-rw-r--r--gcc/ada/repinfo.adb2
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