Let's say I have these definitions for a "job" record I'm managing, perhaps
in a database.
(s/def ::job-status #{:in-progress :completed})
(s/def ::user-id (s/and integer? #(>= % 0)))
(s/def ::job-id integer?)
(s/def ::coercible-job-type (s/and named? #(not (empty? (name %)))))
(s/def ::job-type (s/and string? #(not (empty? %))))
So we have a job status which can be any of a limited set of keywords,
integer user and job ID's.
Then there's job type and my issue. Depending on the context I want either
to insist that job type will be purely a non-empty string, or that it may
also be a 'named?' object,
i.e. something for which the clojure.core/name function will work.
If I'm just returning a pure job record, my definition would look like this:
(s/def ::job-record
(s/keys :req-un [::job-id ::user-id ::job-type ::job-status]))
So a map with all those keys and type definitions. And that's great. I
define functions that return these
maps and so there's an (s/fdef ... :ret ::job-record).
Now let's say I have an update! function that can take a map of optional
fields and update the record in the database with the fields that were
specified.
(s/def ::field-options (s/keys :opt-un [::job-id ::user-id ::job-type
::job-status]))
(s/fdef update! :args (s/cat ::field-map ::field-options) ...)
(defn update! [field-map] ... (:job-type field-map) ...)
So far, so good. I have a parameter 'field-map' that can take optional map
keys, validate map arguments if the testing instrumentation is enabled, etc.
Here is my problem. There appears to be no way for me to define, in this
namespace, map specs with a :job-type key, but that will have
:coercible-job-type semantics,
for my update! function. Or at least I don't see an easy way short of
writing a function to do everything that the existing machinery is doing
with respect to key and value validation,
which is a lot of work to handle this tiny thing, basically the ability to
have map keys and spec semantics bound to different names in s/keys specs.
For example, the following pseudo-spec might let me define a map key
:job-type whose semantics were specified by the ::coercible-job-type
definition.
Or inlining of definitions which the spec guide says was omitted on purpose.
(s/def ::field-map (s/keys :opt-un [... [::coercible-job-type :as ::job-type
]]))
I want the map key to be ":job-type", but the clojure.spec semantics for
that field, *in selective module definitions*, to have ::coercible-job-type
behavior.
So... am I missing something?
--
You received this message because you are subscribed to the Google
Groups "Clojure" group.
To post to this group, send email to clojure@googlegroups.com
Note that posts from new members are moderated - please be patient with your
first post.
To unsubscribe from this group, send email to
clojure+unsubscr...@googlegroups.com
For more options, visit this group at
http://groups.google.com/group/clojure?hl=en
---
You received this message because you are subscribed to the Google Groups
"Clojure" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to clojure+unsubscr...@googlegroups.com.
For more options, visit https://groups.google.com/d/optout.
