`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`
`type f822_parser = {`

1. `lexbuf : Stdlib.Lexing.lexbuf;`
2. `fname : 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`
`module RawInput (Set : Stdlib.Set.S) : sig ... end`