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

Subversion Repositories openrisc

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

Line No.	Rev	Author	Line
1	689	jeremybenn	`#define N 10000`
2			`void foo (int);`
3			`int test ()`
4			`{`
5			`int a[N+6];`
6			`int i;`
7
8			`for (i = 0; i < N; i++)`
9			`{`
10			`a[i] = i + 12;`
11
12			`if (i == 40)`
13			`a[i] = i;`
14			`else`
15			`a[i] = i+1;`
16
17
18			`a[i] = i + 12;`
19			`a[i] = a[i+1];`
20			`a[i] += a[i+2];`
21			`a[i] += a[i+3];`
22			`a[i] += a[i+4];`
23			`a[i] += a[i+5];`
24			`a[i] += a[i+6];`
25
26			`}`
27
28			`return a[20];`
29			`}`
30			`/* { dg-final { scan-tree-dump-times "number of SCoPs: 1" 1 "graphite"} } */`
31			`/* { dg-final { cleanup-tree-dump "graphite" } } */`