composewell/streamly
1
1
Fork 0
mirror of https://github.com/composewell/streamly.git synced 2024-09-11 11:37:22 +03:00
Code Issues Packages Projects Releases Wiki Activity

Slice Text instead of copying data

Browse Source
This commit is contained in:
Adithya Kumar 2023-08-30 21:03:21 +05:30
parent f85802e18f
commit 3c725655a5
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
benchmark/Streamly/Benchmark/Data/Transaction.hs
View File

@ -192,12 +192,12 @@ instance Serialize Text where
-- XXX Check the available length in input buffer -- XXX Check the available length in input buffer
if (off1 + lenBytes <= end) if (off1 + lenBytes <= end)
then do then do
newArr <- Unbox.newBytes lenBytes -- newArr <- Unbox.newBytes lenBytes
-- XXX We can perform an unrolled word copy directly -- XXX We can perform an unrolled word copy directly
Unbox.putSliceUnsafe arr off1 newArr 0 lenBytes -- Unbox.putSliceUnsafe arr off1 newArr 0 lenBytes
pure pure
( off1 + lenBytes ( off1 + lenBytes
, Text (TArr.Array (unsafeCoerce# (Unbox.getMutableByteArray# newArr))) 0 len16 , Text (TArr.Array (unsafeCoerce# (Unbox.getMutableByteArray# arr))) off1 len16
) )
else error $ "deserialize: Text: input buffer underflow: off1 = " else error $ "deserialize: Text: input buffer underflow: off1 = "
++ show off1 ++ " lenBytes = " ++ show lenBytes ++ show off1 ++ " lenBytes = " ++ show lenBytes