Actually what you seem to be trying to do is create a new kind
of defn function which creates named functions as a side-effect.
This is similar to the common lisp defstruct function which
creates accessors. Define your own "defn" function, such as
"defthing" and let it do the side-effects for you.

On 9/11/2010 11:15 AM, Kent wrote:
The fact that you are trying to generate functions based on data that
is available at run time rather than at compile time is a signal that
you should probably be using functions rather than macros to do what
you want.  Here is one way:

(defn make-fn [kwd]
   (fn [n] (= n kwd)))

(defn intern-fn [kwd]
   (let [fn-name (symbol (str "prefix-" (name kwd)))]
     (intern *ns* fn-name (make-fn kwd))))

Kent


--
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

Reply via email to