Wie mehrere Funktionen verketten?

Question

Ich versuche, ein paar Funktionen in Clojure der Kette:

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

Gibt es eine bequeme Syntax Zucker für das? Etwas wie:

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

Answer 1

Verwenden -> Makro.

(-> foo f1 f2 f3 f4) 

Oder reduce:

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

Answer 2

Es gibt eine threading macro ->:

(-> foo f1 f2 f3 f4) 

Answer 3

Eigentlich Ihre Beschreibung von with-all-of-them-comp ganz in der Nähe ist, außer dass comp gibt eine Funktion, die Sie selbst nennen müssen:

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

Also, with-all-of-them könnte im sein plementiert wie folgt:

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