Mercurial > hg > CbC > CbC_gcc
comparison gcc/testsuite/c-c++-common/gomp/scan-5.c @ 145:1830386684a0
gcc-9.2.0
author | anatofuz |
---|---|
date | Thu, 13 Feb 2020 11:34:05 +0900 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
131:84e7813d76e9 | 145:1830386684a0 |
---|---|
1 int | |
2 foo (int *a, int *b) | |
3 { | |
4 int r = 0; | |
5 #pragma omp parallel for reduction (inscan, +:r) default(none) firstprivate (a, b) | |
6 for (int i = 0; i < 64; i++) | |
7 { | |
8 r += a[i]; | |
9 #pragma omp scan inclusive (r) | |
10 b[i] = r; | |
11 } | |
12 return r; | |
13 } |