WithExceptions.Option
val get : loc:string -> 'a option -> 'a
val to_exn : none:exn -> 'a option -> 'a
val to_exn_f : none:(unit -> exn) -> 'a option -> 'a