(string * 'a) list -> ?group:Config_file.group -> string list -> ?short_name:string -> 'a -> string -> ['a] Config_file.cp