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
|
|
|
|
|
|
|
|
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:
|
|
|
|
'a Base48.encoding -> (t -> string -> 'a list Lwt.t) -> unit
|
|
|
|
|
|
|
|
val complete:
|
|
|
|
?alphabet:string -> t -> string -> string list Lwt.t
|