क्लोजर: सामान्य लिस्प पढ़ने समारोह के बराबर?

Question

मैं एक एस-अभिव्यक्ति एक चल कॉमन लिस्प कार्यक्रम में एक फ़ाइल में संग्रहीत में पढ़ने के लिए चाहते हैं, तो मैं निम्नलिखित है:

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

, उदाहरण के लिए, मुझे लगता है कि एस शामिल foo.txt नाम की एक फ़ाइल है -expression (1 2 3), ऊपर समारोह है कि एस-अभिव्यक्ति वापस आ जाएगी इस प्रकार कहा जाता है, तो: (load-file "foo.txt")।

मैं खोज किया गया है और खोज और Clojure में एक समान रूप से सुरुचिपूर्ण समाधान नहीं मिली है। कोई विचार?

धन्यवाद!

Answer 1

आप जैसे क्या कर सकते हैं

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

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

ध्यान दें कि आप की संभावना पहले *read-eval*false को rebind चाहता हूँ। यह भी ध्यान रखें कि उपरोक्त काम वर्तमान contrib हेड के साथ (और लगभग निश्चित रूप से 1.2 में काम करेगा जब यह जारी किया जाता है); Clojure 1.1 के लिए, एक ही कार्यक्षमता clojure.contrib.duck-streams और clojure.contrib.java-utils नामस्थान में उपलब्ध है।

Answer 2

मैं एक समाधान मिला: How do you evaluate a string as a clojure expression?

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

आपको परेशान करने के क्षमा करें, लोगों^_^