Mercurial > hg > CbC > CbC_gcc
view gcc/testsuite/c-c++-common/gomp/order-1.c @ 145:1830386684a0
gcc-9.2.0
author | anatofuz |
---|---|
date | Thu, 13 Feb 2020 11:34:05 +0900 |
parents | |
children |
line wrap: on
line source
void f1 (int *a) { int i; #pragma omp for order(concurrent) for (i = 0; i < 128; i++) a[i]++; #pragma omp simd order ( concurrent ) for (i = 0; i < 128; i++) a[i]++; #pragma omp for simd order(concurrent) for (i = 0; i < 128; i++) a[i]++; } void f2 (int *a) { int i; #pragma omp parallel for order(concurrent) for (i = 0; i < 128; i++) a[i]++; #pragma omp parallel for simd order (concurrent) for (i = 0; i < 128; i++) a[i]++; #pragma omp teams distribute parallel for order(concurrent) for (i = 0; i < 128; i++) a[i]++; #pragma omp teams distribute parallel for simd order(concurrent) for (i = 0; i < 128; i++) a[i]++; #pragma omp teams { #pragma omp distribute parallel for order(concurrent) for (i = 0; i < 128; i++) a[i]++; #pragma omp distribute parallel for simd order(concurrent) for (i = 0; i < 128; i++) a[i]++; } #pragma omp taskloop simd order (concurrent) for (i = 0; i < 128; i++) a[i]++; } void f3 (int *a) { int i; #pragma omp for order(concurrent) order(concurrent) order(concurrent) for (i = 0; i < 128; i++) a[i]++; }