Merge from mainline
[official-gcc.git] / gcc / testsuite / gcc.dg / gomp / appendix-a / a.1.1.c
blobf7f2924ce1a02d5f596c4533c93a7b9e201b69ee
1 /* { dg-do compile } */
3 void
4 a1 (int n, float *a, float *b)
6 int i;
7 #pragma omp parallel for
8 for (i = 1; i < n; i++) /* i is private by default */
9 b[i] = (a[i] + a[i - 1]) / 2.0;