I have no clue as to what the problem is here, but if I change almost anything it goes away.
[dranta:~/tests/gfortran] dir% gfortran -c module_plot_hdf.f90 module_plot_hdf.f90: In function 'hdfsds_r8': module_plot_hdf.f90:15: internal compiler error: Bus error Please submit a full bug report, with preprocessed source if appropriate. See <URL:http://gcc.gnu.org/bugs.html> for instructions. [dranta:~/tests/gfortran] dir% cat module_plot_hdf.f90 module token_module2 COMMON /MPIPRIV/ MPI_BOTTOM,MPI_STATUS_IGNORE,MPI_STATUSES_IGNORE INTEGER MPI_MAX2, MPI_MIN2 PARAMETER (MPI_MAX2=100,MPI_MIN2=101) integer, parameter :: REAL8 = SELECTED_REAL_KIND(12) integer, public, parameter :: TOKEN_MPI_MAX = MPI_MAX2 integer, public, parameter :: TOKEN_MPI_MIN = MPI_MIN2 real(REAL8) :: reduction_array_r8(200) end module token_module2 module plot_hdf_module integer, parameter :: REAL8 = SELECTED_REAL_KIND(12) save private contains subroutine hdfsds_r8(imax, jmax, kmax) use token_module2, only : reduction_array_r8 use token_module2, only : TOKEN_MPI_MAX, TOKEN_MPI_MIN end subroutine hdfsds_r8 end module plot_hdf_module -- Summary: internal compiler error: Bus error Product: gcc Version: 4.0.0 Status: UNCONFIRMED Severity: normal Priority: P2 Component: fortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: dir at lanl dot gov CC: gcc-bugs at gcc dot gnu dot org GCC host triplet: powerpc-apple-darwin7.8.0 http://gcc.gnu.org/bugzilla/show_bug.cgi?id=20151