EnumSourceMap a constructor name to a command-line string: downcase the name and convert _ to -.
type ('a, 'b) make_param =
?represent_choice_with:string ->
?list_values_in_help:bool ->
?aliases:string list ->
?key:'a Core.Univ_map.Multi.Key.t ->
string ->
doc:string ->
'a t ->
'b Core.Command.Param.tval make_param :
f:('a Core.Command.Arg_type.t -> 'b Core.Command.Flag.t) ->
('a, 'b) make_paramval make_param_one_of_flags :
?if_nothing_chosen:('a, 'a) Core.Command.Param.If_nothing_chosen.t ->
?aliases:('a -> string list) ->
doc:('a -> string) ->
'a t ->
'a Core.Command.Param.tval arg_type :
?case_sensitive:bool ->
?key:'a Core.Univ_map.Multi.Key.t ->
?list_values_in_help:bool ->
'a t ->
'a Core.Command.Arg_type.tthe sexp representation of M.t must be an sexp atom