Mercurial > hg > CbC > CbC_gcc
view libgomp/testsuite/libgomp.c/pr70680-1.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
/* PR middle-end/70680 */ int v; void f1 (void) { int i = 0; #pragma omp task default(shared) if(0) { #pragma omp simd for (i = 0; i < 100; i++) ; v = i; } if (i != 100) __builtin_abort (); } void f2 (void) { int i = 0; #pragma omp task default(shared) if(0) { #pragma omp simd for (i = 0; i < 100; i++) ; } if (i != 100) __builtin_abort (); } void f3 (void) { int i = 0; #pragma omp task default(shared) if(0) { #pragma omp simd linear(i: 1) for (i = 0; i < 100; i++) ; v = i; } if (i != 100) __builtin_abort (); } void f4 (void) { int i = 0; #pragma omp task default(shared) if(0) { #pragma omp simd linear(i: 1) for (i = 0; i < 100; i++) ; } if (i != 100) __builtin_abort (); } int main () { f1 (); if (v++ != 100) __builtin_abort (); f2 (); f3 (); if (v++ != 100) __builtin_abort (); f4 (); return 0; }