Skip to content

Instantly share code, notes, and snippets.

@deque-blog
Last active October 26, 2017 16:08
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save deque-blog/fac9d7040b3fad1b81b51f68a9e93c2e to your computer and use it in GitHub Desktop.
Save deque-blog/fac9d7040b3fad1b81b51f68a9e93c2e to your computer and use it in GitHub Desktop.
echo : IO ()
echo = runEffect $
stdinLn "in> "
.| takingWhile (/= "quit")
.| deduplicating -- Remove consecutive repeating calls
.| mapping ("out> " ++)
.| stdoutLn
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment