diff options
Diffstat (limited to 'gcc-4.4.3/libgomp/testsuite/libgomp.fortran/pr35130.f90')
-rw-r--r-- | gcc-4.4.3/libgomp/testsuite/libgomp.fortran/pr35130.f90 | 20 |
1 files changed, 0 insertions, 20 deletions
diff --git a/gcc-4.4.3/libgomp/testsuite/libgomp.fortran/pr35130.f90 b/gcc-4.4.3/libgomp/testsuite/libgomp.fortran/pr35130.f90 deleted file mode 100644 index 50ff35152..000000000 --- a/gcc-4.4.3/libgomp/testsuite/libgomp.fortran/pr35130.f90 +++ /dev/null @@ -1,20 +0,0 @@ -! PR middle-end/35130 - -program pr35130 - implicit none - real, dimension(20) :: a - integer :: k - a(:) = 0.0 -!$omp parallel do private(k) - do k=1,size(a) - call inner(k) - end do -!$omp end parallel do - if (any (a.ne.42)) call abort -contains - subroutine inner(i) - implicit none - integer :: i - a(i) = 42 - end subroutine inner -end program pr35130 |