sig
  type 'a t =
    'a Core_hashtbl_intf.Hashable.t = {
    hash : 'a -> int;
    compare : 'a -> 'a -> int;
    sexp_of_t : 'a -> Sexplib.Sexp.t;
  }
  val poly : 'a Core_hashtbl_intf.Hashable.t
  val of_key :
    (module Core_hashtbl_intf.Key with type t = 'a) ->
    'a Core_hashtbl_intf.Hashable.t
  val hash_param : int -> int -> 'a -> int
  val hash : 'a -> int
end