Do not consider COMPLEX_TYPE as fold_convertible_p

	PR middle-end/71606
	* fold-const.c (fold_convertible_p): As COMPLEX_TYPE
	folding produces SAVE_EXPRs, thus return false for the type.
	* gcc.dg/torture/pr71606.c: New test.

From-SVN: r238157

gcc/ChangeLog

+2016-07-08  Martin Liska  <mliska@suse.cz>
+
+	PR middle-end/71606
+	* fold-const.c (fold_convertible_p): As COMPLEX_TYPE
+	folding produces SAVE_EXPRs, thus return false for the type.
+
 2016-07-07  Martin Liska  <mliska@suse.cz>
 
 	* file-find.c (remove_prefix): New function.

gcc/fold-const.c

@@ -2192,7 +2192,6 @@ fold_convertible_p (const_tree type, const_tree arg)
 
     case REAL_TYPE:
     case FIXED_POINT_TYPE:
-    case COMPLEX_TYPE:
     case VECTOR_TYPE:
     case VOID_TYPE:
       return TREE_CODE (type) == TREE_CODE (orig);

gcc/testsuite/ChangeLog

+2016-07-08  Martin Liska  <mliska@suse.cz>
+
+	* gcc.dg/torture/pr71606.c: New test.
+
 2016-07-07  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 
 	PR fortran/71764

gcc/testsuite/gcc.dg/torture/pr71606.c

+_Complex a;
+void fn1 ();
+
+int main () {
+  fn1 (a);
+  return 0;
+}
+
+void fn1 (__complex__ long double p1) {
+  __imag__ p1 = 6.0L;
+}