diff options
Diffstat (limited to 'gcc/fortran/openmp.c')
-rw-r--r-- | gcc/fortran/openmp.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/gcc/fortran/openmp.c b/gcc/fortran/openmp.c index 217fce7..3ee0f92 100644 --- a/gcc/fortran/openmp.c +++ b/gcc/fortran/openmp.c @@ -3015,12 +3015,12 @@ resolve_omp_atomic (gfc_code *code) } -struct omp_context +struct fortran_omp_context { gfc_code *code; hash_set<gfc_symbol *> *sharing_clauses; hash_set<gfc_symbol *> *private_iterators; - struct omp_context *previous; + struct fortran_omp_context *previous; } *omp_current_ctx; static gfc_code *omp_current_do_code; static int omp_current_do_collapse; @@ -3056,7 +3056,7 @@ gfc_resolve_omp_do_blocks (gfc_code *code, gfc_namespace *ns) void gfc_resolve_omp_parallel_blocks (gfc_code *code, gfc_namespace *ns) { - struct omp_context ctx; + struct fortran_omp_context ctx; gfc_omp_clauses *omp_clauses = code->ext.omp_clauses; gfc_omp_namelist *n; int list; @@ -3126,7 +3126,7 @@ gfc_omp_save_and_clear_state (struct gfc_omp_saved_state *state) void gfc_omp_restore_state (struct gfc_omp_saved_state *state) { - omp_current_ctx = (struct omp_context *) state->ptrs[0]; + omp_current_ctx = (struct fortran_omp_context *) state->ptrs[0]; omp_current_do_code = (gfc_code *) state->ptrs[1]; omp_current_do_collapse = state->ints[0]; } |