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

Subversion Repositories openrisc

[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc1/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [930930-1.c] - Diff between revs 297 and 338

Rev 297	Rev 338
`long *wm_TR;`	`long *wm_TR;`
`long *wm_HB;`	`long *wm_HB;`
`long *wm_SPB;`	`long *wm_SPB;`

`long mem[100];`	`long mem[100];`

`f (mr_TR, mr_SPB, mr_HB, reg1, reg2)`	`f (mr_TR, mr_SPB, mr_HB, reg1, reg2)`
`long *mr_TR;`	`long *mr_TR;`
`long *mr_SPB;`	`long *mr_SPB;`
`long *mr_HB;`	`long *mr_HB;`
`long *reg1;`	`long *reg1;`
`long *reg2;`	`long *reg2;`
`{`	`{`
`long *x = mr_TR;`	`long *x = mr_TR;`

`for (;;)`	`for (;;)`
`{`	`{`
`if (reg1 < reg2)`	`if (reg1 < reg2)`
`goto out;`	`goto out;`
`if ((long ) reg1 < mr_HB && (long ) reg1 >= mr_SPB)`	`if ((long ) reg1 < mr_HB && (long ) reg1 >= mr_SPB)`
`--mr_TR = reg1;`	`--mr_TR = reg1;`
`reg1--;`	`reg1--;`
`}`	`}`
`out:`	`out:`

`if (x != mr_TR)`	`if (x != mr_TR)`
`abort ();`	`abort ();`
`}`	`}`

`main ()`	`main ()`
`{`	`{`
`mem[99] = (long) mem;`	`mem[99] = (long) mem;`
`f (mem + 100, mem + 6, mem + 8, mem + 99, mem + 99);`	`f (mem + 100, mem + 6, mem + 8, mem + 99, mem + 99);`
`exit (0);`	`exit (0);`
`}`	`}`