Add a comment about newRounded

2024-09-17 11:37:20 +03:00 · 2024-01-11 13:23:56 +05:30 · 2024-01-11 13:23:56 +05:30 · 8eab0f07cd
commit 8eab0f07cd
parent 63f9adfbba
1 changed files with 2 additions and 0 deletions
--- a/core/src/Streamly/Internal/Data/MutByteArray/Type.hs
+++ b/core/src/Streamly/Internal/Data/MutByteArray/Type.hs
@ -142,6 +142,8 @@ asUnpinnedPtrUnsafe arr f = do
 nil :: MutByteArray
 nil = unsafePerformIO $ new 0

+-- XXX add "newRounded" to round up the large size to the next page boundary
+-- and return the allocated size.
 {-# INLINE new #-}
 new :: Int -> IO MutByteArray
 new nbytes | nbytes < 0 =