diff options
Diffstat (limited to 'gcc/fortran/trans-openmp.c')
-rw-r--r-- | gcc/fortran/trans-openmp.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/trans-openmp.c b/gcc/fortran/trans-openmp.c index 4a7f70e7b6e..14e3e2f2236 100644 --- a/gcc/fortran/trans-openmp.c +++ b/gcc/fortran/trans-openmp.c @@ -1357,7 +1357,7 @@ gfc_trans_omp_do (gfc_code *code, stmtblock_t *pblock, gfc_start_block (&body); - for (ix = 0; VEC_iterate (dovar_init, inits, ix, di); ix++) + FOR_EACH_VEC_ELT (dovar_init, inits, ix, di) gfc_add_modify (&body, di->var, di->init); VEC_free (dovar_init, heap, inits); |