mirror of
https://github.com/composewell/streamly.git
synced 2024-09-11 11:37:22 +03:00
Revert "Move the Parallel module under IsStream"
This reverts commit e718389b2c
.
This commit is contained in:
parent
2a2899f259
commit
de8b77b092
@ -35,7 +35,7 @@ import qualified Streamly.Internal.Data.Unfold as Unfold
|
|||||||
import qualified Streamly.Internal.Data.Stream.IsStream as Stream
|
import qualified Streamly.Internal.Data.Stream.IsStream as Stream
|
||||||
import Streamly.Internal.Data.Time.Units
|
import Streamly.Internal.Data.Time.Units
|
||||||
#else
|
#else
|
||||||
import qualified Streamly.Internal.Data.Stream.IsStream.Parallel as Stream
|
import qualified Streamly.Internal.Data.Stream.Parallel as Stream
|
||||||
import qualified Streamly.Internal.Data.Stream as Stream
|
import qualified Streamly.Internal.Data.Stream as Stream
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
|
@ -84,7 +84,7 @@ import qualified Streamly.Data.Stream as Stream (fold, foldBreak)
|
|||||||
import qualified Streamly.Internal.Data.Array.Unboxed.Type as A
|
import qualified Streamly.Internal.Data.Array.Unboxed.Type as A
|
||||||
import qualified Streamly.Internal.Data.Stream.IsStream.Async as Async
|
import qualified Streamly.Internal.Data.Stream.IsStream.Async as Async
|
||||||
import qualified Streamly.Internal.Data.Stream.IsStream.Type as IsStream
|
import qualified Streamly.Internal.Data.Stream.IsStream.Type as IsStream
|
||||||
import qualified Streamly.Internal.Data.Stream.IsStream.Parallel as Par
|
import qualified Streamly.Internal.Data.Stream.Parallel as Par
|
||||||
import qualified Streamly.Internal.Data.Stream.StreamK.Type as K
|
import qualified Streamly.Internal.Data.Stream.StreamK.Type as K
|
||||||
(fromPure, fromEffect, repeatMWith, reverse)
|
(fromPure, fromEffect, repeatMWith, reverse)
|
||||||
import qualified Streamly.Internal.Data.Stream.StreamD as D
|
import qualified Streamly.Internal.Data.Stream.StreamD as D
|
||||||
|
@ -174,7 +174,7 @@ import Streamly.Internal.Data.Stream.IsStream.Type
|
|||||||
import Streamly.Data.Unfold (Unfold)
|
import Streamly.Data.Unfold (Unfold)
|
||||||
|
|
||||||
import qualified Streamly.Internal.Data.Stream.IsStream.Type as IsStream
|
import qualified Streamly.Internal.Data.Stream.IsStream.Type as IsStream
|
||||||
import qualified Streamly.Internal.Data.Stream.IsStream.Parallel as Par
|
import qualified Streamly.Internal.Data.Stream.Parallel as Par
|
||||||
import qualified Streamly.Internal.Data.Stream.WSerial as WSerial
|
import qualified Streamly.Internal.Data.Stream.WSerial as WSerial
|
||||||
import qualified Streamly.Internal.Data.Stream.StreamD as D
|
import qualified Streamly.Internal.Data.Stream.StreamD as D
|
||||||
(append, interleave, interleaveSuffix, interleaveInfix, interleaveMin
|
(append, interleave, interleaveSuffix, interleaveInfix, interleaveMin
|
||||||
|
@ -109,7 +109,7 @@ import Streamly.Internal.Data.Unboxed (Unboxed)
|
|||||||
import qualified Streamly.Internal.Data.IORef.Unboxed as Unboxed
|
import qualified Streamly.Internal.Data.IORef.Unboxed as Unboxed
|
||||||
(toStreamD, IORef)
|
(toStreamD, IORef)
|
||||||
import qualified Streamly.Internal.Data.Stream.IsStream.Type as IsStream
|
import qualified Streamly.Internal.Data.Stream.IsStream.Type as IsStream
|
||||||
import qualified Streamly.Internal.Data.Stream.IsStream.Parallel as Par
|
import qualified Streamly.Internal.Data.Stream.Parallel as Par
|
||||||
import qualified Streamly.Internal.Data.Stream.Serial as Serial
|
import qualified Streamly.Internal.Data.Stream.Serial as Serial
|
||||||
import qualified Streamly.Internal.Data.Stream.StreamD as D
|
import qualified Streamly.Internal.Data.Stream.StreamD as D
|
||||||
(unfold, unfoldr, toStreamK, unfoldr, repeat, replicate, replicateM
|
(unfold, unfoldr, toStreamK, unfoldr, repeat, replicate, replicateM
|
||||||
|
@ -251,7 +251,7 @@ import Streamly.Internal.Data.SVar (Rate(..))
|
|||||||
import Streamly.Internal.Data.Time.Units (AbsTime, RelTime64)
|
import Streamly.Internal.Data.Time.Units (AbsTime, RelTime64)
|
||||||
|
|
||||||
import qualified Streamly.Data.Fold as FL
|
import qualified Streamly.Data.Fold as FL
|
||||||
import qualified Streamly.Internal.Data.Stream.IsStream.Parallel as Par
|
import qualified Streamly.Internal.Data.Stream.Parallel as Par
|
||||||
import qualified Streamly.Internal.Data.Stream.Serial as Serial
|
import qualified Streamly.Internal.Data.Stream.Serial as Serial
|
||||||
import qualified Streamly.Internal.Data.Stream.StreamD as D
|
import qualified Streamly.Internal.Data.Stream.StreamD as D
|
||||||
(transform, foldrT, tap, tapOffsetEvery, pollCounts, mapM, scanOnce
|
(transform, foldrT, tap, tapOffsetEvery, pollCounts, mapM, scanOnce
|
||||||
|
@ -106,8 +106,7 @@ import Streamly.Internal.Data.Stream.WSerial (WSerialT(..), WSerial)
|
|||||||
import Streamly.Internal.Data.Stream.IsStream.Async
|
import Streamly.Internal.Data.Stream.IsStream.Async
|
||||||
(AsyncT(..), Async, WAsyncT(..), WAsync)
|
(AsyncT(..), Async, WAsyncT(..), WAsync)
|
||||||
import Streamly.Internal.Data.Stream.Ahead (AheadT(..), Ahead)
|
import Streamly.Internal.Data.Stream.Ahead (AheadT(..), Ahead)
|
||||||
import Streamly.Internal.Data.Stream.IsStream.Parallel
|
import Streamly.Internal.Data.Stream.Parallel (ParallelT(..), Parallel)
|
||||||
(ParallelT(..), Parallel)
|
|
||||||
import Streamly.Internal.Data.Stream.Zip (ZipSerialM, ZipSerial)
|
import Streamly.Internal.Data.Stream.Zip (ZipSerialM, ZipSerial)
|
||||||
import Streamly.Internal.Data.Stream.ZipAsync (ZipAsyncM(..), ZipAsync)
|
import Streamly.Internal.Data.Stream.ZipAsync (ZipAsyncM(..), ZipAsync)
|
||||||
import Streamly.Internal.Data.SVar.Type (State, adaptState)
|
import Streamly.Internal.Data.SVar.Type (State, adaptState)
|
||||||
@ -115,7 +114,7 @@ import Streamly.Internal.Data.SVar.Type (State, adaptState)
|
|||||||
import qualified Prelude
|
import qualified Prelude
|
||||||
import qualified Streamly.Internal.Data.Stream.Ahead as Ahead
|
import qualified Streamly.Internal.Data.Stream.Ahead as Ahead
|
||||||
import qualified Streamly.Internal.Data.Stream.IsStream.Async as Async
|
import qualified Streamly.Internal.Data.Stream.IsStream.Async as Async
|
||||||
import qualified Streamly.Internal.Data.Stream.IsStream.Parallel as Parallel
|
import qualified Streamly.Internal.Data.Stream.Parallel as Parallel
|
||||||
import qualified Streamly.Internal.Data.Stream.Serial as Serial
|
import qualified Streamly.Internal.Data.Stream.Serial as Serial
|
||||||
import qualified Streamly.Internal.Data.Stream.WSerial as WSerial
|
import qualified Streamly.Internal.Data.Stream.WSerial as WSerial
|
||||||
import qualified Streamly.Internal.Data.Stream.StreamD.Type as D
|
import qualified Streamly.Internal.Data.Stream.StreamD.Type as D
|
||||||
|
@ -1,7 +1,7 @@
|
|||||||
{-# LANGUAGE UndecidableInstances #-}
|
{-# LANGUAGE UndecidableInstances #-}
|
||||||
|
|
||||||
-- |
|
-- |
|
||||||
-- Module : Streamly.Internal.Data.Stream.IsStream.Parallel
|
-- Module : Streamly.Internal.Data.Stream.Parallel
|
||||||
-- Copyright : (c) 2017 Composewell Technologies
|
-- Copyright : (c) 2017 Composewell Technologies
|
||||||
--
|
--
|
||||||
-- License : BSD3
|
-- License : BSD3
|
||||||
@ -20,7 +20,7 @@
|
|||||||
-- return n -- IO Int
|
-- return n -- IO Int
|
||||||
-- :}
|
-- :}
|
||||||
--
|
--
|
||||||
module Streamly.Internal.Data.Stream.IsStream.Parallel
|
module Streamly.Internal.Data.Stream.Parallel
|
||||||
(
|
(
|
||||||
-- * Parallel Stream Type
|
-- * Parallel Stream Type
|
||||||
ParallelT(..)
|
ParallelT(..)
|
||||||
@ -542,7 +542,7 @@ parallelFst m1 m2 =
|
|||||||
-- seconds.
|
-- seconds.
|
||||||
--
|
--
|
||||||
-- >>> import qualified Streamly.Data.Fold as Fold
|
-- >>> import qualified Streamly.Data.Fold as Fold
|
||||||
-- >>> import qualified Streamly.Internal.Data.Stream.IsStream.Parallel as Parallel
|
-- >>> import qualified Streamly.Internal.Data.Stream.Parallel as Parallel
|
||||||
-- >>> Stream.fold Fold.drain $ Parallel.interjectSuffix 1.05 (putChar ',') $ Stream.mapM (\x -> threadDelay 1000000 >> putChar x) $ Stream.fromList "hello"
|
-- >>> Stream.fold Fold.drain $ Parallel.interjectSuffix 1.05 (putChar ',') $ Stream.mapM (\x -> threadDelay 1000000 >> putChar x) $ Stream.fromList "hello"
|
||||||
-- h,e,l,l,o
|
-- h,e,l,l,o
|
||||||
--
|
--
|
@ -345,6 +345,7 @@ library
|
|||||||
|
|
||||||
, Streamly.Internal.Data.Stream.Serial
|
, Streamly.Internal.Data.Stream.Serial
|
||||||
, Streamly.Internal.Data.Stream.WSerial
|
, Streamly.Internal.Data.Stream.WSerial
|
||||||
|
, Streamly.Internal.Data.Stream.Parallel
|
||||||
, Streamly.Internal.Data.Stream.Channel.Types
|
, Streamly.Internal.Data.Stream.Channel.Types
|
||||||
, Streamly.Internal.Data.Stream.Channel.Dispatcher
|
, Streamly.Internal.Data.Stream.Channel.Dispatcher
|
||||||
, Streamly.Internal.Data.Stream.Channel.Worker
|
, Streamly.Internal.Data.Stream.Channel.Worker
|
||||||
@ -373,7 +374,6 @@ library
|
|||||||
, Streamly.Internal.Data.Stream.IsStream.Lift
|
, Streamly.Internal.Data.Stream.IsStream.Lift
|
||||||
, Streamly.Internal.Data.Stream.IsStream.Top
|
, Streamly.Internal.Data.Stream.IsStream.Top
|
||||||
, Streamly.Internal.Data.Stream.IsStream.Async
|
, Streamly.Internal.Data.Stream.IsStream.Async
|
||||||
, Streamly.Internal.Data.Stream.IsStream.Parallel
|
|
||||||
, Streamly.Internal.Data.Stream.IsStream
|
, Streamly.Internal.Data.Stream.IsStream
|
||||||
|
|
||||||
-- streamly-unicode
|
-- streamly-unicode
|
||||||
|
Loading…
Reference in New Issue
Block a user