From: Jim Wilson <wilson@gcc.gnu.org>
Date: Thu, 31 Dec 1992 22:23:00 +0000 (-0800)
Subject: (call_internal, call_value_internal): Use 'l' for
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=eff864abc33227ebe24ec5b89c744311e2aff332;p=gcc.git

(call_internal, call_value_internal): Use 'l' for
match_scratch constraint not 'd'.

From-SVN: r3026
---

diff --git a/gcc/config/i960/i960.md b/gcc/config/i960/i960.md
index 59ead2b103d..5b5bdb65fea 100644
--- a/gcc/config/i960/i960.md
+++ b/gcc/config/i960/i960.md
@@ -2091,11 +2091,14 @@
   DONE;
 }")
 
+;; We need a call saved register allocated for the match_scratch, so we use
+;; 'l' because all local registers are call saved.
+
 (define_insn "call_internal"
   [(call (match_operand:SI 0 "general_operand" "g")
 	 (match_operand:SI 1 "immediate_operand" "i"))
    (use (match_operand:SI 2 "address_operand" "p"))
-   (clobber (match_scratch:SI 3 "=&d"))]
+   (clobber (match_scratch:SI 3 "=&l"))]
   ""
   "* return i960_output_call_insn (operands[0], operands[1], operands[2],
 				   operands[3], insn);"
@@ -2113,12 +2116,15 @@
   DONE;
 }")
 
+;; We need a call saved register allocated for the match_scratch, so we use
+;; 'l' because all local registers are call saved.
+
 (define_insn "call_value_internal"
   [(set (match_operand 0 "register_operand" "=d")
 	(call (match_operand:SI 1 "general_operand" "g")
 	      (match_operand:SI 2 "immediate_operand" "i")))
    (use (match_operand:SI 3 "address_operand" "p"))
-   (clobber (match_scratch:SI 4 "=&d"))]
+   (clobber (match_scratch:SI 4 "=&l"))]
   ""
   "* return i960_output_call_insn (operands[1], operands[2], operands[3],
 				   operands[4], insn);"