Skip to content

Instantly share code, notes, and snippets.

@rightfold

rightfold/.clj Secret

Created October 26, 2015 12:29
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save rightfold/9665515fd718c65a60d8 to your computer and use it in GitHub Desktop.
Save rightfold/9665515fd718c65a60d8 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
.clj
(defmacro ^:private check [n prop]
`(let [result# (tc/quick-check ~n ~prop)]
(if (:result result#)
(is true)
(is (= {:result true} result#)))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment