1  /* Miscellaneous tests where clause parsing is expected to fail.  */
       2  
       3  void
       4  f (void)
       5  {
       6    int i;
       7  
       8  #pragma acc parallel one /* { dg-error "expected '#pragma acc' clause before 'one'" } */
       9    ;
      10  
      11  #pragma acc kernels eins /* { dg-error "expected '#pragma acc' clause before 'eins'" } */
      12    ;
      13  
      14  #pragma acc data two /* { dg-error "expected '#pragma acc' clause before 'two'" } */
      15    ;
      16  
      17  #pragma acc parallel
      18  #pragma acc loop deux /* { dg-error "expected '#pragma acc' clause before 'deux'" } */
      19    for (i = 0; i < 2; ++i)
      20      ;
      21  }
      22  
      23  
      24  void
      25  f2 (void)
      26  {
      27    int a, b[100];
      28  
      29  #pragma acc parallel firstprivate (b[10:20]) /* { dg-error "expected ... before ... token" } */
      30    ;
      31  }