2016-09-08 21:13:10 +04:00
|
|
|
(** View over the context store, restricted to types, access and
|
|
|
|
functional manipulation of an existing context. *)
|
|
|
|
|
|
|
|
open Hash
|
|
|
|
|
|
|
|
include Persist.STORE
|
|
|
|
|
2017-02-25 21:01:27 +04:00
|
|
|
val get_fitness: t -> Fitness.fitness Lwt.t
|
|
|
|
val set_fitness: t -> Fitness.fitness -> t Lwt.t
|
|
|
|
|
2016-09-08 21:13:10 +04:00
|
|
|
val get_genesis_time: t -> Time.t Lwt.t
|
|
|
|
val get_genesis_block: t -> Block_hash.t Lwt.t
|
2016-11-14 20:28:37 +04:00
|
|
|
|
|
|
|
val register_resolver:
|
2017-02-19 21:22:32 +04:00
|
|
|
'a Base58.encoding -> (t -> string -> 'a list Lwt.t) -> unit
|
2016-11-14 20:28:37 +04:00
|
|
|
|
2017-02-19 21:22:32 +04:00
|
|
|
val complete: t -> string -> string list Lwt.t
|