[Bug fortran/58007] [4.7/4.9 Regression] [OOP] ICE in free_pi_tree(): Unresolved fixup - resolve_fixups does not fixup component of __class_bsr_Bsr_matrix

[mikael at gcc dot gnu.org]

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

--- Comment #16 from Mikael Morin <mikael at gcc dot gnu.org> ---
Author: mikael
Date: Sun Jan 26 13:04:54 2014
New Revision: 207117

URL: http://gcc.gnu.org/viewcvs?rev=207117&root=gcc&view=rev
Log:
fortran/
        PR fortran/58007
        * module.c
        (fp2, find_pointer2): Remove.
        (mio_component_ref): Don't forcedfully set the containing derived type
        symbol for loading.  Remove unused argument.
        (mio_ref): Update caller
        (skip_list): New argument nest_level.  Initialize level with the new
        argument.
        (read_module): Add forced pointer components association for derived
        type symbols.

testsuite/
        PR fortran/58007
        * gfortran.dg/unresolved_fixup_1.f90: New test.
        * gfortran.dg/unresolved_fixup_2.f90: New test.


Added:
    branches/gcc-4_8-branch/gcc/testsuite/gfortran.dg/unresolved_fixup_1.f90
    branches/gcc-4_8-branch/gcc/testsuite/gfortran.dg/unresolved_fixup_2.f90
Modified:
    branches/gcc-4_8-branch/gcc/fortran/ChangeLog
    branches/gcc-4_8-branch/gcc/fortran/module.c
    branches/gcc-4_8-branch/gcc/testsuite/ChangeLog