Jak łańcuchować wiele funkcji?

Question

Próbuję łańcucha kilka funkcji w Clojure:

(f4 (f3 (f2 (f1 foo)))) 

Czy istnieje wygodny cukier składnię tego? Coś jak:

(with-all-of-them foo f1 f2 f3 f4) 

Answer 1

Zastosowanie -> makro.

(-> foo f1 f2 f3 f4) 

Albo reduce:

(reduce #(%2 %1) foo [f1 f2 f3 f4]) 

Answer 2

Jest threading macro ->:

(-> foo f1 f2 f3 f4) 

Answer 3

Właściwie Twój opis with-all-of-them jest bardzo blisko comp, z wyjątkiem tego comp zwraca funkcję, należy zadzwonić pod:

(f4 (f3 (f2 (f1 foo)))) == ((comp f4 f3 f2 f1) foo)

Tak, with-all-of-them może być im plementowane w następujący sposób:

(defn with-all-of-them [arg & fs] 
    ((apply comp fs) arg))