On Fri, Dec 27, 2013 at 3:13 PM, john walker <john.lou.wal...@gmail.com>wrote:
> This works (clever hack!), but you would have to reduplicate the keys in
> (defn bar [..]...), (defn baz [...] ...) etc.
>
(defmacro defthingyfn [name arglist & body]
`(defn name ~(vec (cons '{:keys [thingy mumble fiddly]} arglist)) ~@body))
(defthingyfn foo [x]
(...thingy ... mumble ... fiddly ... mumble ... mumble ... x ... thingy
...))
(defthingyfn bar [x]
(...mumble ... thingy ... mumble ... mumble ... x ... thingy ... fiddly
... thingy ...))
...
(Extending that to cope with docstrings and multiple arities is left as an
exercise for the reader. :))
--
--
You received this message because you are subscribed to the Google
Groups "Clojure" group.
To post to this group, send email to clojure@googlegroups.com
Note that posts from new members are moderated - please be patient with your
first post.
To unsubscribe from this group, send email to
clojure+unsubscr...@googlegroups.com
For more options, visit this group at
http://groups.google.com/group/clojure?hl=en
---
You received this message because you are subscribed to the Google Groups
"Clojure" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to clojure+unsubscr...@googlegroups.com.
For more options, visit https://groups.google.com/groups/opt_out.
