git.iko.soy/streamly
on master help sign in
Remove deprecated read/readRev routines
d3247cfHarendra Kumar
core/src/Streamly/Console/Stdio.hs+1−27
compare with master
unifiedsplit
@@ -24,33 +24,7 @@ module Streamly.Console.Stdio
24 -- * Write (stderr)
24 -- * Write (stderr)
25 , writeErr
25 , writeErr
26 , writeErrChunks
26 , writeErrChunks
27−
28− -- * Deprecated
29− , read
30− , readChunks
31 )
27 )
32where
28where
33
29
34−import Control.Monad.IO.Class (MonadIO(..))
35−import Data.Word (Word8)
36−import Streamly.Internal.Data.Array.Type (Array)
37−import Streamly.Internal.Data.Unfold (Unfold)
38−
39−import Streamly.Internal.Console.Stdio hiding (read, readChunks)
30+import Streamly.Internal.Console.Stdio
40−import Prelude hiding (read)
41−
42−-- Same as 'reader'
43−--
44−-- @since 0.8.0
45−{-# DEPRECATED read "Please use 'reader' instead" #-}
46−{-# INLINE read #-}
47−read :: MonadIO m => Unfold m () Word8
48−read = reader
49−
50−-- Same as 'chunkReader'
51−--
52−-- @since 0.8.0
53−{-# DEPRECATED readChunks "Please use 'chunkReader' instead" #-}
54−{-# INLINE readChunks #-}
55−readChunks :: MonadIO m => Unfold m () (Array Word8)
56−readChunks = chunkReader
core/src/Streamly/Data/Array.hs−19
@@ -73,10 +73,6 @@ module Streamly.Data.Array
73 , pin
73 , pin
74 , unpin
74 , unpin
75 , isPinned
75 , isPinned
76−
77− -- * Deprecated
78− , read
79− , readRev
80 )
76 )
81where
77where
82
78
@@ -84,7 +80,6 @@ where
84
80
85import Streamly.Internal.Data.Array hiding (read, readRev)
81import Streamly.Internal.Data.Array hiding (read, readRev)
86import Streamly.Internal.Data.Unbox (Unbox (..))
82import Streamly.Internal.Data.Unbox (Unbox (..))
87−import Streamly.Internal.Data.Unfold (Unfold)
88
83
89import Prelude hiding (read, length)
84import Prelude hiding (read, length)
90
85
@@ -150,17 +145,3 @@ import Prelude hiding (read, length)
150-- This module is designed to be imported qualified:
145-- This module is designed to be imported qualified:
151--
146--
152-- >>> import qualified Streamly.Data.Array as Array
147-- >>> import qualified Streamly.Data.Array as Array
153−
154−-- | Same as 'reader'
155−--
156−{-# DEPRECATED read "Please use 'reader' instead" #-}
157−{-# INLINE_NORMAL read #-}
158−read :: (Monad m, Unbox a) => Unfold m (Array a) a
159−read = reader
160−
161−-- | Same as 'readerRev'
162−--
163−{-# DEPRECATED readRev "Please use 'readerRev' instead" #-}
164−{-# INLINE_NORMAL readRev #-}
165−readRev :: (Monad m, Unbox a) => Unfold m (Array a) a
166−readRev = readerRev
core/src/Streamly/FileSystem/Handle.hs+1−25
@@ -1,5 +1,4 @@
1{-# LANGUAGE CPP #-}
1{-# LANGUAGE CPP #-}
2−#include "inline.hs"
3
2
4-- |
3-- |
5-- Module : Streamly.FileSystem.Handle
4-- Module : Streamly.FileSystem.Handle
@@ -105,36 +104,13 @@ module Streamly.FileSystem.Handle
105 , writeChunks
104 , writeChunks
106
105
107 -- * Deprecated
106 -- * Deprecated
108− , read
109 , readWithBufferOf
107 , readWithBufferOf
110− , readChunks
111 , readChunksWithBufferOf
108 , readChunksWithBufferOf
112 , writeChunksWithBufferOf
109 , writeChunksWithBufferOf
113 , writeWithBufferOf
110 , writeWithBufferOf
114 )
111 )
115where
112where
116
113
117−import Control.Monad.IO.Class (MonadIO(..))
118−import Data.Word (Word8)
119−import Streamly.Internal.Data.Array.Type (Array)
120−import Streamly.Internal.Data.Unfold.Type (Unfold)
121−import System.IO (Handle)
122−
123−import Streamly.Internal.FileSystem.Handle hiding (read, readChunks)
114+import Streamly.Internal.FileSystem.Handle
124−import Prelude hiding (read)
125
115
126#include "DocTestFileSystemHandle.hs"
116#include "DocTestFileSystemHandle.hs"
127−
128−-- | Same as 'reader'
129−--
130−{-# DEPRECATED read "Please use 'reader' instead" #-}
131−{-# INLINE read #-}
132−read :: MonadIO m => Unfold m Handle Word8
133−read = reader
134−
135−-- | Same as 'chunkReader'
136−--
137−{-# DEPRECATED readChunks "Please use 'chunkReader' instead" #-}
138−{-# INLINE readChunks #-}
139−readChunks :: MonadIO m => Unfold m Handle (Array Word8)
140−readChunks = chunkReader