Interactive (Async_extended.Interactive)

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

Module Interactive