URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Subversion Repositories openrisc_me
[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.dg/] [gomp/] [pr26412.c] - Rev 298
Compare with Previous | Blame | View Log
/* PR middle-end/26412 */ /* { dg-do compile } */ extern double a[]; extern int b; double test (void) { int i; double c = 0; #pragma omp parallel for private(i) reduction(+:c) for (i = 0; i < 10000; i++) c += a[b]; return c; }