[Ada] Cleanup resolution of aggregates with mixed component associations

[Marc Poulhiès via Gcc-patches]

Code cleanup only; semantics is unaffected.

Tested on x86_64-pc-linux-gnu, committed on trunk

gcc/ada/

        * sem_aggr.adb (Resolve_Array_Aggregate): Change an inconsistent
        use of False into its local equivalent Failure.
diff --git a/gcc/ada/sem_aggr.adb b/gcc/ada/sem_aggr.adb
--- a/gcc/ada/sem_aggr.adb
+++ b/gcc/ada/sem_aggr.adb
@@ -1926,7 +1926,7 @@ package body Sem_Aggr is
         and then No (Component_Associations (N))
         and then not Null_Record_Present (N)
       then
-         return False;
+         return Failure;
       end if;
 
       --  Disable the warning for GNAT Mode to allow for easier transition.
@@ -1966,7 +1966,7 @@ package body Sem_Aggr is
                   Error_Msg_N ("mixed iterated component association"
                    & " (RM 4.3.3 (17.1/5))",
                       Assoc);
-                  return False;
+                  return Failure;
                end if;
 
                Next (Assoc);
@@ -1985,7 +1985,7 @@ package body Sem_Aggr is
                   Error_Msg_N ("mixed iterated component association"
                     & " (RM 4.3.3 (17.1/5))",
                       Assoc);
-                  return False;
+                  return Failure;
                end if;
 
                Next (Assoc);