pr48894.f90
613 Bytes
-
re PR fortran/48894 (generic omp_get_ancestor_thread_num(l(i)) produces incorrect output) · e7385332
PR fortran/48894 * fortran.c: Include limits.h. (TO_INT): Define. (omp_set_dynamic_8_, omp_set_num_threads_8_): Use !!*set instead of *set. (omp_set_num_threads_8_, omp_set_schedule_8_, omp_set_max_active_levels_8_, omp_get_ancestor_thread_num_8_, omp_get_team_size_8_): Use TO_INT macro. * testsuite/libgomp.fortran/pr48894.f90: New test. From-SVN: r173476
Jakub Jelinek committed