1 // { dg-additional-options "-fmodules-ts -fopenmp" }
2 
3 export module foo;
4 // { dg-module-cmi foo }
5 
frob(unsigned (& ary)[64])6 export inline void frob (unsigned (&ary)[64])
7 {
8   int sum = 0;
9 
10 #pragma omp for
11   for (unsigned ix = 0; ix < 64; ix++)
12     sum += ary[ix];
13 
14 #pragma omp simd safelen(16) aligned (ary : 16)
15   for (unsigned ix = 0; ix < 64; ix++)
16     ary[ix] *= 2;
17 }
18