Problema di valutazione pigro

Question

Ho un codice come questo. Posso eseguire questo in repl ma non posso dalla riga di comando. Credo di avere un problema di valutazione pigro.

; items.clj 

(def items (ref [])) 

(defn init-items [] 
    (map 
    #(dosync 
     (alter items conj %)) 
    ["foo" "bar" "baz" ])) 

(init-items) 
(println (first @items)) 

$ java -jar clojure.jar items.clj 
$ nil 

saluti.

Answer 1

Trovato!

solution

Clojure non è motivato per eseguire la funzione map in init-items perché non c'è alcun risultato restituito. L'ho avvolto in un doall per forzare l'esecuzione, e presto.

Answer 2

Alcune alternative:

Se si desidera aggiungere un po 'di elementi a una raccolta tenuto in un Ref, a partire da una transazione per articolo e conj ing separatamente è un po' uno spreco. Invece, si potrebbe fare

(defn init-items [] 
    (dosync (alter items into ["foo" "bar" "baz"]))) 

Se si ha qualche ragione per farlo in un modo unico elemento-per-passo, penso che l'approccio più idiomatica e conveniente sarebbe attualmente quella di utilizzare doseq:

(defn init-items [] 
    (doseq [item ["foo" "bar" "baz"]] 
    (dosync (alter items conj item)))) 

(Oppure si potrebbe spostare avvolgere l'intero doseq in un dosync e non utilizzare dosync nel corpo 's la doseq.)