URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [tree-prof/] [update-tailcall.c] - Blame information for rev 749

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


/* { dg-options "-O2 -fdump-tree-tailc -fdump-tree-optimized" } */
__attribute__ ((noinline))
int factorial(int x)
{
   if (x == 1)
     return 1;
   else
     return x*factorial(--x);
}
int gbl;
int
main()
{
   gbl = factorial(100);
   return 0;
}
/* { dg-final-use { scan-tree-dump-not "Invalid sum" "tailc"} } */
/* { dg-final-use { scan-tree-dump-not "Invalid sum" "optimized"} } */
/* { dg-final-use { cleanup-tree-dump "tailc" } } */
/* { dg-final-use { cleanup-tree-dump "optimized" } } */

Line No.	Rev	Author	Line
1	689	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" } } */`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [tree-prof/] [update-tailcall.c] - Blame information for rev 749