clojure - 具有最小和最大限制的架构？

Question

是否可以向以下架构添加最小和最大限制？

我希望架构在 Number 为 < 0 且 > 100 时抛出异常。

(def Number
  schema/Int)

Answer 1

您可以使用schema/pred来合并任意谓词:

(schema/pred #(<= 0 % 100))

您还可以使用 schema/constrained 将其与架构结合起来:

(schema/constrained schema/Int #(<= 0 % 100))

如果您命名谓词(例如 in-range)，您会收到更好的错误消息。