Mercurial > hg > CbC > CbC_gcc
view libgomp/testsuite/libgomp.c/depend-3.c @ 111:04ced10e8804
gcc 7
author | kono |
---|---|
date | Fri, 27 Oct 2017 22:46:09 +0900 |
parents | |
children |
line wrap: on
line source
#include <stdlib.h> #include <unistd.h> int main () { #pragma omp parallel #pragma omp single { int x = 1, y = 2; #pragma omp taskgroup { #pragma omp task shared (x) depend(in: x) { usleep (10000); if (x != 1) abort (); } #pragma omp taskgroup { #pragma omp task shared (x) depend(in: x) { usleep (15000); if (x != 1) abort (); } #pragma omp task shared (y) depend(inout: y) { if (y != 2) abort (); y = 3; } #pragma omp taskgroup { #pragma omp task shared (x) depend(in: x) { usleep (13000); if (x != 1) abort (); } #pragma omp taskgroup { #pragma omp task shared (x) depend(out: x) x = 2; } } } } } return 0; }