Commit 3616a8c5 by Cesar Philippidis Committed by Cesar Philippidis

re PR c/70688 (bogus OpenACC data clause errors involving reductions)

	PR c/70688
	* pr70688.c: New file.

From-SVN: r237011
parent 880ce6a8
2016-06-01 Cesar Philippidis <cesar@codesourcery.com>
PR c/70688
* pr70688.c: New file.
2016-05-26 Jakub Jelinek <jakub@redhat.com> 2016-05-26 Jakub Jelinek <jakub@redhat.com>
* testsuite/libgomp.c/doacross-1.c (main): Use schedule(static) * testsuite/libgomp.c/doacross-1.c (main): Use schedule(static)
......
/* Verify that reduction variables can appear in data clause. */
#include <assert.h>
const int n = 100;
int
main ()
{
int s = 0;
int array[n];
for (int i = 0; i < n; i++)
array[i] = i+1;
#pragma acc parallel loop num_gangs (10) copy (s) reduction (+:s)
for (int i = 0; i < n; i++)
s += array[i];
#pragma acc parallel loop num_gangs (10) reduction (+:s) copy (s)
for (int i = 0; i < n; i++)
s += array[i];
assert (s == n * (n + 1));
return 0;
}
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment