From e9066cf788e689a119a068ecf38e17c666bfb6a4 Mon Sep 17 00:00:00 2001
From: Ronan Desplanques <desplanques@adacore.com>
Date: Thu, 6 Mar 2025 12:54:44 +0100
Subject: [PATCH] ada: Tweak error recovery path

Before this patch, the constant mark of object declarations was stripped
in some error situations. This behavior is currently not useful so this
patch removes it.

gcc/ada/ChangeLog:

	* sem_ch3.adb (Analyze_Object_Declaration): Tweak error handling.
---
 gcc/ada/sem_ch3.adb | 1 -
 1 file changed, 1 deletion(-)

diff --git a/gcc/ada/sem_ch3.adb b/gcc/ada/sem_ch3.adb
index a8764db6503..4161ce39fa3 100644
--- a/gcc/ada/sem_ch3.adb
+++ b/gcc/ada/sem_ch3.adb
@@ -4552,7 +4552,6 @@ package body Sem_Ch3 is
             Error_Msg_N
               ("\declaration requires an initialization expression",
                 N);
-            Set_Constant_Present (N, False);
 
          --  In Ada 83, deferred constant must be of private type
 
-- 
2.47.2