“any?”函数的行为是否正确？

Question

Clojure 的 any? 函数似乎总是返回 true。
(defn any? "返回任何自变量时的 true。" {:tag Boolean :added "1.9"} [x] true)

与 not-any? 对比。
(def ^{:tag Boolean :doc "如果 coll 中的任何 x 满足 (pred x) 为逻辑真，则返回 false，否则返回 true。" :arglists '([pred coll]) :added "1.0"} not-any? (comp not some))

我认为 any? 应该接受两个参数，并在任一谓词为真时返回 true。
(def ^{:tag Boolean :doc "如果 coll 中的任何 x 满足 (pred x) 为逻辑真，则返回 true，否则返回 false。" :arglists '([pred coll]) :added "1.9"} any? (comp boolean some))
感谢 ClojureDocs 上的 Kofrasa。

以下是一些要运行的测试

`
(ns user
(:require [clojure.test :refer [are deftest]]

        [clojure.test.check.clojure-test :refer [defspec]]
        [clojure.test.check.generators :as gen]
        [clojure.test.check.properties :as prop])

(:refer-clojure :exclude [any?]))

(deftest clojure-any
(are [x y] (= ((comp boolean some) true? x) (clojure.core/any? y))

[true] true
[false] false ;; this fails
[true true] true
[false true] true
[false false] false ;; so does this
))

(def
^{:tag Boolean
:doc "如果 coll 中的任何 x 满足 (pred x) 为逻辑真，则返回 true，否则返回 false。"
else false."
:arglists '([pred coll])
:added "1.9"}
any? (comp boolean some))

(defspec correct-any 1000
(prop/for-all [v (gen/such-that not-empty (gen/vector gen/boolean))]

            (= ((comp boolean some) true? v)
               (any? true? v)
               (not (not-any? true? v)))))

`

对于格式错乱表示歉意。
https://gist.github.com/wildwestrom/9568e9c659d30a2a663a9a0a8235a6b9

Answer 1

any? 是一个谓词，它被设计成总是返回 true，所以是的，这是正确的行为。any? 被添加为谓词，用于在任意值都有效的情况下与 spec 一起使用。它并不是 not-any? 的补充，尽管这种假设很直观。最终，词汇是有限的，尽管在这方面投入了大量注意力，但这些混淆仍然存在。

关于“我相信 any? 应该接受两个参数，如果任何谓词为 true 就返回 true”的讨论，这类似于 and（对于 N 个参数）但该宏确实有限制，或者 every?（对于集合），或者用于创建复合谓词的高阶函数 every-pred。根据你的情况，这些中的任何一个可能是合理的。

Comments

明白了，我应该将这个解释转发给 ClojureDocs 吗？

---

如果喜欢的话！

---

非常感谢！

---

没有任何合格的语言标准委员会会接受一个将 `any?` 定义为不等于 `(complement not-any?)` 的定义。这是对 Clojure 悲惨的管理状态的窥视：自 Smalltalk 以来最容易被搞砸的语言，如果不是永远的话。

---

Chastie，听起来你从没在语言标准委员会工作过，是吗？我在ANSI C++委员会工作了八年（并且担任了三年的秘书）。标准委员会必须接受各种妥协，正如Alex所说，某些结构的可用词汇有限。