sig exception Parse_error of string * int * string val load : ?file:string -> unit -> unit Lwt.t val default : string end