From: Richard Kenner <kenner@gcc.gnu.org>
Date: Wed, 10 Feb 1993 21:12:51 +0000 (-0500)
Subject: (call insns): Always reload gp after a full call.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=4ba7b922dd2f6d22a009352d85223d0e44283d02;p=gcc.git

(call insns): Always reload gp after a full call.

Use current_file_function_operand to see when we can use BSR.

From-SVN: r3458
---

diff --git a/gcc/config/alpha/alpha.md b/gcc/config/alpha/alpha.md
index a49b621dcaf..849f4042ad8 100644
--- a/gcc/config/alpha/alpha.md
+++ b/gcc/config/alpha/alpha.md
@@ -2198,12 +2198,7 @@
    (use (match_operand:DI 1 "" ""))
    (clobber (reg:DI 26))]
   ""
-  "*
-{ if (alpha_gp_dead_after (insn))
-    return \"jsr $26,($27),%1\";
-  else 
-    return \"jsr $26,($27),%1\;ldgp $29,0($26)\";
-}"
+  "jsr $26,($27),%1\;ldgp $29,0($26)"
   [(set_attr "type" "jsr")])
       
 (define_insn ""
@@ -2213,31 +2208,26 @@
    (use (match_operand:DI 2 "" ""))
    (clobber (reg:DI 26))]
   ""
-  "*
-{ if (alpha_gp_dead_after (insn))
-    return \"jsr $26,($27),%2\";
-  else 
-    return \"jsr $26,($27),%2\;ldgp $29,0($26)\";
-}"
+  "jsr $26,($27),%2\;ldgp $29,0($26)"
   [(set_attr "type" "jsr")])
 
 (define_insn ""
-  [(call (mem:DI (match_operand 1 "current_function_operand" "i"))
+  [(call (mem:DI (match_operand 1 "current_file_function_operand" "i"))
 	 (match_operand 0 "" ""))
    (use (match_dup 1))
    (clobber (reg:DI 26))]
   ""
-  "bsr $26,%F1"
+  "bsr $26,%1..ng"
   [(set_attr "type" "ibr")])
       
 (define_insn ""
   [(set (match_operand 0 "register_operand" "=rf")
-	(call (mem:DI (match_operand 1 "current_function_operand" "i"))
+	(call (mem:DI (match_operand 1 "current_file_function_operand" "i"))
 	      (match_operand 2 "" "")))
    (use (match_dup 1))
    (clobber (reg:DI 26))]
   ""
-  "bsr $26,%F1"
+  "bsr $26,%1..ng"
   [(set_attr "type" "ibr")])
 
 (define_insn "jump"