ligo/src/lib_shell/node.mli

53 lines
1.6 KiB
OCaml
Raw Normal View History

2016-09-08 21:13:10 +04:00
(**************************************************************************)
(* *)
2018-02-06 00:17:03 +04:00
(* Copyright (c) 2014 - 2018. *)
2016-09-08 21:13:10 +04:00
(* Dynamic Ledger Solutions, Inc. <contact@tezos.com> *)
(* *)
(* All rights reserved. No warranty, explicit or implicit, provided. *)
(* *)
(**************************************************************************)
type t
2017-01-23 14:10:07 +04:00
type config = {
2018-02-16 04:26:24 +04:00
genesis: State.Chain.genesis ;
2017-01-23 14:10:07 +04:00
store_root: string ;
context_root: string ;
patch_context: (Context.t -> Context.t Lwt.t) option ;
p2p: (P2p.config * P2p.limits) option ;
2018-02-16 04:26:24 +04:00
test_chain_max_tll: int option ;
2017-01-23 14:10:07 +04:00
}
and peer_validator_limits = {
new_head_request_timeout: float ;
block_header_timeout: float ;
block_operations_timeout: float ;
protocol_timeout: float ;
worker_limits: Worker_types.limits
}
and prevalidator_limits = {
max_refused_operations: int ;
operation_timeout: float ;
worker_limits : Worker_types.limits ;
}
and block_validator_limits = {
protocol_timeout: float ;
worker_limits : Worker_types.limits ;
}
2018-02-16 04:26:24 +04:00
and chain_validator_limits = {
bootstrap_threshold: int ;
worker_limits : Worker_types.limits ;
}
val create:
config ->
peer_validator_limits ->
block_validator_limits ->
prevalidator_limits ->
2018-02-16 04:26:24 +04:00
chain_validator_limits ->
t tzresult Lwt.t
2016-09-08 21:13:10 +04:00
val shutdown: t -> unit Lwt.t
val build_rpc_directory: t -> unit RPC_directory.t