(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 a49b621dcafb583e70ed49c2c728d57537569466..849f4042ad8425dbf6ba90afdb32e6e93a9f8968 100644 (file)
--- 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"