Module Async_extra.Command.Flag

type 'a t = 'a Core__Command.Flag.t

val required : 'a Core__Command.Arg_type.t ‑> 'a t

val optional : 'a Core__Command.Arg_type.t ‑> 'a option t

val optional_with_default : 'a ‑> 'a Core__Command.Arg_type.t ‑> 'a t

val listed : 'a Core__Command.Arg_type.t ‑> 'a list t

val one_or_more : 'a Core__Command.Arg_type.t ‑> ('a * 'a list) t

val no_arg : bool t

val no_arg_register : key:'a Core__.Import.Univ_map.With_default.Key.t ‑> value:'a ‑> bool t

val no_arg_abort : exit:(unit ‑> Core__.Import.never_returns) ‑> unit t

val escape : string list option t