fix example
commit2d3ccadb5d03864408519b6e04239055d8daada4
authorHarendra Kumar <harendra.kumar@gmail.com>
dateMon 30 Oct 2017, 07:50 (9 years ago)
parent9eb7449
examples/map-reduce.hs+3−4
@@ -1,7 +1,6 @@
1−import Data.List (sum)
21import Asyncly
3−import Asyncly.Prelude
2+import Asyncly.Prelude as A
43
54main = do
6− xs <- toList $ serially $ forEachWith (<|) [1..100] $ \x -> return (x * x)
7− print . sum $ xs
5+ s <- A.sum $ serially $ forEachWith (<|) [1..100] $ \x -> return (x * x)
6+ print s