Mercurial > hg > CbC > CbC_gcc
view gcc/testsuite/gfortran.dg/graphite/vect-pr94043.f90 @ 152:2b5abeee2509
update gcc11
author | anatofuz |
---|---|
date | Mon, 25 May 2020 07:50:57 +0900 |
parents | |
children |
line wrap: on
line source
! { dg-do compile } ! { dg-additional-options "-O3 -ftree-parallelize-loops=2 -fno-tree-dce" } ! As PR94043, test it to be compiled successfully without ICE. program yw integer :: hx(6, 6) integer :: ps = 1, e2 = 1 do ps = 1, 6 do e2 = 1, 6 hx(e2, ps) = 0 if (ps >= 5 .and. e2 >= 5) then hx(e2, ps) = hx(1, 1) end if end do end do end program