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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [g++.dg/] [gomp/] [pr30494.C] - Blame information for rev 774

Line No.	Rev	Author	Line
1	693	jeremybenn	`// PR middle-end/30494`
2			`// { dg-do compile }`
3
4			`int`
5			`foo (int n)`
6			`{`
7			`int i;`
8			`#pragma omp for`
9			`for (i = 0; i < 6; i++)`
10			`{`
11			`int v[n], w[n * 3 + i];`
12			`v[0] = 1;`
13			`w[0] = 2;`
14			`}`
15			`return 0;`
16			`}`
17
18			`int`
19			`bar (int n)`
20			`{`
21			`int i;`
22			`#pragma parallel omp for`
23			`for (i = 0; i < 6; i++)`
24			`{`
25			`int v[n], w[n * 3 + i];`
26			`v[0] = 1;`
27			`w[0] = 2;`
28			`}`
29			`return 0;`
30			`}`