Sign in
gnu
/
gcc
/
926d9947847a0683cf34de6fc231209747576088
/
.
/
libgomp
/
testsuite
/
libgomp.c
/
target-4.c
blob: 26e935b3673028161695dacd9c51655c8190c1e9 [
file
] [
log
] [
blame
]
#include
<omp.h>
#include
<stdlib.h>
int
main
()
{
omp_set_dynamic
(
0
);
#pragma
omp parallel num_threads
(
4
)
#pragma
omp target
if
(
0
)
#pragma
omp single
if
(
omp_get_num_threads
()
!=
1
)
abort
();
return
0
;
}