2011-04-19 Tobias Burnus <burnus@net-b.de>

        PR fortran/48588
        PR fortran/48692

        * module.c (fix_mio_expr): Commit created symbol.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@172782 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index ca02edf..7a857a4 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,10 @@
+2011-04-19  Tobias Burnus  <burnus@net-b.de>
+
+       PR fortran/48588
+       PR fortran/48692
+
+       * module.c (fix_mio_expr): Commit created symbol.
+
 2011-04-19  Janne Blomqvist  <jb@gcc.gnu.org>
 
        * scanner.c (load_file): Use XCNEWVAR instead of xcalloc.

diff --git a/gcc/fortran/module.c b/gcc/fortran/module.c
index e97354f..42e8e00 100644 (file)
--- a/gcc/fortran/module.c
+++ b/gcc/fortran/module.c
@@ -3013,6 +3013,7 @@ fix_mio_expr (gfc_expr *e)
       sym->attr.flavor = FL_PROCEDURE;
       sym->attr.generic = 1;
       e->symtree = gfc_find_symtree (gfc_current_ns->sym_root, fname);
+      gfc_commit_symbol (sym);
     }
 }