module type Key = Base__.Hashable_intf.Key
module type Hashable = Base__.Hashable_intf.Hashable
type 'a t
= 'a Base__.Hashable_intf.Hashable.t
=
{
hash : 'a ‑> int; |
compare : 'a ‑> 'a ‑> int; |
sexp_of_t : 'a ‑> Sexp.t; |
}
val poly : 'a t
val of_key : (module Base__.Hashable_intf.Key with type t = 'a) ‑> 'a t
val to_key : 'a t ‑> (module Base__.Hashable_intf.Key with type t = 'a)