From 824211e18b96dc56d3a530b31aa16cded2c941eb Mon Sep 17 00:00:00 2001 From: Piotr Trojanek Date: Mon, 6 Jun 2022 15:27:38 +0200 Subject: [PATCH] [Ada] Remove repeated analysis for pragma Thread_Local_Storage When analysing pragma Thread_Local_Storage its argument is analysed by the call to Check_Arg_Is_Library_Level_Local_Name. There is no need to reanalyse it. Code cleanup; behaviour is not affected. gcc/ada/ * sem_prag.adb (Analyze_Pragma): Remove unnecessary call to Analyze. --- gcc/ada/sem_prag.adb | 1 - 1 file changed, 1 deletion(-) diff --git a/gcc/ada/sem_prag.adb b/gcc/ada/sem_prag.adb index 3431e3f6101..9ebac413990 100644 --- a/gcc/ada/sem_prag.adb +++ b/gcc/ada/sem_prag.adb @@ -24861,7 +24861,6 @@ package body Sem_Prag is Check_Arg_Is_Library_Level_Local_Name (Arg1); Id := Get_Pragma_Arg (Arg1); - Analyze (Id); if not Is_Entity_Name (Id) or else Ekind (Entity (Id)) /= E_Variable -- 2.47.2