[COMMITTED] ada: Simplify "not Present" with "No"

[Marc Poulhiès]

From: Piotr Trojanek <troja...@adacore.com>

gcc/ada/

        * exp_aggr.adb (Expand_Container_Aggregate): Simplify with "No".

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

---
 gcc/ada/exp_aggr.adb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/gcc/ada/exp_aggr.adb b/gcc/ada/exp_aggr.adb
index e5f36326600..340c8c68465 100644
--- a/gcc/ada/exp_aggr.adb
+++ b/gcc/ada/exp_aggr.adb
@@ -7288,7 +7288,7 @@ package body Exp_Aggr is
                      --  Iterated component association. Discard
                      --  positional insertion procedure.
 
-                     if not Present (Iterator_Specification (Comp)) then
+                     if No (Iterator_Specification (Comp)) then
                         Add_Named_Subp := Assign_Indexed_Subp;
                         Add_Unnamed_Subp := Empty;
                      end if;
-- 
2.42.0