type !'a parser = string -> [ `Error of string | `Ok of 'a ]
val conv :
?docv:string ->
((string -> ('a, [ `Msg of string ]) result) * 'a printer) ->
'a conv
val conv' :
?docv:string ->
((string -> ('a, string) result) * 'a printer) ->
'a conv
val conv_parser : 'a conv -> string -> ('a, [ `Msg of string ]) result
val conv_docv : 'a conv -> string
val parser_of_kind_of_string :
kind:string ->
(string -> 'a option) ->
string ->
('a, [ `Msg of string ]) result
val some' : ?none:'a -> 'a conv -> 'a option conv
val some : ?none:string -> 'a conv -> 'a option conv
val info :
?deprecated:string ->
?absent:string ->
?docs:string ->
?docv:string ->
?doc:string ->
?env:Cmd.Env.info ->
string list ->
info
val (&) : ('a -> 'b) -> 'a -> 'b
val flag : info -> bool t
val flag_all : info -> bool list t
val vflag : 'a -> ('a * info) list -> 'a t
val vflag_all : 'a list -> ('a * info) list -> 'a list t
val opt : ?vopt:'a -> 'a conv -> 'a -> info -> 'a t
val opt_all : ?vopt:'a -> 'a conv -> 'a list -> info -> 'a list t
val pos : ?rev:bool -> int -> 'a conv -> 'a -> info -> 'a t
val pos_all : 'a conv -> 'a list -> info -> 'a list t
val pos_left : ?rev:bool -> int -> 'a conv -> 'a list -> info -> 'a list t
val pos_right : ?rev:bool -> int -> 'a conv -> 'a list -> info -> 'a list t
val required : 'a option t -> 'a Term.t
val non_empty : 'a list t -> 'a list Term.t
val nativeint : nativeint conv
val enum : (string * 'a) list -> 'a conv
val non_dir_file : string conv
val list : ?sep:char -> 'a conv -> 'a list conv
val array : ?sep:char -> 'a conv -> 'a array conv
val pair : ?sep:char -> 'a conv -> 'b conv -> ('a * 'b) conv
val doc_quote : string -> string
val doc_alts : ?quoted:bool -> string list -> string
val doc_alts_enum : ?quoted:bool -> (string * 'a) list -> string
type !'a converter = 'a conv