URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Subversion Repositories openrisc_me
[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.dg/] [tree-prof/] [indir-call-prof.c] - Rev 298
Compare with Previous | Blame | View Log
/* { dg-options "-O2 -fdump-tree-optimized -fdump-tree-tree_profile" } */ static int a1 (void) { return 10; } static int a2 (void) { return 0; } typedef int (*tp) (void); static tp aa [] = {a2, a1, a1, a1, a1}; void setp (int (**pp) (void), int i) { if (!i) *pp = aa [i]; else *pp = aa [(i & 2) + 1]; } int main (void) { int (*p) (void); int i; for (i = 0; i < 10; i ++) { setp (&p, i); p (); } return 0; } /* { dg-final-use { scan-tree-dump "Indirect call -> direct call.* a1 transformation on insn" "tree_profile"} } */ /* { dg-final-use { scan-tree-dump-not "Invalid sum" "optimized"} } */ /* { dg-final-use { cleanup-tree-dump "optimized" } } */ /* { dg-final-use { cleanup-tree-dump "tree_profile" } } */