@@ -27,7 +27,7 @@ description: Streamly is a general streaming and concurrent programming
27 > import Path.IO (listDir, getCurrentDir)
27 > import Path.IO (listDir, getCurrentDir)
28 > import Streamly
28 > import Streamly
30− > main = runStreamly $ getCurrentDir >>= readdir
30+ > main = runStreaming $ serially $ getCurrentDir >>= readdir
31 > where readdir d = do
31 > where readdir d = do
32 > (dirs, files) <- lift $ listDir d
32 > (dirs, files) <- lift $ listDir d
33 > liftIO $ mapM_ putStrLn $ map show files
33 > liftIO $ mapM_ putStrLn $ map show files