tree.c (simple_cst_equal, [...]): OK if the elts are identical.

	* tree.c (simple_cst_equal, case CONSTRUCTOR): OK if the elts are
	identical.

From-SVN: r21425

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 28fdf7701b68eab8d24e3c1e0c750154f3d62081..c92cc2c5bda12d6f7dcb1bb6bc50a9c73e543a21 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+Mon Jul 27 00:54:41 1998  Jason Merrill  <jason@yorick.cygnus.com>
+
+       * tree.c (simple_cst_equal, case CONSTRUCTOR): OK if the elts are
+       identical.
+
 Mon Jul 27 22:18:36 1998  Jeffrey A Law  (law@cygnus.com)
 
        * pa.c (move_operand): Accept CONSTANT_P_RTX.

diff --git a/gcc/tree.c b/gcc/tree.c
index b02e87e8af45686b9a7269e1ca062cd025d77f96..83c42c565261da782902711ebcaa1ea82e0e371f 100644 (file)
--- a/gcc/tree.c
+++ b/gcc/tree.c
@@ -3984,7 +3984,10 @@ simple_cst_equal (t1, t2)
                  TREE_STRING_LENGTH (t1));
 
     case CONSTRUCTOR:
-      abort ();
+      if (CONSTRUCTOR_ELTS (t1) == CONSTRUCTOR_ELTS (t2))
+       return 1;
+      else
+       abort ();
 
     case SAVE_EXPR:
       return simple_cst_equal (TREE_OPERAND (t1, 0), TREE_OPERAND (t2, 0));