aboutsummaryrefslogtreecommitdiffstats
path: root/gcc-4.4.3/libgomp/testsuite/libgomp.c/copyin-3.c
diff options
context:
space:
mode:
Diffstat (limited to 'gcc-4.4.3/libgomp/testsuite/libgomp.c/copyin-3.c')
-rw-r--r--gcc-4.4.3/libgomp/testsuite/libgomp.c/copyin-3.c42
1 files changed, 0 insertions, 42 deletions
diff --git a/gcc-4.4.3/libgomp/testsuite/libgomp.c/copyin-3.c b/gcc-4.4.3/libgomp/testsuite/libgomp.c/copyin-3.c
deleted file mode 100644
index 86b0d691f..000000000
--- a/gcc-4.4.3/libgomp/testsuite/libgomp.c/copyin-3.c
+++ /dev/null
@@ -1,42 +0,0 @@
-/* { dg-do run } */
-/* { dg-options "-O2" } */
-/* { dg-require-effective-target tls_runtime } */
-
-#include <omp.h>
-#include <stdlib.h>
-
-int thr;
-#pragma omp threadprivate (thr)
-
-int
-test (int l)
-{
- return l || (thr != omp_get_thread_num () * 2);
-}
-
-int
-main (void)
-{
- int l = 0;
-
- omp_set_dynamic (0);
- omp_set_num_threads (6);
-
- thr = 8;
- /* Broadcast the value to all threads. */
-#pragma omp parallel copyin (thr)
- ;
-
-#pragma omp parallel reduction (||:l)
- {
- /* Now test if the broadcast succeeded. */
- l = thr != 8;
- thr = omp_get_thread_num () * 2;
-#pragma omp barrier
- l = test (l);
- }
-
- if (l)
- abort ();
- return 0;
-}