diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/clj/clojure/boot.clj | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/clj/clojure/boot.clj b/src/clj/clojure/boot.clj index f721ec33..0abcc356 100644 --- a/src/clj/clojure/boot.clj +++ b/src/clj/clojure/boot.clj @@ -977,7 +977,8 @@ is :default." ([name dispatch-fn] `(defmulti ~name ~dispatch-fn :default)) ([name dispatch-fn default-val] - `(def ~(with-meta name {:tag 'clojure.lang.MultiFn}) (new clojure.lang.MultiFn ~dispatch-fn ~default-val)))) + `(def ~(with-meta name (assoc ^name :tag 'clojure.lang.MultiFn)) + (new clojure.lang.MultiFn ~dispatch-fn ~default-val)))) (defmacro defmethod "Creates and installs a new method of multimethod associated with dispatch-value. " |