------- Comment #2 from pault at gcc dot gnu dot org 2007-04-05 08:28 -------
(In reply to comment #1)
> The problem seems to occur with procedure pointers to ENTRY points
>From a quick look at decl.c(get_proc_name), the modifications that I added, to
get module procedures with entries to work at all, ignored the possibility that
there would be an existing symtree at module level.
...snip...
/* Module function entries will already have a symtree in
the current namespace but will need one at module level. */
if (module_fcn_entry)
st = gfc_new_symtree (&gfc_current_ns->parent->sym_root, name);
else
st = gfc_new_symtree (&gfc_current_ns->sym_root, name);
...snip...
is almost certainly the cause of the trouble. I have a build/regtest going on
right now (and I should be paying attention to something else:)), so I canot do
anything about it until this afternoon. However, I can see what to do and will
take it on.
Thank you for the report, Michael.
Paul
--
pault at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
AssignedTo|unassigned at gcc dot gnu |pault at gcc dot gnu dot org
|dot org |
Status|NEW |ASSIGNED
Last reconfirmed|2007-04-04 20:47:59 |2007-04-05 08:28:53
date| |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=31474
