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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.dg/] [tree-ssa/] [tailcall-1.c] - Blame information for rev 816

Details | Compare with Previous | View Log


/* { dg-do compile } */
/* { dg-options "-O2 -fdump-tree-tailc-details" } */
extern void *alloca (__SIZE_TYPE__);
int q(int a);
int *v;
int
t(int a)
{
        int r,r1;
        if (a)
                r1=r = q(a-1);
        else
                return 0;
        /* Dead alloca should not disturb us.  */
        if (r!=r1)
                v=alloca(r);
        return r;
}
/* { dg-final { scan-tree-dump-times "Found tail call" 1 "tailc"} } */
/* { dg-final { cleanup-tree-dump "tailc" } } */

Line No.	Rev	Author	Line
1	149	jeremybenn	`/* { dg-do compile } */`
2			`/* { dg-options "-O2 -fdump-tree-tailc-details" } */`
3			`extern void *alloca (__SIZE_TYPE__);`
4			`int q(int a);`
5			`int *v;`
6			`int`
7			`t(int a)`
8			`{`
9			`int r,r1;`
10			`if (a)`
11			`r1=r = q(a-1);`
12			`else`
13			`return 0;`
14			`/* Dead alloca should not disturb us. */`
15			`if (r!=r1)`
16			`v=alloca(r);`
17			`return r;`
18			`}`
19			`/* { dg-final { scan-tree-dump-times "Found tail call" 1 "tailc"} } */`
20			`/* { dg-final { cleanup-tree-dump "tailc" } } */`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.dg/] [tree-ssa/] [tailcall-1.c] - Blame information for rev 816