1  /* { dg-do compile } */
       2  
       3  void
       4  a31_1 (float *x, int *y, int n)
       5  {
       6    int i, b;
       7    float a;
       8    a = 0.0;
       9    b = 0;
      10  #pragma omp parallel for private(i) shared(x, y, n) \
      11                           reduction(+:a) reduction(^:b)
      12    for (i = 0; i < n; i++)
      13      {
      14        a += x[i];
      15        b ^= y[i];
      16      }
      17  }