URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Subversion Repositories openrisc_me
[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc2/] [libgomp/] [testsuite/] [libgomp.c/] [nested-1.c] - Rev 273
Go to most recent revision | Compare with Previous | Blame | View Log
#include <omp.h> #include <stdlib.h> int main (void) { int i = -1, j = -1; omp_set_nested (1); omp_set_dynamic (0); #pragma omp parallel num_threads (4) { #pragma omp single { i = omp_get_thread_num () + omp_get_num_threads () * 256; #pragma omp parallel num_threads (2) { #pragma omp single { j = omp_get_thread_num () + omp_get_num_threads () * 256; } } } } if (i < 4 * 256 || i >= 4 * 256 + 4) abort (); if (j < 2 * 256 || j >= 2 * 256 + 2) abort (); return 0; }
Go to most recent revision | Compare with Previous | Blame | View Log