]>
git.ipfire.org Git - thirdparty/gcc.git/blob - libgomp/testsuite/libgomp.c/critical-2.c
2 // Test several constructs within a parallel. At one point in development,
3 // the critical directive clobbered the shared clause of the parallel.
16 #pragma omp parallel shared (A, nthreads)
19 nthreads
= omp_get_num_threads ();
22 for (i
= 0; i
< N
; i
++)
26 for (i
= 0; i
< N
; i
++)
30 for (i
= 0; i
< N
; i
++)