Heartbeat.Make
val heartbeat_flag : bool Core.ref
val print_heartbeat : Logger.t -> unit Async_kernel__Deferred.t