sig
  type xml =
      Element of (string * (string * string) list * Xml.xml list)
    | PCData of string
  val parse_file : string -> Xml.xml
  val parse_in : Pervasives.in_channel -> Xml.xml
  val parse_string : string -> Xml.xml
  type error_pos
  type error_msg =
      UnterminatedComment
    | UnterminatedString
    | UnterminatedEntity
    | IdentExpected
    | CloseExpected
    | NodeExpected
    | AttributeNameExpected
    | AttributeValueExpected
    | EndOfTagExpected of string
    | EOFExpected
  type error = Xml.error_msg * Xml.error_pos
  exception Error of Xml.error
  exception File_not_found of string
  val error : Xml.error -> string
  val error_msg : Xml.error_msg -> string
  val line : Xml.error_pos -> int
  val range : Xml.error_pos -> int * int
  val abs_range : Xml.error_pos -> int * int
  exception Not_element of Xml.xml
  exception Not_pcdata of Xml.xml
  exception No_attribute of string
  val tag : Xml.xml -> string
  val pcdata : Xml.xml -> string
  val attribs : Xml.xml -> (string * string) list
  val attrib : Xml.xml -> string -> string
  val children : Xml.xml -> Xml.xml list
  val iter : (Xml.xml -> unit) -> Xml.xml -> unit
  val map : (Xml.xml -> 'a) -> Xml.xml -> 'a list
  val fold : ('a -> Xml.xml -> 'a) -> 'a -> Xml.xml -> 'a
  val to_string : Xml.xml -> string
  val to_string_fmt : Xml.xml -> string
end