Ada: Remove left-overs of front-end exception mechanism

It was removed from the compiler a few releases ago.

gcc/ada/
	* gcc-interface/Makefile.in (gnatlib-sjlj): Delete.
	(gnatlib-zcx): Do not modify Frontend_Exceptions constant.
	* libgnat/system-linux-loongarch.ads (Frontend_Exceptions): Delete.

diff --git a/gcc/ada/gcc-interface/Makefile.in b/gcc/ada/gcc-interface/Makefile.in
index 0666fc00bb83bf501ca10956d23f917284928cf4..c1a6bbbf5b5fc5b7924a893dd18043044e43d09c 100644 (file)
--- a/gcc/ada/gcc-interface/Makefile.in
+++ b/gcc/ada/gcc-interface/Makefile.in
@@ -822,35 +822,6 @@ gnatlib-shared:
             PICFLAG_FOR_TARGET="$(PICFLAG_FOR_TARGET)" \
             $(GNATLIB_SHARED)
 
-# When building a SJLJ runtime for VxWorks, we need to ensure that the extra
-# linker options needed for ZCX are not passed to prevent the inclusion of
-# useless objects and potential troubles from the presence of extra symbols
-# and references in some configurations.  The inhibition is performed by
-# commenting the pragma instead of deleting the line, as the latter might
-# result in getting multiple blank lines, hence possible style check errors.
-gnatlib-sjlj:
-       $(MAKE) $(FLAGS_TO_PASS) \
-            EH_MECHANISM="" \
-            MULTISUBDIR="$(MULTISUBDIR)" \
-            THREAD_KIND="$(THREAD_KIND)" \
-            LN_S="$(LN_S)" \
-            ../stamp-gnatlib1-$(RTSDIR)
-       sed \
-         -e 's/Frontend_Exceptions.*/Frontend_Exceptions       : constant Boolean := True;/' \
-         -e 's/ZCX_By_Default.*/ZCX_By_Default            : constant Boolean := False;/' \
-         $(RTSDIR)/system.ads > $(RTSDIR)/s.ads
-       $(MV) $(RTSDIR)/s.ads $(RTSDIR)/system.ads
-       $(MAKE) $(FLAGS_TO_PASS) \
-            EH_MECHANISM="" \
-            GNATLIBFLAGS="$(GNATLIBFLAGS)" \
-            GNATLIBCFLAGS="$(GNATLIBCFLAGS)" \
-            GNATLIBCFLAGS_FOR_C="$(GNATLIBCFLAGS_FOR_C)" \
-            FORCE_DEBUG_ADAFLAGS="$(FORCE_DEBUG_ADAFLAGS)" \
-            MULTISUBDIR="$(MULTISUBDIR)" \
-            THREAD_KIND="$(THREAD_KIND)" \
-            LN_S="$(LN_S)" \
-            gnatlib
-
 gnatlib-zcx:
        $(MAKE) $(FLAGS_TO_PASS) \
             EH_MECHANISM="-gcc" \
@@ -859,7 +830,6 @@ gnatlib-zcx:
             LN_S="$(LN_S)" \
             ../stamp-gnatlib1-$(RTSDIR)
        sed \
-         -e 's/Frontend_Exceptions.*/Frontend_Exceptions       : constant Boolean := False;/' \
          -e 's/ZCX_By_Default.*/ZCX_By_Default            : constant Boolean := True;/' \
          $(RTSDIR)/system.ads > $(RTSDIR)/s.ads
        $(MV) $(RTSDIR)/s.ads $(RTSDIR)/system.ads

diff --git a/gcc/ada/libgnat/system-linux-loongarch.ads b/gcc/ada/libgnat/system-linux-loongarch.ads
index d44724df3050af782da4d8ae5511c7fe4e0a2249..79269d20839a5679889a5f3507ec583103106512 100644 (file)
--- a/gcc/ada/libgnat/system-linux-loongarch.ads
+++ b/gcc/ada/libgnat/system-linux-loongarch.ads
@@ -139,7 +139,6 @@ private
    Always_Compatible_Rep     : constant Boolean := False;
    Suppress_Standard_Library : constant Boolean := False;
    Use_Ada_Main_Program_Name : constant Boolean := False;
-   Frontend_Exceptions       : constant Boolean := False;
    ZCX_By_Default            : constant Boolean := True;
 
 end System;