------- Comment #1 from pault at gcc dot gnu dot org 2009-08-26 09:50 ------- Janus,
Thanks for reporting this. In fact, the bug is worse than you report; the namespace of 'F1' is never freed! ns->refs is set to one by gfc_get_namespace it is incremented in decl.c(get_proc_name):800 for reasons that I do not understand and again in resolve.c(resolve_symbol):10279 for reasons that I understand less. Note that this last, sets the containing namespace to be the formal namespace, so refs winds up being 3. Since the namespace is never freed, the formal namespace is never looked at! I suspect that this is a serious can of worms :-( Paul -- pault at gcc dot gnu dot org changed: What |Removed |Added ---------------------------------------------------------------------------- Status|UNCONFIRMED |NEW Ever Confirmed|0 |1 Last reconfirmed|0000-00-00 00:00:00 |2009-08-26 09:50:06 date| | http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41093