libgomp/testsuite/libgomp.c/thread-limit-3.c

   1 #include <stdlib.h>
   2 #include <omp.h>
   3
   4 int
   5 main ()
   6 {
   7   #pragma omp target if (0)
   8   #pragma omp teams thread_limit (1)
   9   #pragma omp parallel if (0)
  10   if (omp_get_thread_limit () != 1)
  11     abort ();
  12   return 0;
  13 }