Tezos_shell.Peer_validatorSourceval create :
?notify_new_block:(Block_validator.new_block -> unit) ->
?notify_termination:(unit -> unit) ->
Tezos_shell_services.Shell_limits.peer_validator_limits ->
Block_validator.t ->
Distributed_db.chain_db ->
Tezos_base.P2p_peer.Id.t ->
t Lwt.tval notify_head :
t ->
Tezos_base.TzPervasives.Block_hash.t ->
Tezos_base.Block_header.t ->
unitval running_workers :
unit ->
((Tezos_base.TzPervasives.Chain_id.t * Tezos_base.P2p_peer.Id.t) * t) listval current_request :
t ->
(Tezos_base.Time.System.t
* Tezos_base.Time.System.t
* Tezos_shell_services.Peer_validator_worker_state.Request.view)
option