From: Jason Merrill <jason@yorick.cygnus.com>
Date: Mon, 27 Jul 1998 21:44:04 +0000 (+0000)
Subject: tree.c (simple_cst_equal, [...]): OK if the elts are identical.
X-Git-Tag: prereleases/egcs-1.1-prerelease~159
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=8e70e10d7020213951ed76365228b2bcd5357c39;p=thirdparty%2Fgcc.git

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: r21426
---

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 9ee81f128996..f8c47b543015 100644
--- 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:20:02 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 b02e87e8af45..83c42c565261 100644
--- 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));