Mercurial > hg > CbC > CbC_gcc
view libgomp/testsuite/libgomp.hsa.c/gridify-2.c @ 120:f93fa5091070
fix conv1.c
author | mir3636 |
---|---|
date | Thu, 08 Mar 2018 14:53:42 +0900 |
parents | 04ced10e8804 |
children |
line wrap: on
line source
void __attribute__((noinline, noclone)) foo (int j, int n, int *a) { int i; #pragma omp target #pragma omp teams #pragma omp distribute parallel for shared(a) firstprivate(n) private(i) firstprivate(j) for (i = j + 1; i < n; i++) a[i] = i; } int main (int argc, char **argv) { int n = 32; int *a = __builtin_malloc (sizeof (int) * n); int i, j = 4; __builtin_memset (a, 0, sizeof (int) * n); foo (j, n, a); for (i = j + 1; i < n; i ++) { if (a[i] != i) __builtin_abort (); } return 0; }