From: Ghjuvan Lacambre <lacambre@adacore.com>
Date: Wed, 20 Oct 2021 09:56:09 +0000 (+0200)
Subject: [Ada] Initialize variable to Empty
X-Git-Tag: basepoints/gcc-13~3638
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=c9d2cc2ac82593bd6a8eceb08d3cbf17ab1bea2c;p=thirdparty%2Fgcc.git

[Ada] Initialize variable to Empty

gcc/ada/

	* sem_ch8.adb (Analyze_Subprogram_Renaming): Set New_S to Empty.
---

diff --git a/gcc/ada/sem_ch8.adb b/gcc/ada/sem_ch8.adb
index 1513cd5579c5..b05727e64f03 100644
--- a/gcc/ada/sem_ch8.adb
+++ b/gcc/ada/sem_ch8.adb
@@ -3099,7 +3099,7 @@ package body Sem_Ch8 is
       --  related formal type is class-wide.
 
       Inst_Node    : Node_Id   := Empty;
-      New_S        : Entity_Id;
+      New_S        : Entity_Id := Empty;
       Wrapped_Prim : Entity_Id := Empty;
 
    --  Start of processing for Analyze_Subprogram_Renaming