re PR middle-end/33449 (ICE for fortran code with -O2 -ftree-vectorize)

PR middle-end/33449
	* gfortran.dg/pr33449.f90: New test.

From-SVN: r128543
This commit is contained in:
Francois-Xavier Coudert 2007-09-17 10:42:29 +00:00 committed by François-Xavier Coudert
parent fd735b6a2e
commit 8e4aec95cc
2 changed files with 23 additions and 0 deletions

View File

@ -1,3 +1,8 @@
2007-09-17 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
PR middle-end/33449
* gfortran.dg/pr33449.f90: New test.
2007-09-17 Tobias Burnus <burnus@net-b.de>
* gfortran.dg/interface_15.f90: Compile with -std=f95.

View File

@ -0,0 +1,18 @@
! { dg-do compile }
! { dg-options "-O2 -ftree-vectorize" }
!
! Testcase for vectorization (see PR33449).
!
subroutine dlarre (w, iblock, work)
integer m, i, iblock(*)
double precision w(*), work(*)
m = 0
do jblk = 1, 10
do i = 1, 10
m = m + 1
w(m) = -work(i)
iblock(m) = 0
end do
end do
end