Tls.CryptoSourceval dh_params_unpack :
Core.dh_parameters ->
(Mirage_crypto_pk.Dh.group * Cstruct_sexp.t, [> `Msg of string ]) resultval pseudo_header :
Cstruct.uint64 ->
Packet.content_type ->
(Cstruct.uint8 * Cstruct.uint8) ->
Cstruct.uint16 ->
Cstruct.tval mac :
[< Mirage_crypto.Hash.hash ] ->
Cstruct.t ->
Cstruct.t ->
Cstruct.t ->
Mirage_crypto.Hash.digest