diff options
author | Clint Adams <clint@debian.org> | 2019-06-30 11:02:27 -0400 |
---|---|---|
committer | Clint Adams <clint@debian.org> | 2019-06-30 11:02:27 -0400 |
commit | 0734e5bbe64e1daeaea74cc29a6631d84cf6c3e1 (patch) | |
tree | f04168e87f1d72b7a6af64bbd34e20a599548ffa /Data | |
parent | a0c6bb0a02b0dc89ae4e6a1b971fa43b2bf68af0 (diff) |
switch crc24Lazy to use foldl'
Diffstat (limited to 'Data')
-rw-r--r-- | Data/Digest/CRC24.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Data/Digest/CRC24.hs b/Data/Digest/CRC24.hs index e8eec92..4fbb9b1 100644 --- a/Data/Digest/CRC24.hs +++ b/Data/Digest/CRC24.hs | |||
@@ -1,5 +1,5 @@ | |||
1 | -- CRC24.hs: OpenPGP (RFC4880) CRC24 implementation | 1 | -- CRC24.hs: OpenPGP (RFC4880) CRC24 implementation |
2 | -- Copyright © 2012 Clint Adams | 2 | -- Copyright © 2012-2019 Clint Adams |
3 | -- This software is released under the terms of the ISC license. | 3 | -- This software is released under the terms of the ISC license. |
4 | -- (See the LICENSE file). | 4 | -- (See the LICENSE file). |
5 | 5 | ||
@@ -27,4 +27,4 @@ crc24 :: B.ByteString -> Word32 | |||
27 | crc24 bs = crc24Lazy . BL.fromChunks $ [bs] | 27 | crc24 bs = crc24Lazy . BL.fromChunks $ [bs] |
28 | 28 | ||
29 | crc24Lazy :: ByteString -> Word32 | 29 | crc24Lazy :: ByteString -> Word32 |
30 | crc24Lazy = BL.foldl crc24Update crc24Init | 30 | crc24Lazy = BL.foldl' crc24Update crc24Init |