Module Dose_extra.Format822
include sig ... end
val it : Dose_common__Util.Info.t
val info : ('a, unit, string, unit) Stdlib.format4 -> 'a
val nt : Dose_common__Util.Notice.t
val notice : ('a, unit, string, unit) Stdlib.format4 -> 'a
val wt : Dose_common__Util.Warning.t
val warning : ('a, unit, string, unit) Stdlib.format4 -> 'a
val dt : Dose_common__Util.Debug.t
val debug : ('a, unit, string, unit) Stdlib.format4 -> 'a
val fatal : ('a, unit, string, 'b) Stdlib.format4 -> 'a
type loc
= Stdlib.Lexing.position * Stdlib.Lexing.position
type value
= loc * string
type field
= string * value
type stanza
= field list
type doc
= stanza list
val dummy_loc : loc
exception
Parse_error_822 of string
exception
Syntax_error of string
exception
Type_error of string
exception
ParseError of string list * string * string
ParseError context list, field name * error
val error : Stdlib.Lexing.lexbuf -> string -> string
val raise_error : Stdlib.Lexing.lexbuf -> char -> 'a
val error_wrapper : string -> ('a -> Stdlib.Lexing.lexbuf -> 'b) -> 'a -> Stdlib.Lexing.lexbuf -> 'b
val lexbuf_wrapper : ('a -> Stdlib.Lexing.lexbuf -> 'b) -> 'a -> (string * ('c * string)) -> 'b
val string_of_loc : (Stdlib.Lexing.position * Stdlib.Lexing.position) -> string
val from_channel : IO.input -> f822_parser
val parser_wrapper_ch : IO.input -> (f822_parser -> 'a) -> 'a
val parse_from_ch : (f822_parser -> 'a) -> IO.input -> 'a
val timer : Dose_common.Util.Timer.t