gcc/testsuite/gfortran.dg/module_md5_1.f90

   1 ! Check that we can write a module file, that it has a correct MD5 sum,
   2 ! and that we can read it back.
   3 !
   4 ! { dg-do compile }
   5 module foo
   6   integer(kind=4), parameter :: pi = 3_4
   7 end module foo
   8
   9 program test
  10   use foo
  11   print *, pi
  12 end program test
  13 ! { dg-final { scan-module "foo" "MD5:5632bcd379cf023bf7e663e91d52fa12" } }
  14 ! { dg-final { cleanup-modules "foo" } }