clojure - forma correcta de anular localmente operadores como "+", "*", etc.

Question

¿Cuál es la forma correcta de anular un método como "+"? En este momento tengo

(defn- + [x y] (replacement x y)) 

pero esto ocasiona advertencias en la línea de comandos.

WARNING: + already refers to: #'clojure.core/+ in namespace: <MY-NAMESPACE>, being replaced by #'<MY-NAMESPACE>/+ 

Answer 1

necesita excluir las funciones que se importan por el núcleo:

(ns your-ns 
    (:refer-clojure :exclude [+ ...])) 

(defn + ...) 

Answer 2

¿Estás seguro de que quieres hacer esto? En caso afirmativo, podría usar defprotocol para especificar qué operadores desea sobrescribir y extender las clases para las cuales desea que se implementen estas modificaciones. Para un ejemplo (artificial) ver mi answer to this question.

Answer 3

Aunque no recomiendo anulando funciones básicas como +, se puede usar o dejar de unión para esto, depende de lo que el comportamiento que desea:

(let [+ -] (redu­ce + [1 2 3])) ; -4 
(defn my-pl­us [x] (redu­ce + x)) 
(let [+ -] (my-p­lus [1 2 3])) ;6 
(binding [+ -] (my-p­lus [1 2 3])); -4 

igual se ha dicho en los comentarios a continuación, el enlace ya no funciona así desde clojure 1.3, ya que la var debe ser dinámica y +, -, etc. no lo son.

Para fines de prueba/burla, sin embargo, podría obtener un comportamiento similar. En ese caso, mira con-REDEFS (desde clojure 1.3): http://clojuredocs.org/clojure_core/clojure.core/with-redefs

Véase también: Let vs. Binding in Clojure

Answer 4

también puede anular incorporado en la aritmética utilizando interfaces genéricas de contrib, ver lo siguiente para un ejemplo sencillo,

http://nakkaya.com/2010/08/02/using-clojure-contrib-generic-interfaces/