.
[SXSI/xpathcomp.git] / tagSet.ml
index 76c1c98..74784cf 100644 (file)
--- a/tagSet.ml
+++ b/tagSet.ml
@@ -4,8 +4,8 @@ struct
   let hash = Hashtbl.hash
 end
   *)
-module M  : FiniteCofinite.S with type elt = Tag.t and type set = Ptset.t =
-  FiniteCofinite.Make(Ptset)
+module M  : FiniteCofinite.S with type elt = Tag.t and type set = Ptset.Int.t =
+  FiniteCofinite.Make(Ptset.Int)
 include M