QCaml/common/lib/command_line.mli

(* Type
 * 
 *    #+NAME:type *)

(* [[file:../command_line.org::type][type]] *)
type short_opt     = char
type long_opt      = string
type optional      = Mandatory | Optional
type documentation = string
type argument      = With_arg of string | Without_arg | With_opt_arg of string

type description = {
  short: short_opt ;
  long : long_opt  ;
  opt  : optional  ;
  doc  : documentation ;
  arg  : argument ;
}
(* type ends here *)

(* [[file:../command_line.org::*Mutable attributes][Mutable attributes:2]] *)
val set_header_doc : string -> unit
val set_description_doc : string -> unit
val set_footer_doc : string -> unit
(* Mutable attributes:2 ends here *)

(* [[file:../command_line.org::*Mutable attributes][Mutable attributes:4]] *)
val anonymous : long_opt -> optional -> documentation -> description
(* Mutable attributes:4 ends here *)

(* ~anon_args~ *)


(* [[file:../command_line.org::*~anon_args~][~anon_args~:1]] *)
val anon_args : unit -> string list
(* ~anon_args~:1 ends here *)

(* ~get~ *)


(* [[file:../command_line.org::*~get~][~get~:1]] *)
val get : long_opt -> string option
(* ~get~:1 ends here *)

(* ~get_bool~ *)


(* [[file:../command_line.org::*~get_bool~][~get_bool~:1]] *)
val get_bool : long_opt -> bool
(* ~get_bool~:1 ends here *)

(* Specification *)


(* [[file:../command_line.org::*Specification][Specification:1]] *)
val set_specs : description list -> unit
(* Specification:1 ends here *)