ez_config 0.1.1 · OCaml Package

type option_value =

| Module of option_module
| StringValue of string
| IntValue of int
| FloatValue of float
| List of option_value list
| SmallList of option_value list
| OnceValue of option_value
| DelayedValue of EzCompat.Buffer.t -> string -> unit

and option_module = (string * option_value) list

exception SideEffectOption

val prune_file : config_file -> unit

val create_section_option : 
  config_section ->
  string list ->
  ?short_help:string ->
  string list ->
  ?level:int ->
  'a option_class ->
  'a ->
  'a config_option

val option_hook : 'a config_option -> (unit -> unit) -> unit

val add_option_hook : 'a config_option -> (unit -> unit) -> unit

val clear_option_hooks : 'a config_option -> unit

val color_option : string option_class

val font_option : string option_class

val hasharray_option : 
  'a ->
  (int * 'a * 'b) option_class ->
  ('a, 'b) Stdlib.Hashtbl.t array option_class

val shortname : 'a config_option -> string

val option_type : 'a config_option -> string

val get_help : 'a config_option -> string

val advanced : 'a config_option -> bool

val get_class : 'a config_option -> 'a option_class

val class_hook : 'a option_class -> ('a config_option -> unit) -> unit

val define_option_class : 
  string ->
  ?option_kind:option_kind ->
  (option_value -> 'a) ->
  ('a -> option_value) ->
  'a option_class

val to_value : 'a option_class -> 'a -> option_value

val from_value : 'a option_class -> option_value -> 'a

val value_to_string : option_value -> string

val string_to_value : string -> option_value

val value_to_int : option_value -> int

val int_to_value : int -> option_value

val value_to_int64 : option_value -> int64

val int64_to_value : int64 -> option_value

val bool_of_string : string -> bool

val value_to_bool : option_value -> bool

val bool_to_value : bool -> option_value

val value_to_float : option_value -> float

val float_to_value : float -> option_value

val value_to_string2 : option_value -> string * string

val string2_to_value : (string * string) -> option_value

val value_to_list : (option_value -> 'a) -> option_value -> 'a list

val list_to_value : ('a -> option_value) -> 'a list -> option_value

val smalllist_to_value : ('a -> option_value) -> 'a list -> option_value

val value_to_tuple2 : 
  ((option_value * option_value) -> 'a) ->
  option_value ->
  'a

val tuple2_to_value : ('a -> option_value * option_value) -> 'a -> option_value

val filename_to_value : FileAbstract.t -> option_value

val value_to_filename : option_value -> FileAbstract.t

val set_simple_option : config_file -> string list -> string -> unit

val get_simple_option : config_file -> string list -> string

val set_option_hook : config_file -> string list -> (unit -> unit) -> unit

val set_string_wrappers : 
  'a option_class ->
  ('a -> string) ->
  (string -> 'a) ->
  unit

val once_value : option_value -> option_value

val array_to_value : ('a -> option_value) -> 'a array -> option_value

val value_to_array : (option_value -> 'a) -> option_value -> 'a array

val restore_default : 'a config_option -> unit

val sections : config_file -> config_section list

val section_name : config_section -> string

val iter_file : (Stdlib.Obj.t config_option -> unit) -> config_file -> unit

val iter_section : 
  (Stdlib.Obj.t config_option -> unit) ->
  config_section ->
  unit

val option_value_to_string : option_value -> string

val set_volatile : 'a config_option -> unit

type option_info = {

option_name : string list;
option_shortname : string;
option_value : string;
option_short_help : string;
option_long_help : string list;
option_default : string;
option_kind : option_kind;

}

val simple_options : string -> config_file -> option_info list

val simple_args : 
  string ->
  config_file ->
  (string * Stdlib.Arg.spec * string) list

val prefixed_args : 
  string ->
  config_file ->
  (string * Stdlib.Arg.spec * string) list

package ez_config