1 // { dg-additional-options "-fmodules-ts -fopenmp" } 2 3 export module foo; 4 // { dg-module-cmi foo } 5 frob(unsigned (& ary)[64])6export 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