Sign in
chromium
/
chromiumos
/
third_party
/
gcc
/
refs/heads/stabilize-6812.14.B
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
gomp
/
omp_do_concurrent.f90
blob: 83204791d95373a47718dd11838965d58fc8bc72 [
file
] [
log
] [
blame
]
!
{
dg
-
do
compile
}
!
{
dg
-
options
"-fopenmp"
}
!
!
PR fortran
/
60127
!
!
OpenMP
4.0
doesn
't permit DO CONCURRENT (yet)
!
!$omp do
do concurrent(i=1:5) ! { dg-error "OMP DO cannot be a DO CONCURRENT loop" }
print *, '
Hello
'
end do
end