URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc1/] [gcc/] [testsuite/] [gcc.dg/] [gomp/] [clause-2.c] - Rev 338
Compare with Previous | Blame | View Log
/* PR c/34506 */ /* { dg-do compile } */ #define p parallel void foo (int x) { #pragma omp p num_threads (4) if (1) private (x) ; #pragma omp p num_threads(4)if(1)private(x) ; #pragma omp p num_threads (4), if (1) , private (x) ; #pragma omp p num_threads(4),if(1),private(x) ; #pragma omp p, num_threads (4), if (1), private (x) /* { dg-error "clause before" } */ ; #pragma omp p num_threads (4), if (1), private (x), /* { dg-error "clause before" } */ ; #pragma omp p num_threads (4), , if (1), private (x) /* { dg-error "clause before" } */ ; }