Hi,

if you want to resort to eval you can define your own function on the fly.

(defn call-fn
  [& args]
  {:arglists ([class method & args])}
  (let [o (gensym)
        [class method & args] (map symbol args)]
    (eval
      `(fn [~o ~@args]
         (. ~(with-meta o {:tag class})
            (~method ~@args))))))

user=> (set! *warn-on-reflection* true)
true
user=> (def f (call-fn "java.io.File" "renameTo" "dest"))
#'user/f
user=> (f (java.io.File. "foo") (java.io.File. "bar"))
false

Kind regards
Meikel

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


Reply via email to