hmac-drbg

commit 0753c3d56826e4b10ec22feb63a13bd85946e933
parent c039c489441ca13cdc5be0003516d85829442167
Author: Jared Tobin <jared@jtobin.io>
Date:   Thu, 10 Oct 2024 19:29:34 +0400

lib: missing unpack pragma

This field should be unboxed anyway via -funbox-small-strict-fields,
but it's worth it to be explicit.

Diffstat:
M
lib/Crypto/DRBG/HMAC.hs
 | 
2
+-

1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lib/Crypto/DRBG/HMAC.hs b/lib/Crypto/DRBG/HMAC.hs
@@ -63,7 +63,7 @@ instance Show (DRBG s) where
 -- DRBG environment data and state
 data DRBGState = DRBGState
                  !HMACEnv       -- hmac function & outlen
-                 !Word64        -- reseed counter
+  {-# UNPACK #-} !Word64        -- reseed counter
   {-# UNPACK #-} !BS.ByteString -- v
   {-# UNPACK #-} !BS.ByteString -- key