[Bug fortran/41070] New: Error: Components of structure constructor '' at (1) are PRIVATE

[michael dot a dot richmond at nasa dot gov]

When I attempt to compile the file listed below using the August 13 snapshot of
gfortran 4.5 on any platform I get the following message:

cd.f90:18.23:

CALL check_complements(the_beta%name)
                       1
Error: Components of structure constructor '' at (1) are PRIVATE

MODULE cdf_aux_mod
IMPLICIT NONE

TYPE :: one_parameter
  CHARACTER (8) :: name
END TYPE one_parameter

TYPE :: the_distribution
  CHARACTER (8) :: name
END TYPE the_distribution

TYPE (the_distribution), PARAMETER :: the_beta = the_distribution('cdf_beta')
END MODULE cdf_aux_mod

SUBROUTINE cdf_beta()
USE cdf_aux_mod
IMPLICIT NONE
CALL check_complements(the_beta%name)
END SUBROUTINE cdf_beta


-- 
           Summary: Error: Components of structure constructor '' at (1) are
                    PRIVATE
           Product: gcc
           Version: 4.5.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=41070