projects
/
SXSI
/
xpathcomp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
.
[SXSI/xpathcomp.git]
/
ptset.mli
diff --git
a/ptset.mli
b/ptset.mli
index
fc95d4e
..
27b6332
100644
(file)
--- a/
ptset.mli
+++ b/
ptset.mli
@@
-26,8
+26,18
@@
module type S =
sig
type elt
sig
type elt
- type data
- type t
+
+ type 'a node
+ module rec Node : sig
+ include Hcons.S with type data = Data.t
+ end
+ and Data : sig
+ include
+ Hashtbl.HashedType with type t = Node.t node
+ end
+ type data = Data.t
+ type t = Node.t
+
val empty : t
val is_empty : t -> bool
val mem : elt -> t -> bool
val empty : t
val is_empty : t -> bool
val mem : elt -> t -> bool
@@
-68,6
+78,8
@@
val uncons : t -> elt * t
val from_list : elt list -> t
val make : data -> t
val node : t -> data
val from_list : elt list -> t
val make : data -> t
val node : t -> data
+
+val with_id : Uid.t -> t
end
end
@@
-76,4
+88,4
@@
module Int : sig
val print : Format.formatter -> t -> unit
end
val print : Format.formatter -> t -> unit
end
-module Make ( H : Hcons.S ) : S with type elt = H.t
+module Make ( H : Hcons.S
A
) : S with type elt = H.t