Avoid thunk leak with AEAD state
This commit is contained in:
parent
d49408156e
commit
fa19117dfe
@ -27,7 +27,7 @@ data AEADModeImpl st = AEADModeImpl
|
|||||||
-- | Authenticated Encryption with Associated Data algorithms
|
-- | Authenticated Encryption with Associated Data algorithms
|
||||||
data AEAD cipher = forall st . AEAD
|
data AEAD cipher = forall st . AEAD
|
||||||
{ aeadModeImpl :: AEADModeImpl st
|
{ aeadModeImpl :: AEADModeImpl st
|
||||||
, aeadState :: st
|
, aeadState :: !st
|
||||||
}
|
}
|
||||||
|
|
||||||
-- | Append some header information to an AEAD context
|
-- | Append some header information to an AEAD context
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user