s390.md ("doloop_si64"): Reload input value directly into the register being decremented.

	* config/s390/s390.md ("doloop_si64"): Reload input value directly
	into the register being decremented.
	("doloop_si31", "doloop_di"): Likewise.
	("*doloop_si_long"): Adapt pattern.

From-SVN: r94078

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 87c472fe821d1eeee34b9baea833d498360b8c58..5d3e5530bbbc7b368f949ce5474bf8df2be65e34 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,10 @@
+2005-01-21  Ulrich Weigand  <uweigand@de.ibm.com>
+
+       * config/s390/s390.md ("doloop_si64"): Reload input value directly
+       into the register being decremented.
+       ("doloop_si31", "doloop_di"): Likewise.
+       ("*doloop_si_long"): Adapt pattern.
+
 2005-01-21  Ulrich Weigand  <uweigand@de.ibm.com>
 
        * config/s390/s390.h (HARD_REGNO_NREGS): Fix computation for

diff --git a/gcc/config/s390/s390.md b/gcc/config/s390/s390.md
index bc827bd97b44a654e45590ec81d9df96a6af84d8..4b8b58ad45c0cb0b129e92cb614dcb0e649a916f 100644 (file)
--- a/gcc/config/s390/s390.md
+++ b/gcc/config/s390/s390.md
@@ -7266,7 +7266,7 @@
           (pc)))
    (set (match_operand:SI 2 "nonimmediate_operand" "=1,?*m*d")
         (plus:SI (match_dup 1) (const_int -1)))
-   (clobber (match_scratch:SI 3 "=X,&d"))
+   (clobber (match_scratch:SI 3 "=X,&1"))
    (clobber (reg:CC 33))]
   "TARGET_CPU_ZARCH"
 {
@@ -7280,8 +7280,7 @@
   "&& reload_completed
    && (! REG_P (operands[2])
        || ! rtx_equal_p (operands[1], operands[2]))"
-  [(set (match_dup 3) (match_dup 1))
-   (parallel [(set (reg:CCAN 33)
+  [(parallel [(set (reg:CCAN 33)
                    (compare:CCAN (plus:SI (match_dup 3) (const_int -1))
                                  (const_int 0)))
               (set (match_dup 3) (plus:SI (match_dup 3) (const_int -1)))])
@@ -7305,7 +7304,7 @@
           (pc)))
    (set (match_operand:SI 2 "nonimmediate_operand" "=1,?*m*d")
         (plus:SI (match_dup 1) (const_int -1)))
-   (clobber (match_scratch:SI 3 "=X,&d"))
+   (clobber (match_scratch:SI 3 "=X,&1"))
    (clobber (reg:CC 33))]
   "!TARGET_CPU_ZARCH"
 {
@@ -7319,8 +7318,7 @@
   "&& reload_completed
    && (! REG_P (operands[2])
        || ! rtx_equal_p (operands[1], operands[2]))"
-  [(set (match_dup 3) (match_dup 1))
-   (parallel [(set (reg:CCAN 33)
+  [(parallel [(set (reg:CCAN 33)
                    (compare:CCAN (plus:SI (match_dup 3) (const_int -1))
                                  (const_int 0)))
               (set (match_dup 3) (plus:SI (match_dup 3) (const_int -1)))])
@@ -7347,7 +7345,7 @@
           (pc)))
    (set (match_operand:SI 2 "register_operand" "=1,?*m*d")
         (plus:SI (match_dup 1) (const_int -1)))
-   (clobber (match_scratch:SI 3 "=X,&d"))
+   (clobber (match_scratch:SI 3 "=X,&1"))
    (clobber (reg:CC 33))]
   "!TARGET_CPU_ZARCH"
 {
@@ -7369,9 +7367,9 @@
               (const_int 1))
           (label_ref (match_operand 0 "" ""))
           (pc)))
-   (set (match_operand:DI 2 "nonimmediate_operand" "=1,?*m*r")
+   (set (match_operand:DI 2 "nonimmediate_operand" "=1,?*m*d")
         (plus:DI (match_dup 1) (const_int -1)))
-   (clobber (match_scratch:DI 3 "=X,&d"))
+   (clobber (match_scratch:DI 3 "=X,&1"))
    (clobber (reg:CC 33))]
   "TARGET_64BIT"
 {
@@ -7385,8 +7383,7 @@
   "&& reload_completed
    && (! REG_P (operands[2])
        || ! rtx_equal_p (operands[1], operands[2]))"
-  [(set (match_dup 3) (match_dup 1))
-   (parallel [(set (reg:CCAN 33)
+  [(parallel [(set (reg:CCAN 33)
                    (compare:CCAN (plus:DI (match_dup 3) (const_int -1))
                                  (const_int 0)))
               (set (match_dup 3) (plus:DI (match_dup 3) (const_int -1)))])