type attr = string * string
type node =
  Cxml.node =
    TEXT of string
  | COM of string
  | PI of string * string
  | ELT of string * attr list * node list
type document =
  Cxml.document = {
  version : string;
  encoding : string;
  standalone : bool;
  element : node;
}
val new_simple_doc : node -> document
val new_doc : string -> string -> bool -> node -> document
val new_attr : string -> string -> attr
val new_elt : string -> attr list -> node list -> node
val new_text : string -> node
val escape_attr : string -> char -> string
val output_attr : out_channel -> string * string -> unit
val output_node : out_channel -> string -> node -> unit
val output_doc : out_channel -> document -> unit
val output : document -> unit
val output_file : string -> document -> unit