c8c161c · streamly · git.iko.soy

benchmark/NanoBenchmarks.hs+1−1

compare with master

unifiedsplit

@@ -13,7 +13,7 @@ import qualified Streamly.Memory.Array as A

13import qualified Streamly.FileSystem.Handle as FH

14import qualified Streamly.Internal.FileSystem.Handle as IFH

15import qualified Streamly.Data.Fold as FL

16−import qualified Streamly.Internal.Prelude as Internal

16+import qualified Streamly.Internal.Data.Stream.IsStream as Internal

17import qualified Streamly.Prelude as S

18import qualified Streamly.Internal.Data.Stream.StreamK as K

19

benchmark/Streamly/Benchmark/Data/Fold.hs+1−1

@@ -27,7 +27,7 @@ import qualified Streamly.Internal.Data.Sink as Sink

27import qualified Streamly.Memory.Array as A

28import qualified Streamly.Internal.Memory.Array as IA

29import qualified Streamly.Internal.Data.Fold as IFL

30−import qualified Streamly.Internal.Prelude as IP

30+import qualified Streamly.Internal.Data.Stream.IsStream as IP

31

32import Gauge

33import Streamly hiding (runStream)

benchmark/Streamly/Benchmark/Data/Parser.hs+1−1

@@ -28,7 +28,7 @@ import qualified Streamly as S hiding (runStream)

28import qualified Streamly.Prelude as S

29import qualified Streamly.Internal.Data.Fold as FL

30import qualified Streamly.Internal.Data.Parser as PR

31−import qualified Streamly.Internal.Prelude as IP

31+import qualified Streamly.Internal.Data.Stream.IsStream as IP

32

33import Gauge

34import Streamly hiding (runStream)

benchmark/Streamly/Benchmark/Data/Parser/ParserD.hs+1−1

@@ -26,7 +26,7 @@ import qualified Streamly as S hiding (runStream)

26import qualified Streamly.Prelude as S

27import qualified Streamly.Internal.Data.Fold as FL

28import qualified Streamly.Internal.Data.Parser.ParserD as PR

29−import qualified Streamly.Internal.Prelude as IP

29+import qualified Streamly.Internal.Data.Stream.IsStream as IP

30

31import Gauge

32import Streamly hiding (runStream)

benchmark/Streamly/Benchmark/Data/Parser/ParserK.hs+1−1

@@ -28,7 +28,7 @@ import qualified Streamly.Prelude as S

28import qualified Streamly.Internal.Data.Fold as FL

29import qualified Streamly.Internal.Data.Parser.ParserK.Types as PR

30import qualified Streamly.Internal.Data.Parser.ParserD as PRD

31−import qualified Streamly.Internal.Prelude as IP

31+import qualified Streamly.Internal.Data.Stream.IsStream as IP

32

33import Gauge

34import Streamly hiding (runStream)

benchmark/Streamly/Benchmark/FileSystem/Handle/Read.hs+1−1

@@ -46,7 +46,7 @@ import qualified Streamly.Internal.FileSystem.Handle as IFH

46import qualified Streamly.Internal.Memory.Array as A

47import qualified Streamly.Internal.Memory.Array.Types as AT

48import qualified Streamly.Internal.Memory.ArrayStream as AS

49−import qualified Streamly.Internal.Prelude as IP

49+import qualified Streamly.Internal.Data.Stream.IsStream as IP

50import qualified Streamly.Prelude as S

51

52import Gauge hiding (env)

benchmark/Streamly/Benchmark/FileSystem/Handle/ReadWrite.hs+1−1

@@ -35,7 +35,7 @@ import qualified Streamly.Internal.Data.Unicode.Stream as IUS

35import qualified Streamly.Internal.FileSystem.Handle as IFH

36import qualified Streamly.Internal.Memory.ArrayStream as AS

37import qualified Streamly.Internal.Memory.Unicode.Array as IUA

38−import qualified Streamly.Internal.Prelude as IP

38+import qualified Streamly.Internal.Data.Stream.IsStream as IP

39import qualified Streamly.Memory.Array as A

40import qualified Streamly.Prelude as S

41

benchmark/Streamly/Benchmark/Prelude/Parallel.hs+1−1

@@ -15,7 +15,7 @@ import qualified Streamly as S

15import qualified Streamly.Prelude as S

16import qualified Streamly.Internal.Data.Fold as FL

17import qualified Streamly.Internal.Data.Stream.Parallel as Par

18−import qualified Streamly.Internal.Prelude as Internal

18+import qualified Streamly.Internal.Data.Stream.IsStream as Internal

19

20import Streamly.Benchmark.Common

21import Streamly.Benchmark.Prelude

benchmark/Streamly/Benchmark/Prelude/Serial.hs+1−1

@@ -50,7 +50,7 @@ import qualified Streamly.Internal.Data.Stream.StreamD as D

50

51import qualified Streamly as S

52import qualified Streamly.Prelude as S

53−import qualified Streamly.Internal.Prelude as Internal

53+import qualified Streamly.Internal.Data.Stream.IsStream as Internal

54import qualified Streamly.Internal.Data.Fold as FL

55import qualified Streamly.Internal.Data.Unfold as UF

56

benchmark/Streamly/Benchmark/Prelude/WSerial.hs+1−1

@@ -21,7 +21,7 @@

21

22import Streamly

23import qualified Streamly.Prelude as S

24−import qualified Streamly.Internal.Prelude as Internal

24+import qualified Streamly.Internal.Data.Stream.IsStream as Internal

25import qualified Streamly.Internal.Data.Unfold as UF

26

27import Streamly.Benchmark.Common

benchmark/lib/Streamly/Benchmark/Prelude.hs+1−1

@@ -22,7 +22,7 @@ import System.Random (randomRIO)

22import qualified Data.Foldable as F

23import qualified Streamly as S

24import qualified Streamly.Prelude as S

25−import qualified Streamly.Internal.Prelude as Internal

25+import qualified Streamly.Internal.Data.Stream.IsStream as Internal

26import qualified Streamly.Internal.Data.Pipe as Pipe

27import qualified Streamly.Internal.Data.Stream.Serial as Serial

28

examples/FileIOExamples.hs+1−1

@@ -3,7 +3,7 @@ import qualified Streamly.Data.Fold as FL

3import qualified Streamly.Memory.Array as A

4

5import qualified Streamly.Internal.Data.Fold as FL

6−import qualified Streamly.Internal.Prelude as IP

6+import qualified Streamly.Internal.Data.Stream.IsStream as IP

7import qualified Streamly.Internal.FileSystem.File as File

8

9import Data.Char (ord)

examples/HandleIO.hs+1−1

@@ -12,7 +12,7 @@ import qualified Streamly.Prelude as S

12import qualified Streamly.Internal.Data.Fold as FL

13import qualified Streamly.Internal.Data.Unicode.Stream as US

14import qualified Streamly.Internal.Memory.ArrayStream as AS

15−import qualified Streamly.Internal.Prelude as S

15+import qualified Streamly.Internal.Data.Stream.IsStream as S

16

17-- Read the contents of a file to stdout.

18--

examples/ListDir.hs+1−1

@@ -6,7 +6,7 @@ import System.IO (stdout, hSetBuffering, BufferMode(LineBuffering))

6import Streamly (ahead)

7

8import qualified Streamly.Prelude as S

9−import qualified Streamly.Internal.Prelude as S

9+import qualified Streamly.Internal.Data.Stream.IsStream as S

10import qualified Streamly.Internal.FileSystem.Dir as Dir

11

12-- | List the current directory recursively using concurrent processing

examples/Rate.hs+1−1

@@ -1,6 +1,6 @@

1import Streamly

2import qualified Streamly.Prelude as S

3−import qualified Streamly.Internal.Prelude as Internal

3+import qualified Streamly.Internal.Data.Stream.IsStream as Internal

4

5main :: IO ()

6main =

examples/Split.hs+1−1

@@ -1,4 +1,4 @@

1−import qualified Streamly.Internal.Prelude as S

1+import qualified Streamly.Internal.Data.Stream.IsStream as S

2import qualified Streamly.Internal.FileSystem.Handle as IFH

3import qualified Streamly.FileSystem.Handle as FH

4import qualified System.IO as FH

src/Streamly.hs+1−1

@@ -228,7 +228,7 @@ import Streamly.Internal.Data.Stream.StreamK hiding (serial)

228import Streamly.Internal.Data.Stream.Zip

229

230import qualified Streamly.Prelude as P

231−import qualified Streamly.Internal.Prelude as IP

231+import qualified Streamly.Internal.Data.Stream.IsStream as IP

232import qualified Streamly.Internal.Data.Stream.StreamK as K

233import qualified Streamly.Internal.Data.Stream.Async as Async

234

src/Streamly/Internal/Prelude.hs → src/Streamly/Internal/Data/Stream/IsStream.hsrenamed+2−2

@@ -3,7 +3,7 @@

3#include "inline.hs"

4

5-- |

6−-- Module : Streamly.Internal.Prelude

6+-- Module : Streamly.Internal.Data.Stream.IsStream

8--

9-- License : BSD3

@@ -17,7 +17,7 @@

17-- unreleased and unimplemented APIs. For documentation on released APIs please

18-- see "Streamly.Prelude" module.

19

20−module Streamly.Internal.Prelude

20+module Streamly.Internal.Data.Stream.IsStream

21 (

22 -- * Construction

23 -- ** Primitives

src/Streamly/Internal/Data/Stream/StreamK.hs+1−1

@@ -532,7 +532,7 @@ tailPartial m = mkStream $ \st yld sng stp ->

532-- example:

533--

534-- @

535−-- import Streamly.Internal.Prelude as S

535+-- import Streamly.Internal.Data.Stream.IsStream as S

536-- import System.IO.Unsafe (unsafeInterleaveIO)

537--

538-- main = do

src/Streamly/Internal/Data/Unicode/Stream.hs+1−1

@@ -75,7 +75,7 @@ import Streamly.Internal.Data.Stream.StreamD (Stream(..), Step (..))

75import Streamly.Internal.Data.Tuple.Strict (Tuple'(..))

76

77import qualified Streamly.Internal.Memory.Array.Types as A

78−import qualified Streamly.Internal.Prelude as S

78+import qualified Streamly.Internal.Data.Stream.IsStream as S

79import qualified Streamly.Internal.Data.Stream.StreamD as D

80

81import Prelude hiding (String, lines, words, unlines, unwords)

src/Streamly/Internal/FileSystem/Dir.hs+1−1

@@ -74,7 +74,7 @@ import Streamly.Internal.Data.Stream.StreamK.Type (IsStream)

74-- import qualified Streamly.Internal.Data.Fold.Types as FL

75import qualified Streamly.Internal.Data.Unfold as UF

76-- import qualified Streamly.Internal.Memory.ArrayStream as AS

77−import qualified Streamly.Internal.Prelude as S

77+import qualified Streamly.Internal.Data.Stream.IsStream as S

78-- import qualified Streamly.Memory.Array as A

79-- import qualified Streamly.Internal.Data.Stream.StreamD.Type as D

80import qualified System.Directory as Dir

src/Streamly/Internal/FileSystem/Handle.hs+1−1

@@ -126,7 +126,7 @@ import qualified Streamly.Internal.Data.Fold.Types as FL

126import qualified Streamly.Internal.Data.Unfold as UF

127import qualified Streamly.Internal.Memory.Array as IA

128import qualified Streamly.Internal.Memory.ArrayStream as AS

129−import qualified Streamly.Internal.Prelude as S

129+import qualified Streamly.Internal.Data.Stream.IsStream as S

130import qualified Streamly.Memory.Array as A

131import qualified Streamly.Internal.Data.Stream.StreamD.Type as D

132

src/Streamly/Internal/Memory/ArrayStream.hs+1−1

@@ -48,7 +48,7 @@ import Streamly.Internal.Data.Stream.StreamK.Type (IsStream)

48import qualified Streamly.Internal.Memory.Array as A

49import qualified Streamly.Internal.Memory.Array.Types as A

50import qualified Streamly.Internal.Memory.Mutable.Array.Types as MA

51−import qualified Streamly.Internal.Prelude as S

51+import qualified Streamly.Internal.Data.Stream.IsStream as S

52import qualified Streamly.Internal.Data.Stream.StreamD as D

53import qualified Streamly.Internal.Data.Stream.Prelude as P

54

src/Streamly/Prelude.hs+1−1

@@ -569,7 +569,7 @@ import Prelude

569 reverse, iterate, init, and, or, lookup, foldr1, (!!),

570 scanl, scanl1, repeat, replicate, concatMap, span)

571

572−import Streamly.Internal.Prelude

572+import Streamly.Internal.Data.Stream.IsStream

573

574-- $rightfolds

575--

streamly.cabal+1−1

@@ -427,6 +427,7 @@ library

427 , Streamly.Internal.Data.Stream.Prelude

428

429 -- Higher level streams

430+ , Streamly.Internal.Data.Stream.IsStream

430 , Streamly.Internal.Data.Stream.SVar

431 , Streamly.Internal.Data.Stream.SVar

431 , Streamly.Internal.Data.Stream.Serial

432 , Streamly.Internal.Data.Stream.Serial

432 , Streamly.Internal.Data.Stream.Async

433 , Streamly.Internal.Data.Stream.Async

@@ -435,7 +436,6 @@ library

435 , Streamly.Internal.Data.Stream.Zip

436 , Streamly.Internal.Data.Stream.Zip

436 , Streamly.Internal.Data.Stream.Combinators

437 , Streamly.Internal.Data.Stream.Combinators

437 , Streamly.Internal.Data.List

438 , Streamly.Internal.Data.List

438− , Streamly.Internal.Prelude

439

440 -- Unfolds

441 , Streamly.Internal.Data.Unfold.Types

test/Main.hs+1−1

@@ -21,7 +21,7 @@ import Streamly

21import Streamly.Prelude ((.:), nil)

22import qualified Streamly as S

23import qualified Streamly.Prelude as S

24−import qualified Streamly.Internal.Prelude as IP

24+import qualified Streamly.Internal.Data.Stream.IsStream as IP

25

26singleton :: IsStream t => a -> t m a

27singleton a = a .: nil

test/Streamly/Test/Array.hs+3−3

@@ -27,17 +27,17 @@ type Array = A.SmallArray

27#elif defined(TEST_ARRAY)

28import qualified Streamly.Internal.Memory.Array as A

29import qualified Streamly.Internal.Memory.Array.Types as A

30−import qualified Streamly.Internal.Prelude as IP

30+import qualified Streamly.Internal.Data.Stream.IsStream as IP

31type Array = A.Array

32#elif defined(DATA_ARRAY_PRIM_PINNED)

33import qualified Streamly.Internal.Data.Array.Prim.Pinned as A

34import qualified Streamly.Internal.Data.Array.Prim.Pinned.Types as A

35−import qualified Streamly.Internal.Prelude as IP

35+import qualified Streamly.Internal.Data.Stream.IsStream as IP

36type Array = A.Array

37#elif defined(DATA_ARRAY_PRIM)

38import qualified Streamly.Internal.Data.Array.Prim as A

39import qualified Streamly.Internal.Data.Array.Prim.Types as A

40−import qualified Streamly.Internal.Prelude as IP

40+import qualified Streamly.Internal.Data.Stream.IsStream as IP

41type Array = A.Array

42#else

43import qualified Streamly.Internal.Data.Array as A

test/Streamly/Test/Internal/Data/Parser.hs+1−1

@@ -1,7 +1,7 @@

1module Main (main) where

2

3import qualified Streamly.Internal.Data.Parser as P

4−import qualified Streamly.Internal.Prelude as S

4+import qualified Streamly.Internal.Data.Stream.IsStream as S

5import qualified Streamly.Internal.Data.Fold as FL

6

7-- import Data.List (partition)

test/Streamly/Test/Internal/Data/Parser/ParserD.hs+1−1

@@ -1,7 +1,7 @@

1module Main (main) where

2

3import qualified Streamly.Internal.Data.Parser.ParserD as P

4−import qualified Streamly.Internal.Prelude as S

4+import qualified Streamly.Internal.Data.Stream.IsStream as S

5import qualified Streamly.Internal.Data.Fold as FL

6

7-- import Data.List (partition)

test/Streamly/Test/Internal/Prelude.hs+1−1

@@ -20,7 +20,7 @@ import Test.QuickCheck.Monadic (monadicIO, pick)

20import qualified Streamly.Prelude as S

21import qualified Streamly.Internal.Data.Fold as FL

22import qualified Streamly.Internal.Data.Unfold as UF

23−import qualified Streamly.Internal.Prelude as SI

23+import qualified Streamly.Internal.Data.Stream.IsStream as SI

24

25import Streamly.Internal.Data.Time.Clock (Clock(Monotonic), getTime)

26import Streamly.Internal.Data.Time.Units