Found by using -gnatVa and Initialize_Scalars on GNAT sources.

Tested on x86_64-pc-linux-gnu, committed on trunk

gcc/ada/

        * exp_dist.adb (RCI_Cache): Initialize.
diff --git a/gcc/ada/exp_dist.adb b/gcc/ada/exp_dist.adb
--- a/gcc/ada/exp_dist.adb
+++ b/gcc/ada/exp_dist.adb
@@ -902,7 +902,7 @@ package body Exp_Dist is
    -- Local variables and structures --
    ------------------------------------
 
-   RCI_Cache : Node_Id;
+   RCI_Cache : Node_Id := Empty;
    --  Needs comments ???
 
    Output_From_Constrained : constant array (Boolean) of Name_Id :=


Reply via email to