gcc/libgomp/testsuite/libgomp.c/omp-single-1.c

20 lines
179 B
C

extern void abort (void);
main()
{
int i = 0;
#pragma omp parallel shared (i)
{
#pragma omp single
{
i++;
}
}
if (i != 1)
abort ();
return 0;
}