brunoV/throttle-channel.clj

Last active August 29, 2015 13:57

Star 0 You must be signed in to star a gist
Fork 0 You must be signed in to fork a gist

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/brunoV/9844135.js"></script>
Save brunoV/9844135 to your computer and use it in GitHub Desktop.

Download ZIP

Raw

throttle-channel.clj

	(defn throttle [c ms]
	(let [c' (chan)]
	(go
	(while true
	(>! c' (<! c))
	(<! (timeout ms))))
	c'))

bernied commented Mar 28, 2014

how to erlang?

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment