projects
/
SXSI
/
xpathcomp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Merge branch 'handle-stdout'
[SXSI/xpathcomp.git]
/
src
/
hcons.mli
diff --git
a/src/hcons.mli
b/src/hcons.mli
index
2e18f82
..
efef8d4
100644
(file)
--- a/
src/hcons.mli
+++ b/
src/hcons.mli
@@
-8,20
+8,22
@@
module type SA =
val uid : t -> Uid.t
val equal : t -> t -> bool
val stats : unit -> unit
val uid : t -> Uid.t
val equal : t -> t -> bool
val stats : unit -> unit
+ val init : unit -> unit
end
end
-module type S =
- sig
+module type S = sig
type data
type t = private { id : Uid.t;
type data
type t = private { id : Uid.t;
- key : int;
- node : data }
+
key : int;
+
node : data }
val make : data -> t
val node : t -> data
val hash : t -> int
val uid : t -> Uid.t
val equal : t -> t -> bool
val stats : unit -> unit
val make : data -> t
val node : t -> data
val hash : t -> int
val uid : t -> Uid.t
val equal : t -> t -> bool
val stats : unit -> unit
- end
+ val init : unit -> unit
+
+end
module Make (H : Hashtbl.HashedType) : S with type data = H.t
module Make (H : Hashtbl.HashedType) : S with type data = H.t