Module Octogram.Agent_state

type _ key = ..
type (_, _) eq =
  1. | Eq : ('a, 'a) eq
module type KEY = sig ... end
val register_key : (module KEY) -> unit
type t
val initial_state : home_dir:string -> unit -> t
val add : 'a key -> 'a -> t -> unit
val find : ?default:'a -> 'a key -> t -> 'a
val find_opt : 'a key -> t -> 'a option
val http_client : t -> Http_client.t
val home_dir : t -> string