diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/clj/clojure/core.clj | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/clj/clojure/core.clj b/src/clj/clojure/core.clj index b896754c..8823304e 100644 --- a/src/clj/clojure/core.clj +++ b/src/clj/clojure/core.clj @@ -995,15 +995,15 @@ [multifn dispatch-val & fn-tail] `(. ~multifn addMethod ~dispatch-val (fn ~@fn-tail))) -(defmacro remove-method +(defn remove-method "Removes the method of multimethod associated with dispatch-value." [multifn dispatch-val] - `(. ~multifn removeMethod ~dispatch-val)) + (. multifn removeMethod dispatch-val)) -(defmacro prefer-method +(defn prefer-method "Causes the multimethod to prefer matches of dispatch-val-x over dispatch-val-y when there is a conflict" [multifn dispatch-val-x dispatch-val-y] - `(. ~multifn preferMethod ~dispatch-val-x ~dispatch-val-y)) + (. multifn preferMethod dispatch-val-x dispatch-val-y)) ;;;;;;;;; var stuff |