Hi Andreas,
I have committed your patch with a slight variation to trunk as
obvious after regression-testting. Will commit to 4.6 in a few
days. No test case because we can't do test cases with -fdump-fortran-*
at the moment.
This patch is small enough so it does not need a copyright assignment,
but you might want to consider obtaining one just the same.
Thanks for working on this!
Thomas
2011-06-05 Andreas Schmidt <[email protected]>
Thomas Koenig <[email protected]>
* dump-parse-tree.c (show_symbol): Don't dump namespace
for ENTRY to avoid infinite recursion.
Index: dump-parse-tree.c
===================================================================
--- dump-parse-tree.c (Revision 174391)
+++ dump-parse-tree.c (Arbeitskopie)
@@ -893,7 +893,8 @@
}
if (sym->formal_ns && (sym->formal_ns->proc_name != sym)
- && sym->attr.proc != PROC_ST_FUNCTION)
+ && sym->attr.proc != PROC_ST_FUNCTION
+ && !sym->attr.entry)
{
show_indent ();
fputs ("Formal namespace", dumpfile);
