val contains_old : t -> string -> bool
val dump : t -> unit
val get_string : t -> string_content -> string
+ val has_tagged_desc : t -> Tag.t -> bool
+ val has_tagged_foll : t -> Tag.t -> bool
+ val tagged_desc : t -> Tag.t -> t
+ val tagged_foll : t -> Tag.t -> t
+ val tagged_next : t -> Tag.t -> t
+ val subtree_tags : t -> Tag.t -> int
end
module Binary : BINARY