diff options
Diffstat (limited to 'final/runtime/test/master/omp_master.c')
-rw-r--r-- | final/runtime/test/master/omp_master.c | 38 |
1 files changed, 38 insertions, 0 deletions
diff --git a/final/runtime/test/master/omp_master.c b/final/runtime/test/master/omp_master.c new file mode 100644 index 0000000..1cc7f9e --- /dev/null +++ b/final/runtime/test/master/omp_master.c @@ -0,0 +1,38 @@ +// RUN: %libomp-compile-and-run +#include <stdio.h> +#include "omp_testsuite.h" + +int test_omp_master() +{ + int nthreads; + int executing_thread; + + nthreads = 0; + executing_thread = -1; + + #pragma omp parallel + { + #pragma omp master + { + #pragma omp critical + { + nthreads++; + } + executing_thread = omp_get_thread_num(); + } /* end of master*/ + } /* end of parallel*/ + return ((nthreads == 1) && (executing_thread == 0)); +} + +int main() +{ + int i; + int num_failed=0; + + for(i = 0; i < REPETITIONS; i++) { + if(!test_omp_master()) { + num_failed++; + } + } + return num_failed; +} |