! { dg-do compile } ! ! PR fortran/45066 ! ! Contributed by Michael Richmond. ! ! Was failing due to a -fwhole-file bug. ! MODULE GA_commons INTEGER :: nichflg(2) END MODULE GA_commons PROGRAM gafortran USE GA_commons NAMELIST /ga/ nichflg READ (23, nml=ga) END PROGRAM gafortran