re PR middle-end/42180 (compiling induct.f90 with -ffast-math -O2…

re PR middle-end/42180 (compiling induct.f90 with  -ffast-math -O2 -fgraphite-identity ICEs gfortran)

Fix PR42180.

2009-12-18  Sebastian Pop  <sebastian.pop@amd.com>

	PR middle-end/42180
	* graphite-sese-to-poly.c (follow_ssa_with_commutative_ops): Handle
	GIMPLE_CALL.

	* testsuite/gfortran.dg/graphite/pr42180.f90: Add compile flags.

From-SVN: r155423

gcc/ChangeLog.graphite

 2009-12-18  Sebastian Pop  <sebastian.pop@amd.com>
 
+	Revert patch fixing PR middle-end/42221.
+
+2009-12-18  Sebastian Pop  <sebastian.pop@amd.com>
+
+	PR middle-end/42180
+	* graphite-sese-to-poly.c (follow_ssa_with_commutative_ops): Handle
+	GIMPLE_CALL.
+
+	* testsuite/gfortran.dg/graphite/pr42180.f90: Add compile flags.
+
+2009-12-18  Sebastian Pop  <sebastian.pop@amd.com>
+
 	PR middle-end/42180
 	* graphite-sese-to-poly.c (split_reduction_stmt): Do not split blocks
 	that contain only one statement.
 
+	* testsuite/gfortran.dg/graphite/pr42180.f90: New.
+
 2009-12-17  Sebastian Pop  <sebastian.pop@amd.com>
 
 	PR middle-end/42393

gcc/graphite-sese-to-poly.c

@@ -2501,7 +2501,8 @@ follow_ssa_with_commutative_ops (tree arg, tree lhs)
 
   stmt = SSA_NAME_DEF_STMT (arg);
 
-  if (gimple_code (stmt) == GIMPLE_NOP)
+  if (gimple_code (stmt) == GIMPLE_NOP
+      || gimple_code (stmt) == GIMPLE_CALL)
     return NULL;
 
   if (gimple_code (stmt) == GIMPLE_PHI)

gcc/testsuite/gfortran.dg/graphite/pr42180.f90

+! { dg-options "-ffast-math -O2 -fgraphite-identity" }
+
 module mcc_m
   integer, parameter, private :: longreal = selected_real_kind(15,90)
 contains