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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [20061101-1.c] - Blame information for rev 774

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


/* PR rtl-optimization/28970 */
/* Origin: Peter Bergner <bergner@vnet.ibm.com> */
 
extern void abort (void);
 
int tar (int i)
{
  if (i != 36863)
    abort ();
 
  return -1;
}
 
void bug(int q, int bcount)
{
  int j = 0;
  int outgo = 0;
 
  while(j != -1)
    {
      outgo++;
      if (outgo > q-1)
        outgo = q-1;
      j = tar (outgo*bcount);
    }
}
 
int main(void)
{
  bug(5, 36863);
  return 0;
}

Line No.	Rev	Author	Line
1	688	jeremybenn	`/* PR rtl-optimization/28970 */`
2			`/* Origin: Peter Bergner <bergner@vnet.ibm.com> */`
3
4			`extern void abort (void);`
5
6			`int tar (int i)`
7			`{`
8			`if (i != 36863)`
9			`abort ();`
10
11			`return -1;`
12			`}`
13
14			`void bug(int q, int bcount)`
15			`{`
16			`int j = 0;`
17			`int outgo = 0;`
18
19			`while(j != -1)`
20			`{`
21			`outgo++;`
22			`if (outgo > q-1)`
23			`outgo = q-1;`
24			`j = tar (outgo*bcount);`
25			`}`
26			`}`
27
28			`int main(void)`
29			`{`
30			`bug(5, 36863);`
31			`return 0;`
32			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [20061101-1.c] - Blame information for rev 774