diff mbox

never ending output from -fdump-fortran-original on ENTRY statement

Message ID 4DEBD09D.9040405@netcologne.de
State New
Headers show

Commit Message

Thomas Koenig June 5, 2011, 6:53 p.m. UTC 
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  <andreas.schmidt.42@gmx.net>
         Thomas Koenig  <tkoenig@gcc.gnu.org>


         * dump-parse-tree.c (show_symbol):  Don't dump namespace
         for ENTRY to avoid infinite recursion.
diff mbox

Patch

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);