on master help sign in
Fix warning
commit42df6099e296424cd5e4c2d3840f36a4be0ac6f9 authorHarendra Kumar <harendra.kumar@gmail.com> dateFri 22 Dec 2017, 05:00 (9 years ago) parent20d8d7c
1 file changed+2
test/Main.hs+2
test/Main.hs+2
@@ -352,12 +352,14 @@ nestTwoParallelApp =
352352 in toListParallel ((+) <$> s1 <*> s2)
353353 `shouldReturn` ([6,7,7,8,8,8,9,9,9,9,10,10,10,11,11,12] :: [Int])
354354
355+{-
355356nestTwoParallelNum :: Expectation
356357nestTwoParallelNum =
357358 let s1 = foldMapWith (<>) return [1..4]
358359 s2 = foldMapWith (<>) return [5..8]
359360 in toListParallel (s1 + s2)
360361 `shouldReturn` ([6,7,7,8,8,8,9,9,9,9,10,10,10,11,11,12] :: [Int])
362+-}
361363
362364zipOps :: (Streaming t, Applicative (t IO))
363365 => (forall a b c. (a -> b -> c)