on master help sign in
Rename Types.hs modules to Type.hs
commit87ebad51cb5d35d545d378e3c5b93d2dbc611197 authorRanjeet Kumar Ranjan <ranjeetr@composewell.com> dateThu 11 Mar 2021, 10:57 (6 years ago) parentbb72e18
69 files changed+216−216
.hlint.ignore+6−6 benchmark/Streamly/Benchmark/Data/Fold.hs+1−1 benchmark/Streamly/Benchmark/Data/Parser/ParserK.hs+1−1 benchmark/Streamly/Benchmark/FileSystem/Handle/Read.hs+2−2 benchmark/Streamly/Benchmark/FileSystem/Handle/ReadWrite.hs+3−3 benchmark/Streamly/Benchmark/Prelude/Serial/Split.hs+1−1 benchmark/Streamly/Benchmark/Unicode/Stream.hs+2−2 src/Streamly/FileSystem/Handle.hs+2−2 src/Streamly/Internal/Data/Array.hs+3−3 src/Streamly/Internal/Data/Array/Foreign.hs+5−5 src/Streamly/Internal/Data/Array/Foreign/Mut/Types.hs → src/Streamly/Internal/Data/Array/Foreign/Mut/Type.hs+6−6 src/Streamly/Internal/Data/Array/Foreign/Types.hs → src/Streamly/Internal/Data/Array/Foreign/Type.hs+7−7 src/Streamly/Internal/Data/Array/Prim.hs+2−2 src/Streamly/Internal/Data/Array/Prim/Mut/Types.hs → src/Streamly/Internal/Data/Array/Prim/Mut/Type.hs+2−2 src/Streamly/Internal/Data/Array/Prim/MutTypesInclude.hs+4−4 src/Streamly/Internal/Data/Array/Prim/Pinned.hs+2−2 src/Streamly/Internal/Data/Array/Prim/Pinned/Mut/Types.hs → src/Streamly/Internal/Data/Array/Prim/Pinned/Mut/Type.hs+2−2 src/Streamly/Internal/Data/Array/Prim/Pinned/Types.hs → src/Streamly/Internal/Data/Array/Prim/Pinned/Type.hs+3−3 src/Streamly/Internal/Data/Array/Prim/Types.hs → src/Streamly/Internal/Data/Array/Prim/Type.hs+3−3 src/Streamly/Internal/Data/Array/Prim/TypesInclude.hs+3−3 src/Streamly/Internal/Data/Array/PrimInclude.hs+2−2 src/Streamly/Internal/Data/Array/Stream/Foreign.hs+5−5 src/Streamly/Internal/Data/Array/Stream/Mut/Foreign.hs+9−9 src/Streamly/Internal/Data/Binary/Decode.hs+1−1 src/Streamly/Internal/Data/Fold.hs+3−3 src/Streamly/Internal/Data/Fold/Tee.hs+2−2 src/Streamly/Internal/Data/Fold/Types.hs → src/Streamly/Internal/Data/Fold/Type.hs+2−2 src/Streamly/Internal/Data/Parser.hs+4−4 src/Streamly/Internal/Data/Parser/ParserD.hs+3−3 src/Streamly/Internal/Data/Parser/ParserD/Tee.hs+1−1 src/Streamly/Internal/Data/Parser/ParserD/Types.hs → src/Streamly/Internal/Data/Parser/ParserD/Type.hs+7−7 src/Streamly/Internal/Data/Parser/ParserK/Types.hs → src/Streamly/Internal/Data/Parser/ParserK/Type.hs+3−3 src/Streamly/Internal/Data/Pipe.hs+3−3 src/Streamly/Internal/Data/Pipe/Types.hs → src/Streamly/Internal/Data/Pipe/Type.hs+2−2 src/Streamly/Internal/Data/Producer.hs+1−1 src/Streamly/Internal/Data/Producer/Source.hs+1−1 src/Streamly/Internal/Data/Sink.hs+2−2 src/Streamly/Internal/Data/Sink/Types.hs → src/Streamly/Internal/Data/Sink/Type.hs+2−2 src/Streamly/Internal/Data/SmallArray.hs+4−4 src/Streamly/Internal/Data/SmallArray/Types.hs → src/Streamly/Internal/Data/SmallArray/Type.hs+1−1 src/Streamly/Internal/Data/Stream/IsStream/Common.hs+2−2 src/Streamly/Internal/Data/Stream/IsStream/Eliminate.hs+2−2 src/Streamly/Internal/Data/Stream/IsStream/Generate.hs+1−1 src/Streamly/Internal/Data/Stream/IsStream/Nesting.hs+5−5 src/Streamly/Internal/Data/Stream/IsStream/Transform.hs+2−2 src/Streamly/Internal/Data/Stream/Parallel.hs+1−1 src/Streamly/Internal/Data/Stream/Prelude.hs+1−1 src/Streamly/Internal/Data/Stream/SVar.hs+2−2 src/Streamly/Internal/Data/Stream/StreamD/Nesting.hs+5−5 src/Streamly/Internal/Data/Stream/StreamD/Transform.hs+5−5 src/Streamly/Internal/Data/Stream/StreamD/Type.hs+3−3 src/Streamly/Internal/Data/Stream/StreamK.hs+1−1 src/Streamly/Internal/Data/Unfold.hs+3−3 src/Streamly/Internal/Data/Unfold/Types.hs → src/Streamly/Internal/Data/Unfold/Type.hs+2−2 src/Streamly/Internal/FileSystem/Dir.hs+7−7 src/Streamly/Internal/FileSystem/Event/Darwin.hs+1−1 src/Streamly/Internal/FileSystem/Event/Linux.hs+1−1 src/Streamly/Internal/FileSystem/FD.hs+2−2 src/Streamly/Internal/FileSystem/File.hs+8−8 src/Streamly/Internal/FileSystem/Handle.hs+10−10 src/Streamly/Internal/Network/Inet/TCP.hs+4−4 src/Streamly/Internal/Network/Socket.hs+8−8 src/Streamly/Internal/Ring/Foreign.hs+1−1 src/Streamly/Internal/Unicode/Stream.hs+1−1 src/Streamly/Network/Socket.hs+2−2 streamly.cabal+13−13 test/Streamly/Test/Common/Array.hs+3−3 test/Streamly/Test/Network/Inet/TCP.hs+1−1 test/Streamly/Test/Network/Socket.hs+1−1
.hlint.ignore+6−6
@@ -16,15 +16,15 @@ src/Streamly/Internal/Data/Stream/StreamD/Transform.hs
1616src/Streamly/Internal/Data/Stream/StreamD/Exception.hs
1717src/Streamly/Internal/Data/Stream/StreamD/Lift.hs
1818src/Streamly/Internal/Data/Stream/StreamD/Nesting.hs
19−src/Streamly/Internal/Data/Pipe/Types.hs
20−src/Streamly/Internal/Data/SmallArray/Types.hs
19+src/Streamly/Internal/Data/Pipe/Type.hs
20+src/Streamly/Internal/Data/SmallArray/Type.hs
2121src/Streamly/Internal/Unicode/Stream.hs
2222src/Streamly/Internal/Data/IORef/Prim.hs
23−src/Streamly/Internal/Data/Array/Prim/Types.hs
24−src/Streamly/Internal/Data/Array/Prim/Mut/Types.hs
23+src/Streamly/Internal/Data/Array/Prim/Type.hs
24+src/Streamly/Internal/Data/Array/Prim/Mut/Type.hs
2525src/Streamly/Internal/Data/Array/Prim/MutTypesInclude.hs
26−src/Streamly/Internal/Data/Array/Prim/Pinned/Mut/Types.hs
27−src/Streamly/Internal/Data/Array/Prim/Pinned/Types.hs
26+src/Streamly/Internal/Data/Array/Prim/Pinned/Mut/Type.hs
27+src/Streamly/Internal/Data/Array/Prim/Pinned/Type.hs
2828src/Streamly/Internal/Data/Array/Prim/TypesInclude.hs
2929test/Streamly/Test/Common/Array.hs
3030test/Streamly/Test/Data/Array.hs
benchmark/Streamly/Benchmark/Data/Fold.hs+1−1
@@ -19,7 +19,7 @@ import Streamly.Internal.Data.Fold (Fold(..))
1919
2020import qualified Data.Map.Strict as Map
2121import qualified Streamly.Internal.Data.Fold as FL
22−import qualified Streamly.Internal.Data.Fold.Types as FL
22+import qualified Streamly.Internal.Data.Fold.Type as FL
2323import qualified Streamly.Internal.Data.Pipe as Pipe
2424import qualified Streamly.Internal.Data.Sink as Sink
2525import qualified Streamly.Internal.Data.Stream.IsStream as IP
benchmark/Streamly/Benchmark/Data/Parser/ParserK.hs+1−1
@@ -24,7 +24,7 @@ import qualified Data.Foldable as F
2424import qualified Data.Traversable as TR
2525import qualified Streamly.Prelude as S
2626import qualified Streamly.Internal.Data.Fold as FL
27−import qualified Streamly.Internal.Data.Parser.ParserK.Types as PR
27+import qualified Streamly.Internal.Data.Parser.ParserK.Type as PR
2828import qualified Streamly.Internal.Data.Parser.ParserD as PRD
2929import qualified Streamly.Internal.Data.Stream.IsStream as IP
3030
benchmark/Streamly/Benchmark/FileSystem/Handle/Read.hs+2−2
@@ -34,7 +34,7 @@ import System.IO (Handle)
3434
3535import qualified Streamly.FileSystem.Handle as FH
3636import qualified Streamly.Internal.Data.Array.Foreign as A
37−import qualified Streamly.Internal.Data.Array.Foreign.Types as AT
37+import qualified Streamly.Internal.Data.Array.Foreign.Type as AT
3838import qualified Streamly.Internal.Data.Fold as FL
3939import qualified Streamly.Internal.Data.Stream.IsStream as IP
4040import qualified Streamly.Internal.FileSystem.Handle as IFH
@@ -50,7 +50,7 @@ import Streamly.Benchmark.Common.Handle
5050#ifdef INSPECTION
5151import Streamly.Internal.Data.Stream.StreamD.Type (Step(..), FoldMany)
5252
53−import qualified Streamly.Internal.Data.Array.Foreign.Mut.Types as MA
53+import qualified Streamly.Internal.Data.Array.Foreign.Mut.Type as MA
5454import qualified Streamly.Internal.Data.Stream.StreamD as D
5555import qualified Streamly.Internal.Data.Unfold as IUF
5656
benchmark/Streamly/Benchmark/FileSystem/Handle/ReadWrite.hs+3−3
@@ -24,7 +24,7 @@ where
2424
2525import System.IO (Handle)
2626import Prelude hiding (last, length)
27−import Streamly.Internal.Data.Array.Foreign.Types (defaultChunkSize)
27+import Streamly.Internal.Data.Array.Foreign.Type (defaultChunkSize)
2828
2929import qualified Streamly.FileSystem.Handle as FH
3030import qualified Streamly.Internal.Data.Unfold as IUF
@@ -43,8 +43,8 @@ import Streamly.Internal.Data.Stream.StreamD.Type (Step(..))
4343import qualified Streamly.Internal.Data.Stream.StreamD.Type as D
4444import qualified Streamly.Internal.Data.Tuple.Strict as Strict
4545import qualified Streamly.Internal.Data.Array.Stream.Mut.Foreign as MAS
46−import qualified Streamly.Internal.Data.Array.Foreign.Types as AT
47−import qualified Streamly.Internal.Data.Array.Foreign.Mut.Types as MA
46+import qualified Streamly.Internal.Data.Array.Foreign.Type as AT
47+import qualified Streamly.Internal.Data.Array.Foreign.Mut.Type as MA
4848
4949import Test.Inspection
5050#endif
benchmark/Streamly/Benchmark/Prelude/Serial/Split.hs+1−1
@@ -41,7 +41,7 @@ import Streamly.Benchmark.Common.Handle
4141#ifdef INSPECTION
4242import Streamly.Internal.Data.Stream.StreamD.Type (Step(..))
4343
44−import qualified Streamly.Internal.Data.Array.Foreign.Mut.Types as MA
44+import qualified Streamly.Internal.Data.Array.Foreign.Mut.Type as MA
4545import qualified Streamly.Internal.Data.Unfold as IUF
4646
4747import Test.Inspection
benchmark/Streamly/Benchmark/Unicode/Stream.hs+2−2
@@ -40,8 +40,8 @@ import Streamly.Benchmark.Common.Handle
4040import Foreign.Storable (Storable)
4141import Streamly.Internal.Data.Stream.StreamD.Type (Step(..))
4242import qualified Streamly.Internal.Data.Tuple.Strict as Strict
43−import qualified Streamly.Internal.Data.Array.Foreign.Types as AT
44−import qualified Streamly.Internal.Data.Array.Foreign.Mut.Types as MA
43+import qualified Streamly.Internal.Data.Array.Foreign.Type as AT
44+import qualified Streamly.Internal.Data.Array.Foreign.Mut.Type as MA
4545
4646import Test.Inspection
4747#endif
src/Streamly/FileSystem/Handle.hs+2−2
@@ -44,12 +44,12 @@ module Streamly.FileSystem.Handle
4444 -- the stream is lazy and generated on-demand as the consumer consumes it.
4545 -- Read IO requests to the IO device are performed in chunks limited to a
4646 -- maximum size of 32KiB, this is referred to as
47− -- 'Streamly.Internal.Data.Array.Foreign.Types.defaultChunkSize' in the
47+ -- 'Streamly.Internal.Data.Array.Foreign.Type.defaultChunkSize' in the
4848 -- documentation. One IO request may or may not read the full
4949 -- chunk. If the whole stream is not consumed, it is possible that we may
5050 -- read slightly more from the IO device than what the consumer needed.
5151 -- Unless specified otherwise in the API, writes are collected into chunks
52− -- of 'Streamly.Internal.Data.Array.Foreign.Types.defaultChunkSize' before they
52+ -- of 'Streamly.Internal.Data.Array.Foreign.Type.defaultChunkSize' before they
5353 -- are written to the IO device.
5454
5555 -- Streaming APIs work for all kind of devices, seekable or non-seekable;
src/Streamly/Internal/Data/Array.hs+3−3
@@ -55,13 +55,13 @@ import GHC.Base (Int(..))
5555import GHC.IO (unsafePerformIO)
5656import qualified GHC.Exts as Exts
5757
58−import Streamly.Internal.Data.Fold.Types (Fold(..))
58+import Streamly.Internal.Data.Fold.Type (Fold(..))
5959import Streamly.Internal.Data.Stream.StreamK.Type (IsStream)
6060import Streamly.Internal.Data.Stream.Serial (SerialT)
6161import Streamly.Internal.Data.Tuple.Strict (Tuple'(..), Tuple3'(..))
62−import Streamly.Internal.Data.Unfold.Types (Unfold(..))
62+import Streamly.Internal.Data.Unfold.Type (Unfold(..))
6363
64−import qualified Streamly.Internal.Data.Fold.Types as FL
64+import qualified Streamly.Internal.Data.Fold.Type as FL
6565import qualified Streamly.Internal.Data.Stream.StreamD as D
6666
6767{-# NOINLINE bottomElement #-}
src/Streamly/Internal/Data/Array/Foreign.hs+5−5
@@ -158,15 +158,15 @@ import GHC.Ptr (Ptr(..))
158158import GHC.Prim (touch#)
159159import GHC.IO (IO(..))
160160
161−import Streamly.Internal.Data.Array.Foreign.Types (Array(..), length)
162−import Streamly.Internal.Data.Fold.Types (Fold(..))
161+import Streamly.Internal.Data.Array.Foreign.Type (Array(..), length)
162+import Streamly.Internal.Data.Fold.Type (Fold(..))
163163import Streamly.Internal.Data.Producer.Type (Producer)
164164import Streamly.Internal.Data.Stream.Serial (SerialT)
165165import Streamly.Internal.Data.Tuple.Strict (Tuple3'(..))
166−import Streamly.Internal.Data.Unfold.Types (Unfold(..))
166+import Streamly.Internal.Data.Unfold.Type (Unfold(..))
167167
168−import qualified Streamly.Internal.Data.Array.Foreign.Mut.Types as MA
169−import qualified Streamly.Internal.Data.Array.Foreign.Types as A
168+import qualified Streamly.Internal.Data.Array.Foreign.Mut.Type as MA
169+import qualified Streamly.Internal.Data.Array.Foreign.Type as A
170170import qualified Streamly.Internal.Data.Fold as FL
171171import qualified Streamly.Internal.Data.Stream.Prelude as P
172172import qualified Streamly.Internal.Data.Stream.Serial as Serial
src/Streamly/Internal/Data/Array/Foreign/Mut/Types.hs → src/Streamly/Internal/Data/Array/Foreign/Mut/Type.hsrenamed+6−6
@@ -1,7 +1,7 @@
11{-# LANGUAGE UnboxedTuples #-}
22
33-- |
4−-- Module : Streamly.Internal.Data.Array.Foreign.Mut.Types
4+-- Module : Streamly.Internal.Data.Array.Foreign.Mut.Type
55-- Copyright : (c) 2020 Composewell Technologies
66-- License : BSD3-3-Clause
77-- Maintainer : streamly@composewell.com
@@ -22,7 +22,7 @@
2222-- Stream and Fold APIs allow easy, efficient and convenient operations on
2323-- arrays.
2424
25−module Streamly.Internal.Data.Array.Foreign.Mut.Types
25+module Streamly.Internal.Data.Array.Foreign.Mut.Type
2626 (
2727 -- * Type
2828 -- $arrayNotes
@@ -135,17 +135,17 @@ import GHC.Exts (IsList, IsString(..))
135135import GHC.ForeignPtr (ForeignPtr(..))
136136import GHC.IO (IO(IO), unsafePerformIO)
137137import GHC.Ptr (Ptr(..))
138−import Streamly.Internal.Data.Fold.Types (Fold(..))
138+import Streamly.Internal.Data.Fold.Type (Fold(..))
139139import Streamly.Internal.Data.Producer.Type (Producer (..))
140140import Streamly.Internal.Data.SVar (adaptState)
141−import Streamly.Internal.Data.Unfold.Types (Unfold(..))
141+import Streamly.Internal.Data.Unfold.Type (Unfold(..))
142142import Text.Read (readPrec, readListPrec, readListPrecDefault)
143143
144144#ifdef DEVBUILD
145145import qualified Data.Foldable as F
146146#endif
147147import qualified GHC.Exts as Exts
148−import qualified Streamly.Internal.Data.Fold.Types as FL
148+import qualified Streamly.Internal.Data.Fold.Type as FL
149149import qualified Streamly.Internal.Data.Producer as Producer
150150import qualified Streamly.Internal.Data.Stream.StreamD.Type as D
151151import qualified Streamly.Internal.Data.Stream.StreamK.Type as K
@@ -463,7 +463,7 @@ arraysOf n (D.Stream step state) =
463463 step' _ (GroupStart st) = do
464464 when (n <= 0) $
465465 -- XXX we can pass the module string from the higher level API
466− error $ "Streamly.Internal.Data.Array.Foreign.Mut.Types.fromStreamDArraysOf: the size of "
466+ error $ "Streamly.Internal.Data.Array.Foreign.Mut.Type.fromStreamDArraysOf: the size of "
467467 ++ "arrays [" ++ show n ++ "] must be a natural number"
468468 Array start end bound <- liftIO $ newArray n
469469 return $ D.Skip (GroupBuffer st start end bound)
src/Streamly/Internal/Data/Array/Foreign/Types.hs → src/Streamly/Internal/Data/Array/Foreign/Type.hsrenamed+7−7
@@ -1,7 +1,7 @@
11#include "inline.hs"
22
33-- |
4−-- Module : Streamly.Internal.Data.Array.Foreign.Types
4+-- Module : Streamly.Internal.Data.Array.Foreign.Type
55-- Copyright : (c) 2020 Composewell Technologies
66--
77-- License : BSD3-3-Clause
@@ -9,9 +9,9 @@
99-- Stability : experimental
1010-- Portability : GHC
1111--
12−-- See notes in "Streamly.Internal.Data.Array.Foreign.Mut.Types"
12+-- See notes in "Streamly.Internal.Data.Array.Foreign.Mut.Type"
1313--
14−module Streamly.Internal.Data.Array.Foreign.Types
14+module Streamly.Internal.Data.Array.Foreign.Type
1515 (
1616 -- $arrayNotes
1717 Array (..)
@@ -97,16 +97,16 @@ import GHC.ForeignPtr (touchForeignPtr, unsafeForeignPtrToPtr)
9797#endif
9898import GHC.IO (unsafePerformIO)
9999import GHC.Ptr (Ptr(..))
100−import Streamly.Internal.Data.Fold.Types (Fold(..))
101−import Streamly.Internal.Data.Unfold.Types (Unfold(..))
100+import Streamly.Internal.Data.Fold.Type (Fold(..))
101+import Streamly.Internal.Data.Unfold.Type (Unfold(..))
102102import Text.Read (readPrec, readListPrec, readListPrecDefault)
103103
104104import Prelude hiding (length, foldr, read, unlines, splitAt)
105105
106−import qualified Streamly.Internal.Data.Array.Foreign.Mut.Types as MA
106+import qualified Streamly.Internal.Data.Array.Foreign.Mut.Type as MA
107107import qualified Streamly.Internal.Data.Stream.StreamD.Type as D
108108import qualified Streamly.Internal.Data.Stream.StreamK.Type as K
109−import qualified Streamly.Internal.Data.Unfold.Types as Unfold
109+import qualified Streamly.Internal.Data.Unfold.Type as Unfold
110110import qualified GHC.Exts as Exts
111111
112112#if __GLASGOW_HASKELL__ < 808
src/Streamly/Internal/Data/Array/Prim.hs+2−2
@@ -104,7 +104,7 @@ module Streamly.Internal.Data.Array.Prim
104104 )
105105where
106106
107−import Streamly.Internal.Data.Array.Prim.Types (Array(..), length)
108−import qualified Streamly.Internal.Data.Array.Prim.Types as A
107+import Streamly.Internal.Data.Array.Prim.Type (Array(..), length)
108+import qualified Streamly.Internal.Data.Array.Prim.Type as A
109109
110110#include "Streamly/Internal/Data/Array/PrimInclude.hs"
src/Streamly/Internal/Data/Array/Prim/Mut/Types.hs → src/Streamly/Internal/Data/Array/Prim/Mut/Type.hsrenamed+2−2
@@ -3,7 +3,7 @@
33#include "inline.hs"
44
55-- |
6−-- Module : Streamly.Internal.Data.Array.Prim.Mut.Types
6+-- Module : Streamly.Internal.Data.Array.Prim.Mut.Type
77-- Copyright : (c) 2020 Composewell Technologies
88--
99-- License : BSD-3-Clause
@@ -11,7 +11,7 @@
1111-- Stability : experimental
1212-- Portability : GHC
1313--
14−module Streamly.Internal.Data.Array.Prim.Mut.Types
14+module Streamly.Internal.Data.Array.Prim.Mut.Type
1515 (
1616 Array (..)
1717
src/Streamly/Internal/Data/Array/Prim/MutTypesInclude.hs+4−4
@@ -8,7 +8,7 @@ import Control.Monad (when)
88import Control.Monad.IO.Class (MonadIO(..))
99import Data.Bifunctor (first)
1010import Data.Primitive.Types (Prim(..), sizeOf)
11−import Streamly.Internal.Data.Fold.Types (Fold(..))
11+import Streamly.Internal.Data.Fold.Type (Fold(..))
1212import Streamly.Internal.Data.SVar (adaptState)
1313import Streamly.Internal.Data.Tuple.Strict (Tuple'(..), Tuple3'(..))
1414
@@ -266,7 +266,7 @@ fromStreamDArraysOf n (D.Stream step state) = D.Stream step' (GroupStart state)
266266 when (n <= 0) $
267267 -- XXX we can pass the module string from the higher level API
268268 error $
269− "Streamly.Internal.Data.Array.Foreign.Mut.Types.fromStreamDArraysOf: the size of " ++
269+ "Streamly.Internal.Data.Array.Foreign.Mut.Type.fromStreamDArraysOf: the size of " ++
270270 "arrays [" ++ show n ++ "] must be a natural number"
271271 arr <- newArray n
272272 return $ D.Skip (GroupBuffer st arr 0)
@@ -319,7 +319,7 @@ packArraysChunksOf n (D.Stream step state) =
319319 step' gst (SpliceInitial st) = do
320320 when (n <= 0) $
321321 -- XXX we can pass the module string from the higher level API
322− error $ "Streamly.Internal.Data.Array.Foreign.Mut.Types.packArraysChunksOf: the size of "
322+ error $ "Streamly.Internal.Data.Array.Foreign.Mut.Type.packArraysChunksOf: the size of "
323323 ++ "arrays [" ++ show n ++ "] must be a natural number"
324324 r <- step gst st
325325 case r of
@@ -364,7 +364,7 @@ lpackArraysChunksOf n (Fold step1 initial1 extract1) =
364364 when (n <= 0)
365365 -- XXX we can pass the module string from the higher level API
366366 $ error
367− $ "Streamly.Internal.Data.Array.Foreign.Mut.Types."
367+ $ "Streamly.Internal.Data.Array.Foreign.Mut.Type."
368368 ++ "packArraysChunksOf: the size of arrays ["
369369 ++ show n
370370 ++ "] must be a natural number"
src/Streamly/Internal/Data/Array/Prim/Pinned.hs+2−2
@@ -102,7 +102,7 @@ module Streamly.Internal.Data.Array.Prim.Pinned
102102 )
103103where
104104
105−import Streamly.Internal.Data.Array.Prim.Pinned.Types (Array(..), length)
106−import qualified Streamly.Internal.Data.Array.Prim.Pinned.Types as A
105+import Streamly.Internal.Data.Array.Prim.Pinned.Type (Array(..), length)
106+import qualified Streamly.Internal.Data.Array.Prim.Pinned.Type as A
107107
108108#include "Streamly/Internal/Data/Array/PrimInclude.hs"
src/Streamly/Internal/Data/Array/Prim/Pinned/Mut/Types.hs → src/Streamly/Internal/Data/Array/Prim/Pinned/Mut/Type.hsrenamed+2−2
@@ -3,7 +3,7 @@
33#include "inline.hs"
44
55-- |
6−-- Module : Streamly.Internal.Data.Array.Prim.Pinned.Mut.Types
6+-- Module : Streamly.Internal.Data.Array.Prim.Pinned.Mut.Type
77-- Copyright : (c) 2020 Composewell Technologies
88--
99-- License : BSD-3-Clause
@@ -11,7 +11,7 @@
1111-- Stability : experimental
1212-- Portability : GHC
1313--
14−module Streamly.Internal.Data.Array.Prim.Pinned.Mut.Types
14+module Streamly.Internal.Data.Array.Prim.Pinned.Mut.Type
1515 (
1616 Array (..)
1717
src/Streamly/Internal/Data/Array/Prim/Pinned/Types.hs → src/Streamly/Internal/Data/Array/Prim/Pinned/Type.hsrenamed+3−3
@@ -3,7 +3,7 @@
33#include "inline.hs"
44
55-- |
6−-- Module : Streamly.Internal.Data.Array.Prim.Pinned.Types
6+-- Module : Streamly.Internal.Data.Array.Prim.Pinned.Type
77-- Copyright : (c) 2020 Composewell Technologies
88--
99-- License : BSD-3-Clause
@@ -11,7 +11,7 @@
1111-- Stability : experimental
1212-- Portability : GHC
1313--
14−module Streamly.Internal.Data.Array.Prim.Pinned.Types
14+module Streamly.Internal.Data.Array.Prim.Pinned.Type
1515 (
1616 Array (..)
1717 , unsafeFreeze
@@ -77,7 +77,7 @@ import Foreign.C.Types (CSize(..))
7777import GHC.IO (IO(..))
7878import Foreign.Ptr (minusPtr, nullPtr, plusPtr)
7979
80−import qualified Streamly.Internal.Data.Array.Prim.Pinned.Mut.Types as MA
80+import qualified Streamly.Internal.Data.Array.Prim.Pinned.Mut.Type as MA
8181
8282#include "Streamly/Internal/Data/Array/Prim/TypesInclude.hs"
8383
src/Streamly/Internal/Data/Array/Prim/Types.hs → src/Streamly/Internal/Data/Array/Prim/Type.hsrenamed+3−3
@@ -3,7 +3,7 @@
33#include "inline.hs"
44
55-- |
6−-- Module : Streamly.Internal.Data.Array.Prim.Types
6+-- Module : Streamly.Internal.Data.Array.Prim.Type
77-- Copyright : (c) 2020 Composewell Technologies
88--
99-- License : BSD-3-Clause
@@ -11,7 +11,7 @@
1111-- Stability : experimental
1212-- Portability : GHC
1313--
14−module Streamly.Internal.Data.Array.Prim.Types
14+module Streamly.Internal.Data.Array.Prim.Type
1515 (
1616 Array (..)
1717 , unsafeFreeze
@@ -68,7 +68,7 @@ module Streamly.Internal.Data.Array.Prim.Types
6868 )
6969where
7070
71−import qualified Streamly.Internal.Data.Array.Prim.Mut.Types as MA
71+import qualified Streamly.Internal.Data.Array.Prim.Mut.Type as MA
7272
7373#include "Streamly/Internal/Data/Array/Prim/TypesInclude.hs"
7474
src/Streamly/Internal/Data/Array/Prim/TypesInclude.hs+3−3
@@ -16,7 +16,7 @@ import Data.Semigroup (Semigroup(..))
1616import Data.Word (Word8)
1717import Streamly.Internal.Data.Tuple.Strict (Tuple3'(..))
1818import Streamly.Internal.Data.Maybe.Strict (Maybe'(..))
19−import Streamly.Internal.Data.Fold.Types (Fold(..))
19+import Streamly.Internal.Data.Fold.Type (Fold(..))
2020import Streamly.Internal.Data.SVar (adaptState)
2121import System.IO.Unsafe (unsafePerformIO)
2222import Text.Read (readPrec, readListPrec, readListPrecDefault)
@@ -552,7 +552,7 @@ packArraysChunksOf n (D.Stream step state) =
552552 step' gst (SpliceInitial st) = do
553553 when (n <= 0) $
554554 -- XXX we can pass the module string from the higher level API
555− error $ "Streamly.Internal.Data.Array.Foreign.Types.packArraysChunksOf: the size of "
555+ error $ "Streamly.Internal.Data.Array.Foreign.Type.packArraysChunksOf: the size of "
556556 ++ "arrays [" ++ show n ++ "] must be a natural number"
557557 r <- step gst st
558558 case r of
@@ -602,7 +602,7 @@ lpackArraysChunksOf n (Fold step1 initial1 extract1) =
602602 initial = do
603603 when (n <= 0) $
604604 -- XXX we can pass the module string from the higher level API
605− error $ "Streamly.Internal.Data.Array.Foreign.Types.packArraysChunksOf: the size of "
605+ error $ "Streamly.Internal.Data.Array.Foreign.Type.packArraysChunksOf: the size of "
606606 ++ "arrays [" ++ show n ++ "] must be a natural number"
607607 res <- initial1
608608 return $ first (Tuple3' Nothing' 0) res
src/Streamly/Internal/Data/Array/PrimInclude.hs+2−2
@@ -7,8 +7,8 @@
77import Control.Monad (when)
88import Control.Monad.IO.Class (MonadIO(..))
99import Data.Primitive.Types (Prim(..))
10−import Streamly.Internal.Data.Fold.Types (Fold(..))
11−import Streamly.Internal.Data.Unfold.Types (Unfold(..))
10+import Streamly.Internal.Data.Fold.Type (Fold(..))
11+import Streamly.Internal.Data.Unfold.Type (Unfold(..))
1212import Streamly.Internal.Data.Stream.Serial (SerialT)
1313import Streamly.Internal.Data.Stream.StreamK.Type (IsStream)
1414
src/Streamly/Internal/Data/Array/Stream/Foreign.hs+5−5
@@ -52,17 +52,17 @@ import Prelude hiding (length, null, last, map, (!!), read, concat, unlines)
5252#if !defined(mingw32_HOST_OS)
5353import Streamly.Internal.FileSystem.FDIO (IOVec(..))
5454#endif
55−import Streamly.Internal.Data.Array.Foreign.Types (Array(..), length)
56−import Streamly.Internal.Data.Fold.Types (Fold(..))
55+import Streamly.Internal.Data.Array.Foreign.Type (Array(..), length)
56+import Streamly.Internal.Data.Fold.Type (Fold(..))
5757import Streamly.Internal.Data.Stream.Serial (SerialT)
5858import Streamly.Internal.Data.Stream.StreamK.Type (IsStream)
5959import Streamly.Internal.Data.SVar (adaptState)
6060
6161import qualified Streamly.Internal.Data.Array.Foreign as A
62−import qualified Streamly.Internal.Data.Array.Foreign.Types as A
63−import qualified Streamly.Internal.Data.Array.Foreign.Mut.Types as MA
62+import qualified Streamly.Internal.Data.Array.Foreign.Type as A
63+import qualified Streamly.Internal.Data.Array.Foreign.Mut.Type as MA
6464import qualified Streamly.Internal.Data.Array.Stream.Mut.Foreign as AS
65−import qualified Streamly.Internal.Data.Fold.Types as FL
65+import qualified Streamly.Internal.Data.Fold.Type as FL
6666import qualified Streamly.Internal.Data.Stream.IsStream as S
6767import qualified Streamly.Internal.Data.Stream.StreamD as D
6868
src/Streamly/Internal/Data/Array/Stream/Mut/Foreign.hs+9−9
@@ -37,17 +37,17 @@ import Foreign.Storable (Storable(..))
3737import Foreign.ForeignPtr.Unsafe (unsafeForeignPtrToPtr)
3838import Foreign.Ptr (castPtr)
3939import Streamly.Internal.FileSystem.FDIO (IOVec(..))
40−import Streamly.Internal.Data.Array.Foreign.Mut.Types (length)
40+import Streamly.Internal.Data.Array.Foreign.Mut.Type (length)
4141import Streamly.Internal.Data.SVar (adaptState)
4242#endif
43−import Streamly.Internal.Data.Array.Foreign.Mut.Types (Array(..))
44−import Streamly.Internal.Data.Fold.Types (Fold(..))
43+import Streamly.Internal.Data.Array.Foreign.Mut.Type (Array(..))
44+import Streamly.Internal.Data.Fold.Type (Fold(..))
4545import Streamly.Internal.Data.Stream.Serial (SerialT)
4646import Streamly.Internal.Data.Stream.StreamK.Type (IsStream)
4747import Streamly.Internal.Data.Tuple.Strict (Tuple'(..))
4848
49−import qualified Streamly.Internal.Data.Array.Foreign.Mut.Types as MArray
50−import qualified Streamly.Internal.Data.Fold.Types as FL
49+import qualified Streamly.Internal.Data.Array.Foreign.Mut.Type as MArray
50+import qualified Streamly.Internal.Data.Fold.Type as FL
5151import qualified Streamly.Internal.Data.Stream.StreamD as D
5252
5353import Prelude hiding (length)
@@ -99,7 +99,7 @@ packArraysChunksOf n (D.Stream step state) =
9999 step' gst (SpliceInitial st) = do
100100 when (n <= 0) $
101101 -- XXX we can pass the module string from the higher level API
102− error $ "Streamly.Internal.Data.Array.Foreign.Mut.Types.packArraysChunksOf: the size of "
102+ error $ "Streamly.Internal.Data.Array.Foreign.Mut.Type.packArraysChunksOf: the size of "
103103 ++ "arrays [" ++ show n ++ "] must be a natural number"
104104 r <- step gst st
105105 case r of
@@ -143,7 +143,7 @@ lpackArraysChunksOf n (Fold step1 initial1 extract1) =
143143 initial = do
144144 when (n <= 0) $
145145 -- XXX we can pass the module string from the higher level API
146− error $ "Streamly.Internal.Data.Array.Foreign.Mut.Types.packArraysChunksOf: the size of "
146+ error $ "Streamly.Internal.Data.Array.Foreign.Mut.Type.packArraysChunksOf: the size of "
147147 ++ "arrays [" ++ show n ++ "] must be a natural number"
148148
149149 r <- initial1
@@ -264,11 +264,11 @@ groupIOVecsOf n maxIOVLen (D.Stream step state) =
264264 step' gst (GatherInitial st) = do
265265 when (n <= 0) $
266266 -- XXX we can pass the module string from the higher level API
267− error $ "Streamly.Internal.Data.Array.Foreign.Mut.Types.groupIOVecsOf: the size of "
267+ error $ "Streamly.Internal.Data.Array.Foreign.Mut.Type.groupIOVecsOf: the size of "
268268 ++ "groups [" ++ show n ++ "] must be a natural number"
269269 when (maxIOVLen <= 0) $
270270 -- XXX we can pass the module string from the higher level API
271− error $ "Streamly.Internal.Data.Array.Foreign.Mut.Types.groupIOVecsOf: the number of "
271+ error $ "Streamly.Internal.Data.Array.Foreign.Mut.Type.groupIOVecsOf: the number of "
272272 ++ "IOVec entries [" ++ show n ++ "] must be a natural number"
273273 r <- step (adaptState gst) st
274274 case r of
src/Streamly/Internal/Data/Binary/Decode.hs+1−1
@@ -35,7 +35,7 @@ import Streamly.Internal.Data.Tuple.Strict (Tuple' (..))
3535import qualified Streamly.Internal.Data.Array.Foreign as A
3636import qualified Streamly.Internal.Data.Parser as PR
3737import qualified Streamly.Internal.Data.Parser.ParserD as PRD
38−import qualified Streamly.Internal.Data.Parser.ParserK.Types as PRK
38+import qualified Streamly.Internal.Data.Parser.ParserK.Type as PRK
3939
4040-- | A value of type '()' is encoded as @0@ in binary encoding.
4141--
src/Streamly/Internal/Data/Fold.hs+3−3
@@ -229,12 +229,12 @@ import Data.Semigroup (Semigroup((<>)))
229229import Streamly.Internal.Data.Either.Strict
230230 (Either'(..), fromLeft', fromRight', isLeft', isRight')
231231import Streamly.Internal.Data.Maybe.Strict (Maybe'(..), toMaybe)
232−import Streamly.Internal.Data.Pipe.Types (Pipe (..), PipeState(..))
232+import Streamly.Internal.Data.Pipe.Type (Pipe (..), PipeState(..))
233233import Streamly.Internal.Data.Tuple.Strict (Tuple'(..), Tuple3'(..))
234234import Streamly.Internal.Data.Stream.Serial (SerialT)
235235
236236import qualified Data.Map.Strict as Map
237−import qualified Streamly.Internal.Data.Pipe.Types as Pipe
237+import qualified Streamly.Internal.Data.Pipe.Type as Pipe
238238import qualified Streamly.Internal.Data.Stream.IsStream.Enumeration as Stream
239239import qualified Streamly.Internal.Data.Stream.StreamK as K
240240import qualified Prelude
@@ -246,7 +246,7 @@ import Prelude hiding
246246 , reverse, iterate, init, and, or, lookup, (!!)
247247 , scanl, scanl1, replicate, concatMap, mconcat, foldMap, unzip
248248 , span, splitAt, break, mapM, zip)
249−import Streamly.Internal.Data.Fold.Types
249+import Streamly.Internal.Data.Fold.Type
250250
251251-- $setup
252252-- >>> :m
src/Streamly/Internal/Data/Fold/Tee.hs+2−2
@@ -18,9 +18,9 @@ import Data.Coerce (coerce)
1818#if __GLASGOW_HASKELL__ < 808
1919import Data.Semigroup (Semigroup(..))
2020#endif
21−import Streamly.Internal.Data.Fold.Types (Fold)
21+import Streamly.Internal.Data.Fold.Type (Fold)
2222
23−import qualified Streamly.Internal.Data.Fold.Types as Fold
23+import qualified Streamly.Internal.Data.Fold.Type as Fold
2424
2525-- | The type @Tee m a b@ represents a left fold over an input stream of values
2626-- of type @a@ to a single value of type @b@ in 'Monad' @m@.
src/Streamly/Internal/Data/Fold/Types.hs → src/Streamly/Internal/Data/Fold/Type.hsrenamed+2−2
@@ -1,5 +1,5 @@
11-- |
2−-- Module : Streamly.Internal.Data.Fold.Types
2+-- Module : Streamly.Internal.Data.Fold.Type
33-- Copyright : (c) 2019 Composewell Technologies
44-- (c) 2013 Gabriel Gonzalez
55-- License : BSD3
@@ -165,7 +165,7 @@
165165-- then be used only for the case when the stream stops before the fold
166166-- completes.
167167
168−module Streamly.Internal.Data.Fold.Types
168+module Streamly.Internal.Data.Fold.Type
169169 (
170170 -- * Types
171171 Step (..)
src/Streamly/Internal/Data/Parser.hs+4−4
@@ -199,12 +199,12 @@ import Control.Monad.Catch (MonadCatch)
199199import Prelude
200200 hiding (any, all, take, takeWhile, sequence, concatMap, maybe, either)
201201
202−import Streamly.Internal.Data.Fold.Types (Fold(..))
203−import Streamly.Internal.Data.Parser.ParserK.Types (Parser)
202+import Streamly.Internal.Data.Fold.Type (Fold(..))
203+import Streamly.Internal.Data.Parser.ParserK.Type (Parser)
204204
205−import qualified Streamly.Internal.Data.Fold.Types as FL
205+import qualified Streamly.Internal.Data.Fold.Type as FL
206206import qualified Streamly.Internal.Data.Parser.ParserD as D
207−import qualified Streamly.Internal.Data.Parser.ParserK.Types as K
207+import qualified Streamly.Internal.Data.Parser.ParserK.Type as K
208208
209209--
210210-- $setup
src/Streamly/Internal/Data/Parser/ParserD.hs+3−3
@@ -163,15 +163,15 @@ where
163163import Control.Exception (assert)
164164import Control.Monad.Catch (MonadCatch, MonadThrow(..))
165165import Fusion.Plugin.Types (Fuse(..))
166−import Streamly.Internal.Data.Fold.Types (Fold(..))
166+import Streamly.Internal.Data.Fold.Type (Fold(..))
167167import Streamly.Internal.Data.Tuple.Strict (Tuple'(..))
168168
169−import qualified Streamly.Internal.Data.Fold.Types as FL
169+import qualified Streamly.Internal.Data.Fold.Type as FL
170170
171171import Prelude hiding
172172 (any, all, take, takeWhile, sequence, concatMap, maybe, either, span)
173173import Streamly.Internal.Data.Parser.ParserD.Tee
174−import Streamly.Internal.Data.Parser.ParserD.Types
174+import Streamly.Internal.Data.Parser.ParserD.Type
175175
176176--
177177-- $setup
src/Streamly/Internal/Data/Parser/ParserD/Tee.hs+1−1
@@ -43,7 +43,7 @@ import Prelude
4343 hiding (any, all, takeWhile)
4444
4545import Fusion.Plugin.Types (Fuse(..))
46−import Streamly.Internal.Data.Parser.ParserD.Types
46+import Streamly.Internal.Data.Parser.ParserD.Type
4747 (Initial(..), Parser(..), Step(..), ParseError)
4848
4949-------------------------------------------------------------------------------
src/Streamly/Internal/Data/Parser/ParserD/Types.hs → src/Streamly/Internal/Data/Parser/ParserD/Type.hsrenamed+7−7
@@ -1,7 +1,7 @@
11#include "inline.hs"
22
33-- |
4−-- Module : Streamly.Internal.Data.Parser.ParserD.Types
4+-- Module : Streamly.Internal.Data.Parser.ParserD.Type
55-- Copyright : (c) 2020 Composewell Technologies
66-- License : BSD-3-Clause
77-- Maintainer : streamly@composewell.com
@@ -11,7 +11,7 @@
1111-- Streaming and backtracking parsers.
1212--
1313-- Parsers just extend folds. Please read the 'Fold' design notes in
14−-- "Streamly.Internal.Data.Fold.Types" for background on the design.
14+-- "Streamly.Internal.Data.Fold.Type" for background on the design.
1515--
1616-- = Parser Design
1717--
@@ -109,7 +109,7 @@
109109-- merge the resulting streams using different merge strategies (e.g.
110110-- interleaving or serial).
111111
112−module Streamly.Internal.Data.Parser.ParserD.Types
112+module Streamly.Internal.Data.Parser.ParserD.Type
113113 (
114114 Initial (..)
115115 , Step (..)
@@ -138,10 +138,10 @@ import Control.Monad (MonadPlus(..))
138138import Control.Monad.Catch (MonadCatch, try, throwM, MonadThrow)
139139import Data.Bifunctor (Bifunctor(..))
140140import Fusion.Plugin.Types (Fuse(..))
141−import Streamly.Internal.Data.Fold.Types (Fold(..), toList)
141+import Streamly.Internal.Data.Fold.Type (Fold(..), toList)
142142import Streamly.Internal.Data.Tuple.Strict (Tuple3'(..))
143143
144−import qualified Streamly.Internal.Data.Fold.Types as FL
144+import qualified Streamly.Internal.Data.Fold.Type as FL
145145
146146import Prelude hiding (concatMap)
147147--
@@ -864,7 +864,7 @@ concatMap func (Parser stepL initialL extractL) = Parser step initial extract
864864-- for small number of compositions but for a scalable implementation we need a
865865-- CPS version.
866866
867−-- | See documentation of 'Streamly.Internal.Data.Parser.ParserK.Types.Parser'.
867+-- | See documentation of 'Streamly.Internal.Data.Parser.ParserK.Type.Parser'.
868868--
869869instance MonadThrow m => Monad (Parser m a) where
870870 {-# INLINE return #-}
@@ -873,7 +873,7 @@ instance MonadThrow m => Monad (Parser m a) where
873873 {-# INLINE (>>=) #-}
874874 (>>=) = flip concatMap
875875
876−-- | See documentation of 'Streamly.Internal.Data.Parser.ParserK.Types.Parser'.
876+-- | See documentation of 'Streamly.Internal.Data.Parser.ParserK.Type.Parser'.
877877--
878878instance MonadCatch m => MonadPlus (Parser m a) where
879879 {-# INLINE mzero #-}
src/Streamly/Internal/Data/Parser/ParserK/Types.hs → src/Streamly/Internal/Data/Parser/ParserK/Type.hsrenamed+3−3
@@ -1,7 +1,7 @@
11#include "inline.hs"
22
33-- |
4−-- Module : Streamly.Internal.Data.Parser.ParserK.Types
4+-- Module : Streamly.Internal.Data.Parser.ParserK.Type
55-- Copyright : (c) 2020 Composewell Technologies
66-- License : BSD-3-Clause
77-- Maintainer : streamly@composewell.com
@@ -18,7 +18,7 @@
1818-- The direct style representation does not allow for recursive definitions of
1919-- "some" and "many" whereas CPS allows that.
2020
21−module Streamly.Internal.Data.Parser.ParserK.Types
21+module Streamly.Internal.Data.Parser.ParserK.Type
2222 (
2323 Parser (..)
2424 , yield
@@ -43,7 +43,7 @@ import Data.Semigroup ((<>))
4343#endif
4444import Streamly.Internal.Control.Exception
4545
46−import qualified Streamly.Internal.Data.Parser.ParserD.Types as D
46+import qualified Streamly.Internal.Data.Parser.ParserD.Type as D
4747
4848-- | The parse driver result. The driver may stop with a final result, pause
4949-- with a continuation to resume, or fail with an error.
src/Streamly/Internal/Data/Pipe.hs+3−3
@@ -244,9 +244,9 @@ import Prelude
244244
245245-- import Streamly.Prelude (MonadAsync, parallel)
246246-- import Streamly.Data.Fold.Types (Fold(..))
247−import Streamly.Internal.Data.Pipe.Types
247+import Streamly.Internal.Data.Pipe.Type
248248 (Pipe(..), PipeState(..), Step(..), zipWith, tee, map, compose)
249−-- import Streamly.Internal.Data.Array.Foreign.Types (Array)
249+-- import Streamly.Internal.Data.Array.Foreign.Type (Array)
250250-- import Streamly.Internal.Ring.Foreign (Ring)
251251-- import Streamly.Internal.Data.Stream.Serial (SerialT)
252252-- import Streamly.Internal.Data.Stream.StreamK (IsStream())
@@ -256,7 +256,7 @@ import Streamly.Internal.Data.Pipe.Types
256256
257257-- import Streamly.Internal.Data.Strict
258258
259−-- import qualified Streamly.Internal.Data.Array.Foreign.Types as A
259+-- import qualified Streamly.Internal.Data.Array.Foreign.Type as A
260260-- import qualified Streamly.Prelude as S
261261-- import qualified Streamly.Internal.Data.Stream.StreamD as D
262262-- import qualified Streamly.Internal.Data.Stream.StreamK as K
src/Streamly/Internal/Data/Pipe/Types.hs → src/Streamly/Internal/Data/Pipe/Type.hsrenamed+2−2
@@ -1,14 +1,14 @@
11#include "inline.hs"
22
33-- |
4−-- Module : Streamly.Internal.Data.Pipe.Types
4+-- Module : Streamly.Internal.Data.Pipe.Type
55-- Copyright : (c) 2019 Composewell Technologies
66-- License : BSD3
77-- Maintainer : streamly@composewell.com
88-- Stability : experimental
99-- Portability : GHC
1010
11−module Streamly.Internal.Data.Pipe.Types
11+module Streamly.Internal.Data.Pipe.Type
1212 ( Step (..)
1313 , Pipe (..)
1414 , PipeState (..)
src/Streamly/Internal/Data/Producer.hs+1−1
@@ -47,7 +47,7 @@ where
4747import Streamly.Internal.Data.Stream.StreamD.Step (Step(..))
4848import Streamly.Internal.Data.Stream.StreamD.Type (Stream(..))
4949import Streamly.Internal.Data.SVar (defState)
50−import Streamly.Internal.Data.Unfold.Types (Unfold(..))
50+import Streamly.Internal.Data.Unfold.Type (Unfold(..))
5151
5252import Streamly.Internal.Data.Producer.Type
5353import Prelude hiding (concat)
src/Streamly/Internal/Data/Producer/Source.hs+1−1
@@ -42,7 +42,7 @@ import Streamly.Internal.Data.Producer.Type (Producer(..))
4242import Streamly.Internal.Data.Stream.StreamD.Step (Step(..))
4343
4444import qualified Streamly.Internal.Data.Parser.ParserD as ParserD
45−import qualified Streamly.Internal.Data.Parser.ParserK.Types as ParserK
45+import qualified Streamly.Internal.Data.Parser.ParserK.Type as ParserK
4646
4747import Prelude hiding (read)
4848
src/Streamly/Internal/Data/Sink.hs+2−2
@@ -66,8 +66,8 @@ import Prelude
6666 reverse, iterate, init, and, or, lookup, foldr1, (!!),
6767 scanl, scanl1, replicate, concatMap, mconcat, foldMap, unzip)
6868
69−import Streamly.Internal.Data.Fold.Types (Fold(..), Step(..))
70−import Streamly.Internal.Data.Sink.Types (Sink(..))
69+import Streamly.Internal.Data.Fold.Type (Fold(..), Step(..))
70+import Streamly.Internal.Data.Sink.Type (Sink(..))
7171
7272import qualified Data.Map.Strict as Map
7373
src/Streamly/Internal/Data/Sink/Types.hs → src/Streamly/Internal/Data/Sink/Type.hsrenamed+2−2
@@ -1,12 +1,12 @@
11-- |
2−-- Module : Streamly.Internal.Data.Sink.Types
2+-- Module : Streamly.Internal.Data.Sink.Type
33-- Copyright : (c) 2019 Composewell Technologies
44-- License : BSD3
55-- Maintainer : streamly@composewell.com
66-- Stability : experimental
77-- Portability : GHC
88
9−module Streamly.Internal.Data.Sink.Types
9+module Streamly.Internal.Data.Sink.Type
1010 (
1111 Sink (..)
1212 )
src/Streamly/Internal/Data/SmallArray.hs+4−4
@@ -48,16 +48,16 @@ import Control.Monad.IO.Class (MonadIO, liftIO)
4848import GHC.IO (unsafePerformIO)
4949import Data.Functor.Identity (runIdentity)
5050
51−import Streamly.Internal.Data.SmallArray.Types
51+import Streamly.Internal.Data.SmallArray.Type
5252
5353import Streamly.Internal.Data.Tuple.Strict (Tuple'(..))
54−import Streamly.Internal.Data.Unfold.Types (Unfold(..))
55−import Streamly.Internal.Data.Fold.Types (Fold(..))
54+import Streamly.Internal.Data.Unfold.Type (Unfold(..))
55+import Streamly.Internal.Data.Fold.Type (Fold(..))
5656import Streamly.Internal.Data.Stream.StreamK.Type (IsStream)
5757import Streamly.Internal.Data.Stream.Serial (SerialT)
5858
5959import qualified Streamly.Internal.Data.Stream.StreamD as D
60−import qualified Streamly.Internal.Data.Fold.Types as FL
60+import qualified Streamly.Internal.Data.Fold.Type as FL
6161
6262{-# NOINLINE bottomElement #-}
6363bottomElement :: a
src/Streamly/Internal/Data/SmallArray/Types.hs → src/Streamly/Internal/Data/SmallArray/Type.hsrenamed+1−1
@@ -28,7 +28,7 @@
2828-- The underlying type, 'SmallArray#', was introduced in GHC 7.10, so prior to
2929-- that version, this module simply implements small arrays as 'Array'.
3030
31−module Streamly.Internal.Data.SmallArray.Types
31+module Streamly.Internal.Data.SmallArray.Type
3232 ( SmallArray(..)
3333 , SmallMutableArray(..)
3434 , newSmallArray
src/Streamly/Internal/Data/Stream/IsStream/Common.hs+2−2
@@ -50,8 +50,8 @@ where
5050import Control.Concurrent (threadDelay)
5151import Control.Monad.IO.Class (MonadIO(..))
5252import Foreign.Storable (Storable)
53−import Streamly.Internal.Data.Array.Foreign.Types (Array)
54−import Streamly.Internal.Data.Fold.Types (Fold (..))
53+import Streamly.Internal.Data.Array.Foreign.Type (Array)
54+import Streamly.Internal.Data.Fold.Type (Fold (..))
5555import Streamly.Internal.Data.Stream.IsStream.Combinators (maxYields)
5656import Streamly.Internal.Data.Stream.Prelude (fromStreamS, toStreamS)
5757import Streamly.Internal.Data.Stream.Serial (SerialT)
src/Streamly/Internal/Data/Stream/IsStream/Eliminate.hs+2−2
@@ -156,14 +156,14 @@ import Streamly.Internal.Data.Stream.StreamD (fromStreamD, toStreamD)
156156import Streamly.Internal.Data.Stream.StreamK (IsStream)
157157import Streamly.Internal.Data.Stream.Serial (SerialT)
158158
159−import qualified Streamly.Internal.Data.Array.Foreign.Types as A
159+import qualified Streamly.Internal.Data.Array.Foreign.Type as A
160160import qualified Streamly.Internal.Data.Fold as FL
161161import qualified Streamly.Internal.Data.Stream.Parallel as Par
162162import qualified Streamly.Internal.Data.Stream.Prelude as P
163163import qualified Streamly.Internal.Data.Stream.StreamD as D
164164import qualified Streamly.Internal.Data.Stream.StreamK as K
165165import qualified Streamly.Internal.Data.Parser.ParserD as PRD
166−import qualified Streamly.Internal.Data.Parser.ParserK.Types as PRK
166+import qualified Streamly.Internal.Data.Parser.ParserK.Type as PRK
167167import qualified System.IO as IO
168168#ifdef USE_STREAMK_ONLY
169169import qualified Streamly.Internal.Data.Stream.StreamK as S
src/Streamly/Internal/Data/Stream/IsStream/Generate.hs+1−1
@@ -89,7 +89,7 @@ where
8989
9090import Control.Monad.IO.Class (MonadIO(..))
9191import Data.Void (Void)
92−import Streamly.Internal.Data.Unfold.Types (Unfold)
92+import Streamly.Internal.Data.Unfold.Type (Unfold)
9393import Streamly.Internal.Data.SVar (MonadAsync, Rate (..))
9494import Streamly.Internal.Data.Stream.IsStream.Enumeration
9595 (Enumerable(..), enumerate, enumerateTo)
src/Streamly/Internal/Data/Stream/IsStream/Nesting.hs+5−5
@@ -252,10 +252,10 @@ import Data.Heap (Entry(..))
252252import Data.Kind (Type)
253253import Data.Maybe (isNothing)
254254import Foreign.Storable (Storable)
255−import Streamly.Internal.Data.Fold.Types (Fold (..), Fold2 (..))
255+import Streamly.Internal.Data.Fold.Type (Fold (..), Fold2 (..))
256256import Streamly.Internal.Data.Parser (Parser (..))
257−import Streamly.Internal.Data.Unfold.Types (Unfold)
258−import Streamly.Internal.Data.Array.Foreign.Types (Array)
257+import Streamly.Internal.Data.Unfold.Type (Unfold)
258+import Streamly.Internal.Data.Array.Foreign.Type (Array)
259259import Streamly.Internal.Data.SVar (MonadAsync)
260260import Streamly.Internal.Data.Stream.Ahead (ahead)
261261import Streamly.Internal.Data.Stream.Async (async, wAsync)
@@ -285,9 +285,9 @@ import Streamly.Internal.Data.Tuple.Strict (Tuple'(..))
285285
286286import qualified Data.Heap as H
287287import qualified Data.Map.Strict as Map
288−import qualified Streamly.Internal.Data.Array.Foreign.Types as A
288+import qualified Streamly.Internal.Data.Array.Foreign.Type as A
289289import qualified Streamly.Internal.Data.Fold as FL
290−import qualified Streamly.Internal.Data.Parser.ParserK.Types as PRK
290+import qualified Streamly.Internal.Data.Parser.ParserK.Type as PRK
291291import qualified Streamly.Internal.Data.Parser.ParserD as PRD
292292import qualified Streamly.Internal.Data.Stream.Parallel as Par
293293import qualified Streamly.Internal.Data.Stream.Serial as Serial
src/Streamly/Internal/Data/Stream/IsStream/Transform.hs+2−2
@@ -216,8 +216,8 @@ import Data.Either (isLeft, isRight)
216216import Data.Kind (Type)
217217import Data.Maybe (isJust, fromJust)
218218import Streamly.Internal.BaseCompat (fromLeft, fromRight)
219−import Streamly.Internal.Data.Fold.Types (Fold (..))
220−import Streamly.Internal.Data.Pipe.Types (Pipe (..))
219+import Streamly.Internal.Data.Fold.Type (Fold (..))
220+import Streamly.Internal.Data.Pipe.Type (Pipe (..))
221221import Streamly.Internal.Data.Stream.IsStream.Combinators
222222 ( inspectMode, maxBuffer, maxThreads, rate, avgRate, minRate
223223 , maxRate, constRate)
src/Streamly/Internal/Data/Stream/Parallel.hs+1−1
@@ -58,7 +58,7 @@ import Prelude hiding (map)
5858
5959import qualified Data.Set as Set
6060
61−import Streamly.Internal.Data.Fold.Types (Fold)
61+import Streamly.Internal.Data.Fold.Type (Fold)
6262import Streamly.Internal.Data.Stream.StreamD.Type (Step(..))
6363import Streamly.Internal.Data.Stream.StreamK
6464 (IsStream(..), Stream, mkStream, foldStream, foldStreamShared, adapt)
src/Streamly/Internal/Data/Stream/Prelude.hs+1−1
@@ -69,7 +69,7 @@ import Control.Monad.Trans.Class (MonadTrans(..))
6969import Prelude hiding (foldr, minimum, maximum)
7070import qualified Prelude
7171
72−import Streamly.Internal.Data.Fold.Types (Fold (..))
72+import Streamly.Internal.Data.Fold.Type (Fold (..))
7373
7474#ifdef USE_STREAMK_ONLY
7575import qualified Streamly.Internal.Data.Stream.StreamK as S
src/Streamly/Internal/Data/Stream/SVar.hs+2−2
@@ -49,11 +49,11 @@ import Control.Monad.IO.Class (MonadIO(liftIO))
4949import Data.IORef (newIORef, readIORef, mkWeakIORef, writeIORef)
5050import Data.Maybe (isNothing)
5151import Streamly.Internal.Data.Atomics (atomicModifyIORefCAS_)
52−import Streamly.Internal.Data.Fold.Types (Fold(..))
52+import Streamly.Internal.Data.Fold.Type (Fold(..))
5353import Streamly.Internal.Data.Time.Clock (Clock(Monotonic), getTime)
5454import System.Mem (performMajorGC)
5555
56−import qualified Streamly.Internal.Data.Fold.Types as FL
56+import qualified Streamly.Internal.Data.Fold.Type as FL
5757import qualified Streamly.Internal.Data.Stream.StreamD.Type as D
5858import qualified Streamly.Internal.Data.Stream.StreamK.Type as K
5959
src/Streamly/Internal/Data/Stream/StreamD/Nesting.hs+5−5
@@ -157,13 +157,13 @@ import Foreign.Storable (Storable(..))
157157import Fusion.Plugin.Types (Fuse(..))
158158import GHC.Types (SPEC(..))
159159
160−import Streamly.Internal.Data.Array.Foreign.Types (Array(..))
161−import Streamly.Internal.Data.Fold.Types (Fold(..))
160+import Streamly.Internal.Data.Array.Foreign.Type (Array(..))
161+import Streamly.Internal.Data.Fold.Type (Fold(..))
162162import Streamly.Internal.Data.Parser (ParseError(..))
163−import Streamly.Internal.Data.Unfold.Types (Unfold(..))
163+import Streamly.Internal.Data.Unfold.Type (Unfold(..))
164164
165−import qualified Streamly.Internal.Data.Array.Foreign.Types as A
166−import qualified Streamly.Internal.Data.Fold.Types as FL
165+import qualified Streamly.Internal.Data.Array.Foreign.Type as A
166+import qualified Streamly.Internal.Data.Fold.Type as FL
167167import qualified Streamly.Internal.Data.Parser as PR
168168import qualified Streamly.Internal.Data.Parser.ParserD as PRD
169169import qualified Streamly.Internal.Ring.Foreign as RB
src/Streamly/Internal/Data/Stream/StreamD/Transform.hs+5−5
@@ -133,16 +133,16 @@ import Foreign.Storable (Storable(..))
133133import GHC.Types (SPEC(..))
134134import qualified Control.Monad.Catch as MC
135135
136−import Streamly.Internal.Data.Fold.Types (Fold(..))
137−import Streamly.Internal.Data.Pipe.Types (Pipe(..), PipeState(..))
136+import Streamly.Internal.Data.Fold.Type (Fold(..))
137+import Streamly.Internal.Data.Pipe.Type (Pipe(..), PipeState(..))
138138import Streamly.Internal.Data.Time.Clock (Clock(Monotonic), getTime)
139139import Streamly.Internal.Data.Time.Units
140140 (TimeUnit64, toRelTime64, diffAbsTime64)
141141
142−import qualified Streamly.Internal.Data.Array.Foreign.Types as A
143−import qualified Streamly.Internal.Data.Fold.Types as FL
142+import qualified Streamly.Internal.Data.Array.Foreign.Type as A
143+import qualified Streamly.Internal.Data.Fold.Type as FL
144144import qualified Streamly.Internal.Data.IORef.Prim as Prim
145−import qualified Streamly.Internal.Data.Pipe.Types as Pipe
145+import qualified Streamly.Internal.Data.Pipe.Type as Pipe
146146import qualified Streamly.Internal.Data.Stream.StreamK as K
147147
148148import Prelude hiding
src/Streamly/Internal/Data/Stream/StreamD/Type.hs+3−3
@@ -96,12 +96,12 @@ import GHC.Base (build)
9696import GHC.Types (SPEC(..))
9797import Prelude hiding (map, mapM, foldr, take, concatMap, takeWhile)
9898
99−import Streamly.Internal.Data.Fold.Types (Fold(..), Fold2(..))
99+import Streamly.Internal.Data.Fold.Type (Fold(..), Fold2(..))
100100import Streamly.Internal.Data.Stream.StreamD.Step (Step (..))
101101import Streamly.Internal.Data.SVar (State, adaptState, defState)
102−import Streamly.Internal.Data.Unfold.Types (Unfold(..))
102+import Streamly.Internal.Data.Unfold.Type (Unfold(..))
103103
104−import qualified Streamly.Internal.Data.Fold.Types as FL
104+import qualified Streamly.Internal.Data.Fold.Type as FL
105105import qualified Streamly.Internal.Data.Stream.StreamK.Type as K
106106
107107------------------------------------------------------------------------------
src/Streamly/Internal/Data/Stream/StreamK.hs+1−1
@@ -200,7 +200,7 @@ import qualified Prelude
200200import Streamly.Internal.Data.SVar
201201import Streamly.Internal.Data.Stream.StreamK.Type
202202
203−import qualified Streamly.Internal.Data.Fold.Types as FL
203+import qualified Streamly.Internal.Data.Fold.Type as FL
204204
205205-- $setup
206206-- >>> :m
src/Streamly/Internal/Data/Unfold.hs+3−3
@@ -178,7 +178,7 @@ import Data.IORef (newIORef, readIORef, mkWeakIORef, writeIORef)
178178import Data.Maybe (isNothing)
179179import Data.Void (Void)
180180import GHC.Types (SPEC(..))
181−import Streamly.Internal.Data.Fold.Types (Fold(..))
181+import Streamly.Internal.Data.Fold.Type (Fold(..))
182182import Streamly.Internal.Data.IOFinalizer
183183 (newIOFinalizer, runIOFinalizer, clearingIOFinalizer)
184184import Streamly.Internal.Data.Stream.StreamD.Type (Stream(..), Step(..))
@@ -188,13 +188,13 @@ import System.Mem (performMajorGC)
188188import qualified Prelude
189189import qualified Control.Monad.Catch as MC
190190import qualified Data.Tuple as Tuple
191−import qualified Streamly.Internal.Data.Fold.Types as FL
191+import qualified Streamly.Internal.Data.Fold.Type as FL
192192import qualified Streamly.Internal.Data.Stream.StreamD.Type as D
193193import qualified Streamly.Internal.Data.Stream.StreamK as K (uncons)
194194import qualified Streamly.Internal.Data.Stream.StreamK.Type as K
195195
196196import Streamly.Internal.Data.SVar
197−import Streamly.Internal.Data.Unfold.Types
197+import Streamly.Internal.Data.Unfold.Type
198198import Prelude
199199 hiding (concat, map, mapM, takeWhile, take, filter, const, zipWith
200200 , drop, dropWhile)
src/Streamly/Internal/Data/Unfold/Types.hs → src/Streamly/Internal/Data/Unfold/Type.hsrenamed+2−2
@@ -1,12 +1,12 @@
11-- |
2−-- Module : Streamly.Internal.Data.Unfold.Types
2+-- Module : Streamly.Internal.Data.Unfold.Type
33-- Copyright : (c) 2019 Composewell Technologies
44-- License : BSD3
55-- Maintainer : streamly@composewell.com
66-- Stability : experimental
77-- Portability : GHC
88
9−module Streamly.Internal.Data.Unfold.Types
9+module Streamly.Internal.Data.Unfold.Type
1010 ( Unfold (..)
1111 , singletonM
1212 , singleton
src/Streamly/Internal/FileSystem/Dir.hs+7−7
@@ -63,8 +63,8 @@ import Prelude hiding (read)
6363
6464-- import Streamly.Data.Fold (Fold)
6565import Streamly.Internal.BaseCompat (fromLeft, fromRight)
66−import Streamly.Internal.Data.Unfold.Types (Unfold(..))
67−-- import Streamly.Internal.Data.Array.Foreign.Types
66+import Streamly.Internal.Data.Unfold.Type (Unfold(..))
67+-- import Streamly.Internal.Data.Array.Foreign.Type
6868-- (Array(..), writeNUnsafe, defaultChunkSize, shrinkToFit,
6969-- lpackArraysChunksOf)
7070-- import Streamly.Internal.Data.Stream.Serial (SerialT)
@@ -72,7 +72,7 @@ import Streamly.Internal.Data.Stream.StreamK.Type (IsStream)
7272-- import Streamly.String (encodeUtf8, decodeUtf8, foldLines)
7373
7474-- import qualified Streamly.Data.Fold as FL
75−-- import qualified Streamly.Internal.Data.Fold.Types as FL
75+-- import qualified Streamly.Internal.Data.Fold.Type as FL
7676import qualified Streamly.Internal.Data.Unfold as UF
7777-- import qualified Streamly.Internal.Data.Array.Stream.Foreign as AS
7878import qualified Streamly.Internal.Data.Stream.IsStream as S
@@ -166,9 +166,9 @@ toChunks = toChunksWithBufferOf defaultChunkSize
166166
167167-- | Unfolds a handle into a stream of 'Word8' arrays. Requests to the IO
168168-- device are performed using a buffer of size
169−-- 'Streamly.Internal.Data.Array.Foreign.Types.defaultChunkSize'. The
169+-- 'Streamly.Internal.Data.Array.Foreign.Type.defaultChunkSize'. The
170170-- size of arrays in the resulting stream are therefore less than or equal to
171−-- 'Streamly.Internal.Data.Array.Foreign.Types.defaultChunkSize'.
171+-- 'Streamly.Internal.Data.Array.Foreign.Type.defaultChunkSize'.
172172--
173173-- @since 0.7.0
174174{-# INLINE readChunks #-}
@@ -343,7 +343,7 @@ fromStreamWithBufferOf n h m = fromChunks h $ S.arraysOf n m
343343-- > write = 'writeWithBufferOf' A.defaultChunkSize
344344--
345345-- | Write a byte stream to a file handle. Accumulates the input in chunks of
346−-- up to 'Streamly.Internal.Data.Array.Foreign.Types.defaultChunkSize' before writing.
346+-- up to 'Streamly.Internal.Data.Array.Foreign.Type.defaultChunkSize' before writing.
347347--
348348-- NOTE: This may perform better than the 'write' fold, you can try this if you
349349-- need some extra perf boost.
@@ -393,7 +393,7 @@ writeWithBufferOf n h = FL.chunksOf n (writeNUnsafe n) (writeChunks h)
393393-- > write = 'writeWithBufferOf' A.defaultChunkSize
394394--
395395-- | Write a byte stream to a file handle. Accumulates the input in chunks of
396−-- up to 'Streamly.Internal.Data.Array.Foreign.Types.defaultChunkSize' before writing
396+-- up to 'Streamly.Internal.Data.Array.Foreign.Type.defaultChunkSize' before writing
397397-- to the IO device.
398398--
399399-- @since 0.7.0
src/Streamly/Internal/FileSystem/Event/Darwin.hs+1−1
@@ -165,7 +165,7 @@ import GHC.IO.Handle.FD (fdToHandle)
165165import Streamly.Prelude (SerialT)
166166import Streamly.Internal.Data.Cont (contListMap)
167167import Streamly.Internal.Data.Parser (Parser)
168−import Streamly.Internal.Data.Array.Foreign.Types (Array(..))
168+import Streamly.Internal.Data.Array.Foreign.Type (Array(..))
169169import System.IO (Handle, hClose)
170170
171171import qualified Data.List.NonEmpty as NonEmpty
src/Streamly/Internal/FileSystem/Event/Linux.hs+1−1
@@ -171,7 +171,7 @@ import GHC.IO.FD (fdFD, mkFD)
171171import GHC.IO.Handle.FD (mkHandleFromFD)
172172import Streamly.Prelude (SerialT)
173173import Streamly.Internal.Data.Parser (Parser)
174−import Streamly.Internal.Data.Array.Foreign.Types (Array(..))
174+import Streamly.Internal.Data.Array.Foreign.Type (Array(..))
175175import System.IO (Handle, hClose, IOMode(ReadMode))
176176#if !MIN_VERSION_base(4,10,0)
177177import Control.Concurrent.MVar (readMVar)
src/Streamly/Internal/FileSystem/FD.hs+2−2
@@ -130,8 +130,8 @@ import Prelude hiding (read)
130130import qualified GHC.IO.FD as FD
131131import qualified GHC.IO.Device as RawIO
132132
133−import Streamly.Internal.Data.Array.Foreign.Types (Array(..), byteLength, defaultChunkSize, unsafeFreeze)
134−import Streamly.Internal.Data.Array.Foreign.Mut.Types (mutableArray)
133+import Streamly.Internal.Data.Array.Foreign.Type (Array(..), byteLength, defaultChunkSize, unsafeFreeze)
134+import Streamly.Internal.Data.Array.Foreign.Mut.Type (mutableArray)
135135
136136import Streamly.Internal.Data.Stream.Serial (SerialT)
137137import Streamly.Internal.Data.Stream.StreamK.Type (IsStream, mkStream)
src/Streamly/Internal/FileSystem/File.hs+8−8
@@ -94,9 +94,9 @@ import Prelude hiding (read)
9494import qualified Control.Monad.Catch as MC
9595import qualified System.IO as SIO
9696
97−import Streamly.Internal.Data.Fold.Types (Fold(..))
98−import Streamly.Internal.Data.Unfold.Types (Unfold(..))
99−import Streamly.Internal.Data.Array.Foreign.Types
97+import Streamly.Internal.Data.Fold.Type (Fold(..))
98+import Streamly.Internal.Data.Unfold.Type (Unfold(..))
99+import Streamly.Internal.Data.Array.Foreign.Type
100100 (Array(..), defaultChunkSize, writeNUnsafe)
101101import Streamly.Internal.Data.Stream.Serial (SerialT)
102102import Streamly.Internal.Data.Stream.StreamK.Type (IsStream)
@@ -104,7 +104,7 @@ import Streamly.Internal.Data.SVar (MonadAsync)
104104-- import Streamly.Data.Fold (Fold)
105105-- import Streamly.String (encodeUtf8, decodeUtf8, foldLines)
106106
107−import qualified Streamly.Internal.Data.Fold.Types as FL
107+import qualified Streamly.Internal.Data.Fold.Type as FL
108108import qualified Streamly.Internal.Data.Unfold as UF
109109import qualified Streamly.Internal.FileSystem.Handle as FH
110110import qualified Streamly.Internal.Data.Array.Stream.Foreign as AS
@@ -243,9 +243,9 @@ readChunksWithBufferOf = usingFile2 FH.readChunksWithBufferOf
243243
244244-- | Unfolds a 'FilePath' into a stream of 'Word8' arrays. Requests to the IO
245245-- device are performed using a buffer of size
246−-- 'Streamly.Internal.Data.Array.Foreign.Types.defaultChunkSize'. The
246+-- 'Streamly.Internal.Data.Array.Foreign.Type.defaultChunkSize'. The
247247-- size of arrays in the resulting stream are therefore less than or equal to
248−-- 'Streamly.Internal.Data.Array.Foreign.Types.defaultChunkSize'.
248+-- 'Streamly.Internal.Data.Array.Foreign.Type.defaultChunkSize'.
249249--
250250-- /Pre-release/
251251{-# INLINE readChunks #-}
@@ -262,7 +262,7 @@ readWithBufferOf = usingFile2 FH.readWithBufferOf
262262
263263-- | Unfolds a file path into a byte stream. IO requests to the device are
264264-- performed in sizes of
265−-- 'Streamly.Internal.Data.Array.Foreign.Types.defaultChunkSize'.
265+-- 'Streamly.Internal.Data.Array.Foreign.Type.defaultChunkSize'.
266266--
267267-- @since 0.7.0
268268{-# INLINE read #-}
@@ -382,7 +382,7 @@ writeWithBufferOf n path =
382382-- > write = 'writeWithBufferOf' A.defaultChunkSize
383383--
384384-- | Write a byte stream to a file. Accumulates the input in chunks of up to
385−-- 'Streamly.Internal.Data.Array.Foreign.Types.defaultChunkSize' before writing to
385+-- 'Streamly.Internal.Data.Array.Foreign.Type.defaultChunkSize' before writing to
386386-- the IO device.
387387--
388388-- /Pre-release/
src/Streamly/Internal/FileSystem/Handle.hs+10−10
@@ -111,18 +111,18 @@ import Prelude hiding (read)
111111
112112import Streamly.Prelude (MonadAsync)
113113import Streamly.Data.Fold (Fold)
114−import Streamly.Internal.Data.Fold.Types (Fold2(..))
115−import Streamly.Internal.Data.Unfold.Types (Unfold(..))
116−import Streamly.Internal.Data.Array.Foreign.Types
114+import Streamly.Internal.Data.Fold.Type (Fold2(..))
115+import Streamly.Internal.Data.Unfold.Type (Unfold(..))
116+import Streamly.Internal.Data.Array.Foreign.Type
117117 (Array(..), writeNUnsafe, defaultChunkSize , unsafeFreezeWithShrink)
118−import Streamly.Internal.Data.Array.Foreign.Mut.Types (mutableArray)
118+import Streamly.Internal.Data.Array.Foreign.Mut.Type (mutableArray)
119119import Streamly.Internal.Data.Stream.Serial (SerialT)
120120import Streamly.Internal.Data.Stream.StreamK.Type (IsStream, mkStream)
121121import Streamly.Internal.Data.Array.Stream.Foreign (lpackArraysChunksOf)
122122-- import Streamly.String (encodeUtf8, decodeUtf8, foldLines)
123123
124124import qualified Streamly.Data.Fold as FL
125−import qualified Streamly.Internal.Data.Fold.Types as FL
125+import qualified Streamly.Internal.Data.Fold.Type as FL
126126import qualified Streamly.Internal.Data.Unfold as UF
127127import qualified Streamly.Internal.Data.Array.Foreign as IA
128128import qualified Streamly.Internal.Data.Array.Stream.Foreign as AS
@@ -255,9 +255,9 @@ getBytes = toBytes stdin
255255
256256-- | Unfolds a handle into a stream of 'Word8' arrays. Requests to the IO
257257-- device are performed using a buffer of size
258−-- 'Streamly.Internal.Data.Array.Foreign.Types.defaultChunkSize'. The
258+-- 'Streamly.Internal.Data.Array.Foreign.Type.defaultChunkSize'. The
259259-- size of arrays in the resulting stream are therefore less than or equal to
260−-- 'Streamly.Internal.Data.Array.Foreign.Types.defaultChunkSize'.
260+-- 'Streamly.Internal.Data.Array.Foreign.Type.defaultChunkSize'.
261261--
262262-- @since 0.7.0
263263{-# INLINE readChunks #-}
@@ -294,7 +294,7 @@ toBytesWithBufferOf chunkSize h = AS.concat $ toChunksWithBufferOf chunkSize h
294294--
295295-- | Unfolds a file handle into a byte stream. IO requests to the device are
296296-- performed in sizes of
297−-- 'Streamly.Internal.Data.Array.Foreign.Types.defaultChunkSize'.
297+-- 'Streamly.Internal.Data.Array.Foreign.Type.defaultChunkSize'.
298298--
299299-- @since 0.7.0
300300{-# INLINE read #-}
@@ -411,7 +411,7 @@ fromBytesWithBufferOf n h m = fromChunks h $ S.arraysOf n m
411411-- > write = 'writeWithBufferOf' A.defaultChunkSize
412412--
413413-- | Write a byte stream to a file handle. Accumulates the input in chunks of
414−-- up to 'Streamly.Internal.Data.Array.Foreign.Types.defaultChunkSize' before writing.
414+-- up to 'Streamly.Internal.Data.Array.Foreign.Type.defaultChunkSize' before writing.
415415--
416416-- NOTE: This may perform better than the 'write' fold, you can try this if you
417417-- need some extra perf boost.
@@ -469,7 +469,7 @@ writeWithBufferOf2 n = FL.chunksOf2 n (writeNUnsafe n) writeChunks2
469469-- > write = 'writeWithBufferOf' A.defaultChunkSize
470470--
471471-- | Write a byte stream to a file handle. Accumulates the input in chunks of
472−-- up to 'Streamly.Internal.Data.Array.Foreign.Types.defaultChunkSize' before writing
472+-- up to 'Streamly.Internal.Data.Array.Foreign.Type.defaultChunkSize' before writing
473473-- to the IO device.
474474--
475475-- @since 0.7.0
src/Streamly/Internal/Network/Inet/TCP.hs+4−4
@@ -103,13 +103,13 @@ import Network.Socket
103103 socket)
104104import Prelude hiding (read)
105105
106−import Streamly.Internal.Data.Array.Foreign.Types (Array(..), defaultChunkSize, writeNUnsafe)
107−import Streamly.Internal.Data.Fold.Types (Fold(..))
106+import Streamly.Internal.Data.Array.Foreign.Type (Array(..), defaultChunkSize, writeNUnsafe)
107+import Streamly.Internal.Data.Fold.Type (Fold(..))
108108import Streamly.Internal.Data.SVar (fork)
109109import Streamly.Internal.Data.Stream.Serial (SerialT)
110110import Streamly.Internal.Data.Stream.StreamK.Type (IsStream)
111111import Streamly.Internal.Data.Tuple.Strict (Tuple'(..))
112−import Streamly.Internal.Data.Unfold.Types (Unfold(..))
112+import Streamly.Internal.Data.Unfold.Type (Unfold(..))
113113import Streamly.Internal.Network.Socket (SockSpec(..), accept, connections)
114114import Streamly.Prelude (MonadAsync)
115115
@@ -119,7 +119,7 @@ import qualified Network.Socket as Net
119119import qualified Streamly.Internal.Data.Unfold as UF
120120import qualified Streamly.Internal.Data.Array.Foreign as A
121121import qualified Streamly.Internal.Data.Array.Stream.Foreign as AS
122−import qualified Streamly.Internal.Data.Fold.Types as FL
122+import qualified Streamly.Internal.Data.Fold.Type as FL
123123import qualified Streamly.Prelude as S
124124import qualified Streamly.Network.Socket as SK
125125import qualified Streamly.Internal.Network.Socket as ISK
src/Streamly/Internal/Network/Socket.hs+8−8
@@ -88,22 +88,22 @@ import Prelude hiding (read)
8888import qualified Network.Socket as Net
8989
9090import Streamly.Prelude (MonadAsync)
91−import Streamly.Internal.Data.Unfold.Types (Unfold(..))
91+import Streamly.Internal.Data.Unfold.Type (Unfold(..))
9292import Streamly.Internal.Data.Array.Stream.Foreign (lpackArraysChunksOf)
93−import Streamly.Internal.Data.Array.Foreign.Types (Array(..))
94−import Streamly.Internal.Data.Array.Foreign.Mut.Types (mutableArray)
93+import Streamly.Internal.Data.Array.Foreign.Type (Array(..))
94+import Streamly.Internal.Data.Array.Foreign.Mut.Type (mutableArray)
9595import Streamly.Internal.Data.Stream.Serial (SerialT)
9696import Streamly.Internal.Data.Stream.StreamK.Type (IsStream, mkStream)
9797import Streamly.Data.Fold (Fold)
9898-- import Streamly.String (encodeUtf8, decodeUtf8, foldLines)
9999
100100import qualified Streamly.Data.Fold as FL
101−import qualified Streamly.Internal.Data.Fold.Types as FL
101+import qualified Streamly.Internal.Data.Fold.Type as FL
102102import qualified Streamly.Internal.Data.Unfold as UF
103103import qualified Streamly.Internal.Data.Array.Foreign as IA
104104import qualified Streamly.Data.Array.Foreign as A
105105import qualified Streamly.Internal.Data.Array.Stream.Foreign as AS
106−import qualified Streamly.Internal.Data.Array.Foreign.Types as A
106+import qualified Streamly.Internal.Data.Array.Foreign.Type as A
107107import qualified Streamly.Prelude as S
108108import qualified Streamly.Internal.Data.Stream.StreamD.Type as D
109109
@@ -381,9 +381,9 @@ readChunksWithBufferOf = Unfold step return
381381
382382-- | Unfolds a socket into a stream of 'Word8' arrays. Requests to the socket
383383-- are performed using a buffer of size
384−-- 'Streamly.Internal.Data.Array.Foreign.Types.defaultChunkSize'. The
384+-- 'Streamly.Internal.Data.Array.Foreign.Type.defaultChunkSize'. The
385385-- size of arrays in the resulting stream are therefore less than or equal to
386−-- 'Streamly.Internal.Data.Array.Foreign.Types.defaultChunkSize'.
386+-- 'Streamly.Internal.Data.Array.Foreign.Type.defaultChunkSize'.
387387--
388388-- @since 0.7.0
389389{-# INLINE readChunks #-}
@@ -430,7 +430,7 @@ readWithBufferOf = UF.concat readChunksWithBufferOf A.read
430430
431431-- | Unfolds a 'Socket' into a byte stream. IO requests to the socket are
432432-- performed in sizes of
433−-- 'Streamly.Internal.Data.Array.Foreign.Types.defaultChunkSize'.
433+-- 'Streamly.Internal.Data.Array.Foreign.Type.defaultChunkSize'.
434434--
435435-- @since 0.7.0
436436{-# INLINE read #-}
src/Streamly/Internal/Ring/Foreign.hs+1−1
@@ -41,7 +41,7 @@ import Prelude hiding (length, concat)
4141
4242import Control.Monad.IO.Class (MonadIO(..))
4343
44−import qualified Streamly.Internal.Data.Array.Foreign.Types as A
44+import qualified Streamly.Internal.Data.Array.Foreign.Type as A
4545
4646-- | A ring buffer is a mutable array of fixed size. Initially the array is
4747-- empty, with ringStart pointing at the start of allocated memory. We call the
src/Streamly/Internal/Unicode/Stream.hs+1−1
@@ -88,7 +88,7 @@ import Streamly.Internal.Data.Stream.IsStream (IsStream)
8888import Streamly.Internal.Data.Stream.StreamD (Stream(..), Step (..))
8989import Streamly.Internal.Data.Tuple.Strict (Tuple'(..))
9090
91−import qualified Streamly.Internal.Data.Array.Foreign.Types as A
91+import qualified Streamly.Internal.Data.Array.Foreign.Type as A
9292import qualified Streamly.Internal.Data.Stream.IsStream as S
9393import qualified Streamly.Internal.Data.Stream.StreamD as D
9494
src/Streamly/Network/Socket.hs+2−2
@@ -64,9 +64,9 @@
6464-- = Programmer Notes
6565--
6666-- Read IO requests to connected stream sockets are performed in chunks of
67−-- 'Streamly.Internal.Data.Array.Foreign.Types.defaultChunkSize'. Unless specified
67+-- 'Streamly.Internal.Data.Array.Foreign.Type.defaultChunkSize'. Unless specified
6868-- otherwise in the API, writes are collected into chunks of
69−-- 'Streamly.Internal.Data.Array.Foreign.Types.defaultChunkSize' before they are
69+-- 'Streamly.Internal.Data.Array.Foreign.Type.defaultChunkSize' before they are
7070-- written to the socket. APIs are provided to control the chunking behavior.
7171--
7272-- > import qualified Streamly.Network.Socket as SK
streamly.cabal+13−13
@@ -439,31 +439,31 @@ library
439439 -- streamly-core-stream
440440 , Streamly.Internal.Data.SVar
441441 , Streamly.Internal.Data.Stream.StreamK.Type
442− , Streamly.Internal.Data.Fold.Types
442+ , Streamly.Internal.Data.Fold.Type
443443 , Streamly.Internal.Data.Stream.StreamD.Step
444444 , Streamly.Internal.Data.Stream.StreamD.Type
445445 , Streamly.Internal.Data.Stream.StreamDK.Type
446− , Streamly.Internal.Data.Unfold.Types
446+ , Streamly.Internal.Data.Unfold.Type
447447 , Streamly.Internal.Data.Producer.Type
448448 , Streamly.Internal.Data.Producer
449449 , Streamly.Internal.Data.Producer.Source
450− , Streamly.Internal.Data.Sink.Types
451− , Streamly.Internal.Data.Parser.ParserK.Types
452− , Streamly.Internal.Data.Parser.ParserD.Types
453− , Streamly.Internal.Data.Pipe.Types
450+ , Streamly.Internal.Data.Sink.Type
451+ , Streamly.Internal.Data.Parser.ParserK.Type
452+ , Streamly.Internal.Data.Parser.ParserD.Type
453+ , Streamly.Internal.Data.Pipe.Type
454454
455455 -- Unboxed IORef
456456 , Streamly.Internal.Data.IORef.Prim
457457
458458 -- streamly-core-array
459459 -- May depend on streamly-core-stream
460− , Streamly.Internal.Data.Array.Foreign.Mut.Types
461− , Streamly.Internal.Data.Array.Foreign.Types
462− , Streamly.Internal.Data.Array.Prim.Mut.Types
463− , Streamly.Internal.Data.Array.Prim.Types
464− , Streamly.Internal.Data.Array.Prim.Pinned.Mut.Types
465− , Streamly.Internal.Data.Array.Prim.Pinned.Types
466− , Streamly.Internal.Data.SmallArray.Types
460+ , Streamly.Internal.Data.Array.Foreign.Mut.Type
461+ , Streamly.Internal.Data.Array.Foreign.Type
462+ , Streamly.Internal.Data.Array.Prim.Mut.Type
463+ , Streamly.Internal.Data.Array.Prim.Type
464+ , Streamly.Internal.Data.Array.Prim.Pinned.Mut.Type
465+ , Streamly.Internal.Data.Array.Prim.Pinned.Type
466+ , Streamly.Internal.Data.SmallArray.Type
467467
468468 -- streamly-base-streams
469469 , Streamly.Internal.Data.Stream.StreamK
test/Streamly/Test/Common/Array.hs+3−3
@@ -29,18 +29,18 @@ type Array = A.SmallArray
2929import Data.Word(Word8)
3030
3131import qualified Streamly.Internal.Data.Array.Foreign as A
32−import qualified Streamly.Internal.Data.Array.Foreign.Types as A
32+import qualified Streamly.Internal.Data.Array.Foreign.Type as A
3333import qualified Streamly.Internal.Data.Stream.IsStream as IP
3434import qualified Streamly.Internal.Data.Array.Stream.Foreign as AS
3535type Array = A.Array
3636#elif defined(DATA_ARRAY_PRIM_PINNED)
3737import qualified Streamly.Internal.Data.Array.Prim.Pinned as A
38−import qualified Streamly.Internal.Data.Array.Prim.Pinned.Types as A
38+import qualified Streamly.Internal.Data.Array.Prim.Pinned.Type as A
3939import qualified Streamly.Internal.Data.Stream.IsStream as IP
4040type Array = A.Array
4141#elif defined(DATA_ARRAY_PRIM)
4242import qualified Streamly.Internal.Data.Array.Prim as A
43−import qualified Streamly.Internal.Data.Array.Prim.Types as A
43+import qualified Streamly.Internal.Data.Array.Prim.Type as A
4444import qualified Streamly.Internal.Data.Stream.IsStream as IP
4545type Array = A.Array
4646#else
test/Streamly/Test/Network/Inet/TCP.hs+1−1
@@ -19,7 +19,7 @@ import Streamly.Prelude (SerialT)
1919import Test.QuickCheck (Property)
2020import Test.QuickCheck.Monadic (monadicIO, assert, run)
2121
22−import qualified Streamly.Internal.Data.Array.Foreign.Types as Array
22+import qualified Streamly.Internal.Data.Array.Foreign.Type as Array
2323import qualified Streamly.Internal.Data.Unfold as Unfold
2424import qualified Streamly.Internal.Network.Inet.TCP as TCP
2525import qualified Streamly.Internal.Network.Socket as Socket
test/Streamly/Test/Network/Socket.hs+1−1
@@ -19,7 +19,7 @@ import Streamly.Prelude (SerialT)
1919import Test.QuickCheck (Property)
2020import Test.QuickCheck.Monadic (monadicIO, assert, run)
2121
22−import qualified Streamly.Internal.Data.Array.Foreign.Types as Array
22+import qualified Streamly.Internal.Data.Array.Foreign.Type as Array
2323import qualified Streamly.Internal.Network.Inet.TCP as TCP
2424import qualified Streamly.Internal.Network.Socket as Socket
2525import qualified Streamly.Internal.Unicode.Stream as Unicode