X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;f=src%2Ftag.mli;h=7a11be0ff0fc1dbe6ad76908bbca268f3d114892;hb=bca508d0e826bc09f8975ba28720a867a828782f;hp=6dc51eeac4d7bf556da0d7d4a6b7ef917d6eae08;hpb=4b52da1a20a4fe031930bb96d2ca46bec06dc529;p=SXSI%2Fxpathcomp.git

diff --git a/src/tag.mli b/src/tag.mli
index 6dc51ee..7a11be0 100644
--- a/src/tag.mli
+++ b/src/tag.mli
@@ -1,5 +1,12 @@
 type t = int
 type pool
+type operations = {
+  tag : pool -> string -> t;
+  to_string : pool -> t -> string;
+  nullt : pool -> t;
+  translate : pool -> t -> t
+}
+
 val tag : string -> t
 
 val document_node : t
@@ -12,7 +19,7 @@ val pcdata_close : t
 val attribute_data_close : t
 
 
-val init : pool -> unit
+val init : pool -> (* operations -> *) unit
 val to_string : t -> string
 val compare : t -> t -> int
 val equal : t -> t -> bool