Clojure 関数の let バインディング内で宣言された変数の値を変更する方法を知りたいです。以下は私が使用しているコードです。関数が、文字列に含まれるテキストを保持する java.lang.String オブジェクトを返すようにします。
(defn read-text-from-file
{:doc "fn read-text-from-file is used to output in \"string\"
format the text in a file."}
[#^String file-name]
(let [buff-reader (open-file-reader file-name)]
(loop [full-text "" line (.readLine buff-reader)]
(when line
(-> full-text (.concat line))
; (println full-text)
(recur (-> file-name (.concat line)) (.readLine buff-reader))))))
注: 関数「open-file-reader」は以下のとおりです。
(defn open-file-reader
{:doc "This is used to open a file, ready for reading"}
[file-name]
(let [file-object (java.io.File. file-name)
buff-reader (-> file-object (java.io.FileReader.)
(java.io.BufferedReader.))]
buff-reader))