Mercurial > hg > CbC > CbC_gcc
view gcc/testsuite/g++.dg/gomp/clause-2.C @ 145:1830386684a0
gcc-9.2.0
author | anatofuz |
---|---|
date | Thu, 13 Feb 2020 11:34:05 +0900 |
parents | 04ced10e8804 |
children |
line wrap: on
line source
// { dg-do compile } struct A { int a; }; struct B { B(); }; struct C { C(); C(const C&); }; struct D { D& operator=(const D&); }; class E { private: E(); public: E(int); }; // { dg-message "private" } class F { private: F(const F&); public: F(); }; // { dg-message "private" } class G { private: G& operator=(const G&); }; // { dg-message "private" } void bar(); void foo() { A a; B b; C c; D d; E e(0); F f; G g; #pragma omp parallel shared(a, b, c, d, e, f, g) bar(); #pragma omp parallel private(a, b, c, d, f, g) bar(); #pragma omp parallel private(e) // { dg-error "context" } bar(); #pragma omp parallel firstprivate(a, b, c, d, e, g) bar(); #pragma omp parallel firstprivate(f) // { dg-error "context" } bar(); #pragma omp parallel sections lastprivate(a, b, d, c, f) { bar(); } #pragma omp parallel sections lastprivate(e) // { dg-error "context" } { bar(); } #pragma omp parallel sections lastprivate(g) // { dg-error "context" } { bar(); } #pragma omp parallel sections firstprivate(e) lastprivate(e) { bar(); } }