URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [ipa/] [ipcp-1.c] - Rev 706
Go to most recent revision | Compare with Previous | Blame | View Log
/* Test that IPA-CP is able to figure out that poth parameters a are constant 7 even though f and h recursively call each other and specialize them accordinly. */ /* { dg-do compile } */ /* { dg-options "-O3 -fipa-cp -fipa-cp-clone -fdump-ipa-cp -fno-early-inlining" } */ /* { dg-add-options bind_pic_locally } */ extern void use_stuff (int); static int g (int b, int c) { int i; for (i = 0; i < b; i++) use_stuff (c); } static void f (int a, int x, int z); static void h (int z, int a) { use_stuff (z); f (a, 9, 10); } static void f (int a, int x, int z) { if (z > 1) g (a, x); else h (5, a); } int main (int argc, char *argv[]) { int i; for (i = 0; i < 100; i++) f (7, 8, argc); return 0; } /* { dg-final { scan-ipa-dump "Creating a specialized node of f.*for all known contexts" "cp" } } */ /* { dg-final { scan-ipa-dump "replacing param a with const 7" "cp" } } */ /* { dg-final { cleanup-ipa-dump "cp" } } */
Go to most recent revision | Compare with Previous | Blame | View Log