Up

module Persist

: sig
#
type t
#
val create_saving_periodically : root_dir:string -> Core.Std.Time.Span.t -> t Async.Std.Deferred.t
#
val disable_periodic_saving_and_save_now : t -> unit Async.Std.Deferred.t
#
val re_enable_periodic_saving : t -> unit
#
val fs_persist : t -> Fs.Persist.t
#
val build_persist : t -> Build.Persist.t
#
val quality : t -> Build.Persistence_quality.t
#
module State : sig
#
type t
#
val load_db : db_filename:string -> t Async.Std.Deferred.t
#
val sexp_of_t : t -> Core.Std.Sexp.t
#
val build_persist : t -> Build.Persist.t
end
end