openmp/runtime/test/tasking/bug_serial_taskgroup.c

   1 // RUN: %libomp-compile-and-run
   2
   3 /*
   4  GCC failed this test because __kmp_get_gtid() instead of __kmp_entry_gtid()
   5  was called in xexpand(KMP_API_NAME_GOMP_TASKGROUP_START)(void).
   6  __kmp_entry_gtid() will initialize the runtime if not yet done which does not
   7  happen with __kmp_get_gtid().
   8  */
   9
  10 int main()
  11 {
  12     #pragma omp taskgroup
  13     { }
  14
  15     return 0;
  16 }