diff options
Diffstat (limited to 'gcc-4.4.3/libgomp/testsuite/libgomp.fortran/pr32550.f90')
-rw-r--r-- | gcc-4.4.3/libgomp/testsuite/libgomp.fortran/pr32550.f90 | 21 |
1 files changed, 0 insertions, 21 deletions
diff --git a/gcc-4.4.3/libgomp/testsuite/libgomp.fortran/pr32550.f90 b/gcc-4.4.3/libgomp/testsuite/libgomp.fortran/pr32550.f90 deleted file mode 100644 index 3a49dcf0a..000000000 --- a/gcc-4.4.3/libgomp/testsuite/libgomp.fortran/pr32550.f90 +++ /dev/null @@ -1,21 +0,0 @@ -! PR fortran/32550 -! { dg-do run } -! { dg-options "-static-libgcc" { target *-*-darwin* } } - - integer, pointer, save :: ptr - integer, target :: targ - integer :: e -!$omp threadprivate(ptr) - e = 0 - targ = 42 -!$omp parallel shared(targ) -!$omp single - ptr => targ -!$omp end single copyprivate(ptr) - if (ptr.ne.42) then -!$omp atomic - e = e + 1 - end if -!$omp end parallel - if (e.ne.0) call abort - end |