2017-11-13 17:33:39 +04:00
|
|
|
(**************************************************************************)
|
|
|
|
|
(* *)
|
2018-02-06 00:17:03 +04:00
|
|
|
(* Copyright (c) 2014 - 2018. *)
|
2017-11-13 17:33:39 +04:00
|
|
|
(* Dynamic Ledger Solutions, Inc. <contact@tezos.com> *)
|
|
|
|
|
(* *)
|
|
|
|
|
(* All rights reserved. No warranty, explicit or implicit, provided. *)
|
|
|
|
|
(* *)
|
|
|
|
|
(**************************************************************************)
|
|
|
|
|
|
|
|
|
|
(** Tezos Shell Module - Mempool, a.k.a. the operations safe to be
|
|
|
|
|
broadcasted. *)
|
|
|
|
|
|
2017-11-30 21:34:22 +04:00
|
|
|
type t = {
|
2017-11-13 17:33:39 +04:00
|
|
|
known_valid: Operation_hash.t list ;
|
|
|
|
|
(** A valid sequence of operations on top of the current head. *)
|
|
|
|
|
pending: Operation_hash.Set.t ;
|
|
|
|
|
(** Set of known not-invalid operation. *)
|
|
|
|
|
}
|
|
|
|
|
type mempool = t
|
|
|
|
|
|
|
|
|
|
val encoding: mempool Data_encoding.t
|
|
|
|
|
|
|
|
|
|
val empty: mempool
|
|
|
|
|
(** Empty mempool. *)
|
