------- Comment #9 from pault at gcc dot gnu dot org 2009-09-10 16:21 -------
(In reply to comment #8)
Janus,
> - resolve_code (code, ns);
> return true;
I had wondered about the function of that resolve_code. If it can be safely
removed, do it. Otherwise another variant of my experiment in comment #3 is to
remove the codelet;
+ if (gfc_is_proc_ptr_comp (e, &comp)
+ && (resolve_expr_ppc (e) == SUCCESS))
+ return SUCCESS;
Into resolve_function, just before the offending error.
All that said, I would like to understand why it is that the number of errors
that you get is equal to the number of interface assignments before the ppc
evaluation. That is:
prc_id = "foobar"
prc_id = "foobar"
prc_id = "foobar"
prc_id = "foobar"
n_in = prc_lib% get_n_in (2)
produces the error 4 times! I suspect (unless you can argue otherwise :-) )
that there is something really bad going on that we are just papering over
Paul
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41242