(root)/
gcc-13.2.0/
libgomp/
testsuite/
libgomp.c-c++-common/
for-4.c
       1  /* { dg-options "-std=gnu99" { target c } } */
       2  
       3  extern
       4  #ifdef __cplusplus
       5  "C"
       6  #endif
       7  void abort (void);
       8  
       9  #define M(x, y, z) O(x, y, z)
      10  #define O(x, y, z) x ## _ ## y ## _ ## z
      11  
      12  #define F taskloop
      13  #define G taskloop
      14  #define S
      15  #define N(x) M(x, G, normal)
      16  #include "for-2.h"
      17  #undef S
      18  #undef N
      19  #undef F
      20  #undef G
      21  
      22  #define F taskloop simd
      23  #define G taskloop_simd
      24  #define S
      25  #define N(x) M(x, G, normal)
      26  #include "for-2.h"
      27  #undef S
      28  #undef N
      29  #undef F
      30  #undef G
      31  
      32  int
      33  main ()
      34  {
      35    int err = 0;
      36    #pragma omp parallel reduction(|:err)
      37      #pragma omp single
      38        {
      39  	if (test_taskloop_normal ()
      40  	    || test_taskloop_simd_normal ())
      41  	  err = 1;
      42        }
      43    if (err)
      44      abort ();
      45    return 0;
      46  }