Hash_test (vcs-tests.Vcs_base_test.Hash

module type H = sig ... end

val run : 
  (module H with type t = 'a) ->
  (module Ppx_hash_lib.Hashable.S with type t = 'a) ->
  'a Base.list ->
  Base.unit