Re: [Patch, fortran] PR40011 - Problems with -fwhole-file

[dominiq at lps dot ens dot fr (Dominique Dhumieres)]

Hi,

With your patch in http://gcc.gnu.org/ml/fortran/2009-06/msg00290.html
I have five ICEs in my tests:

gfc: Internal error: Segmentation fault (program f951)

with comment#1 of pr39879 (+a variant), comment#0 of pr40440, a long code
using lists, and the following code:

module global
 type                                ::  mytype
    type(mytype),pointer   ::  this
 end type mytype
 type(mytype),target        :: base
end module global
program test_equi
 use global
 call check()
 print *, "base%this%this=>base?"  ,  associated(base%this%this,base)
 print *, "base%this%this=>?" ,          associated(base%this%this)
 print *, "base%this=>?" ,                   associated(base%this)
contains
 subroutine check()
 type(mytype),target        :: j
 base%this => j                      !have the variables point
 j%this => base                      !to one another
 end subroutine check             !take j out of scope
end program test_equi

(with -fwhole-file indeed).

I did not have time to do further testing.

Cheers

Dominique