MK
есть идеи как это может называться?
(keep identity [nil nil 1 2 3])Size: a a a
2019 August 27
OR
OR
Это будет lazy
ST
user=> (some identity [nil nil 1 2 3])
1
(some identity [nil false 1 2 3])
ему нужен результат false, а не 1
ему нужен результат false, а не 1
OR
Ну, тогда нужно предикат поменять
OR
Но как по мне, так пахнет дрочкой вприсядку
ST
Ну, тогда нужно предикат поменять
не,
some не прокатывает, так как оно про first _logical_ trueOR
Ну, да, учитывая дополнения на ходу, не подойдёт
OR
user=> (keep identity [nil nil false 1 2 3])
(false 1 2 3)
user=> (type (keep identity [nil nil false 1 2 3]))
clojure.lang.LazySeq
MK
ладно, спасибо
а то вопрос пошел жить своей жизнью
а то вопрос пошел жить своей жизнью
MK
а кто-нибудь пользуется макросом
<<- ?ST
есть идеи как это может называться?
назови, как тебе нравится
твой же макрос
твой же макрос
ST
ну понятно, что тут можно что-то подправить
да просто взять оригинальный
or и подправитьDF
как назвать то, что похоже на дрочку в присядку
ST
а кто-нибудь пользуется макросом
<<- ?что это за макрос?
MK
что это за макрос?
(defmacro <<- [& body]
`(->> ~@(reverse body)))
ST
назови, как тебе нравится
твой же макрос
твой же макрос
но выглядит как
or-some (Осама)MK
убирает лесенку
(u/<<-
(or (!already-logged-in session))
(or (!has-additional-messages msgs))
(let [user (->user msgs password->digest)])
(or (!has-validation-errors user))
(let [user (fill-id user new-user-ids)
id (-> user agg/root :agg/id)])
{:set-session (assoc session :current-user-id id)
:persist [user]
:reaction {:type :show-screen
:name :main}}))
ST
(defmacro <<- [& body]
`(->> ~@(reverse body)))
из какого неймспейса?
AG
какую лесенку?