Skip to content

Instantly share code, notes, and snippets.

@SevereOverfl0w
SevereOverfl0w / new.clj
Created September 27, 2019 23:19 — forked from eraserhd/new.clj
Another win for meander
(defn- schema->type
[schema]
(let [types (concat
(m/search schema
{"format" "date-time"} :db.type/instant
{"format" "uri"} :db.type/uri
{"type" "array"} '(Array nil)
{"type" "boolean"} :db.type/boolean
{"type" "integer"} :db.type/long
{"type" "string"} :db.type/string
@SevereOverfl0w
SevereOverfl0w / new.clj
Created September 27, 2019 23:19 — forked from eraserhd/new.clj
Another win for meander
(defn- schema->type
[schema]
(let [types (concat
(m/search schema
{"format" "date-time"} :db.type/instant
{"format" "uri"} :db.type/uri
{"type" "array"} '(Array nil)
{"type" "boolean"} :db.type/boolean
{"type" "integer"} :db.type/long
{"type" "string"} :db.type/string