clojure 模式的验证

Question

我在验证 clojure 棱柱模式时遇到问题。这是代码。

:Some_Var1 {:Some_Var2  s/Str
                  :Some_Var3 ( s/conditional
                        #(= "mytype1" (:type %)) s/Str
                        #(= "mytype2" (:type %)) s/Str
                  )}

我正在尝试使用代码验证它：

"Some_Var1": {
    "Some_Var2": "string",
"Some_Var3": {"mytype1":{"type":"string"}}
  }

但它给我一个错误：

{
  "errors": {
    "Some_Var1": {
      "Some_Var3": "(not (some-matching-condition? a-clojure.lang.PersistentArrayMap))"
    }
  }
}

这是我要验证的非常基本的代码。我对clojure很陌生，仍在尝试学习它的基础知识。

谢谢，

Answer 1

欢迎使用 Clojure！这是一门很棒的语言。

在 Clojure 中，关键字和字符串是不同的类型，即 :type 与 "type" 不同。例如：

user=> (:type  {"type" "string"})
nil
(:type  {:type "string"})
"string"

但是，我认为这里有一个更深层次的问题：通过查看您的数据，您似乎想要在数据本身中编码类型信息，然后根据该信息检查它。这可能是可能的，但这将是模式的非常高级的用法。当类型在类型之前已知时，通常使用模式，例如像这样的数据：

(require '[schema.core :as s])
(def data
  {:first-name "Bob"
   :address {:state "WA"
             :city "Seattle"}})

(def my-schema
  {:first-name s/Str
   :address {:state s/Str
             :city s/Str}})

(s/validate my-schema data)

我建议，如果您需要基于编码的类型信息进行验证，那么为此编写一个自定义函数可能会更容易。

希望有帮助！

更新：

conditional 工作原理的一个示例，这是一个将验证的架构，但同样，这是架构的非惯用用法：

(s/validate
{:some-var3
(s/conditional
 ;; % is the value: {"mytype1" {"type" "string"}}
 ;; so if we want to check the "type", we need to first
 ;; access the "mytype1" key, then the "type" key
 #(= "string" (get-in % ["mytype1" "type"]))
 ;; if the above returns true, then the following schema will be used.
 ;; Here, I've just verified that
 ;; {"mytype1" {"type" "string"}}
 ;; is a map with key strings to any value, which isn't super useful
 {s/Str s/Any}
)}
{:some-var3 {"mytype1" {"type" "string"}}})

希望对你有帮助。