on master help sign in
Remove redundant examples
commit49a5ba4fa69752fd00e75fdc24270e28e0862fde authorHarendra Kumar <harendra.kumar@gmail.com> dateSun 3 Dec 2017, 00:48 (9 years ago) parent03f0375
3 files changed−44
examples/echo-loop.hs−16 examples/map-reduce.hs−6 streamly.cabal−22
examples/echo-loop.hsdeleted−16
@@ -1,16 +0,0 @@
1−import Control.Monad.IO.Class (liftIO)
2−import Streamly
3−
4−input :: StreamT IO String
5−input = do
6− string <- liftIO getLine
7− return string <> input
8−
9−output :: StreamT IO String -> StreamT IO ()
10−output strings = do
11− s <- strings
12− liftIO $ putStrLn s
13−
14−main = do
15− putStrLn "Type something and press enter, repeat"
16− runStreamT $ output input
examples/map-reduce.hsdeleted−6
@@ -1,6 +0,0 @@
1−import Streamly
2−import Streamly.Prelude as A
3−
4−main = do
5− s <- A.sum $ serially $ forEachWith (<|) [1..100] $ \x -> return (x * x)
6− print s
streamly.cabal−22
@@ -190,17 +190,6 @@ benchmark bench
190190-- Examples
191191-------------------------------------------------------------------------------
192192
193−executable echo-loop
194− main-is: echo-loop.hs
195− hs-source-dirs: examples
196− if flag(examples)
197− buildable: True
198− build-Depends:
199− streamly
200− , base >= 4.8 && < 5
201− else
202− buildable: False
203−
204193executable loops
205194 main-is: loops.hs
206195 hs-source-dirs: examples
@@ -212,17 +201,6 @@ executable loops
212201 else
213202 buildable: False
214203
215−executable map-reduce
216− main-is: map-reduce.hs
217− hs-source-dirs: examples
218− if flag(examples)
219− buildable: True
220− build-Depends:
221− streamly
222− , base >= 4.8 && < 5
223− else
224− buildable: False
225−
226204executable nested-loops
227205 main-is: nested-loops.hs
228206 hs-source-dirs: examples