diff options
Diffstat (limited to 'src/Codec/Crypto/HKDF.hs')
-rw-r--r-- | src/Codec/Crypto/HKDF.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Codec/Crypto/HKDF.hs b/src/Codec/Crypto/HKDF.hs index a8c8fa9..5dd9b1f 100644 --- a/src/Codec/Crypto/HKDF.hs +++ b/src/Codec/Crypto/HKDF.hs @@ -47,5 +47,5 @@ expand (Algorithm md) (AssociatedData info) outLen (SecretKey secret) = SecretKey $ unsafeLocalState $ allocaArray outLen $ \pOutKey -> do - hkdfExpand pOutKey (fromIntegral outLen) md secret info + hkdfExpand pOutKey outLen md secret info packCUStringLen (pOutKey, outLen) |