Searched refs:omp_current_ctx (Results 1 – 4 of 4) sorted by relevance
5533 } *omp_current_ctx; variable5579 ctx.previous = omp_current_ctx; in gfc_resolve_omp_parallel_blocks()5581 omp_current_ctx = &ctx; in gfc_resolve_omp_parallel_blocks()5623 omp_current_ctx = ctx.previous; in gfc_resolve_omp_parallel_blocks()5634 state->ptrs[0] = omp_current_ctx; in gfc_omp_save_and_clear_state()5637 omp_current_ctx = NULL; in gfc_omp_save_and_clear_state()5648 omp_current_ctx = (struct fortran_omp_context *) state->ptrs[0]; in gfc_omp_restore_state()5660 if (omp_current_ctx == NULL) in gfc_resolve_do_iterator()5682 if (!omp_current_ctx->is_openmp && !oacc_is_loop (omp_current_ctx->code)) in gfc_resolve_do_iterator()5685 if (omp_current_ctx->sharing_clauses->contains (sym)) in gfc_resolve_do_iterator()[all …]
8234 } *omp_current_ctx; variable8302 ctx.previous = omp_current_ctx; in gfc_resolve_omp_parallel_blocks()8304 omp_current_ctx = &ctx; in gfc_resolve_omp_parallel_blocks()8358 omp_current_ctx = ctx.previous; in gfc_resolve_omp_parallel_blocks()8369 state->ptrs[0] = omp_current_ctx; in gfc_omp_save_and_clear_state()8372 omp_current_ctx = NULL; in gfc_omp_save_and_clear_state()8383 omp_current_ctx = (struct fortran_omp_context *) state->ptrs[0]; in gfc_omp_restore_state()8395 if (omp_current_ctx == NULL) in gfc_resolve_do_iterator()8417 if (!omp_current_ctx->is_openmp && !oacc_is_loop (omp_current_ctx->code)) in gfc_resolve_do_iterator()8420 if (omp_current_ctx->sharing_clauses->contains (sym)) in gfc_resolve_do_iterator()[all …]
732 * openmp.c (omp_current_ctx): Make static.736 don't actually add any clause. Move omp_current_ctx test
3626 (omp_current_ctx): New variable.