* expr.c (expand_builtin, case MEMSET): Set MEM_IN_STRUCT_P

	if the argument is the address of a structure or array.
	* configure.in: Enable Haifa scheduler by default for SPARC.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@19405 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index c95f9d6..672c613 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,10 @@
+Fri Apr 24 16:11:47 1998  John Carr  <jfc@mit.edu>
+
+       * expr.c (expand_builtin, case MEMSET): Set MEM_IN_STRUCT_P
+       if the argument is the address of a structure or array.
+
+       * configure.in: Enable Haifa scheduler by default for SPARC.
+
 Fri Apr 24 20:55:47 1998  J"orn Rennecke <amylaar@cygnus.co.uk>
 
        * cse.c (cse_set_around_loop): Don't do optimization when

diff --git a/gcc/configure.in b/gcc/configure.in
index 61bfc9a..689b649 100644 (file)
--- a/gcc/configure.in
+++ b/gcc/configure.in
@@ -2891,7 +2891,7 @@ fi
 if [[ x$enable_haifa = x ]]
 then
   case $target in
-    alpha*-* | hppa1.?-* | powerpc*-* | rs6000-*)
+    alpha*-* | hppa1.?-* | powerpc*-* | rs6000-* | *sparc-*)
       enable_haifa=yes;;
   esac
 fi

diff --git a/gcc/expr.c b/gcc/expr.c
index f2b97d3..8473181 100644 (file)
--- a/gcc/expr.c
+++ b/gcc/expr.c
@@ -8634,7 +8634,13 @@ expand_builtin (exp, target, subtarget, mode, ignore)
          /* There could be a void* cast on top of the object.  */
          while (TREE_CODE (dest) == NOP_EXPR)
            dest = TREE_OPERAND (dest, 0);
-         type = TREE_TYPE (TREE_TYPE (dest));
+
+         if (TREE_CODE (dest) == ADDR_EXPR)
+           /* If this is the address of an object, check whether the
+              object is an array.  */
+           type = TREE_TYPE (TREE_OPERAND (dest, 0));
+         else
+           type = TREE_TYPE (TREE_TYPE (dest));
          MEM_IN_STRUCT_P (dest_mem) = AGGREGATE_TYPE_P (type);
 
          dest_addr = clear_storage (dest_mem, len_rtx, dest_align);