commit 046b3e91cf17922a3d849b037104ec1de43d5542
parent 7344124c3ca3870d9de316c666c9d3cc9fd33546
Author: Jared Tobin <jared@jtobin.io>
Date: Sun, 13 Oct 2024 13:46:31 +0400
lib: add inline pragma to step
Diffstat:
1 file changed, 1 insertion(+), 0 deletions(-)
diff --git a/lib/Crypto/Hash/SHA256.hs b/lib/Crypto/Hash/SHA256.hs
@@ -346,6 +346,7 @@ step (Registers a b c d e f g h) k w =
let t1 = h + bsig1 e + ch e f g + k + w
t2 = bsig0 a + maj a b c
in Registers (t1 + t2) a b c (d + t1) e f g
+{-# INLINE step #-}
-- RFC 6234 6.2 block pipeline
--