(root)/
gcc-13.2.0/
libgomp/
testsuite/
libgomp.c-c++-common/
task-in-explicit-2.c
       1  /* { dg-do run } */
       2  
       3  #include <omp.h>
       4  #include <stdlib.h>
       5  
       6  int
       7  main ()
       8  {
       9    #pragma omp task
      10    {
      11      if (!omp_in_explicit_task ())
      12        abort ();
      13      #pragma omp task
      14      {
      15        if (!omp_in_explicit_task ())
      16  	abort ();
      17        #pragma omp target nowait
      18        if (omp_in_explicit_task ())
      19  	abort ();
      20        if (!omp_in_explicit_task ())
      21  	abort ();
      22        #pragma omp taskwait
      23      }
      24    }
      25    return 0;
      26  }