1d0b73b
d512411
1 2
3
module Make (S : Abstract.Storage.STORAGE) : sig val initialize : S.connection -> (Protocols.Handle.t, Concepts.Condition.condition) result end