on 8aee462 help sign in
50 lines 2.2 kB history raw
1{-# OPTIONS_GHC -Wno-deprecations -Wno-orphans #-}
3-- |
4-- Module : Streamly.Internal.Data.Stream.IsStream
5-- Copyright : (c) 2017 Composewell Technologies
6-- License : BSD-3-Clause
7-- Maintainer : streamly@composewell.com
8-- Stability : experimental
9-- Portability : GHC
10--
11-- This is an internal module which is a superset of the corresponding released
12-- module "Streamly.Prelude". It contains some additional unreleased or
13-- experimental APIs.
15module Streamly.Internal.Data.Stream.IsStream {-# DEPRECATED "Please use \"Streamly.Internal.Data.Stream from streamly-core package\", \"Streamly.Internal.Data.Stream.Concurrent\", \"Streamly.Internal.Data.Stream.Exception.Lifted\", & \"Streamly.Internal.Data.Stream.Time\" from streamly package instead." #-}
16 ( module Streamly.Internal.Data.Stream.IsStream.Type
17 , module Streamly.Internal.Data.Stream.IsStream.Generate
18 , module Streamly.Internal.Data.Stream.IsStream.Eliminate
19 , module Streamly.Internal.Data.Stream.IsStream.Transform
20 , module Streamly.Internal.Data.Stream.IsStream.Expand
21 , module Streamly.Internal.Data.Stream.IsStream.Reduce
22 , module Streamly.Internal.Data.Stream.IsStream.Exception
23 , module Streamly.Internal.Data.Stream.IsStream.Lift
24 , module Streamly.Internal.Data.Stream.IsStream.Top
25 , fromStream
26 , toStream
27 )
28where
30import Streamly.Internal.Data.Stream.IsStream.Top
31import Streamly.Internal.Data.Stream.IsStream.Eliminate hiding (toStream)
32import Streamly.Internal.Data.Stream.IsStream.Exception
33import Streamly.Internal.Data.Stream.IsStream.Generate
34import Streamly.Internal.Data.Stream.IsStream.Lift
35import Streamly.Internal.Data.Stream.IsStream.Expand
36import Streamly.Internal.Data.Stream.IsStream.Reduce
37import Streamly.Internal.Data.Stream.IsStream.Transform
38import Streamly.Internal.Data.Stream.IsStream.Type
39 hiding (cmpBy, drain, eqBy, foldl', fold, toList, toStream
40 , fromEffect, fromPure, repeat, fromStream)
42import qualified Streamly.Internal.Data.Stream as D
44{-# INLINE fromStream #-}
45fromStream :: (IsStream t, Monad m) => D.Stream m a -> t m a
46fromStream = fromStreamD
48{-# INLINE toStream #-}
49toStream :: (IsStream t, Monad m) => t m a -> D.Stream m a
50toStream = toStreamD