1  typedef struct __attribute__((__aligned__ (sizeof (void *)))) omp_depend_t {
       2    char __omp_depend_t__[2 * sizeof (void *)];
       3  } omp_depend_t;
       4  
       5  omp_depend_t bar (void);
       6  extern const omp_depend_t cdepobj;
       7  extern omp_depend_t depobj;
       8  extern omp_depend_t depobja[4];
       9  extern omp_depend_t *pdepobj;
      10  int a, b, i, j;
      11  
      12  void
      13  f1 (void)
      14  {
      15    #pragma omp depobj(depobj) depend(in : a)
      16    #pragma omp depobj(depobj) update(inout)
      17    #pragma omp task depend (depobj: depobj)
      18    ;
      19    #pragma omp depobj(depobj) destroy
      20    #pragma omp task depend (iterator (i=1:3) , depobj: *(depobja + i))
      21    ;
      22    #pragma omp depobj(pdepobj[0]) depend(mutexinoutset:a)
      23    #pragma omp depobj(*pdepobj) destroy
      24    #pragma omp depobj(depobja[0]) depend(inoutset: a)
      25    #pragma omp depobj(depobja[0]) update(mutexinoutset)
      26    #pragma omp depobj(depobja[0]) update(inoutset)
      27  }
      28  
      29  void
      30  f2 (void)
      31  {
      32    omp_depend_t depobjb[4];
      33    #pragma omp depobj					/* { dg-error "expected" } */
      34    #pragma omp depobj destroy				/* { dg-error "expected" } */
      35    #pragma omp depobj (depobj)				/* { dg-error "expected 'depend', 'destroy' or 'update' clause" } */
      36    #pragma omp depobj (depobj) foobar			/* { dg-error "expected 'depend', 'destroy' or 'update' clause" } */
      37    #pragma omp depobj(bar ()) update(inout)		/* { dg-error "'depobj' expression is not lvalue expression" } */
      38    #pragma omp depobj (cdepobj) update(in)		/* { dg-error "'const' qualified 'depobj' expression" } */
      39    #pragma omp depobj (depobjb) depend(in: a)		/* { dg-error "type of 'depobj' expression is not 'omp_depend_t'" } */
      40    #pragma omp depobj (pdepobj) depend(in: a)		/* { dg-error "type of 'depobj' expression is not 'omp_depend_t'" } */
      41    #pragma omp depobj (a) destroy			/* { dg-error "type of 'depobj' expression is not 'omp_depend_t'" } */
      42    #pragma omp depobj (depobj) depend(depobj:a)		/* { dg-error "does not have 'omp_depend_t' type in 'depend' clause with 'depobj' dependence type" } */
      43    #pragma omp depobj (depobj) depend(depobj:*depobjb)	/* { dg-error "'depobj' dependence type specified in 'depend' clause on 'depobj' construct" } */
      44    #pragma omp depobj (depobj) update(foobar)		/* { dg-error "expected 'in', 'out', 'inout', 'mutexinoutset' or 'inoutset'" } */
      45    #pragma omp depobj (depobj) depend(in: *depobja)	/* { dg-error "should not have 'omp_depend_t' type in 'depend' clause with dependence type" } */
      46    #pragma omp depobj (depobj) depend(in: a) depend(in: b)	/* { dg-error "expected" } */
      47    #pragma omp depobj (depobj) depend(in: a) update(out)	/* { dg-error "expected" } */
      48    #pragma omp depobj (depobj) depend(in: a, b)		/* { dg-error "more than one locator in 'depend' clause on 'depobj' construct" } */
      49    #pragma omp depobj (depobj) depend(source)		/* { dg-error "'depend\\(source\\)' is only allowed in 'omp ordered'" } */
      50    #pragma omp depobj (depobj) depend(sink: i + 1, j - 1)	/* { dg-error "'depend\\(sink\\)' is only allowed in 'omp ordered'" } */
      51    #pragma omp depobj (depobj) depend(iterator (i = 0:2) , in : a)	/* { dg-error "'iterator' modifier may not be specified on 'depobj' construct" } */
      52    if (0)
      53      #pragma omp depobj (depobj) destroy			/* { dg-error "'#pragma omp depobj' may only be used in compound statements" } */
      54      ;
      55  }
      56  
      57  void
      58  f3 (void)
      59  {
      60    #pragma omp task depend (depobj: depobja[1:2])	/* { dg-error "'depend' clause with 'depobj' dependence type on array section" } */
      61    ;
      62    #pragma omp task depend (depobj: a)			/* { dg-error "'a' does not have 'omp_depend_t' type in 'depend' clause with 'depobj' dependence type" } */
      63    ;
      64    #pragma omp task depend (in: depobj)			/* { dg-error "'depobj' should not have 'omp_depend_t' type in 'depend' clause with dependence type" } */
      65    ;
      66  }