sig
  type t
  val init : unit -> Ocamltter.Cache.t
  val is_new : Ocamltter.Cache.t -> Ocamltter.tweet -> bool
  val add : Ocamltter.Cache.t -> Ocamltter.tweet -> unit
end