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/] [960209-1.c] - Diff between revs 297 and 338

Rev 297	Rev 338
`struct a_struct`	`struct a_struct`
`{`	`{`
`unsigned char a_character;`	`unsigned char a_character;`
`};`	`};`

`struct a_struct an_array[5];`	`struct a_struct an_array[5];`
`struct a_struct *a_ptr;`	`struct a_struct *a_ptr;`
`int yabba = 1;`	`int yabba = 1;`

`int`	`int`
`f (a, b)`	`f (a, b)`
`unsigned char a;`	`unsigned char a;`
`unsigned long b;`	`unsigned long b;`
`{`	`{`
`long i, j, p, q, r, s;`	`long i, j, p, q, r, s;`

`if (b != (unsigned long) 0)`	`if (b != (unsigned long) 0)`
`{`	`{`
`if (yabba)`	`if (yabba)`
`return -1;`	`return -1;`
`s = 4000000 / b;`	`s = 4000000 / b;`
`for (i = 0; i < 11; i++)`	`for (i = 0; i < 11; i++)`
`{`	`{`
`for (j = 0; j < 256; j++)`	`for (j = 0; j < 256; j++)`
`{`	`{`
`if (((p - s < 0) ? -s : 0) < (( q - s < 0) ? -s : q))`	`if (((p - s < 0) ? -s : 0) < (( q - s < 0) ? -s : q))`
`r = i;`	`r = i;`
`}`	`}`
`}`	`}`
`}`	`}`

`if (yabba)`	`if (yabba)`
`return 0;`	`return 0;`
`a_ptr = &an_array[a];`	`a_ptr = &an_array[a];`
`a_ptr->a_character = (unsigned char) r;`	`a_ptr->a_character = (unsigned char) r;`
`}`	`}`

`main ()`	`main ()`
`{`	`{`
`if (f (1, 0UL) != 0)`	`if (f (1, 0UL) != 0)`
`abort ();`	`abort ();`
`exit (0);`	`exit (0);`
`}`	`}`