URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Subversion Repositories openrisc_me
[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [g++.dg/] [gomp/] [parallel-4.C] - Rev 308
Go to most recent revision | Compare with Previous | Blame | View Log
/* { dg-do compile } */
extern int foo(void);
extern void bar(void);
int main ()
{
/* Malformed uses of 'if' and 'num_threads'. */
#pragma omp parallel if (foo () > 10) if (foo () == 3) /* { dg-error "too many" } */
{
bar ();
}
#pragma omp parallel num_threads (3) num_threads (20) /* { dg-error "too many" } */
{
bar ();
}
/* Valid uses of 'if' and 'num_threads'. */
#pragma omp parallel if (foo () == 10) num_threads (foo ())
{
bar ();
}
}
Go to most recent revision | Compare with Previous | Blame | View Log