Navigation Menu

Skip to content

Instantly share code, notes, and snippets.

@deque-blog

deque-blog/compile-log-message-2.clj

Created May 19, 2017 15:24
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/ad09d5b7125dace322bc8633d1bebba6 to your computer and use it in GitHub Desktop.
Save deque-blog/ad09d5b7125dace322bc8633d1bebba6 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
compile-log-message-2.clj
(defn compile-log-message
[fct-name binding-vec]
(let [bindings (bindings->bound-vars binding-vec)]
`(log-symbol-values
~(function-log-prefix fct-name)
(quote ~bindings)
~bindings)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment