gcc/testsuite/gfortran.dg/module_md5_1.f90 - chromiumos/third_party/gcc - Git at Google

 ! Check that we can write a module file, that it has a correct MD5 sum,
 ! and that we can read it back.
 !
 ! { dg-do compile }
 module foo
   integer(kind=4), parameter :: pi = 3_4
 end module foo

 program test
   use foo
   print *, pi
 end program test
 ! { dg-final { scan-module "foo" "MD5:510304affe70481794fecdb22fc9ca0c" } }
	! Check that we can write a module file, that it has a correct MD5 sum,
	! and that we can read it back.
	!
	! { dg-do compile }
	module foo
	integer(kind=4), parameter :: pi = 3_4
	end module foo

	program test
	use foo
	print *, pi
	end program test
	! { dg-final { scan-module "foo" "MD5:510304affe70481794fecdb22fc9ca0c" } }