gcc/testsuite/gcc.dg/gomp/vla-1.c

   1 // { dg-do compile }
   2
   3 void foo(int n)
   4 {
   5   int A[n];
   6
   7   #pragma omp parallel default(none)    // { dg-error "enclosing" }
   8     {
   9       A[0] = 0;                         // { dg-error "'A' not specified" }
  10     }
  11 }