[Bug fortran/19669] [gfortran] ICE (segfault) on legal (?) code

[martin at mpa-garching dot mpg dot de]

------- Additional Comments From martin at mpa-garching dot mpg dot de  
2005-01-28 14:41 -------
OK, I managed to reduce the testcase (phew!). Here it is:

module ModelData
implicit none

Type ClTransferData
  integer :: NumSources
end Type ClTransferData

Type(ClTransferData) :: CTransScal
end module ModelData

module GaugeInterface
implicit none

contains

subroutine output(sources)
use ModelData
real sources(CTransScal%NumSources)
end subroutine output

end module GaugeInterface

module CAMBmain
  use GaugeInterface
end module CAMBmain


~/tmp>rm *.mod ; gfortran -c bug.F90
bug.F90:16: internal compiler error: Segmentation fault
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.


-- 


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