val parse_xml_string : string -> t
val save : t -> string -> unit
val load : ?sample:int -> ?load_text:bool -> string -> t
-val tag_pool : t -> Tag.pool
val nil : node
val stats : t -> unit
val num_tags : t -> int
-val tag_pool : t -> Tag.pool
+
+val tag_operations : t -> Tag.operations
val print_xml : t -> node -> Unix.file_descr -> unit
val flush : t -> Unix.file_descr -> unit