1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
type t = { app_name: string; data_dir: string; program_dir: string; config_dir: string; primary_config: string; fallback_config: string; socket: string; pid_file: string; log_file: string option; log_template: string; log_level: string; } val load : string -> (t, string) result val dump : t -> string