Mercurial > hg > CbC > CbC_gcc
view libgomp/testsuite/libgomp.c/pr42029.c @ 158:494b0b89df80 default tip
...
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Mon, 25 May 2020 18:13:55 +0900 |
parents | ae3a4bfb450b |
children |
line wrap: on
line source
/* PR middle-end/42029 */ /* { dg-do run } */ extern void abort (void); int main () { int i; _Complex int c = 0; #pragma omp parallel for private(i) reduction(+:c) for (i = 0; i < 8; ++i) c += 1; if (c != 8) abort (); return 0; }