URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [tree-ssa/] [ipa-split-5.c] - Rev 689
Compare with Previous | Blame | View Log
/* { dg-do compile } */ /* { dg-options "-O3 -fdump-tree-fnsplit -fdump-tree-optimized" } */ struct a {int a,b;}; struct a make_me_big (int a); struct a split_me (int a) { struct a retval; if (__builtin_expect (a!=0,1)) { retval.a = 0; retval.b = 0; return retval; } else { struct a retval = make_me_big (a); retval = make_me_big (a); retval = make_me_big (a); retval = make_me_big (a); retval = make_me_big (a); retval = make_me_big (a); return retval; } } int val; test() { split_me (val); split_me (val); split_me (val); split_me (val); } /* { dg-final { scan-tree-dump-times "Splitting function" 1 "fnsplit"} } */ /* { dg-final { cleanup-tree-dump "fnsplit" } } */ /* { dg-final { scan-tree-dump "part" "optimized"} } */ /* { dg-final { cleanup-tree-dump "optimized" } } */