gcc/testsuite/gfortran.dg/pr77420_3.f90 - gcc - Git at Google

 ! { dg-do link }
 ! { dg-additional-sources pr77420_4.f90 }
 !
 module h5global
   implicit none
   integer :: h5p_default_f, h5p_flags
   equivalence(h5p_flags, h5p_default_f)
 end module h5global
	! { dg-do link }
	! { dg-additional-sources pr77420_4.f90 }
	!
	module h5global
	implicit none
	integer :: h5p_default_f, h5p_flags
	equivalence(h5p_flags, h5p_default_f)
	end module h5global