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

Subversion Repositories openrisc

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

Line No.	Rev	Author	Line
1	689	jeremybenn	`int foo (void);`
2			`void bar (void);`
3
4			`int toto()`
5			`{`
6			`/* Scop 1. */`
7			`int i, j, k;`
8			`int a[201][100];`
9			`int b[100];`
10			`int N = foo ();`
11
12			`for (i = 0; i < 2*N+ 100; i++)`
13			`for (j = 0; j < 200; j++)`
14			`a[j][i] = a[j+1][10] + 2;`
15
16			`return a[3][5] + b[1];`
17			`/* End scop 1. */`
18			`}`
19
20			`/* { dg-final { scan-tree-dump-times "number of SCoPs: 1" 1 "graphite"} } */`
21			`/* { dg-final { cleanup-tree-dump "graphite" } } */`
22