on master help sign in
Move unboxed IORef to MutArray module
eed4308Harendra Kumar
core/src/Streamly/Internal/Data/MutArray.hs+3
@@ -9,6 +9,8 @@
9module Streamly.Internal.Data.MutArray
9module Streamly.Internal.Data.MutArray
10 (
10 (
11 module Streamly.Internal.Data.MutArray.Type
11 module Streamly.Internal.Data.MutArray.Type
12+ -- * Unboxed IORef
13+ , module Streamly.Internal.Data.IORef.Unboxed
12 , splitOn
14 , splitOn
13 , genSlicesFromLen
15 , genSlicesFromLen
14 , getSlicesFromLen
16 , getSlicesFromLen
@@ -28,6 +30,7 @@ import qualified Streamly.Internal.Data.Unfold as Unfold
28
30
29import Prelude hiding (foldr, length, read, splitAt)
31import Prelude hiding (foldr, length, read, splitAt)
30import Streamly.Internal.Data.MutArray.Type
32import Streamly.Internal.Data.MutArray.Type
33+import Streamly.Internal.Data.IORef.Unboxed
31
34
32-- | Split the array into a stream of slices using a predicate. The element
35-- | Split the array into a stream of slices using a predicate. The element
33-- matching the predicate is dropped.
36-- matching the predicate is dropped.
core/src/Streamly/Internal/Data/Serialize.hs−3
@@ -16,8 +16,6 @@ module Streamly.Internal.Data.Serialize
16 -- * Unbox
16 -- * Unbox
17 module Streamly.Internal.Data.Unbox
17 module Streamly.Internal.Data.Unbox
18 , module Streamly.Internal.Data.Unbox.TH
18 , module Streamly.Internal.Data.Unbox.TH
19− -- * Unboxed IORef
20− , module Streamly.Internal.Data.IORef.Unboxed
21 -- * Serialize
19 -- * Serialize
22 , module Streamly.Internal.Data.Serialize.Type
20 , module Streamly.Internal.Data.Serialize.Type
23 -- * Serialize TH
21 -- * Serialize TH
@@ -39,7 +37,6 @@ import GHC.Num.Integer (Integer(..))
39import GHC.Integer.GMP.Internals (Integer(..), BigNat(..))
37import GHC.Integer.GMP.Internals (Integer(..), BigNat(..))
40#endif
38#endif
41
39
42−import Streamly.Internal.Data.IORef.Unboxed
43import Streamly.Internal.Data.Serialize.TH
40import Streamly.Internal.Data.Serialize.TH
44import Streamly.Internal.Data.Serialize.Type
41import Streamly.Internal.Data.Serialize.Type
45import Streamly.Internal.Data.Unbox
42import Streamly.Internal.Data.Unbox
src/Streamly/Internal/Data/Stream/Concurrent.hs+1−1
@@ -112,7 +112,7 @@ import Streamly.Internal.Data.Stream.Channel.Types
112import Streamly.Internal.Data.Stream.Channel.Worker (sendWithDoorBell)
112import Streamly.Internal.Data.Stream.Channel.Worker (sendWithDoorBell)
113import Streamly.Internal.Data.Stream (Stream, Step(..))
113import Streamly.Internal.Data.Stream (Stream, Step(..))
114
114
115−import qualified Streamly.Internal.Data.Serialize as Unboxed
115+import qualified Streamly.Internal.Data.MutArray as Unboxed
116import qualified Streamly.Internal.Data.Stream as Stream
116import qualified Streamly.Internal.Data.Stream as Stream
117import qualified Streamly.Internal.Data.Stream as D
117import qualified Streamly.Internal.Data.Stream as D
118import qualified Streamly.Internal.Data.StreamK as K
118import qualified Streamly.Internal.Data.StreamK as K
src/Streamly/Internal/Data/Stream/IsStream/Generate.hs+1−1
@@ -105,7 +105,7 @@ import Streamly.Internal.Data.Stream.Serial (SerialT, WSerialT)
105import Streamly.Internal.Data.Time.Units (AbsTime , RelTime64, addToAbsTime64)
105import Streamly.Internal.Data.Time.Units (AbsTime , RelTime64, addToAbsTime64)
106import Streamly.Data.Serialize (Unbox)
106import Streamly.Data.Serialize (Unbox)
107
107
108−import qualified Streamly.Internal.Data.Serialize as Unboxed
108+import qualified Streamly.Internal.Data.MutArray as Unboxed
109 (toStreamD, IORef)
109 (toStreamD, IORef)
110import qualified Streamly.Internal.Data.Stream.IsStream.Type as IsStream
110import qualified Streamly.Internal.Data.Stream.IsStream.Type as IsStream
111import qualified Streamly.Internal.Data.Stream.Parallel as Par
111import qualified Streamly.Internal.Data.Stream.Parallel as Par