Mercurial > hg > CbC > CbC_gcc
view gcc/testsuite/gcc.dg/gomp/sharing-2.c @ 131:84e7813d76e9
gcc-8.2
author | mir3636 |
---|---|
date | Thu, 25 Oct 2018 07:37:49 +0900 |
parents | 04ced10e8804 |
children |
line wrap: on
line source
/* { dg-do compile } */ void foo (void) { int i; int a[10]; #pragma omp parallel private (i) shared (a) { i = 1; #pragma omp parallel shared (a, i) { #pragma omp master i = 2; #pragma omp parallel private (i) shared (a) { for (i = 0; i < 10; i++) a[i] = i + 1; } #pragma omp master i = 3; } i = 4; } }