diff options
Diffstat (limited to 'src/clojure/contrib/test_contrib/mock_test.clj')
-rw-r--r-- | src/clojure/contrib/test_contrib/mock_test.clj | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/src/clojure/contrib/test_contrib/mock_test.clj b/src/clojure/contrib/test_contrib/mock_test.clj index d7fc9854..1737305e 100644 --- a/src/clojure/contrib/test_contrib/mock_test.clj +++ b/src/clojure/contrib/test_contrib/mock_test.clj @@ -3,14 +3,14 @@ (:require [clojure.contrib.mock :as mock])) ; Used as dummy dependency functions -(defn fn1 [x] :ignore) -(defn fn2 [x y] :ignore) -(defn fn3 ([x] :ignore) +(defn fn1 {:dynamic true} [x] :ignore) +(defn fn2 {:dynamic true} [x y] :ignore) +(defn fn3 {:dynamic true} ([x] :ignore) ([x y z] :ignore)) -(defn fn4 [x y & r] :ignore) +(defn fn4 {:dynamic true} [x y & r] :ignore) ;functions created using fn directly lack the argslist meta data -(def deffed-differently (fn [x] :ignore)) +(def #^{:dynamic true} deffed-differently (fn [x] :ignore)) (defmacro assert-called [fn-name called? & body] `(let [called-status?# (atom false)] |