haskell/cryptonite
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Use mkLE, not LE

Browse Source 
to make sure the conversion to little endian is actually happening. This
fixes a test failure in ChaChaPoly1305. Fixes #31.
This commit is contained in:
Joachim Breitner 2015-08-27 14:51:30 +02:00
parent 4beda3a49d
commit 507a8f8cea
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Crypto/Cipher/ChaChaPoly1305.hs
View File

@ -117,5 +117,5 @@ finalize :: State -> Poly1305.Auth
finalize (State _ macState aadLength plainLength) = finalize (State _ macState aadLength plainLength) =
Poly1305.finalize $ Poly1305.updates macState Poly1305.finalize $ Poly1305.updates macState
[ pad16 plainLength [ pad16 plainLength
, either (error "finalize: internal error") id $ P.fill 16 (P.putStorable (LE aadLength) >> P.putStorable (LE plainLength)) , either (error "finalize: internal error") id $ P.fill 16 (P.putStorable (toLE aadLength) >> P.putStorable (toLE plainLength))
] ]