Module Fix.HashCons

type !'data cell = private {
  1. id : int;
  2. data : 'data;
}
val id : 'data cell -> int
val data : 'data cell -> 'data
val equal : 'data cell -> 'data cell -> bool
val compare : 'data cell -> 'data cell -> int
val hash : 'data cell -> int
module type SERVICE = sig ... end
module Make (M : sig ... end) : sig ... end
module ForHashedType (T : Hashtbl.HashedType) : sig ... end
module ForHashedTypeWeak (T : Hashtbl.HashedType) : sig ... end