libgomp/testsuite/libgomp.c/for-2.c

   1 /* { dg-additional-options "-std=gnu99" } */
   2
   3 extern void abort (void);
   4
   5 #define M(x, y, z) O(x, y, z)
   6 #define O(x, y, z) x ## _ ## y ## _ ## z
   7
   8 #define F simd
   9 #define G simd
  10 #define S
  11 #define N(x) M(x, G, normal)
  12 #include "for-2.h"
  13 #undef S
  14 #undef N
  15 #undef F
  16 #undef G
  17
  18 #define F parallel for simd
  19 #define G pf_simd
  20 #include "for-1.h"
  21 #undef F
  22 #undef G
  23
  24 #undef SC
  25 #define SC static
  26 #define F for simd
  27 #define G f_simd
  28 #include "for-1.h"
  29 #undef F
  30 #undef G
  31 #undef SC
  32
  33 int
  34 main ()
  35 {
  36   if (test_simd_normal ()
  37       || test_pf_simd_static ()
  38       || test_pf_simd_static32 ()
  39       || test_pf_simd_auto ()
  40       || test_pf_simd_guided32 ()
  41       || test_pf_simd_runtime ()
  42       || test_f_simd_static ()
  43       || test_f_simd_static32 ()
  44       || test_f_simd_auto ()
  45       || test_f_simd_guided32 ()
  46       || test_f_simd_runtime ())
  47     abort ();
  48   return 0;
  49 }