Up

Module Interactive = Interactive

Signature

val interactive : bool Core.Std.ref
val print_string : string -> unit Async.Std.Deferred.t
val print_endline : string -> unit Async.Std.Deferred.t
val printf : ('r, unit, string, unit Async.Std.Deferred.t) Core.Std.format4 -> 'r
val prints : string -> 'a -> ('a -> Async.Std.Sexp.t) -> unit Async.Std.Deferred.t
val print_s : Async.Std.Sexp.t -> unit Async.Std.Deferred.t
val ask_dispatch_gen : f:(string -> ('a, string) Core.Std.Result.t) -> string -> 'a Async.Std.Deferred.t
module Choice : sig .. end
val ask_dispatch_with_help : ?show_options:bool -> string -> 'a Choice.t list -> 'a Async.Std.Deferred.t
val ask_yn : ?default:bool -> string -> bool Async.Std.Deferred.t
val ask_ynf : ?default:bool -> ('a, unit, string, bool Async.Std.Deferred.t) Core.Std.format4 -> 'a
val show_file : ?pager:string -> ?msg:string -> file:string -> unit -> unit Async.Std.Deferred.t
module Job : sig .. end