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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.dg/] [non-local-goto-1.c] - Blame information for rev 823

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


/* { dg-do run } */
/* { dg-options "-O2" } */
 
extern void abort (void);
 
int global;
 
static foo(void) __attribute__((noinline));
 
static foo(void)
{
  global = 1;
}
 
static bar(void)
{
  foo ();
}
 
int execute(int cmd)
{
  __label__ start;
 
  void raise(void)
  {
    goto start;
  }
 
  int last;
 
  bar ();
 
  last = 0;
 
start:
 
  if (last == 0)
    while (1)
      {
        last = 1;
        raise ();
      }
 
  if (last == 0)
    return 0;
  else
    return cmd;
}
 
int main(void)
{
  if (execute (1) == 0)
    abort ();
 
  return 0;
}

Line No.	Rev	Author	Line
1	149	jeremybenn	`/* { dg-do run } */`
2			`/* { dg-options "-O2" } */`
3
4			`extern void abort (void);`
5
6			`int global;`
7
8			`static foo(void) __attribute__((noinline));`
9
10			`static foo(void)`
11			`{`
12			`global = 1;`
13			`}`
14
15			`static bar(void)`
16			`{`
17			`foo ();`
18			`}`
19
20			`int execute(int cmd)`
21			`{`
22			`__label__ start;`
23
24			`void raise(void)`
25			`{`
26			`goto start;`
27			`}`
28
29			`int last;`
30
31			`bar ();`
32
33			`last = 0;`
34
35			`start:`
36
37			`if (last == 0)`
38			`while (1)`
39			`{`
40			`last = 1;`
41			`raise ();`
42			`}`
43
44			`if (last == 0)`
45			`return 0;`
46			`else`
47			`return cmd;`
48			`}`
49
50			`int main(void)`
51			`{`
52			`if (execute (1) == 0)`
53			`abort ();`
54
55			`return 0;`
56			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.dg/] [non-local-goto-1.c] - Blame information for rev 823