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

Subversion Repositories openrisc

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

Line No.	Rev	Author	Line
1	688	jeremybenn	`int a[2];`
2
3			`f (b)`
4			`{`
5			`unsigned int i;`
6			`int *p;`
7			`for (p = &a[b], i = b; --i < ~0; )`
8			`--p = i 3 + (int)a;`
9			`}`
10
11			`main ()`
12			`{`
13			`a[0] = a[1] = 0;`
14			`f (2);`
15			`if (a[0] != (int)a \|\| a[1] != (int)a + 3)`
16			`abort ();`
17			`exit (0);`
18			`}`