Mercurial > hg > CbC > CbC_gcc
view libgomp/testsuite/libgomp.c-c++-common/for-4.c @ 158:494b0b89df80 default tip
...
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Mon, 25 May 2020 18:13:55 +0900 |
parents | 84e7813d76e9 |
children |
line wrap: on
line source
/* { dg-options "-std=gnu99" { target c } } */ extern #ifdef __cplusplus "C" #endif void abort (void); #define M(x, y, z) O(x, y, z) #define O(x, y, z) x ## _ ## y ## _ ## z #define F taskloop #define G taskloop #define S #define N(x) M(x, G, normal) #include "for-2.h" #undef S #undef N #undef F #undef G #define F taskloop simd #define G taskloop_simd #define S #define N(x) M(x, G, normal) #include "for-2.h" #undef S #undef N #undef F #undef G int main () { int err = 0; #pragma omp parallel reduction(|:err) #pragma omp single { if (test_taskloop_normal () || test_taskloop_simd_normal ()) err = 1; } if (err) abort (); return 0; }