https://gcc.gnu.org/bugzilla/show_bug.cgi?id=69963
lkrupp at gcc dot gnu.org changed: What |Removed |Added ---------------------------------------------------------------------------- Status|NEW |RESOLVED CC| |lkrupp at gcc dot gnu.org Resolution|--- |FIXED --- Comment #4 from lkrupp at gcc dot gnu.org --- Fixed in revision 240168. The problem: In this example, subroutine s real x implicit character (a) a1 = 'z' end subroutine s the implicit statement is processed, the default typespec corresponding to the letter 'a' has its component charlen pointer set. When the implicit statement is then rejected as being out of order, all of the charlen structures it created are freed, default_type['a']->u.cl is left dangling, and bad things happen when 'a1' is parsed. This patch clears any default typespecs pointing to charlen structures that are about to be freed.