git.iko.soy/streamly
on master help sign in
Add test for zipAsyncApplicative.
60a72a0pranaysashank
test/Streamly/Test/Prelude/Ahead.hs+2
compare with master
unifiedsplit
@@ -94,6 +94,8 @@ main = hspec
94 -- We test only the serial zip with serial streams and the parallel
94 -- We test only the serial zip with serial streams and the parallel
95 -- stream, because the rate setting in these streams can slow down
95 -- stream, because the rate setting in these streams can slow down
96 -- zipAsync.
96 -- zipAsync.
97+ aheadOps $ prop "zip applicative aheadly" . zipAsyncApplicative S.fromFoldable (==)
98+ aheadOps $ prop "zip applicative aheadly folded" . zipAsyncApplicative folded (==)
97 aheadOps $ prop "zip monadic aheadly" . zipAsyncMonadic S.fromFoldable (==)
99 aheadOps $ prop "zip monadic aheadly" . zipAsyncMonadic S.fromFoldable (==)
98 aheadOps $ prop "zip monadic aheadly folded" . zipAsyncMonadic folded (==)
100 aheadOps $ prop "zip monadic aheadly folded" . zipAsyncMonadic folded (==)
99
101
test/Streamly/Test/Prelude/Async.hs+2
@@ -68,6 +68,8 @@ main = hspec
68 -- We test only the serial zip with serial streams and the parallel
68 -- We test only the serial zip with serial streams and the parallel
69 -- stream, because the rate setting in these streams can slow down
69 -- stream, because the rate setting in these streams can slow down
70 -- zipAsync.
70 -- zipAsync.
71+ asyncOps $ prop "zip applicative asyncly" . zipAsyncApplicative S.fromFoldable (==)
72+ asyncOps $ prop "zip applicative asyncly folded" . zipAsyncApplicative folded (==)
71 asyncOps $ prop "zip monadic asyncly" . zipAsyncMonadic S.fromFoldable (==)
73 asyncOps $ prop "zip monadic asyncly" . zipAsyncMonadic S.fromFoldable (==)
72 asyncOps $ prop "zip monadic asyncly folded" . zipAsyncMonadic folded (==)
74 asyncOps $ prop "zip monadic asyncly folded" . zipAsyncMonadic folded (==)
73
75
test/Streamly/Test/Prelude/WAsync.hs+2
@@ -73,6 +73,8 @@ main = hspec
73 -- stream, because the rate setting in these streams can slow down
73 -- stream, because the rate setting in these streams can slow down
74 -- zipAsync.
74 -- zipAsync.
75 do
75 do
76+ wAsyncOps $ prop "zip applicative wAsyncly" . zipAsyncApplicative S.fromFoldable (==)
77+ wAsyncOps $ prop "zip applicative wAsyncly folded" . zipAsyncApplicative folded (==)
76 wAsyncOps $
78 wAsyncOps $
77 prop "zip monadic wAsyncly" . zipAsyncMonadic S.fromFoldable (==)
79 prop "zip monadic wAsyncly" . zipAsyncMonadic S.fromFoldable (==)
78 wAsyncOps $ prop "zip monadic wAsyncly folded" . zipAsyncMonadic folded (==)
80 wAsyncOps $ prop "zip monadic wAsyncly folded" . zipAsyncMonadic folded (==)