sig
  type t = {
    tag : Utils.UTF8.t;
    attrs : (Utils.UTF8.t * Utils.UTF8.t) list;
    text : Utils.UTF8.t;
    children : XML.t list;
  }
  val escape : Utils.UTF8.t -> Utils.UTF8.t
  val dump : XML.t -> Utils.UTF8Buffer.t -> unit
end