val no_arg : hook:(unit ‑> unit) ‑> bool Core__Command.Spec.flag
val escape : hook:(string list ‑> unit) ‑> string list option Core__Command.Spec.flag
val ad_hoc : usage_arg:string ‑> string list Core__Command.Spec.anons