diff --git a/vendors/ocaml-tweetnacl/src/tweetnacl.ml b/vendors/ocaml-tweetnacl/src/tweetnacl.ml index ea14c4c6b..92ee8ebfe 100644 --- a/vendors/ocaml-tweetnacl/src/tweetnacl.ml +++ b/vendors/ocaml-tweetnacl/src/tweetnacl.ml @@ -30,6 +30,7 @@ module Hash = struct end let cs_of_z cs z = + Cstruct.memset cs 0 ; let bits = Z.to_bits z in Cstruct.blit_from_string bits 0 cs 0 (String.length bits)