From 721b1fda713a08bbc4f9a8e50820ce1491e32ff1 Mon Sep 17 00:00:00 2001 From: Estevan Castilho Date: Thu, 24 Sep 2026 04:25:50 +0000 Subject: Actually register the multigroup --- lib/kernel/Storage.mli | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lib/kernel/Storage.mli') diff --git a/lib/kernel/Storage.mli b/lib/kernel/Storage.mli index b8c0e5b..3c036ca 100644 --- a/lib/kernel/Storage.mli +++ b/lib/kernel/Storage.mli @@ -2,7 +2,7 @@ module Make : functor (S : Abstract.Storage.STORAGE) -> sig module Pointer : sig type 'a t - val make : S.address -> (S.transaction -> S.address -> ('a, Concepts.Condition.condition) result) -> 'a t + val make : (S.transaction -> S.address -> ('a, Concepts.Condition.condition) result) -> S.address -> 'a t val address_of : 'a t -> S.address val swap : 'a t -> S.address -> 'a t val deref : S.transaction -> 'a t -> ('a, Concepts.Condition.condition) result -- cgit v1.2.3