URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [libgomp/] [testsuite/] [libgomp.c++/] [single-3.C] - Rev 735
Compare with Previous | Blame | View Log
extern "C" void abort (void);voidsingle (int a, int b){#pragma omp single copyprivate(a) copyprivate(b){a = b = 5;}if (a != b)abort ();}int main(){#pragma omp parallelsingle (1, 2);return 0;}