except.c (expand_start_all_catch): If the machine needs a nonlocal_goto_receiver...

	* except.c (expand_start_all_catch): If the machine needs a
	nonlocal_goto_receiver, add one at the start of the exception
	handler.
	(expand_leftover_cleanups): Likewise.
Potential fix for eh on alpha, rs6000, and hppa.

From-SVN: r14060

diff --git a/gcc/except.c b/gcc/except.c
index 91afbc3052b60e4c5e57e771c0b04f887d5026a2..225b656c519f17463e978b01a2841a9101655b24 100644 (file)
--- a/gcc/except.c
+++ b/gcc/except.c
@@ -1159,6 +1159,12 @@ expand_leftover_cleanups ()
       /* Output the label for the start of the exception handler.  */
       emit_label (entry->exception_handler_label);
 
+#ifdef HAVE_nonlocal_goto_receiver
+      if (! exceptions_via_longjmp)
+       if (HAVE_nonlocal_goto_receiver)
+         emit_insn (gen_nonlocal_goto_receiver ());
+#endif
+
       /* And now generate the insns for the handler.  */
       expand_expr (entry->finalization, const0_rtx, VOIDmode, 0);
 
@@ -1252,6 +1258,12 @@ expand_start_all_catch ()
         end up being the handler.  */
       emit_label (entry->exception_handler_label);
 
+#ifdef HAVE_nonlocal_goto_receiver
+      if (! exceptions_via_longjmp)
+       if (HAVE_nonlocal_goto_receiver)
+         emit_insn (gen_nonlocal_goto_receiver ());
+#endif
+
       /* When we get down to the matching entry for this try block, stop.  */
       if (entry->finalization == integer_zero_node)
        {