brintos

brintos / llvm-project-archived public Read only

0
0
Text · 2.7 KiB · 4c77da8 Raw
85 lines · cpp
1// RUN: %clang_cc1 -verify -fopenmp -ast-print %s | FileCheck %s2// RUN: %clang_cc1 -fopenmp -x c++ -std=c++11 -emit-pch -o %t %s3// RUN: %clang_cc1 -fopenmp -std=c++11 -include-pch %t -verify %s -ast-print | FileCheck %s4 5// RUN: %clang_cc1 -verify -fopenmp-simd -ast-print %s | FileCheck %s6// RUN: %clang_cc1 -fopenmp-simd -x c++ -std=c++11 -emit-pch -o %t %s7// RUN: %clang_cc1 -fopenmp-simd -std=c++11 -include-pch %t -verify %s -ast-print | FileCheck %s8// expected-no-diagnostics9 10#ifndef HEADER11#define HEADER12 13void foo() {}14 15struct SS {16  int a;17  int b : 4;18  int &c;19  SS(int &d) : a(0), b(0), c(d) {20#pragma omp parallel firstprivate(a, b, c)21#pragma omp single copyprivate(a, this->b, (this)->c)22// CHECK: #pragma omp parallel firstprivate(this->a,this->b,this->c)23// CHECK-NEXT: #pragma omp single copyprivate(this->a,this->b,this->c){{$}}24    ++this->a, --b, (this)->c /= 1;25  }26};27 28template<typename T>29struct SST {30  T a;31  SST() : a(T()) {32// CHECK: #pragma omp parallel firstprivate(this->a)33// CHECK-NEXT: #pragma omp single copyprivate(this->a)34// CHECK: #pragma omp parallel firstprivate(this->a)35// CHECK-NEXT: #pragma omp single copyprivate(this->a)36#pragma omp parallel firstprivate(a)37#pragma omp single copyprivate(this->a)38    ++this->a;39  }40};41 42template <class T, int N>43T tmain(T argc) {44  T b = argc, c, d, e, f, g;45  static T a;46  SST<T> sst;47// CHECK: static T a;48#pragma omp parallel private(g)49#pragma omp single private(argc, b), firstprivate(c, d), nowait allocate(d)50  foo();51  // CHECK: #pragma omp parallel private(g)52  // CHECK-NEXT: #pragma omp single private(argc,b) firstprivate(c,d) nowait allocate(d)53  // CHECK-NEXT: foo();54#pragma omp parallel private(g)55#pragma omp single allocate(argc) private(argc, b), firstprivate(c, d), copyprivate(g)56  foo();57  // CHECK-NEXT: #pragma omp parallel private(g)58  // CHECK-NEXT: #pragma omp single allocate(argc) private(argc,b) firstprivate(c,d) copyprivate(g)59  // CHECK-NEXT: foo();60  return T();61}62 63int main(int argc, char **argv) {64// CHECK: int main(int argc, char **argv) {65  int b = argc, c, d, e, f, g;66  static int a;67  SS ss(a);68// CHECK: static int a;69#pragma omp parallel private(g)70#pragma omp single private(argc, b), firstprivate(argv, c), nowait71  foo();72  // CHECK: #pragma omp parallel private(g)73  // CHECK-NEXT: #pragma omp single private(argc,b) firstprivate(argv,c) nowait74  // CHECK-NEXT: foo();75#pragma omp parallel private(g)76#pragma omp single private(argc, b), firstprivate(c, d), copyprivate(g)77  foo();78  // CHECK-NEXT: #pragma omp parallel private(g)79  // CHECK-NEXT: #pragma omp single private(argc,b) firstprivate(c,d) copyprivate(g)80  // CHECK-NEXT: foo();81  return (tmain<int, 5>(argc) + tmain<char, 1>(argv[0][0]));82}83 84#endif85