[thirdparty/gcc.git] / gcc / testsuite / gcc.dg / gomp / block-1.c

// { dg-do compile }

void foo()
{
  bad1:
  #pragma omp parallel
    goto bad1; // { dg-error "invalid branch to/from OpenMP structured block" }

  goto bad2; // { dg-error "invalid entry to OpenMP structured block" }
  #pragma omp parallel
    {
      bad2: ;
    }

  #pragma omp parallel
    {
      int i;
      goto ok1;
      for (i = 0; i < 10; ++i)
	{ ok1: break; }
    }
}
Commit	Line	Data
953ff289 DN	1	// { dg-do compile }
	2
	3	void foo()
	4	{
	5	bad1:
	6	#pragma omp parallel
41dbbb37	7	goto bad1; // { dg-error "invalid branch to/from OpenMP structured block" }
953ff289	8
41dbbb37	9	goto bad2; // { dg-error "invalid entry to OpenMP structured block" }
953ff289 DN	10	#pragma omp parallel
	11	{
	12	bad2: ;
	13	}
	14
	15	#pragma omp parallel
	16	{
	17	int i;
	18	goto ok1;
	19	for (i = 0; i < 10; ++i)
	20	{ ok1: break; }
	21	}
	22	}