mirror/gcc
2
0
Fork 0
mirror of git://gcc.gnu.org/git/gcc.git synced 2025-04-18 01:50:33 +08:00
Code Issues Packages Projects Releases Wiki Activity

Fix gamess: the only constant phi nodes with one argument are is_gimple_min_invariant and SSA_NAME_IS_DEFAULT_DEF.

Browse Source 
2010-07-28  Sebastian Pop  <sebastian.pop@amd.com>

	* graphite-sese-to-poly.c (rewrite_close_phi_out_of_ssa): The only
	constant phi nodes with one argument are is_gimple_min_invariant
	and SSA_NAME_IS_DEFAULT_DEF.

	* gfortran.dg/graphite/id-22.f: New.

From-SVN: r163168
This commit is contained in:
Sebastian Pop 2010-08-11 20:31:14 +00:00 committed by Sebastian Pop
parent aa91c4cc4d
commit 974335d63c
5 changed files with 30 additions and 3 deletions

6
gcc/ChangeLog

@ -1,3 +1,9 @@
2010-08-02 Sebastian Pop <sebastian.pop@amd.com>
* graphite-sese-to-poly.c (rewrite_close_phi_out_of_ssa): The only
constant phi nodes with one argument are is_gimple_min_invariant
and SSA_NAME_IS_DEFAULT_DEF.
2010-08-02 Andreas Simbuerger <simbuerg@fim.uni-passau.de>
* graphite-cloog-util.c (oppose_constraint):

8
gcc/ChangeLog.graphite

@ -1,3 +1,11 @@
2010-07-28 Sebastian Pop <sebastian.pop@amd.com>
* graphite-sese-to-poly.c (rewrite_close_phi_out_of_ssa): The only
constant phi nodes with one argument are is_gimple_min_invariant
and SSA_NAME_IS_DEFAULT_DEF.
* gfortran.dg/graphite/id-22.f: New.
2010-07-27 Andreas Simbuerger <simbuerg@fim.uni-passau.de>
* graphite.c (graphite_initialize): Do not initialize

5
gcc/graphite-sese-to-poly.c

@ -2240,10 +2240,9 @@ rewrite_close_phi_out_of_ssa (gimple_stmt_iterator *psi, sese region)
gcc_assert (gimple_phi_num_args (phi) == 1);
/* The phi node can be a non close phi node, when its argument is
invariant, or when it is defined in the same loop as the phi node. */
invariant, or a default definition. */
if (is_gimple_min_invariant (arg)
|| SSA_NAME_IS_DEFAULT_DEF (arg)
|| gimple_bb (SSA_NAME_DEF_STMT (arg))->loop_father == bb->loop_father)
|| SSA_NAME_IS_DEFAULT_DEF (arg))
{
propagate_expr_outside_region (res, arg, region);
gsi_next (psi);

4
gcc/testsuite/ChangeLog

@ -1,3 +1,7 @@
2010-08-02 Sebastian Pop <sebastian.pop@amd.com>
* gfortran.dg/graphite/id-22.f: New.
2010-08-02 Sebastian Pop <sebastian.pop@amd.com>
* gcc.dg/graphite/id-26.c: New.

10
gcc/testsuite/gfortran.dg/graphite/id-22.f Normal file

@ -0,0 +1,10 @@
! { dg-options "-O3 -ffast-math" }
COMMON /NONEQ / UNZOR
DO ITS = 1, NTS
DO JATOM = 1, NAT
IF(IEF.EQ.5.OR.IEF.EQ.8)
* UNZOR = UNZOR + 8
ENDDO
ENDDO
END