re PR fortran/48588 (ICE (segfault) in gfc_get_nodesc_array_type)

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

        PR fortran/48588
        PR fortran/48692

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

From-SVN: r172782

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index ca02edfa7b58f6ca3025f769385b96de33a4c929..7a857a47664527dd0f2bcdab7eea7e83c6392551 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 e97354f713f29980600de126ca94b822525132c7..42e8e00269259d267d32aebf99f590130747326b 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);
     }
 }