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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.dg/] [builtin-apply2.c] - Blame information for rev 867

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


/* PR target/12503 */
/* Origin: <pierre.nguyen-tuong@asim.lip6.fr> */
 
/* Verify that __builtin_apply behaves correctly on targets
   with pre-pushed arguments (e.g. SPARC).  */
 
/* { dg-do run } */
 
 
#define INTEGER_ARG  5
 
extern void abort(void);
 
void foo(char *name, double d, double e, double f, int g)
{
  if (g != INTEGER_ARG)
    abort();
}
 
void bar(char *name, ...)
{
  __builtin_apply(foo, __builtin_apply_args(), 64);
}
 
int main(void)
{
  bar("eeee", 5.444567, 8.90765, 4.567789, INTEGER_ARG);
 
  return 0;
}

Line No.	Rev	Author	Line
1	149	jeremybenn	`/* PR target/12503 */`
2			`/* Origin: <pierre.nguyen-tuong@asim.lip6.fr> */`
3
4			`/* Verify that __builtin_apply behaves correctly on targets`
5			`with pre-pushed arguments (e.g. SPARC). */`
6
7			`/* { dg-do run } */`
8
9
10			`#define INTEGER_ARG 5`
11
12			`extern void abort(void);`
13
14			`void foo(char *name, double d, double e, double f, int g)`
15			`{`
16			`if (g != INTEGER_ARG)`
17			`abort();`
18			`}`
19
20			`void bar(char *name, ...)`
21			`{`
22			`__builtin_apply(foo, __builtin_apply_args(), 64);`
23			`}`
24
25			`int main(void)`
26			`{`
27			`bar("eeee", 5.444567, 8.90765, 4.567789, INTEGER_ARG);`
28
29			`return 0;`
30			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.dg/] [builtin-apply2.c] - Blame information for rev 867