From: Piotr Trojanek <trojanek@adacore.com>
Date: Fri, 19 Feb 2021 12:05:34 +0000 (+0100)
Subject: [Ada] Remove extra parens around a function call
X-Git-Tag: basepoints/gcc-13~6812
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=3e07c2df705ca3e8be98c708773e450e0543480b;p=thirdparty%2Fgcc.git

[Ada] Remove extra parens around a function call

gcc/ada/

	* sem_ch8.adb (End_Scope): Remove extra parens.
---

diff --git a/gcc/ada/sem_ch8.adb b/gcc/ada/sem_ch8.adb
index 8a1a13cada1c..26fc45f35f5e 100644
--- a/gcc/ada/sem_ch8.adb
+++ b/gcc/ada/sem_ch8.adb
@@ -4862,7 +4862,7 @@ package body Sem_Ch8 is
 
             Pop_Scope;
 
-            while not (Is_List_Member (Decl))
+            while not Is_List_Member (Decl)
               or else Nkind (Parent (Decl)) in N_Protected_Definition
                                              | N_Task_Definition
             loop