Función resolviendo clojure desde el nombre de cadena

Question

En clojure 1.2RC1, deseo obtener una función basada en su nombre como cadena y evaluarla.

Definición de la función

(ns my-ns) 

(defn mycar [x] (first x)) 

La siguiente trabajaron:

((ns-resolve *ns* (symbol "mycar")) '(3 4)) 
((intern *ns* (symbol "mycar")) '(3 4)) 
((eval (symbol "mycar")) '(3 4)) 

pero parece feo. ¿Hay una mejor manera? Si no, ¿cuál de los anteriores es el más idiomático?

Answer 1

Esto funcionó para mí sin utilizar eval:

user> (defn mycar [x] (first x)) 
#'user/mycar 
user> ((resolve (symbol "mycar")) [1 2 3]) 
1 

Esto funciona porque resuelve encuentra el mycar var en el espacio de nombres actual y la var llama a la función es obligado a. Esta es una versión más corta de tu primer ejemplo. Lo usaría solo para evitar el uso de eval.