2010-06-09 Janus Weil <janus@gcc.gnu.org>
PR fortran/44430
* dump-parse-tree.c (show_symbol): Avoid infinite loop.
From-SVN: r160504
+2010-06-09 Janus Weil <janus@gcc.gnu.org>
+
+ PR fortran/44430
+ * dump-parse-tree.c (show_symbol): Avoid infinite loop.
+
2010-06-09 Steven G. Kargl <kargl@gcc.gnu.org>
* fortran/symbol.c (check_conflict): Remove an invalid conflict check.
}
}
- if (sym->formal_ns)
+ if (sym->formal_ns && (sym->formal_ns->proc_name != sym))
{
show_indent ();
fputs ("Formal namespace", dumpfile);