From 8ec9fd41cfe7956b2c25d4539a9b5941a5d5f4cd Mon Sep 17 00:00:00 2001 From: Piotr Trojanek Date: Tue, 30 Nov 2021 18:17:39 +0100 Subject: [PATCH] [Ada] Remove redundant code related to instances with formal subprograms 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 | 1 - 1 file changed, 1 deletion(-) diff --git a/gcc/ada/sem_ch12.adb b/gcc/ada/sem_ch12.adb index ec6b592..af96d58 100644 --- a/gcc/ada/sem_ch12.adb +++ b/gcc/ada/sem_ch12.adb @@ -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; -- 2.7.4