1  /* PR middle-end/101535 */
       2  
       3  void
       4  foo (void)
       5  {
       6    int a = 1, i;
       7    #pragma omp target data map(to:a)
       8    #pragma omp for lastprivate(i)	/* { dg-error "lastprivate variable 'i' is private in outer context" } */
       9    for (i = 1; i < 2; i++)
      10      ;
      11  }
      12  
      13  void
      14  bar (void)
      15  {
      16    int a = 1, i;
      17    #pragma omp target private(i)
      18    #pragma omp for lastprivate(i)	/* { dg-error "lastprivate variable 'i' is private in outer context" } */
      19    for (i = 1; i < 2; i++)
      20      ;
      21  }
      22  
      23  void
      24  baz (void)
      25  {
      26    int a = 1, i;
      27    #pragma omp target firstprivate(i)
      28    #pragma omp for lastprivate(i)	/* { dg-error "lastprivate variable 'i' is private in outer context" } */
      29    for (i = 1; i < 2; i++)
      30      ;
      31  }