Skip to content

Instantly share code, notes, and snippets.

@mikedouglas

mikedouglas/utility.clj

Created February 14, 2010 23:55
Show Gist options
  • Save mikedouglas/304345 to your computer and use it in GitHub Desktop.
Save mikedouglas/304345 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
utility.clj
;; (let [a 1, b 2] (named-map a b)) => {:a 1, :b 2}
(defmacro named-map
[& keys]
`(zipmap (map keyword '~keys) (list ~@keys)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment