When I compile the module listed below using the September 6 snapshot version of gfortran, I get the following message:
c.f90: In function 'local_cum_nc_chisq': c.f90:15: internal compiler error: in gfc_finish_var_decl, at fortran/trans-decl.c:510 Please submit a full bug report, with preprocessed source if appropriate. See <http://gcc.gnu.org/bugs.html> for instructions. MODULE cdf_nc_chisq_mod PUBLIC TYPE :: one_parameter INTEGER :: high_bound END TYPE one_parameter TYPE :: the_distribution TYPE (one_parameter) :: parameters(1) END TYPE the_distribution TYPE (the_distribution), PARAMETER :: the_chi_square = & the_distribution((/( one_parameter(0))/)) CONTAINS SUBROUTINE local_cum_nc_chisq() df0 = the_chi_square%parameters(1)%high_bound END SUBROUTINE local_cum_nc_chisq END MODULE cdf_nc_chisq_mod -- Summary: ICE in Sep 6 snapshot in gfc_finish_var_decl, at fortran/trans-decl.c:510 Product: gcc Version: 4.3.0 Status: UNCONFIRMED Severity: normal Priority: P3 Component: fortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: michael dot a dot richmond at nasa dot gov http://gcc.gnu.org/bugzilla/show_bug.cgi?id=33337