[Bug fortran/40646] ICE assigning array return value from type-bound procedure

[burnus at gcc dot gnu dot org]

------- Comment #3 from burnus at gcc dot gnu dot org  2009-07-04 12:45 -------
The problem is:
  gcc_assert (expr2->value.function.isym
              || (!comp && gfc_return_by_reference (expr2->value.function.esym)

which assumes that "esym" is set. However, looking at resolve.c's
resolve_compcall:

  e->value.function.esym = NULL;


Daniel: Is there a special reason to set "esym" as NULL rather than using
  e->value.function.esym = e->value.compcall.tbp->u.specific->n.sym;

One could also change the gcc_assert, however, I fear that the program assumes
at several places that either isym or esym is set - even if it does not crash,
it might cause problems if it is not available.


-- 


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