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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [graphite/] [pr46761.c] - Blame information for rev 689

Line No.	Rev	Author	Line
1	689	jeremybenn	`/* { dg-do run } */`
2			`/* { dg-options "-O -fgraphite-identity" } */`
3
4			`#define N 128`
5
6			`int`
7			`main ()`
8			`{`
9			`int arr[N], i, s = 0;`
10			`for (i = 0; i < N; i++)`
11			`arr[i] = i;`
12
13			`for (i = 0; i < N; i++)`
14			`if (arr[i] != i)`
15			`__builtin_abort ();`
16
17			`for (i = 0; i < N; i++)`
18			`s += arr[i];`
19			`if (s != (N * (N - 1)) / 2)`
20			`__builtin_abort ();`
21			`return 0;`
22			`}`