gcc/testsuite/g++.dg/gomp/pr35751.C

   1 // PR c/35751
   2 // { dg-do compile }
   3 // { dg-options "-fopenmp" }
   4
   5 void
   6 foo (int i)
   7 {
   8   extern int a[i];      // { dg-error "storage size of" }
   9   static int b[i];      // { dg-error "storage size of" }
  10
  11 #pragma omp parallel
  12   {
  13     a[0] = 0;
  14     b[0] = 0;
  15   }
  16
  17 #pragma omp parallel shared (a, b)
  18   {
  19     a[0] = 0;
  20     b[0] = 0;
  21   }
  22
  23 #pragma omp parallel private (a, b)
  24   {
  25     a[0] = 0;
  26     b[0] = 0;
  27   }
  28
  29 #pragma omp parallel firstprivate (a, b)
  30   {
  31     a[0] = 0;
  32     b[0] = 0;
  33   }
  34 }