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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-stable/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.dg/] [graphite/] [scop-7.c] - Blame information for rev 826

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