view libgomp/testsuite/libgomp.oacc-c-c++-common/reduction-8.c @ 118:fd00160c1b76

ifdef TARGET_64BIT
author mir3636
date Tue, 27 Feb 2018 15:01:35 +0900
parents 04ced10e8804
children
line wrap: on
line source

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;
}