gcc/testsuite/g++.dg/gomp/clause-1.C

   1 // { dg-do compile }
   2
   3 struct T
   4 {
   5   int n;
   6
   7   void test();
   8 };
   9
  10 void T::test()
  11 {
  12   #pragma omp parallel private(n)
  13     n = 1;
  14
  15   #pragma omp parallel shared(n)        // { dg-error "T::n" }
  16     n = 1;
  17
  18   #pragma omp parallel firstprivate(n)
  19     n = 1;
  20
  21   #pragma omp sections lastprivate(n)
  22     { n = 1; }
  23
  24   #pragma omp parallel reduction(+:n)
  25     n = 1;
  26
  27   #pragma omp single copyprivate(n)
  28     n = 1;
  29
  30   #pragma omp parallel copyin(n)        // { dg-error "T::n" }
  31     n = 1;
  32 }