Back out latest change.
authorEric Botcazou <ebotcazou@gcc.gnu.org>
Thu, 26 Nov 2015 11:17:20 +0000 (11:17 +0000)
committerEric Botcazou <ebotcazou@gcc.gnu.org>
Thu, 26 Nov 2015 11:17:20 +0000 (11:17 +0000)
From-SVN: r230935

gcc/ada/ChangeLog
gcc/ada/gnatlink.adb

index d7df276aa1a2ee77a5823b81eee0d5661aae0928..331b81dfba78e49cf86d3d65f28b25f647aff4ce 100644 (file)
@@ -1,9 +1,3 @@
-2015-11-25  Eric Botcazou  <ebotcazou@adacore.com>
-
-       * gnatlink.adb (Gnatlink): Do not reinstate -fsjlj for the linker
-       from the switches saved in the ALI file but from the exception
-       settings.
-
 2015-11-25  Arnaud Charlet  <charlet@adacore.com>
 
        * lib-xref-spark_specific.adb
index 0d190eb1a31111849febb75d6dc4f2c9195f2d3e..67b07b23e3cff61474717620ff3a68ac04094e41 100644 (file)
@@ -1588,16 +1588,6 @@ begin
                   end if;
                end;
             end loop;
-
-            --  Pass -fsjlj to the linker with back-end SJLJ exceptions
-
-            if not ALIs.Table (A).Frontend_Exceptions
-              and then not ALIs.Table (A).Zero_Cost_Exceptions
-            then
-               Linker_Options.Increment_Last;
-               Linker_Options.Table
-                (Linker_Options.Last) := new String'("-fsjlj");
-            end if;
          end if;
       end;
    end if;