From: Jason Merrill <jason@yorick.cygnus.com>
Date: Mon, 27 Jul 1998 21:42:35 +0000 (+0000)
Subject: tree.c (simple_cst_equal, [...]): OK if the elts are identical.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=b3abfd6fc10e886efa58bf9a27b99bfefe843883;p=gcc.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: r21425
---

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 28fdf7701b6..c92cc2c5bda 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: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 b02e87e8af4..83c42c56526 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));