[gcc r12-4162] [Ada] Improve error message on array aggregates

[Pierre-Marie de Rodat]

https://gcc.gnu.org/g:4f3a016f51aa46152a9d635e2e594c6de20ace9e

commit r12-4162-g4f3a016f51aa46152a9d635e2e594c6de20ace9e
Author: Yannick Moy <moy@adacore.com>
Date:   Thu Sep 16 16:51:15 2021 +0200

    [Ada] Improve error message on array aggregates
    
    gcc/ada/
    
            * sem_aggr.adb (Resolve_Array_Aggregate): Improve error message.

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

diff --git a/gcc/ada/sem_aggr.adb b/gcc/ada/sem_aggr.adb
index 3283fbbb8d9..9ae5ff61617 100644
--- a/gcc/ada/sem_aggr.adb
+++ b/gcc/ada/sem_aggr.adb
@@ -1954,7 +1954,7 @@ package body Sem_Aggr is
                    or else (Nb_Choices = 1 and then not Others_Present))
       then
          Error_Msg_N
-           ("named association cannot follow positional association",
+           ("cannot mix named and positional associations in array aggregate",
             First (Choice_List (First (Component_Associations (N)))));
          return Failure;
       end if;