git.iko.soy/streamly
on master help sign in
Rename maxrate to Prelude.MaxRate.
42baf52pranaysashank
streamly.cabal+11−17
compare with master
unifiedsplit
@@ -665,6 +665,17 @@ test-suite Prelude.Fold
665 other-modules: Streamly.Test.Common
665 other-modules: Streamly.Test.Common
666 , Streamly.Test.Prelude.Common
666 , Streamly.Test.Prelude.Common
667
667
668+test-suite Prelude.MaxRate
669+ import: prelude-test-options, exe-options, default-extensions
670+ type: exitcode-stdio-1.0
671+ main-is: Streamly/Test/Prelude/MaxRate.hs
672+ ghc-options: -main-is Streamly.Test.Prelude.MaxRate.main
673+ if flag(dev)
674+ buildable: True
675+ build-depends: random >= 1.0.0 && < 2
676+ else
677+ buildable: False
678+
668test-suite array-test
679test-suite array-test
669 import: test-options
680 import: test-options
670 type: exitcode-stdio-1.0
681 type: exitcode-stdio-1.0
@@ -805,23 +816,6 @@ test-suite string-test
805 , hspec >= 2.0 && < 3
816 , hspec >= 2.0 && < 3
806 default-language: Haskell2010
817 default-language: Haskell2010
807
818
808−test-suite maxrate
809− import: exe-options
810− type: exitcode-stdio-1.0
811− default-language: Haskell2010
812− main-is: MaxRate.hs
813− js-sources: jsbits/clock.js
814− hs-source-dirs: test
815− if flag(dev)
816− buildable: True
817− build-Depends:
818− streamly
819− , base >= 4.9 && < 5
820− , hspec >= 2.0 && < 3
821− , random >= 1.0.0 && < 2
822− else
823− buildable: False
824−
825test-suite loops
819test-suite loops
826 import: test-options
820 import: test-options
827 type: exitcode-stdio-1.0
821 type: exitcode-stdio-1.0
test/MaxRate.hs → test/Streamly/Test/Prelude/MaxRate.hsrenamed+14−2
@@ -1,7 +1,19 @@
1−{-# LANGUAGE CPP #-}
1+-- |
2+-- Module : Streamly.Test.Prelude.MaxRate
3+-- Copyright : (c) 2018 Composewell Technologies
4+--
5+-- License : BSD-3-Clause
6+-- Maintainer : streamly@composewell.com
7+-- Stability : experimental
8+-- Portability : GHC
9+
10+module Streamly.Test.Prelude.MaxRate where
2
11
3−import Streamly
4import qualified Streamly.Prelude as S
12import qualified Streamly.Prelude as S
13+
14+import Streamly.Prelude
15+ ( aheadly, asyncly, wAsyncly, avgRate, maxBuffer, maxThreads, rate,
16+ SerialT, IsStream )
5import Streamly.Internal.Data.Time.Clock (getTime, Clock(..))
17import Streamly.Internal.Data.Time.Clock (getTime, Clock(..))
6import Streamly.Internal.Data.Time.Units
18import Streamly.Internal.Data.Time.Units
7 (NanoSecond64, diffAbsTime64, fromRelTime64)
19 (NanoSecond64, diffAbsTime64, fromRelTime64)