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

Subversion Repositories openrisc

[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc1/] [libgomp/] [testsuite/] [libgomp.c++/] [single-2.C] - Diff between revs 273 and 338

Rev 273	Rev 338
`extern "C" void abort (void);`	`extern "C" void abort (void);`

`struct X`	`struct X`
`{`	`{`
`int a;`	`int a;`
`char b;`	`char b;`
`int c;`	`int c;`
`};`	`};`

`main()`	`main()`
`{`	`{`
`int i = 0;`	`int i = 0;`
`struct X x;`	`struct X x;`
`int bad = 0;`	`int bad = 0;`

`#pragma omp parallel private (i, x) shared (bad)`	`#pragma omp parallel private (i, x) shared (bad)`
`{`	`{`
`i = 5;`	`i = 5;`

`#pragma omp single copyprivate (i, x)`	`#pragma omp single copyprivate (i, x)`
`{`	`{`
`i++;`	`i++;`
`x.a = 23;`	`x.a = 23;`
`x.b = 42;`	`x.b = 42;`
`x.c = 26;`	`x.c = 26;`
`}`	`}`

`if (i != 6 \|\| x.a != 23 \|\| x.b != 42 \|\| x.c != 26)`	`if (i != 6 \|\| x.a != 23 \|\| x.b != 42 \|\| x.c != 26)`
`bad = 1;`	`bad = 1;`
`}`	`}`

`if (bad)`	`if (bad)`
`abort ();`	`abort ();`

`return 0;`	`return 0;`
`}`	`}`