Fork me on GitHub
#clojure-russia
<
2017-10-29
>
y.khmelevskii16:10:43

приветствую! подскажите как мне сделать следующее: есть рабочий код

(defn mycomp
  [& hocs]
  (apply comp (map #(partial apply %) (reverse hocs))))

(def hoc
  (partial mycomp
           hoc-foo
           hoc-bar
           hoc-xyz))

(def result (hoc component))
мне нужно что бы не было partial в def hoc. То есть hoc должен выглядеть так:
(def hoc
    (mycomp
        hoc-foo
        hoc-bar
        hoc-xyz))
как мне модифицировать тогда функцию mycomp?

igrishaev18:10:15

@y.khmelevskii вот так вроде без паршала

(defn hoc [& hocs]
  (apply mycomp hoc-foo hoc-bar hoc-xyz hocs))

igrishaev18:10:29

хотя может не так понял

y.khmelevskii18:10:37

вроде не то. hoc я показал какой я хочу, мне именно нужно модифицировать мою функцию mycomp, но я пока не могу понять как это сделать