Add serialization functions

[SXSI/xpathcomp.git] / tag.mli

diff --git a/tag.mli b/tag.mli
index 41b5485..c7a15cb 100644 (file)
--- a/tag.mli
+++ b/tag.mli
@@ -5,11 +5,12 @@
 (*  Distributed under the terms of the LGPL (see LICENCE)                     *)
 (******************************************************************************)
 type t
+type pool
+
 val attribute : t
 val pcdata : t
 val tag : string -> t
-val init : string array -> unit
-val clear_pool : unit -> unit
+val init : pool -> unit
 val compare : t -> t -> int
 val equal : t -> t -> bool
 val print : Format.formatter -> t -> unit