module Make_datumable5 (
Versions
:
Versioned_typed_tcp.Versions
)
(
T
:
T
)
(
V1
:
T_bin
)
(
V2
:
T_bin
)
(
V3
:
T_bin
)
(
V4
:
T_bin
)
(
V5
:
T_bin
)
(
V1_cvt
:
V(V1)(T).S
)
(
V2_cvt
:
V(V2)(T).S
)
(
V3_cvt
:
V(V3)(T).S
)
(
V4_cvt
:
V(V4)(T).S
)
(
V5_cvt
:
V(V5)(T).S
)
: sig
.. end
type
datum = t
include Versions
val lookup_marshal_fun : Versioned_typed_tcp.Version.t ->
(Versioned_typed_tcp.Datumable_of_binable.T.t ->
Core.Std.Bigsubstring.t option, exn)
Core.Std.Result.t
val lookup_unmarshal_fun : Versioned_typed_tcp.Version.t ->
(Core.Std.Bigsubstring.t ->
Versioned_typed_tcp.Datumable_of_binable.T.t option, exn)
Core.Std.Result.t