From 3be9928e54c59a900ca062e7a2063d21f14e933f Mon Sep 17 00:00:00 2001 From: Vincent Bernardoff Date: Thu, 8 Feb 2018 14:34:46 +0100 Subject: [PATCH] Tweetnacl: bugfix --- vendors/ocaml-tweetnacl/src/tweetnacl.ml | 1 + 1 file changed, 1 insertion(+) 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)