URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [g++.dg/] [gomp/] [block-1.C] - Rev 816
Compare with Previous | Blame | View Log
// { dg-do compile }
void foo()
{
bad1: // { dg-error "jump to label" }
#pragma omp parallel
goto bad1; // { dg-error "from here|exits OpenMP" }
goto bad2; // { dg-error "from here" }
#pragma omp parallel
{
bad2: ; // { dg-error "jump to label|enters OpenMP" }
}
#pragma omp parallel
{
int i;
goto ok1;
for (i = 0; i < 10; ++i)
{ ok1: break; }
}
}