This is the mail archive of the fortran@gcc.gnu.org mailing list for the GNU Fortran project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

Re: [Patch, Fortran] ICE with PROCEDURE using a complicated interface (PR36322 & PR36275)


Janus Weil wrote:
This actually won't work since the added line overwrites
"sym->ts.interface" (which then will be NULL), but the three following
lines depend on it.
Ups.

What do you think about the last version that I sent before
(pr36322_v2.diff)? I think it should do what we need, and I have
already regtested it succesfully.
That version is OK (together with the two test cases). However,

+++ gcc/fortran/resolve.c (working copy)
@@ -7847,6 +7847,7 @@ resolve_symbol (gfc_symbol *sym)
gfc_symtree *this_symtree;
gfc_namespace *ns;
gfc_component *c;
+ gfc_symbol *ifc;
that added line should be moved to ...


@@ -7893,11 +7894,12 @@ resolve_symbol (gfc_symbol *sym)
/* Get the attributes from the interface (now resolved). */
if (sym->ts.interface->attr.if_source ||
sym->ts.interface->attr.intrinsic)
{
... here.

Tobias


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]