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

re PR tree-optimization/36967 (segfault in is_gimple_real_type with -fpredictive-commoning -ffast-math)

Browse Source 
2008-07-30  Richard Guenther  <rguenther@suse.de>

	PR tree-optimization/36967
	* tree-predcom.c (remove_stmt): Use gimple_assign_ssa_name_copy_p.
	Release defs of statements we remove.

	* gfortran.dg/pr36967.f: New testcase.

From-SVN: r138318
This commit is contained in:
Richard Guenther 2008-07-30 15:43:42 +00:00 committed by Richard Biener
parent 44bfa35b17
commit 5f8ecf453f
4 changed files with 39 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gcc/ChangeLog
View File

@ -1,3 +1,9 @@
2008-07-30 Richard Guenther <rguenther@suse.de>
PR tree-optimization/36967
* tree-predcom.c (remove_stmt): Use gimple_assign_ssa_name_copy_p.
Release defs of statements we remove.
2008-07-30 Nathan Froyd <froydnj@codesourcery.com>
* config/arm/arm.c (arm_expand_prologue): Use 0-length rtvec

5
gcc/testsuite/ChangeLog
View File

@ -1,3 +1,8 @@
2008-07-30 Richard Guenther <rguenther@suse.de>
PR tree-optimization/36967
* gfortran.dg/pr36967.f: New testcase.
2008-07-30 Rafael Avila de Espindola <espindola@google.com>
* gcc.dg/visibility-14.c: New test.

25
gcc/testsuite/gfortran.dg/pr36967.f Normal file
View File

@ -0,0 +1,25 @@
! { dg-options "-O2 -fpredictive-commoning" }
subroutine foo(x,y,n)
integer n
real*8 y(n,n,n),x(n,n,n)
integer k, j, i
do k = 2, n-1
do j = 2, n-1
do I = 2, n-1
y(i,j,k) = y(i,j,k)
+ + (x(i-1,j-1,k)
+ + x(i,j-1,k-1)
+ + x(i,j+1,k-1)
+ + x(i,j+1,k+1)
+ + x(i+1,j,k+1))
+ + (x(i-1,j-1,k-1)
+ + x(i+1,j-1,k-1)
+ + x(i-1,j+1,k-1)
+ + x(i+1,j+1,k-1)
+ + x(i-1,j+1,k+1)
+ + x(i+1,j+1,k+1))
enddo
enddo
enddo
return
end

5
gcc/tree-predcom.c
View File

@ -1707,7 +1707,7 @@ remove_stmt (gimple stmt)
remove_phi_node (&psi, true);
if (!next
|| !gimple_assign_copy_p (next)
|| !gimple_assign_ssa_name_copy_p (next)
|| gimple_assign_rhs1 (next) != name)
return;
@ -1727,9 +1727,10 @@ remove_stmt (gimple stmt)
mark_virtual_ops_for_renaming (stmt);
gsi_remove (&bsi, true);
release_defs (stmt);
if (!next
|| !gimple_assign_copy_p (next)
|| !gimple_assign_ssa_name_copy_p (next)
|| gimple_assign_rhs1 (next) != name)
return;