[Ada] Remove redundant code related to instances with formal subprograms
authorPiotr Trojanek <trojanek@adacore.com>
Tue, 30 Nov 2021 17:17:39 +0000 (18:17 +0100)
committerPierre-Marie de Rodat <derodat@adacore.com>
Wed, 5 Jan 2022 11:32:35 +0000 (11:32 +0000)
gcc/ada/

* sem_ch12.adb (Instantiate_Formal_Subprogram): Remove redundant
call to Set_Defining_Unit_Name; a similar call is done few lines
below.

gcc/ada/sem_ch12.adb

index ec6b592..af96d58 100644 (file)
@@ -10866,7 +10866,6 @@ package body Sem_Ch12 is
         and then Expander_Active
       then
          New_Subp := Make_Temporary (Sloc (Actual), 'S');
-         Set_Defining_Unit_Name (New_Spec, New_Subp);
       else
          New_Subp := Make_Defining_Identifier (Loc, Chars (Formal_Sub));
       end if;