diff options
| author | Piotr Trojanek <trojanek@adacore.com> | 2021-11-30 18:17:39 +0100 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2022-01-05 11:32:35 +0000 |
| commit | 8ec9fd41cfe7956b2c25d4539a9b5941a5d5f4cd (patch) | |
| tree | 2286c96b8bb510396d535f371275f4392374af50 | |
| parent | a714d2b000ad7798fd1f7b1f73c0295228ec58bd (diff) | |
| download | gcc-8ec9fd41cfe7956b2c25d4539a9b5941a5d5f4cd.zip gcc-8ec9fd41cfe7956b2c25d4539a9b5941a5d5f4cd.tar.gz gcc-8ec9fd41cfe7956b2c25d4539a9b5941a5d5f4cd.tar.bz2 | |
[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.
| -rw-r--r-- | gcc/ada/sem_ch12.adb | 1 |
1 files changed, 0 insertions, 1 deletions
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; |