[gcc r15-3104] ada: First controlling parameter aspect

[Marc Poulhi?s via Gcc-cvs]

https://gcc.gnu.org/g:4522f1f6e31a606d1c9784eb5790b51e5e194bc7

commit r15-3104-g4522f1f6e31a606d1c9784eb5790b51e5e194bc7
Author: Javier Miranda <mira...@adacore.com>
Date:   Mon Aug 5 20:03:01 2024 +0000

    ada: First controlling parameter aspect
    
    gcc/ada/
    
            * sem_ch13.adb (Analyze_One_Aspect): Temporarily remove reporting
            an error when the new aspect is set to True and the extensions are
            not enabled.

Diff:
---
 gcc/ada/sem_ch13.adb | 3 ---
 1 file changed, 3 deletions(-)

diff --git a/gcc/ada/sem_ch13.adb b/gcc/ada/sem_ch13.adb
index f4ff3a282734..3487931bf4d7 100644
--- a/gcc/ada/sem_ch13.adb
+++ b/gcc/ada/sem_ch13.adb
@@ -4524,9 +4524,6 @@ package body Sem_Ch13 is
                         if (No (Expr) or else Entity (Expr) = Standard_True)
                           and then not Core_Extensions_Allowed
                         then
-                           Error_Msg_GNAT_Extension
-                             ("'First_'Controlling_'Parameter", Sloc (Aspect),
-                              Is_Core_Extension => True);
                            goto Continue;
                         end if;