Skip to content

Instantly share code, notes, and snippets.

@flyingmachine

flyingmachine/enqueue-expansion.clj

Created February 15, 2015 15:05
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 flyingmachine/ba9ae6e500896b1d2c78 to your computer and use it in GitHub Desktop.
Save flyingmachine/ba9ae6e500896b1d2c78 to your computer and use it in GitHub Desktop.
Download ZIP
enqueue expansion
Raw
enqueue-expansion.clj
(let [saying (promise)]
(future (deliver saying (do (wait 100 "Cheerio!"))))
@(let [saying (promise)]
(future (deliver saying (do (wait 400 "Pip pip!"))))
@(let [saying (promise)]
(future (deliver saying (do (wait 200 (println "'Ello, gov'na!")))))
(println @saying)
saying)
(println @saying)
saying)
(println @saying)
saying)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment