Clojure: ¿Equivalente a la función de lectura de Common Lisp?

Question

Cuando quiero leer en un S-expresión almacenada en un archivo en un programa de Common Lisp correr, hago lo siguiente:

(defun load-file (filename) 
    "Loads data corresponding to a s-expression in file with name FILENAME." 
    (with-open-file (stream filename) 
    (read stream))) 

Si, por ejemplo, tengo un archivo llamado foo.txt que contiene el S -expresión (1 2 3), la función anterior devolverá esa expresión S si se llama de la siguiente manera: (load-file "foo.txt").

He estado buscando y buscando y no he encontrado una solución igualmente elegante en Clojure. ¿Algunas ideas?

Gracias!

Answer 1

Puede hacer, p.

(require '[clojure.contrib.io :as io]) 

(io/with-in-reader (io/file "foo.txt") (read)) 
; => (1 2 3) 

Tenga en cuenta que es probable que desee volver a enlazar a *read-eval*false primero. También tenga en cuenta que lo anterior funciona con contrib HEAD actual (y seguramente funcionará en 1.2 cuando se publique); para Clojure 1.1, la misma funcionalidad está disponible en los espacios de nombres clojure.contrib.duck-streams y clojure.contrib.java-utils.

Answer 2

he encontrado una solución aquí: How do you evaluate a string as a clojure expression?

(read-string (slurp "foo.txt")) 

Perdone que le moleste, amigos^_^