URL
https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk
Subversion Repositories openrisc_2011-10-31
[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.dg/] [gomp/] [appendix-a/] [a.26.2.c] - Rev 329
Go to most recent revision | Compare with Previous | Blame | View Log
/* { dg-do compile } */ /* { dg-options "-fopenmp -std=c99" } */ int a; void g (int k) { a = k; /* The global "a", not the private "a" in f */ } void f (int n) { int a = 0; #pragma omp parallel for private(a) for (int i = 1; i < n; i++) { a = i; g (a * 2); /* Private copy of "a" */ } }
Go to most recent revision | Compare with Previous | Blame | View Log