Can't they just be:

(defn remove-method
   "Removes the method of multimethod associated        with dispatch-value."
  [multifn dispatch-val]
  (. multifn removeMethod dispatch-val))

(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))


--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google Groups 
"Clojure" group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to [EMAIL PROTECTED]
For more options, visit this group at 
http://groups.google.com/group/clojure?hl=en
-~----------~----~----~----~------~----~------~--~---

Reply via email to