From 76a71469f3ea7a6cb9257cec9a34a8c8687f3d15 Mon Sep 17 00:00:00 2001 From: Bob Duff Date: Fri, 5 Nov 2021 08:54:23 -0400 Subject: [Ada] Avoid warnings regarding rep clauses in generics -- follow-on gcc/ada/ * repinfo.adb (List_Component_Layout): Initialize Sbit. --- gcc/ada/repinfo.adb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'gcc') 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 -- cgit v1.1