Up

module Common

: sig
#
val eof_error : Core.Std.Error.t
#
val mlog : severity:[
| `Debug
| `Error
| `Info
] -> ?message:Types.Envelope.t -> ?dir:[
| `In
| `Out
] -> ('a, unit, string, unit) Pervasives.format4 -> 'a
#
val exchange : Async.Std.Reader.t -> Async.Std.Writer.t -> string -> [
| `Ok of string
| `Eof
] Async.Std.Deferred.t
#
val is_accessible_directory : ?create_if_missing:unit -> string -> unit Async.Std.Deferred.Or_error.t
#
val safely_ls_dir : string -> string list Async.Std.Deferred.Or_error.t
#
val rename : src:string -> dst:string -> unit Async.Std.Deferred.Or_error.t
end