X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;f=ptset.mli;h=fc95d4e603d73e71259286724b4962e054c435e4;hb=bfedbb29aa139abed0a311fd2ab2d00f15e1ed9e;hp=3b46f5c777b0bffaf9864c9f92c864e419d35cad;hpb=04639fe524ee20f7f84c8b08387312d714c9bd56;p=SXSI%2Fxpathcomp.git diff --git a/ptset.mli b/ptset.mli index 3b46f5c..fc95d4e 100644 --- a/ptset.mli +++ b/ptset.mli @@ -63,7 +63,7 @@ val intersect : t -> t -> bool val is_singleton : t -> bool val mem_union : t -> t -> t val hash : t -> int -val uid : t -> int +val uid : t -> Uid.t val uncons : t -> elt * t val from_list : elt list -> t val make : data -> t @@ -75,4 +75,5 @@ module Int : sig include S with type elt = int val print : Format.formatter -> t -> unit end + module Make ( H : Hcons.S ) : S with type elt = H.t