(type_list_equal): If the types of the default arguments

        differ, the lists do not match.

From-SVN: r8015

1 files changed, 3 insertions, 1 deletions

diff --git a/gcc/tree.c b/gcc/tree.c
index 7b8fb51..95be3652 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;
 	}
     }