dose3-extra
  1. Overview
  2. Docs
include sig ... end
val it : Dose_common__Util.Info.t
val info : ('a, unit, string, unit) format4 -> 'a
val nt : Dose_common__Util.Notice.t
val notice : ('a, unit, string, unit) format4 -> 'a
val wt : Dose_common__Util.Warning.t
val warning : ('a, unit, string, unit) format4 -> 'a
val dt : Dose_common__Util.Debug.t
val debug : ('a, unit, string, unit) format4 -> 'a
val fatal : ('a, unit, string, 'b) format4 -> 'a
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 : Lexing.lexbuf -> string -> string
val raise_error : Lexing.lexbuf -> char -> 'a
val error_wrapper : string -> ('a -> Lexing.lexbuf -> 'b) -> 'c -> Lexing.lexbuf -> 'd
val lexbuf_wrapper : ('a -> Lexing.lexbuf -> 'b) -> 'c -> (string * ('d * string)) -> 'e
val string_of_loc : (Lexing.position * Lexing.position) -> string
type f822_parser = {
  1. lexbuf : Lexing.lexbuf;
  2. fname : string;
}
val from_channel : IO.input -> f822_parser
val parser_wrapper_ch : IO.input -> (f822_parser -> 'a) -> 'b
val parse_from_ch : (f822_parser -> 'a) -> IO.input -> 'b
module RawInput (Set : Set.S) : sig ... end