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 next_sibling : t -> node -> node
val prev_sibling : t -> node -> node
val next_element : t -> node -> node
+val next_node_before : t -> node -> node -> node
val tagged_following_sibling : t -> node -> Tag.t -> node
val select_following_sibling : t -> node -> unordered_set -> node
val tagged_descendant : t -> node -> Tag.t -> node
+val tagged_next : t -> node -> Tag.t -> node
val select_descendant : t -> node -> unordered_set -> node
val tagged_following_before : t -> node -> Tag.t -> node -> 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