blob: 2df41e6aa0f0bb8e2a6de064cba6594e02beae6a (
plain) (
blame)
1
2
3
4
5
6
7
8
|
module Make (S : Abstract.Storage.STORAGE) : sig
type t
val encode : t -> Concepts.Blob.t
val decode : Concepts.Blob.t -> (t, Concepts.Condition.condition) result
val wrap : S.connection -> t -> (Protocols.Handle.t, Concepts.Condition.condition) result
val make : S.connection -> (Protocols.Handle.t, Concepts.Condition.condition) result
end
|
