[Bug fortran/86281] [9 regression] SEGV in fortran/resolve.c:resolve_function

[pault at gcc dot gnu.org]

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

--- Comment #5 from Paul Thomas <pault at gcc dot gnu.org> ---
Author: pault
Date: Fri Jun 22 22:31:17 2018
New Revision: 261975

URL: https://gcc.gnu.org/viewcvs?rev=261975&root=gcc&view=rev
Log:
2018-06-22  Paul Thomas  <pa...@gcc.gnu.org>
            Rainer Orth  <r...@gcc.gnu.org>

        PR fortran/86281
        * resolve.c (resolve_contained_fntype): Check for the charlen
        before testing the length.

2018-06-22  Paul Thomas  <pa...@gcc.gnu.org>

        PR fortran/86281
        * gfortran.dg/assumed_charlen_function_7.f90: Add -std=legacy.


Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/resolve.c
    trunk/gcc/testsuite/ChangeLog
    trunk/gcc/testsuite/gfortran.dg/assumed_charlen_function_7.f90