X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;f=src%2Fhcons.mli;h=6a6ede8a814df962868e7181bc470037c98f2dd4;hb=4f265eb7d78b740292b5543d94f9f0fa40d206d5;hp=6b11bce6364aaba1b5aae6a5b5a3b665baeb3b94;hpb=f5d90fb688bc1a9b29815fc33c369856e6c51a67;p=tatoo.git

diff --git a/src/hcons.mli b/src/hcons.mli
index 6b11bce..6a6ede8 100644
--- a/src/hcons.mli
+++ b/src/hcons.mli
@@ -14,27 +14,28 @@
 (***********************************************************************)
 
 (** Implementation of generic hashconsing. *)
+(** {directinclude true} *)
 
-include module type of Sigs.HCONS
+include module type of Hcons_sig
 
 (** Output signature of the functor {!Hcons.Make} *)
 
-module Make (H : Sigs.AUX.HashedType) : S with type data = H.t
+module Make (H : Common_sig.HashedType) : S with type data = H.t
 (** Functor building an implementation of hashconsed values for a given
-    implementation of {!Sigs.HashedType}. Hashconsed values are
+    implementation of {!Common_sig.HashedType}. Hashconsed values are
     persistent: the are kept in memory even if no external reference
     remain. Calling [init()] explicitely will reclaim the space.
 *)
 
-module Weak (H : Sigs.AUX.HashedType) : S with type data = H.t
+module Weak (H : Common_sig.HashedType) : S with type data = H.t
 (** Functor building an implementation of hashconsed values for a given
-    implementation of {!Sigs.HashedType}. Hashconsed values have a
+    implementation of {!Common_sig.HashedType}. Hashconsed values have a
     weak semantics: they may be reclaimed as soon as no external
     reference to them exists. The space may still be reclaimed
     explicitely by calling [init].
 *)
 
-module PosInt : Abstract with type data = int and type t = int
+module PosInt : Abstract with type data = int and type t = private int
 (** Compact implementation of hashconsed positive integer that
     avoids boxing. [PosInt.make v] raises [Invalid_argument] if
     [ v < 0 ]