diff options
| author | Dan Albert <danalbert@google.com> | 2015-06-17 11:09:54 -0700 |
|---|---|---|
| committer | Dan Albert <danalbert@google.com> | 2015-06-17 14:15:22 -0700 |
| commit | f378ebf14df0952eae870c9865bab8326aa8f137 (patch) | |
| tree | 31794503eb2a8c64ea5f313b93100f1163afcffb /gcc-4.4.3/libgomp/testsuite/libgomp.fortran/pr29629.f90 | |
| parent | 2c58169824949d3a597d9fa81931e001ef9b1bd0 (diff) | |
| download | toolchain_gcc-f378ebf14df0952eae870c9865bab8326aa8f137.tar.gz toolchain_gcc-f378ebf14df0952eae870c9865bab8326aa8f137.tar.bz2 toolchain_gcc-f378ebf14df0952eae870c9865bab8326aa8f137.zip | |
Delete old versions of GCC.
Change-Id: I710f125d905290e1024cbd67f48299861790c66c
Diffstat (limited to 'gcc-4.4.3/libgomp/testsuite/libgomp.fortran/pr29629.f90')
| -rw-r--r-- | gcc-4.4.3/libgomp/testsuite/libgomp.fortran/pr29629.f90 | 20 |
1 files changed, 0 insertions, 20 deletions
diff --git a/gcc-4.4.3/libgomp/testsuite/libgomp.fortran/pr29629.f90 b/gcc-4.4.3/libgomp/testsuite/libgomp.fortran/pr29629.f90 deleted file mode 100644 index 9ccddffb0..000000000 --- a/gcc-4.4.3/libgomp/testsuite/libgomp.fortran/pr29629.f90 +++ /dev/null @@ -1,20 +0,0 @@ -! PR fortran/29629 -! { dg-do run } - -program pr29629 - integer :: n - n = 10000 - if (any (func(n).ne.10000)) call abort - contains - function func(n) - integer, intent(in) :: n - integer, dimension(n) :: func - integer :: k - func = 0 -!$omp parallel do private(k), reduction(+:func), num_threads(4) - do k = 1, n - func = func + 1 - end do -!$omp end parallel do - end function -end program |