Changes for clojure.contrib.mock/expect

Konrad Garus on Sat, 12 Feb 2011
(defn square [x] (* x x))

(defn square-of-sum [x y] (square (+ x y)))

(deftest test-square-of-sum
  (expect [square (has-args [3] (times 1))]
    (square-of-sum 2 1)))
Konrad Garus on Sat, 12 Feb 2011
(defn square [x] (* x x))

(defn square-of-sum [x y] (square (+ x y)))

(deftest test-square-times-two
  (expect [square (has-args [3] (times 1))]
    (square-of-sum 2 1)))