type xml_parser = {input : Xmlm.input;fname : string;
}val init_from_string : ?fname:string -> string -> xml_parserval strip_whitespace : xml list -> xml listval ws : [> `Data of string ]val nl : [> `Data of string ]val indent_list : int -> ([> `Data of string ] as 'a) list -> 'a listval gen_xml :
?pretty_print:bool ->
?nl:bool ->
?decl:bool ->
Xmlm.dest ->
xml ->
unitval xml_to_buffer : ?pretty_print:bool -> ?decl:bool -> Buffer.t -> xml -> unitval xml_to_string : ?pretty_print:bool -> ?decl:bool -> xml -> stringval xml_of_string : string -> xml list