9536cc7 · streamly · git.iko.soy

git.iko.soy/streamly

on master help sign in

Rename Fold.lchunksOf2 to Fold.chunksOf2

9536cc7Adithya Kumar6 years ago

src/Streamly/Internal/Data/Fold/Types.hs+4−4

@@ -203,7 +203,7 @@ module Streamly.Internal.Data.Fold.Types

203 , many

204 , lsessionsOf

205 , lchunksOf

206− , lchunksOf2

206+ , chunksOf2

207

208 , duplicate

209 , initialize

@@ -875,9 +875,9 @@ many (Fold cstep cinitial cextract) (Fold sstep sinitial sextract) =

875lchunksOf :: Monad m => Int -> Fold m a b -> Fold m b c -> Fold m a c

876lchunksOf n split collect = many collect (takeLE n split)

877

878−{-# INLINE lchunksOf2 #-}

878+{-# INLINE chunksOf2 #-}

879−lchunksOf2 :: Monad m => Int -> Fold m a b -> Fold2 m x b c -> Fold2 m x a c

879+chunksOf2 :: Monad m => Int -> Fold m a b -> Fold2 m x b c -> Fold2 m x a c

880−lchunksOf2 n (Fold step1 initial1 extract1) (Fold2 step2 inject2 extract2) =

880+chunksOf2 n (Fold step1 initial1 extract1) (Fold2 step2 inject2 extract2) =

881 Fold2 step' inject' extract'

882

883 where

src/Streamly/Internal/FileSystem/Handle.hs+1−1

@@ -464,7 +464,7 @@ writeWithBufferOf n h = FL.lchunksOf n (writeNUnsafe n) (writeChunks h)

464

465{-# INLINE writeWithBufferOf2 #-}

466writeWithBufferOf2 :: MonadIO m => Int -> Fold2 m Handle Word8 ()

467−writeWithBufferOf2 n = FL.lchunksOf2 n (writeNUnsafe n) writeChunks2

467+writeWithBufferOf2 n = FL.chunksOf2 n (writeNUnsafe n) writeChunks2

468

469-- > write = 'writeWithBufferOf' A.defaultChunkSize

470--