on master help sign in
Add todo comments, reorg imports
b19d96fHarendra Kumar
src/Streamly/Internal/Data/Prim/Array.hs+9−2
@@ -16,7 +16,13 @@
16-- Portability : GHC
16-- Portability : GHC
17--
17--
18module Streamly.Internal.Data.Prim.Array
18module Streamly.Internal.Data.Prim.Array
19+ (
20+
21+ -- XXX should it be just Array instead? We should be able to replace one
22+ -- array type with another easily.
19− ( PrimArray(..)
23+ PrimArray(..)
24+
25+ -- XXX Prim should be exported from Data.Prim module?
20 , Prim(..)
26 , Prim(..)
21
27
22 , foldl'
28 , foldl'
@@ -53,9 +59,10 @@ import Control.DeepSeq (NFData(..))
53import Control.Monad (when)
59import Control.Monad (when)
54import Control.Monad.IO.Class (liftIO, MonadIO)
60import Control.Monad.IO.Class (liftIO, MonadIO)
55import GHC.IO (unsafePerformIO)
61import GHC.IO (unsafePerformIO)
56−import Data.Primitive.PrimArray
57import Data.Primitive.Types (Prim(..))
62import Data.Primitive.Types (Prim(..))
58
63
64+import Data.Primitive.PrimArray
65+
59import Streamly.Internal.Data.Unfold.Types (Unfold(..))
66import Streamly.Internal.Data.Unfold.Types (Unfold(..))
60import Streamly.Internal.Data.Fold.Types (Fold(..))
67import Streamly.Internal.Data.Fold.Types (Fold(..))
61import Streamly.Internal.Data.Stream.StreamK.Type (IsStream)
68import Streamly.Internal.Data.Stream.StreamK.Type (IsStream)
src/Streamly/Internal/Data/SmallArray.hs+4−1
@@ -16,7 +16,10 @@
16#include "inline.hs"
16#include "inline.hs"
17
17
18module Streamly.Internal.Data.SmallArray
18module Streamly.Internal.Data.SmallArray
19+ (
20+ -- XXX should it be just Array instead? We should be able to replace one
21+ -- array type with another easily.
19− ( SmallArray(..)
22+ SmallArray(..)
20
23
21 , foldl'
24 , foldl'
22 , foldr
25 , foldr