X-Git-Url: http://git.nguyen.vg/gitweb/?p=tatoo.git;a=blobdiff_plain;f=src%2FqNameSet.mli;h=537ceee58d2536267188c9ce783ca29f8d31a60e;hp=71d14784efc5cbaeaec8df5339e0be05ac5b04b3;hb=41dd1fed04cabad212f10fce3484545f6e9d9444;hpb=cba2938d929fd5119b1491686ddc224d5af618c6

diff --git a/src/qNameSet.mli b/src/qNameSet.mli
index 71d1478..537ceee 100644
--- a/src/qNameSet.mli
+++ b/src/qNameSet.mli
@@ -13,10 +13,20 @@
 (*                                                                     *)
 (***********************************************************************)
 
-
 (** Implementation of sets of Qualified Names that can be finite
     or cofinite *)
 
 include FiniteCofinite.S with type elt = QName.t
+include Common_sig.Printable with type t := t
+val star : t
+val text : t
+val node : t
 
-module Weak : FiniteCofinite.S with type elt = QName.t
+module Weak :
+sig
+  include FiniteCofinite.S with type elt = QName.t
+  include Common_sig.Printable with type t := t
+  val star : t
+  val text : t
+  val node : t
+end