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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [980506-1.c] - Blame information for rev 774

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


struct decision
{
  char enforce_mode;
  struct decision *next;
};
 
 
static void
clear_modes (p)
     register struct decision *p;
{
  goto blah;
 
foo:
  p->enforce_mode = 0;
blah:
  if (p)
    goto foo;
}
 
main()
{
  struct decision *p = 0;
  clear_modes (p);
  exit (0);
}

Line No.	Rev	Author	Line
1	688	jeremybenn	`struct decision`
2			`{`
3			`char enforce_mode;`
4			`struct decision *next;`
5			`};`
6
7
8			`static void`
9			`clear_modes (p)`
10			`register struct decision *p;`
11			`{`
12			`goto blah;`
13
14			`foo:`
15			`p->enforce_mode = 0;`
16			`blah:`
17			`if (p)`
18			`goto foo;`
19			`}`
20
21			`main()`
22			`{`
23			`struct decision *p = 0;`
24			`clear_modes (p);`
25			`exit (0);`
26			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [980506-1.c] - Blame information for rev 774