dandri/simplexmq
1
0
Fork 0
mirror of https://github.com/simplex-chat/simplexmq.git synced 2026-04-05 13:16:36 +00:00
Code Issues Packages Projects Releases Wiki Activity

remove fromIntegral

Browse Source
This commit is contained in:
Evgeny Poberezkin
2024-01-08 21:30:21 +00:00
parent 72f33c6c2d
commit b248f28efc
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/Simplex/Messaging/Protocol.hs
View File

@@ -1320,7 +1320,7 @@ batchTransmissions' batch bSize
mkBatch1 :: (SentRawTransmission, r) -> TransportBatch r
mkBatch1 (t, r)
-- 2 bytes are reserved for pad size
| BB.length s <= fromIntegral (bSize - 2) = TBTransmission s r
| BB.length s <= bSize - 2 = TBTransmission s r
| otherwise = TBLargeTransmission r
where
s = tEncode t