1  /* PR middle-end/26412 */
       2  /* { dg-do compile } */
       3  
       4  extern double a[];
       5  extern int b;
       6  
       7  double
       8  test (void)
       9  {
      10    int i;
      11    double c = 0;
      12  
      13  #pragma omp parallel for private(i) reduction(+:c)
      14    for (i = 0; i < 10000; i++)
      15      c += a[b];
      16  
      17    return c;
      18  }