sig val no_arg : hook:(unit -> unit) -> bool Core_command.Spec.flag val escape : hook:(string list -> unit) -> string list option Core_command.Spec.flag end