1  /* Ensure that bogus clauses aren't propagated in combined loop
       2     constructs.  */
       3  
       4  int
       5  main ()
       6  {
       7    int a, i;
       8  
       9  #pragma acc parallel loop vector copy(a[0:100]) reduction(+:a) /* { dg-error "'a' does not have pointer or array type" } */
      10    for (i = 0; i < 100; i++)
      11      a++;
      12  
      13    return a;
      14  }