Skip to content

Instantly share code, notes, and snippets.

@srikumarks

srikumarks/slowlyWriteList2Chan.hs

Created September 20, 2010 18:56
Show Gist options
  • Save srikumarks/588439 to your computer and use it in GitHub Desktop.
Save srikumarks/588439 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
slowlyWriteList2Chan.hs
slowlyWriteList2Chan chan [] = do return ()
slowlyWriteList2Chan chan (n:ns) = do
writeChan chan n
yield -- Magic happens with this line!
slowlyWriteList2Chan chan ns
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment