Module Xml.Parse

val source_with_encoding : src:string -> encoding:string option -> Xmlm.input
type expected =
  1. | XmlStartSequence of string * string option
  2. | XmlEndSequence of string * string option
  3. | XmlStartElement of string * string option
  4. | XmlElementData of string * string option
  5. | XmlEndElement of string * string option
  6. | XmlDtd
  7. | XmlOneOfElement of string list
val pp_expected : Ppx_deriving_runtime.Format.formatter -> expected -> Ppx_deriving_runtime.unit
val show_expected : expected -> Ppx_deriving_runtime.string
val equal_expected : expected -> expected -> Ppx_deriving_runtime.bool
type pos = int * int
exception XmlParse of Xmlm.error
exception XmlUnexpectedConstruct of expected * Xmlm.signal * pos
exception XmlMissingElement of string * pos
type error =
  1. | XmlParseError of string
val error_to_string : error -> string
val pos_to_string : (int * int) -> string
val signal_to_string : [< `Data of 'a | `Dtd of 'b | `El_end | `El_start of 'c ] -> string
module Accept : sig ... end
val tag_equal : Stdlib.String.t -> Stdlib.String.t option -> ((Stdlib.String.t * Stdlib.String.t) * 'a) -> bool
module Read : sig ... end
module Structure : sig ... end
val required : string -> 'a option -> Xmlm.input -> 'a
val run : (unit -> 'a) -> ('a, error) Stdlib.result