on master help sign in
deprecate SerialT and runSerialT
66045e6Harendra Kumar
src/Streamly.hs+4
@@ -70,6 +70,10 @@ module Streamly
70 , MonadPlus (..)
70 , MonadPlus (..)
71 , MonadIO (..)
71 , MonadIO (..)
72 , MonadTrans (..)
72 , MonadTrans (..)
73+
74+ -- * Deprecated
75+ , runStreamT
76+ , StreamT
73 )
77 )
74where
78where
75
79
src/Streamly/Streams.hs+11
@@ -46,6 +46,7 @@ module Streamly.Streams
46
46
47 -- * Stream Styles
47 -- * Stream Styles
48 , SerialT
48 , SerialT
49+ , StreamT -- deprecated
49 , InterleavedT
50 , InterleavedT
50 , AsyncT
51 , AsyncT
51 , ParallelT
52 , ParallelT
@@ -63,6 +64,7 @@ module Streamly.Streams
63
64
64 -- * Running Streams
65 -- * Running Streams
65 , runSerialT
66 , runSerialT
67+ , runStreamT -- deprecated
66 , runInterleavedT
68 , runInterleavedT
67 , runAsyncT
69 , runAsyncT
68 , runParallelT
70 , runParallelT
@@ -281,6 +283,10 @@ instance Streaming SerialT where
281 toStream = getSerialT
283 toStream = getSerialT
282 fromStream = SerialT
284 fromStream = SerialT
283
285
286+-- | Same as SerialT.
287+{-# Deprecated StreamT "Please use SerialT instead." #-}
288+type StreamT = SerialT
289+
284-- XXX The Functor/Applicative/Num instances for all the types are exactly the
290-- XXX The Functor/Applicative/Num instances for all the types are exactly the
285-- same, how can we reduce this boilerplate (use TH)? We cannot derive them
291-- same, how can we reduce this boilerplate (use TH)? We cannot derive them
286-- from a single base type because they depend on the Monad instance which is
292-- from a single base type because they depend on the Monad instance which is
@@ -927,6 +933,11 @@ zippingAsync x = x
927runSerialT :: Monad m => SerialT m a -> m ()
933runSerialT :: Monad m => SerialT m a -> m ()
928runSerialT = runStreaming
934runSerialT = runStreaming
929
935
936+-- | Same as @runSerialT@.
937+{-# Deprecated runStreamT "Please use runSerialT instead." #-}
938+runStreamT :: Monad m => SerialT m a -> m ()
939+runStreamT = runStreaming
940+
930-- | Same as @runStreaming . interleaving@.
941-- | Same as @runStreaming . interleaving@.
931runInterleavedT :: Monad m => InterleavedT m a -> m ()
942runInterleavedT :: Monad m => InterleavedT m a -> m ()
932runInterleavedT = runStreaming
943runInterleavedT = runStreaming