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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [compile/] [981001-4.c] - Blame information for rev 688

Details | Compare with Previous | View Log


#define P(a,b) P1(a,b)
#define P1(a,b) a##b
 
#define ONCE(x, y) (x ?: (x = y()))
#define PREFIX
 
extern int P(PREFIX, init) (void);
 
int
fun(void)
{
  static int memo;
  return ONCE(memo, P(PREFIX, init));
}

Line No.	Rev	Author	Line
1	688	jeremybenn	`#define P(a,b) P1(a,b)`
2			`#define P1(a,b) a##b`
3
4			`#define ONCE(x, y) (x ?: (x = y()))`
5			`#define PREFIX`
6
7			`extern int P(PREFIX, init) (void);`
8
9			`int`
10			`fun(void)`
11			`{`
12			`static int memo;`
13			`return ONCE(memo, P(PREFIX, init));`
14			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [compile/] [981001-4.c] - Blame information for rev 688