sig
  type xml_callbacks = {
    start_element : Yaxpo.qname -> Yaxpo.att list -> (unit -> unit) -> unit;
    characters : string -> (unit -> unit) -> unit;
    cdata : string -> (unit -> unit) -> unit;
    comment : string -> (unit -> unit) -> unit;
    pi : string -> string -> (unit -> unit) -> unit;
    end_element : Yaxpo.qname -> (unit -> unit) -> unit;
  }
  val parse_element :
    #Cps_reader.t -> Yaxposax.xml_callbacks -> (unit -> unit) -> unit
  val parse_document :
    #Cps_reader.t -> Yaxposax.xml_callbacks -> (unit -> unit) -> unit
  val parse_rest_of_element :
    #Cps_reader.t ->
    Yaxposax.xml_callbacks -> Yaxpo.qname -> (unit -> unit) -> unit
end