[DEVOPS-293] Fix segfault in cryptonite

See upstream issue at haskell-crypto/cryptonite#193
input-output-hk · Oct 1, 2017 · f002c73 · f002c73
1 parent c563017
commit f002c73
Showing 1 changed file with 13 additions and 0 deletions.
diff --git a/pkgs/cryptonite-segfault-blake.patch b/pkgs/cryptonite-segfault-blake.patch
@@ -0,0 +1,13 @@
+diff --git a/Crypto/Hash/Blake2b.hs b/Crypto/Hash/Blake2b.hs
+index c22c284..19c68ba 100644
+--- a/Crypto/Hash/Blake2b.hs
++++ b/Crypto/Hash/Blake2b.hs
+@@ -85,7 +85,7 @@ instance HashAlgorithm Blake2b_512 where
+ foreign import ccall unsafe "cryptonite_blake2b_init"
+     c_blake2b_init :: Ptr (Context a) -> Word32 -> IO ()
+
+-foreign import ccall "cryptonite_blake2b_update"
++foreign import ccall unsafe "cryptonite_blake2b_update"
+     c_blake2b_update :: Ptr (Context a) -> Ptr Word8 -> Word32 -> IO ()
+
+ foreign import ccall unsafe "cryptonite_blake2b_finalize"