sig
val shortlongs :
string list * string list -> string list -> string list * string list
val shorts : string list -> string list
val longs : string list -> string list
val getoptstring : Kwapp.interface -> string
type widths = { s : int; a : int; l : int; }
val switchwidths : sep:string -> string list -> int * int
val switchset_widths :
sep:string -> (string list * Kwapp.Option.opt) list -> Kwapp.Help.widths
val helpstring : Kwapp.interface -> string
val usage1 : ?sub:string -> Kwapp.interface -> string
val usagestring :
?sort:bool ->
?actions:(Kwapp.dispatchmode * 'a) list ->
?versiondata:(string * string) list ->
?sub:string -> Kwapp.interface -> string
val usage :
?actions:(Kwapp.dispatchmode * 'a) list ->
?sub:string ->
?versiondata:(string * string) list ->
?status:int -> ?chan:Pervasives.out_channel -> Kwapp.interface -> 'b
val action :
?actions:(Kwapp.dispatchmode * 'c) list ->
?sub:string ->
?versiondata:(string * string) list -> ('a, 'b) Kwapp.action
val helpaction :
?actions:(Kwapp.dispatchmode * 'a) list ->
?sub:string ->
?versiondata:(string * string) list -> ('b, 'c) Kwapp.action
end