URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [libgomp/] [testsuite/] [libgomp.c/] [omp-loop03.c] - Rev 735
Compare with Previous | Blame | View Log
extern void abort (void); int a; void foo () { int i; a = 30; #pragma omp barrier #pragma omp for lastprivate (a) for (i = 0; i < 1024; i++) { a = i; } if (a != 1023) abort (); } int main (void) { #pragma omp parallel num_threads (64) foo (); return 0; }