(root)/
gcc-13.2.0/
gcc/
testsuite/
c-c++-common/
gomp/
directive-1.c
       1  int thr;
       2  #pragma omp threadprivate, (thr)		/* { dg-error "expected '\\\(' before ',' token" } */
       3  						/* { dg-error "expected end of line before ',' token" "" { target c++ } .-1 } */
       4  #pragma omp declare reduction, (foo: int : omp_out += omp_in), initializer (omp_priv = 0)	/* { dg-error "expected '\\\(' before ',' token" } */
       5  void f1 (void);
       6  #pragma omp declare variant, (f1), match (user={condition(true)})	/* { dg-error "expected '\\\(' before ',' token" } */
       7  void f2 (void);
       8  int j;
       9  #pragma omp declare target, (j)			/* { dg-error "expected end of line before ',' token" } */
      10  
      11  typedef struct __attribute__((__aligned__ (sizeof (void *)))) omp_depend_t {
      12    char __omp_depend_t__[2 * sizeof (void *)];
      13  } omp_depend_t;
      14  extern omp_depend_t d;
      15  
      16  void
      17  foo (void)
      18  {
      19    int i, k = 0, l = 0;
      20    #pragma omp allocate, (i)			/* { dg-error "expected '\\\(' before ',' token" } */
      21  						/* { dg-error "expected end of line before ',' token" "" { target c++ } .-1 } */
      22  						/* { dg-message "not yet supported" "" { target *-*-* } .-2 } */
      23    #pragma omp critical, (bar)			/* { dg-error "expected '#pragma omp' clause before '\\\(' token" } */
      24    ;
      25    #pragma omp flush, (k, l)			/* { dg-error "expected '\\\(' or end of line before ',' token" "" { target c } } */
      26  						/* { dg-error "expected end of line before ',' token" "" { target c++ } .-1 } */
      27    #pragma omp depobj, (d) depend(in : l)	/* { dg-error "expected '\\\(' before ',' token" } */
      28  }