[gcc r15-1284] ada: Fix test for giving hint on ambiguous aggregate

[Marc Poulhi?s via Gcc-cvs]

https://gcc.gnu.org/g:36c59b3a689a929e8c786cc4614fad923658b3c4

commit r15-1284-g36c59b3a689a929e8c786cc4614fad923658b3c4
Author: Yannick Moy <m...@adacore.com>
Date:   Fri May 3 15:02:39 2024 +0200

    ada: Fix test for giving hint on ambiguous aggregate
    
    In the case the type of an aggregate cannot be determined due to
    an ambiguity, caused by the existence of container aggregates,
    a hint can be given by GNAT. The test for giving this hint should
    be the Ada language version, not the fact that extensions are allowed.
    Now fixed.
    
    There is no impact on code generation.
    
    gcc/ada/
    
            * sem_util.adb (Check_Ambiguous_Aggregate): Fix test.

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

diff --git a/gcc/ada/sem_util.adb b/gcc/ada/sem_util.adb
index e8120c2addac..3d12f552f41b 100644
--- a/gcc/ada/sem_util.adb
+++ b/gcc/ada/sem_util.adb
@@ -2387,7 +2387,7 @@ package body Sem_Util is
       Actual : Node_Id;
 
    begin
-      if All_Extensions_Allowed then
+      if Ada_Version >= Ada_2022 then
          Actual := First_Actual (Call);
          while Present (Actual) loop
             if Nkind (Actual) = N_Aggregate then