Do not create the temporary array for reductions into VAR_DECL, PARM_DECL, and RESULT_DECL.

2011-01-25  Sebastian Pop  <sebastian.pop@amd.com>

	* graphite-sese-to-poly.c (close_phi_written_to_memory): Also allow
	VAR_DECL, PARM_DECL, and RESULT_DECL.

	* gfortran.dg/graphite/interchange-3.f90: Un-XFAILed.

From-SVN: r169213

gcc/ChangeLog

 2011-01-25  Sebastian Pop  <sebastian.pop@amd.com>
 
+	* graphite-sese-to-poly.c (close_phi_written_to_memory): Also allow
+	VAR_DECL, PARM_DECL, and RESULT_DECL.
+
+2011-01-25  Sebastian Pop  <sebastian.pop@amd.com>
+
 	* graphite-dependences.c (reduction_dr_1): Allow several reductions
 	in a reduction PBB.
 	* graphite-sese-to-poly.c (split_reduction_stmt): Do not split PBBs

gcc/ChangeLog.graphite

 2011-01-17  Sebastian Pop  <sebastian.pop@amd.com>
 
+	* graphite-sese-to-poly.c (close_phi_written_to_memory): Also allow
+	VAR_DECL, PARM_DECL, and RESULT_DECL.
+
+	* gfortran.dg/graphite/interchange-3.f90: Un-XFAILed.
+
+2011-01-17  Sebastian Pop  <sebastian.pop@amd.com>
+
 	* graphite-dependences.c (reduction_dr_1): Allow several reductions
 	in a reduction PBB.
 	* graphite-sese-to-poly.c (split_reduction_stmt): Do not split PBBs

gcc/graphite-sese-to-poly.c

@@ -2968,7 +2968,10 @@ close_phi_written_to_memory (gimple close_phi)
 	&& gimple_code (stmt) == GIMPLE_ASSIGN
 	&& (res = gimple_assign_lhs (stmt))
 	&& (TREE_CODE (res) == ARRAY_REF
-	    || TREE_CODE (res) == MEM_REF))
+	    || TREE_CODE (res) == MEM_REF
+	    || TREE_CODE (res) == VAR_DECL
+	    || TREE_CODE (res) == PARM_DECL
+	    || TREE_CODE (res) == RESULT_DECL))
       return res;
 
   return NULL_TREE;

gcc/testsuite/ChangeLog

+2011-01-21  Sebastian Pop  <sebastian.pop@amd.com>
+
+	* gfortran.dg/graphite/interchange-3.f90: Un-XFAILed.
+
 2011-01-25  Sebastian Pop  <sebastian.pop@amd.com>
 
 	* gcc.dg/graphite/block-0.c: Un-XFAILed.

gcc/testsuite/gfortran.dg/graphite/interchange-3.f90

@@ -24,5 +24,5 @@ Program FOO
 
 end Program FOO
 
-! { dg-final { scan-tree-dump-times "will be interchanged" 1 "graphite" { xfail *-*-* } } }
+! { dg-final { scan-tree-dump-times "will be interchanged" 1 "graphite" } }
 ! { dg-final { cleanup-tree-dump "graphite" } }