1 /* PR tree-optimization/99544 */
2 /* { dg-do compile } */
3 /* { dg-options "-Os -fopenmp" } */
4
5 long
6 foo (long a, long b, long c)
7 {
8 long d, e;
9 #pragma omp teams distribute parallel for simd firstprivate (a, b, c) lastprivate(e)
10 for (d = a; d < b; d++)
11 e = c + d * 5;
12 return e;
13 }