From: John David Anglin <dave@hiauly1.hia.nrc.ca>
Date: Fri, 31 May 2002 03:30:42 +0000 (+0000)
Subject: * pa.c (following_call): Check TARGET_JUMP_IN_DELAY.
X-Git-Tag: releases/gcc-3.3.0~4680
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=6d8d2bbc830adfe13a15aa234f43953cbfdf0b80;p=thirdparty%2Fgcc.git

* pa.c (following_call): Check TARGET_JUMP_IN_DELAY.

From-SVN: r54084
---

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 0b7e12ac87b8..675193a56f4f 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,7 @@
+2002-05-30  John David Anglin  <dave@hiauly1.hia.nrc.ca>
+
+	* pa.c (following_call): Check TARGET_JUMP_IN_DELAY.
+
 2002-05-31  Jason Thorpe  <thorpej@wasabisystems.com>
 
 	* config.gcc (ns32k-*-netbsd*): Set tm_file to
diff --git a/gcc/config/pa/pa.c b/gcc/config/pa/pa.c
index 67496011d252..354afd62d4b6 100644
--- a/gcc/config/pa/pa.c
+++ b/gcc/config/pa/pa.c
@@ -6897,11 +6897,7 @@ int
 following_call (insn)
      rtx insn;
 {
-  /* We do not place jumps into call delay slots when optimizing for the
-     PA8000 processor or when generating dwarf2 call frame information.  */
-  if (pa_cpu >= PROCESSOR_8000
-      || (! USING_SJLJ_EXCEPTIONS && flag_exceptions)
-      || flag_unwind_tables)
+  if (! TARGET_JUMP_IN_DELAY)
     return 0;
 
   /* Find the previous real insn, skipping NOTEs.  */