Skip to content

Instantly share code, notes, and snippets.

@bmabey

bmabey/memoize_fn.clj

Created August 10, 2011 05:00
Show Gist options
  • Star 5 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save bmabey/1136161 to your computer and use it in GitHub Desktop.
Save bmabey/1136161 to your computer and use it in GitHub Desktop.
Download ZIP
memoized anonymous functions in clojure
Raw
memoize_fn.clj
; inspired from http://stackoverflow.com/questions/3906831/how-do-i-generate-memoized-recursive-functions-in-clojure
(defmacro memoize-fn
"Produces a memoized anonymous function that can recursively call itself."
[fn-name & fn-args]
`(with-local-vars
[~fn-name (memoize
(fn ~@fn-args))]
(.bindRoot ~fn-name @~fn-name)
@~fn-name))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment