OpenCores
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/] [block-10.C] - Blame information for rev 318

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 301 jeremybenn 
// { dg-do compile }
2 
 
3 
void foo(int i)
4 
{
5 
  int j;
6 
  switch (i)
7 
  {
8 
  #pragma omp parallel
9 
    { case 0:; }        // { dg-error "jump|enters" }
10 
  }
11 
  switch (i)
12 
  {
13 
  #pragma omp for
14 
    for (j = 0; j < 10; ++ j)
15 
      { case 1:; }      // { dg-error "jump|enters" }
16 
  }
17 
  switch (i)
18 
  {
19 
  #pragma omp critical
20 
    { case 2:; }        // { dg-error "jump|enters" }
21 
  }
22 
  switch (i)
23 
  {
24 
  #pragma omp master
25 
    { case 3:; }        // { dg-error "jump|enters" }
26 
  }
27 
  switch (i)
28 
  {
29 
  #pragma omp sections
30 
    { case 4:;          // { dg-error "jump|enters" }
31 
    #pragma omp section
32 
       { case 5:; }     // { dg-error "jump|enters" }
33 
    }
34 
  }
35 
  switch (i)
36 
  {
37 
  #pragma omp ordered
38 
    { default:; }       // { dg-error "jump|enters" }
39 
  }
40 
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.