On 14/01/13 14:27, wujek.sru...@gmail.com wrote:
(defmacro with-obj [name]
(let [obj-meta (meta name)]
(if (or (nil? obj-meta)) ; (not (::my-obj obj-meta)))
(throw (IllegalArgumentException. (str name " seems not be our
object")))))
`(println "nice"))
Try this:
(defmacro with-obj [name]
`(if-let [obj-meta# (meta ~name)]
(println "nice")
(throw (IllegalArgumentException. (str ~name " seems not be our
object")))))
HTH...
Jim
--
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
