From 1259773fac4d7c334351c61ab8cf71231c1af4ef Mon Sep 17 00:00:00 2001 From: Estevan Castilho Date: Thu, 3 Sep 2026 02:23:27 +0000 Subject: Branch registration --- lib/kernel/Merkle.ml | 2 ++ 1 file changed, 2 insertions(+) (limited to 'lib/kernel/Merkle.ml') diff --git a/lib/kernel/Merkle.ml b/lib/kernel/Merkle.ml index 05adbd2..b2e341a 100644 --- a/lib/kernel/Merkle.ml +++ b/lib/kernel/Merkle.ml @@ -314,6 +314,7 @@ module type INTERFACE = functor (S : Abstract.Storage.STORAGE) (K : KEY) (V : VA val find : S.transaction -> address -> (node option, Concepts.Condition.condition) result val empty : node + val empty_under : S.transaction -> (address, Concepts.Condition.condition) result val hash_of : node -> address @@ -356,6 +357,7 @@ module Interface : INTERFACE = functor (S : Abstract.Storage.STORAGE) (K : KEY) let find = T.find let empty = T.empty + let empty_under = T.empty_under let hash_of = T.hash_of let insert tx k v node = -- cgit v1.2.3