diff mbox series

[COMMITTED] ada: Remove redundant line in Analyze_Qualified_Expression

Message ID 20221108084234.301451-1-poulhies@adacore.com
State New
Headers show
Series [COMMITTED] ada: Remove redundant line in Analyze_Qualified_Expression | expand

Commit Message

Marc Poulhiès Nov. 8, 2022, 8:42 a.m. UTC
From: Eric Botcazou <ebotcazou@adacore.com>

The same statement is present a few lines above.

gcc/ada/

	* sem_ch4.adb (Analyze_Qualified_Expression): Remove redundant
	line.

Tested on x86_64-pc-linux-gnu, committed on master.

---
 gcc/ada/sem_ch4.adb | 2 --
 1 file changed, 2 deletions(-)
diff mbox series

Patch

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;
 
    -----------------------------------