// RUN: %libomp-compile && env OMP_MAX_TASK_PRIORITY=42 %libomp-run #include #include #include int a = 0; int main(void) { int i; int max_task_priority = omp_get_max_task_priority(); if (max_task_priority != 42) { fprintf(stderr, "error: omp_get_max_task_priority() returned %d instead of 42\n", max_task_priority); exit(EXIT_FAILURE); } for (i = 0; i < 250; ++i) { #pragma omp parallel { #pragma omp task priority(42) { #pragma omp atomic a++; } } } printf("a = %d\n", a); return EXIT_SUCCESS; }