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:10e58dd12566bfc60412da6f8f8f7a07" } }
  14 ! { dg-final { cleanup-modules "foo" } }