gcc/testsuite/c-c++-common/goacc/combined-directives-2.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20

/* Ensure that bogus clauses aren't propagated in combined loop
   constructs.  */

int
main ()
{
  int a, i;

#pragma acc parallel loop vector copy(a[0:100]) reduction(+:a) /* { dg-error "'a' does not have pointer or array type" } */
  for (i = 0; i < 100; i++)
    a++;


#pragma acc serial loop vector copy(a[0:100]) reduction(+:a) /* { dg-error "'a' does not have pointer or array type" } */
  for (i = 0; i < 100; i++)
    a++;


  return a;
}