From 786c6ba5a51f54c404dd491523788f7359a29a91 Mon Sep 17 00:00:00 2001 From: Eric Botcazou Date: Wed, 19 Oct 2022 12:39:42 +0200 Subject: [PATCH] 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. --- gcc/ada/sem_ch4.adb | 2 -- 1 file changed, 2 deletions(-) diff --git a/gcc/ada/sem_ch4.adb b/gcc/ada/sem_ch4.adb index f136e9715d7c..489fb47247a2 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; ----------------------------------- -- 2.47.2