T
вру!
А. Ну вот. Тогда без во-вторых
apply хороший кандидат, но нет версии без аргументовнадо в ask.clojure жалобу накатать...
Size: a a a
2020 January 30
ST
надо в ask.clojure жалобу накатать...
AC
Прикольный репл. Что это?
AR
ну тут смотри. функция без параметров — это сайд эффект исключительно. ее в принципе в map пихать антипаттерн вполне себе )
T
вроде нету 😞
сам мучаюсь
сам мучаюсь
Что странно. Что-то же вызывается при интерпретации list'а. Eval мб?
T
apply хороший кандидат, но нет версии без аргументовнадо в ask.clojure жалобу накатать...
Согласен
T
Прикольный репл. Что это?
cider в emacs
ST
Что странно. Что-то же вызывается при интерпретации list'а. Eval мб?
ifn invoke
T
ну тут смотри. функция без параметров — это сайд эффект исключительно. ее в принципе в map пихать антипаттерн вполне себе )
Параметры могли быть переданы раньше через partial, а вызов понадобился только сейчас
AC
А. Ну вот. Тогда без во-вторых
eval вроде
AR
Параметры могли быть переданы раньше через partial, а вызов понадобился только сейчас
оке! напиши такую функу, она простая )
ST
в коде коре вот такое
(defn pcalls
"Executes the no-arg fns in parallel, returning a lazy sequence of
their values"
{:added "1.0"
:static true}
[& fns] (pmap #(%) fns))
MB
(apply func []) работает
T
в коде коре вот такое
(defn pcalls
"Executes the no-arg fns in parallel, returning a lazy sequence of
their values"
{:added "1.0"
:static true}
[& fns] (pmap #(%) fns))
о, неплохо, попробую
MB
Хоть и не совсем то, что хочется(
T
о, неплохо, попробую
А, блин, там то же самое #(%)
T
(apply func []) работает
Да, действительно
ST
в коде коре вот такое
(defn pcalls
"Executes the no-arg fns in parallel, returning a lazy sequence of
their values"
{:added "1.0"
:static true}
[& fns] (pmap #(%) fns))
и вот такое
([p1 p2 p3 & ps]
(let [ps (list* p1 p2 p3 ps)]
(fn epn
([] true)
([x] (every? #(% x) ps))
([x y] (every? #(and (% x) (% y)) ps))
([x y z] (every? #(and (% x) (% y) (% z)) ps))
([x y z & args] (boolean (and (epn x y z)
(every? #(every? % args) ps)))))))
AC
Чем Эвал не угодил?
T
и вот такое
([p1 p2 p3 & ps]
(let [ps (list* p1 p2 p3 ps)]
(fn epn
([] true)
([x] (every? #(% x) ps))
([x y] (every? #(and (% x) (% y)) ps))
([x y z] (every? #(and (% x) (% y) (% z)) ps))
([x y z & args] (boolean (and (epn x y z)
(every? #(every? % args) ps)))))))
А это что?