libgomp/testsuite/libgomp.oacc-c-c++-common/parallel-loop-1.c

   1 /* { dg-do run } */
   2
   3 #include <stdlib.h>
   4
   5 #define PK parallel
   6 #define M(x, y, z) O(x, y, z)
   7 #define O(x, y, z) x ## _ ## y ## _ ## z
   8
   9 #define F
  10 #define G none
  11 #define L
  12 #include "parallel-loop-1.h"
  13 #undef L
  14 #undef F
  15 #undef G
  16
  17 #define F num_gangs (10)
  18 #define G gangs
  19 #define L gang
  20 #include "parallel-loop-1.h"
  21 #undef L
  22 #undef F
  23 #undef G
  24
  25 int
  26 main ()
  27 {
  28   if (test_none_none ()
  29       || test_none_auto ()
  30       || test_none_independent ()
  31       || test_none_seq ()
  32       || test_gangs_none ()
  33       || test_gangs_auto ()
  34       || test_gangs_independent ()
  35       || test_gangs_seq ())
  36     abort ();
  37   return 0;
  38 }