diff options
Diffstat (limited to 'gcc/fortran/trans-common.c')
| -rw-r--r-- | gcc/fortran/trans-common.c | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/gcc/fortran/trans-common.c b/gcc/fortran/trans-common.c index 3b16e5e..bf19d12 100644 --- a/gcc/fortran/trans-common.c +++ b/gcc/fortran/trans-common.c @@ -1057,9 +1057,10 @@ gfc_trans_common (gfc_namespace *ns) /* Translate all named common blocks. */ gfc_traverse_symtree (ns->common_root, named_common); - /* Commit the newly created symbols for common blocks. */ - gfc_commit_symbols (); - /* Translate local equivalence. */ finish_equivalences (ns); + + /* Commit the newly created symbols for common blocks and module + equivalences. */ + gfc_commit_symbols (); } |