OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Only copy PBB_DOMAIN when it is initialized.

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

	* graphite-sese-to-poly.c (new_pbb_from_pbb): Only copy PBB_DOMAIN
	when it is initialized.

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

From-SVN: r169219
This commit is contained in:
Sebastian Pop 2011-01-25 06:48:42 +00:00 committed by Sebastian Pop
parent 5c640e296a
commit 38013f25bc
5 changed files with 34 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gcc/ChangeLog
View File

@ -1,3 +1,8 @@
2011-01-25 Sebastian Pop <sebastian.pop@amd.com>
* graphite-sese-to-poly.c (new_pbb_from_pbb): Only copy PBB_DOMAIN
when it is initialized.
2011-01-25 Sebastian Pop <sebastian.pop@amd.com>
* graphite-scop-detection.c (stmt_has_simple_data_refs_p): Update

7
gcc/ChangeLog.graphite
View File

@ -1,3 +1,10 @@
2011-01-19 Sebastian Pop <sebastian.pop@amd.com>
* graphite-sese-to-poly.c (new_pbb_from_pbb): Only copy PBB_DOMAIN
when it is initialized.
* gfortran.dg/graphite/id-23.f: New.
2011-01-19 Sebastian Pop <sebastian.pop@amd.com>
* graphite-scop-detection.c (stmt_has_simple_data_refs_p): Update

6
gcc/graphite-sese-to-poly.c
View File

@ -2152,9 +2152,11 @@ new_pbb_from_pbb (scop_p scop, poly_bb_p pbb, basic_block bb)
if (VEC_index (poly_bb_p, SCOP_BBS (scop), index) == pbb)
break;
if (PBB_DOMAIN (pbb))
ppl_new_Pointset_Powerset_C_Polyhedron_from_Pointset_Powerset_C_Polyhedron
(&PBB_DOMAIN (pbb1), PBB_DOMAIN (pbb));
GBB_PBB (gbb1) = pbb1;
ppl_new_Pointset_Powerset_C_Polyhedron_from_Pointset_Powerset_C_Polyhedron
(&PBB_DOMAIN (pbb1), PBB_DOMAIN (pbb));
GBB_CONDITIONS (gbb1) = VEC_copy (gimple, heap, GBB_CONDITIONS (gbb));
GBB_CONDITION_CASES (gbb1) = VEC_copy (gimple, heap, GBB_CONDITION_CASES (gbb));
VEC_safe_insert (poly_bb_p, heap, SCOP_BBS (scop), index + 1, pbb1);

6
gcc/testsuite/ChangeLog
View File

@ -1,4 +1,8 @@
2011-01-21 Sebastian Pop <sebastian.pop@amd.com>
2011-01-25 Sebastian Pop <sebastian.pop@amd.com>
* gfortran.dg/graphite/id-23.f: New.
2011-01-25 Sebastian Pop <sebastian.pop@amd.com>
* gfortran.dg/graphite/interchange-3.f90: Un-XFAILed.

13
gcc/testsuite/gfortran.dg/graphite/id-23.f Normal file
View File

@ -0,0 +1,13 @@
SUBROUTINE CAMB(RX2,RTX,NUM)
DIMENSION RX2(NUM,NUM),RTX(NUM,NUM)
DO I=1,NUM
DO J=1,I
DO M=1,NUM
RX2(I,J)=RX2(I,J)+RTX(M,I)
END DO
END DO
END DO
IF (RX2(I,1).LE.EIGCT2) THEN
RTX(I,1)=4.0D+00
END IF
END