From: Piotr Trojanek Date: Thu, 2 Jul 2020 12:09:06 +0000 (+0200) Subject: [Ada] Remove useless initialization and refine type of a local variable X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=52ad13baa53dcf13c9ec28e37196ac644abc60c4;p=gcc.git [Ada] Remove useless initialization and refine type of a local variable gcc/ada/ * exp_ch6.adb (Expand_Call_Helper): Cleanup. --- diff --git a/gcc/ada/exp_ch6.adb b/gcc/ada/exp_ch6.adb index 32d75f1d0e5..38d4c81141d 100644 --- a/gcc/ada/exp_ch6.adb +++ b/gcc/ada/exp_ch6.adb @@ -3259,7 +3259,7 @@ package body Exp_Ch6 is Actual : Node_Id; Formal : Entity_Id; Orig_Subp : Entity_Id := Empty; - Param_Count : Natural := 0; + Param_Count : Positive; Parent_Formal : Entity_Id; Parent_Subp : Entity_Id; Prev_Ult : Node_Id;