X-Git-Url: http://git.nguyen.vg/gitweb/?p=tatoo.git;a=blobdiff_plain;f=src%2Futils%2Fmisc.ml;h=f8156b0d22191f8cfe0da534b6b0458a61c2630c;hp=960ec468aa003c6e73c49bb63a056742ceb0c6cc;hb=03b6a364e7240ca827585e7baff225a0aaa33bc6;hpb=30bc0bb1291426e5e26eb2dee1ffc41e4c246349

diff --git a/src/utils/misc.ml b/src/utils/misc.ml
index 960ec46..f8156b0 100644
--- a/src/utils/misc.ml
+++ b/src/utils/misc.ml
@@ -14,7 +14,7 @@
 (***********************************************************************)
 
 (*
-  Time-stamp: <Last modified on 2013-01-30 19:05:20 CET by Kim Nguyen>
+  Time-stamp: <Last modified on 2013-03-04 23:00:19 CET by Kim Nguyen>
 *)
 
 (** Various generic signatures and generic module and functor definitions
@@ -22,7 +22,7 @@
 INCLUDE "utils.ml"
 
 module HashSet (H : Hashtbl.HashedType) :
-  Sigs.AUX.HashSet with type data = H.t =
+  Common_sig.HashSet with type data = H.t =
 struct
   module T = Hashtbl.Make(H)
   type data = H.t
@@ -36,8 +36,8 @@ struct
   let mem = T.mem
 end
 
-module Pair (X : Sigs.AUX.Type) (Y : Sigs.AUX.Type) :
-  Sigs.AUX.Type with type t = X.t * Y.t =
+module Pair (X : Common_sig.Type) (Y : Common_sig.Type) :
+  Common_sig.Type with type t = X.t * Y.t =
 struct
   type t = X.t * Y.t
   let hash (x, y) = HASHINT2(X.hash x, Y.hash y)