Tezos_shell.Monitor_directory
val monitor_head :
head_watcher:
((Tezos_base.TzPervasives.Block_hash.t * Tezos_base.Block_header.t)
Lwt_stream.t
* Lwt_watcher.stopper) ->
Tezos_store.Store.t Stdlib.ref ->
Tezos_shell_services.Chain_services.chain ->
< next_protocols :
Tezos_base.TzPervasives.Protocol_hash.t Tezos_base.TzPervasives.trace
; protocols :
Tezos_base.TzPervasives.Protocol_hash.t Tezos_base.TzPervasives.trace.. > ->
(Tezos_base.TzPervasives.Block_hash.t * Tezos_base.Block_header.t)
Tezos_rpc.Answer.t
Lwt.t
val applied_blocks :
applied_blocks_watcher:
((Tezos_store.Store.chain_store * Tezos_store.Store.Block.t) Lwt_stream.t
* Lwt_watcher.stopper) ->
< chains :
Tezos_shell_services.Chain_services.chain Tezos_base.TzPervasives.trace
; next_protocols :
Tezos_base.TzPervasives.Protocol_hash.t Tezos_base.TzPervasives.trace
; protocols :
Tezos_base.TzPervasives.Protocol_hash.t Tezos_base.TzPervasives.trace.. > ->
(Tezos_base.TzPervasives.Chain_id.t
* Tezos_base.TzPervasives.Block_hash.t
* Tezos_base.Block_header.t
* Tezos_base.Operation.t Tezos_base.TzPervasives.trace
Tezos_base.TzPervasives.trace)
Tezos_rpc.Answer.t
Lwt.t
val build_rpc_directory :
Validator.t ->
Chain_validator.t ->
unit Tezos_rpc.Directory.t