     standard-describe-mismatch))
 
 (defn instance?
-  "passes if the value matches the given class
+  "passes if the value matches the class given as a matcher argument
+
   (matcha/run-match (matcha/instance? clojure.lang.Keyword) :foo) ; => passes
-  (matcha/run-match (matcha/instance? clojure.lang.Keyword) 1) ; => fails"
+  (matcha/run-match (matcha/instance? clojure.lang.Keyword) 1)    ; => fails"
   [klazz]
   (make-record-matcher
     #(core/instance? klazz %)

  "passes if every element of the sequence received matches the matcher

  (matcha/run-match (matcha/every? (matcha/= 1)) [1]) ; => passes
  (matcha/run-match (matcha/every? (matcha/= 1)) [2]) ; => fails"
  [m]
  (make-record-matcher

(def empty?
  "matches if the collection passed is empty

  (matcha/run-match matcha/empty? [])  ; => passes
  (matcha/run-match matcha/empty? [1]) ; => fails"
  (make-record-matcher
    core/empty?
    "an empty collection"))
