[Ada] Initialize local variables related to static expression functions

gcc/ada/

	* sem_ch6.adb (Analyze_Expression_Function): Initialize Orig_N
	and Typ variables.

diff --git a/gcc/ada/sem_ch6.adb b/gcc/ada/sem_ch6.adb
index d543253..78a076c 100644 (file)
--- a/gcc/ada/sem_ch6.adb
+++ b/gcc/ada/sem_ch6.adb
@@ -298,9 +298,9 @@ package body Sem_Ch6 is
       Asp      : Node_Id;
       New_Body : Node_Id;
       New_Spec : Node_Id;
-      Orig_N   : Node_Id;
+      Orig_N   : Node_Id := Empty;
       Ret      : Node_Id;
-      Typ      : Entity_Id;
+      Typ      : Entity_Id := Empty;
 
       Def_Id : Entity_Id := Empty;
       Prev   : Entity_Id;