使用默认比较器排序的集合不检查第一个元素是否为 Comparable

Question

与 CLJ-2089 类似，但针对 ClojureScript。

以 ClojureScript重现

`
$ clj -m cljs.main
ClojureScript 1.10.339
cljs.user=> (def s (sorted-set #{1}))

'cljs.user/s

cljs.user=> (conj s #{2})
错误：无法比较 #{2} 和 #{1}

 cljs$core$compare (cljs/core.cljs:2380:13)
 cljs.core/tree-map-add (cljs/core.cljs:28176:3)
 cljs$core$IAssociative$_assoc$arity$3 (cljs/core.cljs:8734:18)
 cljs.core/-assoc (cljs/core.cljs:630:17)
 cljs$core$IFn$_invoke$arity$3 (cljs/core.cljs:1968:8)
 cljs$core$ICollection$_conj$arity$2 (cljs/core.cljs:9231:31)
 cljs.core/-conj (cljs/core.cljs:583:16)
 cljs$core$IFn$_invoke$arity$2 (cljs/core.cljs:1781:8)
 cljs$core$conj (cljs/core.cljs:1773:1)

`

如果可行，此问题请求ClojureScript与 CLJ-2089（特别是创建如 1. 代码）中的解决方案相一致（失败快速）。

Answer 1

参考文献：https://clojure.atlassian.net/browse/CLJS-2795（由mfikes报告）