OpenCores
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/] [update-tailcall.c] - Blame information for rev 399

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

Line No. Rev Author Line
1 298 jeremybenn
/* { dg-options "-O2 -fdump-tree-tailc -fdump-tree-optimized" } */
2
__attribute__ ((noinline))
3
int factorial(int x)
4
{
5
   if (x == 1)
6
     return 1;
7
   else
8
     return x*factorial(--x);
9
}
10
int gbl;
11
int
12
main()
13
{
14
   gbl = factorial(100);
15
   return 0;
16
}
17
/* { dg-final-use { scan-tree-dump-not "Invalid sum" "tailc"} } */
18
/* { dg-final-use { scan-tree-dump-not "Invalid sum" "optimized"} } */
19
/* { dg-final-use { cleanup-tree-dump "tailc" } } */
20
/* { dg-final-use { cleanup-tree-dump "optimized" } } */

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.