ada: Minor cosmetic refactoring

Rewrite the sequence of:
 if V = Enum_1
   or else V = Enum_2
   or else V in Enum_R
   ...

with a membership test.

gcc/ada/ChangeLog:

	* sem_util.adb (Enclosing_Declaration): Refactor membership test.

diff --git a/gcc/ada/sem_util.adb b/gcc/ada/sem_util.adb
index f8f18d3d48bd686794a71827a3ee63c05f514ff3..60973af61cff88488553a6aeaf10cf03974b737c 100644 (file)
--- a/gcc/ada/sem_util.adb
+++ b/gcc/ada/sem_util.adb
@@ -7664,13 +7664,11 @@ package body Sem_Util is
 
    begin
       while Present (Decl)
-        and then not (Nkind (Decl) in N_Declaration
-                        or else
-                      Nkind (Decl) in N_Later_Decl_Item
-                        or else
-                      Nkind (Decl) in N_Renaming_Declaration
-                        or else
-                      Nkind (Decl) = N_Number_Declaration)
+            and then not (Nkind (Decl) in
+              N_Declaration
+              | N_Later_Decl_Item
+              | N_Renaming_Declaration
+              | N_Number_Declaration)
       loop
          Decl := Parent (Decl);
       end loop;