clojure.spec conform 抛出栈溢出异常

Question

任何人都可以解释一下，下面的例子有什么问题吗？为什么会抛出 WhosebugError 异常？

(s/def ::tag keyword?)
(s/def ::s string?)
(s/def ::n number?)
(s/def ::g
  (s/cat :tag (s/? ::tag)
         :ex (s/alt :string ::s
                   :number ::n
                   :and (s/+ ::g)
                   )))


(s/conform ::g '["abc"])

Answer 1

与 Alex Miller 在 this Google Groups discussion 中指出的类似，s/+ 试图在定义期间解析 ::g。

这应该做你想要的，我认为：

(s/def ::g
       (s/spec (s/cat :tag (s/? ::tag)
                      :ex (s/alt :string ::s
                                 :number ::n
                                 :and ::g))))

; REPL
user=> (s/conform ::g [:foo [:bar "abc"]])
{:ex [:and {:ex [:string "abc"] :tag :bar}] :tag :foo}

clojure.spec conform 抛出栈溢出异常

clojure.spec conform throws stack overflow exception

clojure

clojure.spec