Mi chiedevo se è possibile caricare il codice contenuto in un file sorgente Clojure .clj come un elenco, senza compilarlo.Modificare il file di codice sorgente Clojure in clojure
Se riesco a caricare un filecome un elenco, posso modificare tale elenco e riprenderlo graziosamente nello stesso file che può essere quindi caricato di nuovo.
(Forse questa è una cattiva idea.) Qualcuno sa se questo è possibile?
Un esempio un po 'più semplice:
user=> (def a '(println (+ 1 1))) ; "'" escapes the form to prevent immediate evaluation
#'user/a
user=> (spit "test.code" a) ; write it to a file
nil
user=> (def from-file (read-string (slurp "test.code"))) ; read it from a file
#'user/from-file
user=> (def modified (clojure.walk/postwalk-replace {1 2} from-file)) ; modify the code
#'user/modified
user=> (spit "new.code" modified) ; write it back
nil
user=> (load-string (slurp "new.code")) ; check it worked!
4
nil
Dove slurp ti dà una stringa, read-string ti dà una forma non-valutato, e load-string ti dà il risultato della valutazione del modulo.
Non è una cattiva idea, è una delle principali proprietà di lisp, il codice è dati. puoi leggere il file clj come una lista usando read-string modificarlo e riscriverlo.
(ns tmp
(:require [clojure.zip :as zip])
(:use clojure.contrib.pprint))
(def some-var true)
;;stolen from http://nakkaya.com/2011/06/29/ferret-an-experimental-clojure-compiler/
(defn morph-form [tree pred f]
(loop [loc (zip/seq-zip tree)]
(if (zip/end? loc)
(zip/root loc)
(recur
(zip/next
(if (pred (zip/node loc))
(zip/replace loc (f (zip/node loc)))
loc))))))
(let [morphed (morph-form (read-string (str \((slurp "test.clj")\)))
#(or (= 'true %)
(= 'false %))
(fn [v] (if (= 'true v)
'false
'true)))]
(spit "test.clj"
(with-out-str
(doseq [f morphed]
(pprint f)))))
Questo si legge e commuta valori booleani e lo scrive di nuovo.
C'è una biblioteca chiamata riscrittura-clj che può questo tipo di cose.
Non è affatto una cattiva idea. Può essere usato per cose come l'analisi del codice e il rfactoring. – ivant