（def + - ）の後、減算の代わりに+演算子を追加する方法はありますか？

Question

私はClojureを学んでいます。私は、Pythonに比べて異様な何かができるかどうかを確認するには、私がやった：

驚くほど働いた

> (+ 2 2) 
4 
> (def + -) 
#'sandbox6693/+ 
> (+ 2 2) 
0 

、しかし、私は上記の定義の後に再び追加する+取得する方法を見つけ出すことはできません。そうする方法はありますか？

Answer 1

clojure.coreファンクション+を削除していないと思われます。ちょうどシャドウイング名前空間にあります。

あなたは、名前空間を含め、それを参照することにより、clojure.coreで機能する+をredeffingことにより、それを取り戻すことができます。

user=> (def + -) 
#'user/+ 
user=> (+ 2 2) 
0 
user=> (def + clojure.core/+) 
#'user/+ 
user=> (+ 2 2) 
4 

しかし....なぜ？

Answer 2

@Russellは、clojure.core/+をシャドウするだけでuser/+としています。

は、私はClojureので実験のために何をするのか、（、混乱をしないようにもう一度+とコア+をシャドーイングが、結合範囲内で変更を維持する）だけで、いくつかのローカルな束縛を確立することである。

user> (let [+ -] 
     (+ 1 2 3)) 
-4 

user> (+ 1 2 3) 
6 

しかし、あなたがやりたいために特別な方法がある一般的に （、varの値を変更varが変更された範囲内のいくつかのコードを実行した後、自動的にそれが価値だ復元する）：

最初の1 binding（https://clojuredocs.org/clojure.core/binding）問題を使用することです、+はダイナミック

ではないので、それは、あなたのケースでは本当に二番目の適用はありませんので、それだけで、特別なdynamic VARSの作品であるwith-redefs（https://clojuredocs.org/clojure.core/with-redefs）を使用することですあなたが必要なものに近いですが、1がありますそこに問題：

user> (with-redefs [+ -] 
     (+ 1)) 
-1 ;; as expected 

user> (with-redefs [+ -] 
     (+ 1 2 3)) 
6 ;; unexpected! 

2番目の例では、失敗し、コンパイラのインラインため+機能は、複数の引数があり、それに渡され、いくつかの純粋educatため、

も）add関数呼び出しに置き換えられている場合あなたは、一般的に古い値を保存し、必要なすべてのものを再定義し、ブロック評価の後にそれを復元しますマクロを作ることができますional目的：

user> (defmacro redefine [old new & body] 
     `(let [v# ~old] 
      (def ~old ~new) 
      (let [res# (do ~@body)] 
      (def ~old v#) 
      res#))) 
#'user/redefine 

user> (redefine 
     + - 
     (+ 1 2 3)) 
-4 

user> (+ 1 2 3) 
6 

user> #'+ 
#'user/+ 

user> (redefine 
     + * 
     (+ 1 2 4)) 
8 

user> (redefine 
     + * 
     (+ 1 2 4)) 
8 

user> (+ 1 2 4) 
7