1  /* { dg-do compile } */
       2  
       3  void
       4  work (int i, int j)
       5  {
       6  }
       7  
       8  void
       9  good_nesting (int n)
      10  {
      11    int i, j;
      12  #pragma omp parallel default(shared)
      13    {
      14  #pragma omp for
      15      for (i = 0; i < n; i++)
      16        {
      17  #pragma omp parallel shared(i, n)
      18  	{
      19  #pragma omp for
      20  	  for (j = 0; j < n; j++)
      21  	    work (i, j);
      22  	}
      23        }
      24    }
      25  }