In gcc: 2000-08-27 Geoff Keating <geoffk@cygnus.com>

In gcc:
2000-08-27  Geoff Keating  <geoffk@cygnus.com>

	* config/rs6000/rs6000.md (movdi_internal64+5): Make SUBREG-safe
	by using gen_lowpart_common.
	(movdi_internal64+6): Likewise.

In gcc/testsuite:
2000-08-27  Geoff Keating  <geoffk@cygnus.com>

	* gcc.c-torture/compile/20000825-1.c: New test.

From-SVN: r36005

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 9384f5cb37e3e51917065a83281eff586e0ae445..62d0ebf2c6a206c1df2b04908cefbf7a93d0c6e5 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,9 @@
+2000-08-27  Geoff Keating  <geoffk@cygnus.com>
+
+       * config/rs6000/rs6000.md (movdi_internal64+5): Make SUBREG-safe
+       by using gen_lowpart_common.
+       (movdi_internal64+6): Likewise.
+
 2000-08-26  Alexandre Oliva  <aoliva@redhat.com>
 
        * tm.texi (FINI_SECTION_ASM_OP, CRT_CALL_STATIC_FUNCTION):

diff --git a/gcc/config/rs6000/rs6000.md b/gcc/config/rs6000/rs6000.md
index 5005f737762721dbdee268b01c01b428a052c42c..5ea5bc864ebf6339d9906a4f39f23c062cd9e00f 100644 (file)
--- a/gcc/config/rs6000/rs6000.md
+++ b/gcc/config/rs6000/rs6000.md
@@ -8087,9 +8087,12 @@
   [(set (match_dup 0)
        (match_dup 2))
    (set (match_dup 0)
-       (zero_extend:DI (subreg:SI (match_dup 0) 0)))]
+       (zero_extend:DI (match_dup 3)))]
   "
-{ operands[2] = GEN_INT (CONST_DOUBLE_LOW (operands[1])); }")
+{ 
+  operands[2] = GEN_INT (CONST_DOUBLE_LOW (operands[1])); 
+  operands[3] = gen_lowpart_common (SImode, operands[0]);
+}")
 
 (define_split
   [(set (match_operand:DI 0 "gpc_reg_operand" "")
@@ -8102,12 +8105,13 @@
   [(set (match_dup 0)
        (match_dup 2))
    (set (match_dup 0)
-       (zero_extend:DI (subreg:SI (match_dup 0) 0)))]
+       (zero_extend:DI (match_dup 3)))]
   "
 {
 #if HOST_BITS_PER_WIDE_INT != 32
-operands[2] = GEN_INT ((INTVAL (operands[1]) << 32) >> 32);
+  operands[2] = GEN_INT ((INTVAL (operands[1]) << 32) >> 32);
 #endif
+  operands[3] = gen_lowpart_common (SImode, operands[0]);
 }")
 
 ;; 32-bit value in upper half of doubleword

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 392f268fb09095aa8e84a6c16df0a7b0114c9832..5f478db13cf7c858f35618dcb86c463419a5af0a 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2000-08-27  Geoff Keating  <geoffk@cygnus.com>
+
+       * gcc.c-torture/compile/20000825-1.c: New test.
+
 2000-08-26  Alexandre Oliva  <aoliva@redhat.com>
 
        * gcc.dg/dwarf2-2.c: New test.

diff --git a/gcc/testsuite/gcc.c-torture/compile/20000825-1.c b/gcc/testsuite/gcc.c-torture/compile/20000825-1.c
new file mode 100644 (file)
index 0000000..3c2e5bd
--- /dev/null
+++ b/gcc/testsuite/gcc.c-torture/compile/20000825-1.c
@@ -0,0 +1,31 @@
+typedef signed int      s32;
+typedef signed long     s64;
+typedef unsigned int    u32;
+typedef unsigned long   u64;
+
+extern __inline__ u32 foobar(int logmask)
+{
+        u32 ret = ~(1 << logmask);      // fails
+        // s32 ret = ~(1 << logmask);   // ok
+        // u64 ret = ~(1 << logmask);   // ok
+        // s64 ret = ~(1 << logmask);   // ok
+        return ret;
+}
+
+// This procedure compiles fine...
+u32 good(u32 var)
+{
+        var = foobar(0);
+        return var;
+}
+
+// This procedure does not compile...
+// Same as above, but formal parameter is a pointer
+// Both good() and fails() compile ok if we choose
+// a different type for "ret" in foobar().
+u32 fails(u32 *var)
+{
+        *var = foobar(0);
+        return *var;
+}
+