排序映射在失败的键查找时抛出异常

Question

user=> (def m (sorted-map 1 2))
#'user/m
user=> (map? m)
true
user=> (get m :type)
ClassCastException java.lang.Long cannot be cast to clojure.lang.Keyword
  clojure.lang.Keyword.compareTo (Keyword.java:114)

sorted-map 似乎选择了数值比较功能，不会与关键字进行比较。

最好推理一下，“这个东西支持 IPersistentMap。所以，我可以在它上面调用get 以查明它是否是我知道的一种地图，而不会有抛出异常的风险。” get 的文档字符串表示“如果键不存在，则返回映射到键、未找到或 nil 的值。”

在键查找时抛出异常是一个错误吗？更重要的是，是否有一种安全、标准的方法来检查任意对象是否属于给定的“类型”（由与其:type 键关联的值定义）？

Answer 1

sorted-map 的键在某种程度上应该具有可比性似乎是合理的，1 和 :type 的情况并非如此，这就是您的异常的原因。

话虽如此，我认为您应该能够使用任何类型的键查询映射并在提供的键和映射中的键不可比较的情况下获得 nil。

您可以通过sorted-map-by 提供您自己的比较器来解决问题，该比较器执行所需的类型检查。

Answer 2

这是一个发人深省的问题，我很高兴你提出这个问题。经过深思熟虑，我倾向于期望与另一个答案中提到的相同 - 我可能希望返回 nil，但也许 Rich 有这样做的哲学原因。

至于你问题的最后一部分：你可以使用type。如果您想测试已知类型，也可以使用instance?。我想诀窍是类型（我几乎总是相信）将成为底层 Java 类

user=> (type foo)
clojure.lang.PersistentTreeMap

user=> (instance? clojure.lang.PersistentTreeMap foo)
true

编辑： 根据下面的讨论，我在这里放了一些额外的示例代码（比 cmets 更容易阅读）。这将允许将任意元数据附加到数据结构：

user=> (def foo (sorted-map 1 2))
#'user/foo
user=> (def foo-enhanced (with-meta foo {:type :integer-keys}))
#'user/foo-enhanced
user=> foo-enhanced
{1 2}
user=> (meta foo-enhanced)
{:type :integer-keys}