(root)/
gcc-13.2.0/
gcc/
testsuite/
c-c++-common/
gomp/
pr99928-12.c
       1  /* PR middle-end/99928 */
       2  /* { dg-do compile } */
       3  
       4  int
       5  foo (void)
       6  {
       7    int l = 0;
       8    #pragma omp parallel master taskloop simd lastprivate (l) default(none)	/* { dg-bogus "'l' not specified in enclosing 'parallel'" } */
       9    for (int i = 0; i < 16; i++)
      10      l = i;
      11    return l;
      12  }
      13  
      14  int
      15  bar (void)
      16  {
      17    int l = 0;
      18    #pragma omp parallel master default(none)	/* { dg-message "enclosing 'parallel'" } */
      19    #pragma omp taskloop simd lastprivate (l)	/* { dg-error "'l' not specified in enclosing 'parallel'" } */
      20    for (int i = 0; i < 16; i++)
      21      l = i;
      22    return l;
      23  }