Retro68/gcc/libgomp/testsuite/libgomp.oacc-c-c++-common/reduction-8.c
2017-10-07 02:16:47 +02:00

31 lines
442 B
C

const int n = 100;
// Check async over parallel construct with reduction
int
async_sum (int c)
{
int s = 0;
#pragma acc parallel loop num_gangs (10) gang reduction (+:s) async
for (int i = 0; i < n; i++)
s += i+c;
#pragma acc wait
return s;
}
int
main()
{
int result = 0;
for (int i = 0; i < n; i++)
result += i+1;
if (async_sum (1) != result)
__builtin_abort ();
return 0;
}