X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;f=tag.mli;h=1fcd5b1dfad53ebe489bd2a33660e68b57a13ece;hb=cad5e2e2831477cba1f6211c57b9a4cc5b58bd55;hp=41b5485b965b309d1f7110fa8ab0d9751d6ec529;hpb=b821684aac2e3114c2eb28188020d7a09b5de2a5;p=SXSI%2Fxpathcomp.git

diff --git a/tag.mli b/tag.mli
index 41b5485..1fcd5b1 100644
--- a/tag.mli
+++ b/tag.mli
@@ -1,16 +1,27 @@
-(******************************************************************************)
-(*  SXSI : XPath evaluator                                                    *)
-(*  Kim Nguyen (Kim.Nguyen@nicta.com.au)                                      *)
-(*  Copyright NICTA 2008                                                      *)
-(*  Distributed under the terms of the LGPL (see LICENCE)                     *)
-(******************************************************************************)
-type t
+type t = int
+type pool 
+val tag : string -> t
+
+val document_node : t
 val attribute : t
 val pcdata : t
-val tag : string -> t
-val init : string array -> unit
-val clear_pool : unit -> unit
+val attribute_data : t
+val document_node_close : t
+val attribute_close : t
+val pcdata_close : t
+val attribute_data_close : t
+
+
+val init : pool -> unit
+val to_string : t -> string
 val compare : t -> t -> int
 val equal : t -> t -> bool
+val nullt : t
+
+val dump : Format.formatter -> t -> unit
+val check : t -> unit (* Check internal invariants *)
+  
+(* Data structures *)
+val hash : t -> int
 val print : Format.formatter -> t -> unit
-val to_string : t -> string
+