From 1de115817cb54b0abca411dc7f224daeb63fa985 Mon Sep 17 00:00:00 2001 From: Guillaume Genestier Date: Fri, 19 Dec 2025 11:22:04 +0100 Subject: [PATCH] DAL: Remove unused hook --- src/lib_dal_node/daemon.ml | 2 -- src/lib_dal_node/value_size_hooks.ml | 18 ------------------ src/lib_dal_node/value_size_hooks.mli | 9 --------- 3 files changed, 29 deletions(-) diff --git a/src/lib_dal_node/daemon.ml b/src/lib_dal_node/daemon.ml index 35c741f7b5dd..ff734e0cadcf 100644 --- a/src/lib_dal_node/daemon.ml +++ b/src/lib_dal_node/daemon.ml @@ -517,8 +517,6 @@ let run ?(disable_shard_validation = false) ~ignore_pkhs ~data_dir ~config_file ~level:head_level in - (* Set proto number of slots hook. *) - Value_size_hooks.set_number_of_slots proto_parameters.number_of_slots ; let* profile_ctxt = let+ profile_ctxt = build_profile_context config in Profile_manager.resolve_profile diff --git a/src/lib_dal_node/value_size_hooks.ml b/src/lib_dal_node/value_size_hooks.ml index 193423817d8f..dc7a9cc5c6a3 100644 --- a/src/lib_dal_node/value_size_hooks.ml +++ b/src/lib_dal_node/value_size_hooks.ml @@ -22,21 +22,3 @@ let share_size () = match !share_size_ref with | None -> Stdlib.failwith "Store.share_size: value not initialized" | Some size -> size - -(* Same idea as for [share_size]. *) -let number_of_slots_ref = ref None - -let set_number_of_slots n = - match !number_of_slots_ref with - | None -> number_of_slots_ref := Some n - | Some previous_number -> - if Int.equal n previous_number then () - else - Stdlib.failwith - "Store.set_number_of_slots: new share size incompatible with current \ - store" - -let number_of_slots () = - match !number_of_slots_ref with - | None -> Stdlib.failwith "Store.number_of_slots: value not initialized" - | Some n -> n diff --git a/src/lib_dal_node/value_size_hooks.mli b/src/lib_dal_node/value_size_hooks.mli index f58df6a67039..ab86dd6b7fb5 100644 --- a/src/lib_dal_node/value_size_hooks.mli +++ b/src/lib_dal_node/value_size_hooks.mli @@ -35,12 +35,3 @@ val set_share_size : int -> unit (** Get the share size. It fails if {!set_share_size} has not been called before. *) val share_size : unit -> int - -(** [set_number_of_slots n] sets the number of slots to be used by the store. It - fails if the size was already set to a different value. This function must - be called once, before the [layout] function of the KVS instance is used. *) -val set_number_of_slots : int -> unit - -(** Get the number of slots size. It fails if {!set_number_of_slots} has not - been called before. *) -val number_of_slots : unit -> int -- GitLab