writeFile package:streaming

writeFile :: FilePath -> Stream (Of String) IO r -> IO r
streaming Streaming.Prelude
Write a series of Strings as lines to a file. 
>>> S.writeFile "lines.txt" $ S.take 2 S.stdinLn
hello<Enter>
world<Enter>

>>> S.readFile "lines.txt" S.stdoutLn
hello
world