From a681c0f0d61834e0edd959fcc52ff01525d8cd50 Mon Sep 17 00:00:00 2001 From: Sventimir Date: Tue, 28 Nov 2023 10:22:19 +0100 Subject: [PATCH] [runtime_config] Inline explanations on Fork_config.t fields. --- src/lib/runtime_config/runtime_config.ml | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) diff --git a/src/lib/runtime_config/runtime_config.ml b/src/lib/runtime_config/runtime_config.ml index 06556874415c..85d1c068ab4a 100644 --- a/src/lib/runtime_config/runtime_config.ml +++ b/src/lib/runtime_config/runtime_config.ml @@ -1,12 +1,13 @@ open Core_kernel module Fork_config = struct - (* previous_global_slot here is a global slot since genesis. previous - length is a number of blocks produced since genesis, which might be - smaller than previous_global_slot or equal if a block was produced - in every slot possible, which may or may not be the case. *) + (* Note that previous_length might be smaller than the gernesis_slot + or equal if a block was produced in every slot possible. *) type t = - { previous_state_hash : string; previous_length : int; genesis_slot : int } + { previous_state_hash : string + ; previous_length : int (* number of blocks produced since genesis *) + ; genesis_slot : int (* global slot since genesis *) + } [@@deriving yojson, bin_io_unversioned] let gen =