Module EzAPI.Arg
module Ty : sig ... end
type descr
=
{
name : string;
descr : string option;
example : string option;
}
type 'a t
=
{
id : 'a Ty.id;
destruct : string -> ('a, string) Stdlib.result;
construct : 'a -> string;
description : descr;
}
val make : ?example:'a -> ?descr:string -> name:string -> destruct:(string -> ('a, string) Stdlib.result) -> construct:('a -> string) -> unit -> 'a t
val descr : 'a t -> descr
val int : ?descr:string -> ?example:int -> string -> int t
val float : ?descr:string -> ?example:float -> string -> float t
val int32 : ?descr:string -> ?example:int32 -> string -> int32 t
val int64 : ?descr:string -> ?example:int64 -> string -> int64 t
val string : ?descr:string -> ?example:string -> string -> string t