(root)/
gcc-13.2.0/
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  }