         (assert (= '[x y] (:locals m)))))))
 
 ;; description
-(let [d (description (= 1 1))]
+(let [d (description (group-examples (= 1 1)))]
   (assert (group? d))
   (assert (empty? (:contexts d)))
   (let [exs (:examples d)]


(let [c1 (com.stuartsierra.lazytest.contexts/context [] 1)
      c2 (com.stuartsierra.lazytest.contexts/context [] 2)
      g (group [x c1 y c2] (group-examples (= 1 x) "foo" (= y 2)) [])]
  (assert (group? g))
  (assert (= [c1 c2] (:contexts g)))
  (let [exs (:examples g)]


(let [c1 (com.stuartsierra.lazytest.contexts/context [] 1)
      c2 (com.stuartsierra.lazytest.contexts/context [] 2)
      g (description :using [x c1 y c2] (group-examples (= 1 x) "foo" (= y 2)))]
  (assert (group? g))
  (assert (= [c1 c2] (:contexts g)))
  (let [exs (:examples g)]
