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.

diff --git a/gcc/ada/sem_ch3.adb b/gcc/ada/sem_ch3.adb
index a8764db65032ccae54c0013e74c3e94e61d48b3a..4161ce39fa3e9c3dc9f88d1e172acd659c5d7652 100644 (file)
--- 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