Mercurial > hg > CbC > CbC_gcc
view libgomp/testsuite/libgomp.c/target-36.c @ 158:494b0b89df80 default tip
...
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Mon, 25 May 2020 18:13:55 +0900 |
parents | 04ced10e8804 |
children |
line wrap: on
line source
int main () { int ah, bh, n = 1024; #pragma omp target map(from: ah, bh) { int a, b; #pragma omp simd lastprivate(b) for (a = 0; a < n; a++) { b = a + n + 1; asm volatile ("" : "+r"(b)); } ah = a, bh = b; } if (ah != n || bh != 2 * n) __builtin_abort (); }