1! { dg-do compile } 2! 3! PR fortran/45066 4! 5! Contributed by Michael Richmond. 6! 7! Was failing due to a -fwhole-file bug. 8! 9 10MODULE GA_commons 11 INTEGER :: nichflg(2) 12END MODULE GA_commons 13 14PROGRAM gafortran 15 USE GA_commons 16 NAMELIST /ga/ nichflg 17 READ (23, nml=ga) 18END PROGRAM gafortran 19