[Ada] Simplify detection of delayed aggregates

gcc/ada/ * exp_aggr.adb (Is_Delayed_Aggregate): Simplify.
2021-09-29 12:18:36 +02:00
parent b52e15202c
commit 90084d7400
1 changed files with 2 additions and 5 deletions
@@ -8978,11 +8978,8 @@ package body Exp_Aggr is
         Kind := Nkind (Node);
      end if;

-      if Kind not in N_Aggregate | N_Extension_Aggregate then
-         return False;
-      else
-         return Expansion_Delayed (Node);
-      end if;
+      return Kind in N_Aggregate | N_Extension_Aggregate
+        and then Expansion_Delayed (Node);
   end Is_Delayed_Aggregate;

   --------------------------------