From: Jason Merrill <merrill@gnu.org>
Date: Thu, 1 Sep 1994 23:33:02 +0000 (+0000)
Subject: (type_list_equal): If the types of the default arguments
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=ac83e1bb1c764477e399672ca27e7ff0ec1fb736;p=gcc.git

(type_list_equal): If the types of the default arguments
        differ, the lists do not match.

From-SVN: r8015
---

diff --git a/gcc/tree.c b/gcc/tree.c
index 7b8fb5182c6..95be3652745 100644
--- a/gcc/tree.c
+++ b/gcc/tree.c
@@ -3059,7 +3059,9 @@ type_list_equal (l1, l2)
 	  int cmp = simple_cst_equal (TREE_PURPOSE (t1), TREE_PURPOSE (t2));
 	  if (cmp < 0)
 	    abort ();
-	  if (cmp == 0)
+	  if (cmp == 0
+	      || TREE_TYPE (TREE_PURPOSE (t1))
+	         != TREE_TYPE (TREE_PURPOSE (t2)))
 	    return 0;
 	}
     }