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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [pr27758.c] - Blame information for rev 774

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


/* PR target/27758 */
/* { dg-do run { target fpic } } */
/* { dg-options "-O0 -fpic" } */
 
typedef int (*fn) (void);
 
static inline int
foo (void)
{
  return 1;
}
 
fn
test (void)
{
  return foo;
}
 
int
main (void)
{
  fn f = test ();
  return f () != 1;
}

Line No.	Rev	Author	Line
1	689	jeremybenn	`/* PR target/27758 */`
2			`/* { dg-do run { target fpic } } */`
3			`/* { dg-options "-O0 -fpic" } */`
4
5			`typedef int (*fn) (void);`
6
7			`static inline int`
8			`foo (void)`
9			`{`
10			`return 1;`
11			`}`
12
13			`fn`
14			`test (void)`
15			`{`
16			`return foo;`
17			`}`
18
19			`int`
20			`main (void)`
21			`{`
22			`fn f = test ();`
23			`return f () != 1;`
24			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [pr27758.c] - Blame information for rev 774