Module Ecaml__.Echo_area

val message : ?⁠echo:bool -> string -> unit
val wrap_message : ?⁠echo:bool -> string -> f:(unit -> 'a Async_kernel.Deferred.t) -> 'a Async_kernel.Deferred.t
val messagef : ?⁠echo:bool -> ('a, unit, string, unit) Core_kernel.format4 -> 'a
val message_s : ?⁠echo:bool -> Core_kernel.Sexp.t -> unit
val message_text : ?⁠echo:bool -> Ecaml.Text.t -> unit
val inhibit_messages : (_'a) Ecaml.Sync_or_async.t -> (unit -> 'a) -> 'a

(describe-variable 'inhibit-message)