Skip to content

Instantly share code, notes, and snippets.

@colinhicks

colinhicks/core-async-then.clj

Created February 27, 2016 23:58
Show Gist options
  • Save colinhicks/4a4c237ab789b8ded5f7 to your computer and use it in GitHub Desktop.
Save colinhicks/4a4c237ab789b8ded5f7 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
core-async-then.clj
(defn then [promise-ch f]
(let [out (async/promise-chan)]
(async/pipeline-async 1 out #(async/pipe (f %1) %2) promise-ch)
out))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment