Skip to content

Instantly share code, notes, and snippets.

@gtrak

gtrak/gist:4499356

Created January 10, 2013 04:04
Show Gist options
  • Save gtrak/4499356 to your computer and use it in GitHub Desktop.
Save gtrak/4499356 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.txt
(defmacro let-map
[pairs]
(let [names (map first (partition 2 pairs))]
`(let [~@pairs]
(zipmap
[~@(map (comp keyword name) names)]
[~@names]))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment