libgomp/testsuite/libgomp.c/pr104952-1.c

   1 #define N 32
   2
   3 static char arr[N];
   4
   5 int
   6 main (void)
   7 {
   8   unsigned int result = 0;
   9
  10   for (unsigned int i = 0; i < N; ++i)
  11     arr[i] = 0;
  12
  13   arr[5] = 42;
  14
  15 #pragma omp target map(tofrom:result) map(to:arr)
  16 #pragma omp simd reduction(||: result)
  17   for (unsigned int i = 0; i < N; ++i)
  18     result = result || arr[i];
  19
  20   if (result != 1)
  21     __builtin_abort ();
  22
  23   return 0;
  24 }