URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc3/] [gcc/] [testsuite/] [gcc.target/] [i386/] [pr40718.c] - Rev 516
Compare with Previous | Blame | View Log
/* { dg-do run } */ /* { dg-require-effective-target ilp32 } */ /* { dg-options "-O1 -foptimize-sibling-calls" } */ void abort (void); struct S { void (__attribute__((__stdcall__)) *f) (struct S *); int i; }; void __attribute__((__stdcall__)) foo (struct S *s) { s->i++; } void __attribute__((__stdcall__)) bar (struct S *s) { foo(s); s->f(s); } int main (void) { struct S s = { foo, 0 }; bar (&s); if (s.i != 2) abort (); return 0; }