(defn test-function-metadata
[desc forms]
(merge {:circumspec/test true
:circumspec/name (str desc)
:circumspec/context '(concat [(.name *ns*)] circumspec.context/*context*)}
(if (empty? forms)
{:circumspec/pending true}
{})))
Comments top
No comments for test-function-metadata. Log in to add a comment.