diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2022-10-19 12:39:42 +0200 |
|---|---|---|
| committer | Marc Poulhiès <poulhies@adacore.com> | 2022-11-08 09:34:59 +0100 |
| commit | 786c6ba5a51f54c404dd491523788f7359a29a91 (patch) | |
| tree | 328a90b0145b977bee86b6f4177119c60b16140f | |
| parent | 788e5f06d4e804dcc9e255fa448ba0c3db1586c4 (diff) | |
ada: Remove redundant line in Analyze_Qualified_Expression
The same statement is present a few lines above.
gcc/ada/
* sem_ch4.adb (Analyze_Qualified_Expression): Remove redundant
line.
| -rw-r--r-- | gcc/ada/sem_ch4.adb | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/gcc/ada/sem_ch4.adb b/gcc/ada/sem_ch4.adb index f136e9715d7..489fb47247a 100644 --- a/gcc/ada/sem_ch4.adb +++ b/gcc/ada/sem_ch4.adb @@ -4389,8 +4389,6 @@ package body Sem_Ch4 is end loop; end if; end if; - - Set_Etype (N, T); end Analyze_Qualified_Expression; ----------------------------------- |