blob: 88aee3034fb4f53e1c413a7d6451a405f02adca2 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
|
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
end
|
