https://gcc.gnu.org/bugzilla/show_bug.cgi?id=87352

--- Comment #11 from Thomas Koenig <tkoenig at gcc dot gnu.org> ---
(In reply to Thomas Koenig from comment #10)
> This patch
> 
> Index: class.c
> ===================================================================
> --- class.c     (Revision 269895)
> +++ class.c     (Arbeitskopie)
> @@ -1031,11 +1031,13 @@ finalize_component (gfc_expr *expr, gfc_symbol *de
>      }
>    else
>      {
> +#if 0
>        gfc_component *c;
>  
>        for (c = comp->ts.u.derived->components; c; c = c->next)
>         finalize_component (e, comp->ts.u.derived, c, stat, fini_coarray,
> code,
>                             sub_ns);
> +#endif     
>        gfc_free_expr (e);
>      }
>  }
> 
> leads to a reduction in the compile time, but a segfault in the
> test case.

... but then the test case lacks a few ALLOCATE statements to be valid :-)

Reply via email to