OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [g++.old-deja/] [g++.ext/] [label2.C] - Blame information for rev 749

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

Line No. Rev Author Line
1 699 jeremybenn 
// { dg-do run  }
2 
// { dg-options "" }
3 
// Origin: Mark Mitchell
4 
 
5 
template
6 
int f ()
7 
{
8 
  int i = 0;
9 
  int j = 0;
10 
  int k = 0;
11 
 
12 
 l:
13 
  if (j)
14 
    return 0;
15 
  ({
16 
    __label__ l;
17 
    k = 0;
18 
  l:
19 
    if (++k <= 2)
20 
      goto l;
21 
    ++i;});
22 
  if (i > 1 || k != 3)
23 
    return 1;
24 
  else
25 
    {
26 
      j = 1;
27 
      goto l;
28 
    }
29 
}
30 
 
31 
int main ()
32 
{
33 
  return f();
34 
}
35 
 

powered by: WebSVN 2.1.0

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