2 // { dg-require-effective-target tls_runtime }
6 extern "C" void abort (void);
8 struct S { int t; char buf[64]; } thr = { 32, "" };
9 #pragma omp threadprivate (thr)
17 omp_set_num_threads (6);
19 #pragma omp parallel copyin (thr) reduction (||:l)
22 thr.t = omp_get_thread_num () + 11;
28 #pragma omp parallel reduction (||:l)
29 l = thr.t != omp_get_thread_num () + 11;