[Bug fortran/33917] Rejects valid procedure declarations

[burnus at gcc dot gnu dot org]

------- Comment #2 from burnus at gcc dot gnu dot org  2007-10-26 23:14 -------
  procedure(sub) :: p4
  procedure(p4) :: p6
The problem is that first sub needs to be resolved for p4 and then p4 before
p6.

The problem is that "procedure(p4) :: p6" is checked before "procedure(sub) ::
p4" and that thus for "p6" sym->interface->attr.if_source == IFSRC_UNKNOWN
instead of IFSRC_DECL.

This seems to be a tree-walking problem. The solution is to make sure the
interfaces are resolved first such that the following holds true:

      /* Get the attributes from the interface (now resolved).  */


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=33917