Clojure：命名匿名函数

Question

在Clojure中，何时以及为什么要使用命名匿名函数？例如，

((fn add-five [x] (+ x 5)) 3)) 

在ClojureDocs，one example's comment说，这是在堆栈跟踪有用。能举一个例子吗？当他们把自己

Answer 1

有两个原因来命名匿名函数（或者，我已经至少有两个原因这样做）。首先是给它一个名字告诉后面的读者（也许你自己在6个月后），匿名函数应该做什么。

第二个是（正如你所提到的）在堆栈跟踪中有更好的信息，以便在发生故障时将代码指向代码中的正确位置。函数被编译成类，并且类名包括函数名称的（消失）版本。当你有一个堆栈跟踪时，它将包含该类名称，并因此指出你的语义朝向正确的位置。

user=> (filter (fn [x] (/ 100 x)) [100 50 0]) 
ArithmeticException Divide by zero clojure.lang.Numbers.divide (Numbers.java:158) 
user=> (pst *e) 
ArithmeticException Divide by zero 
    clojure.lang.Numbers.divide (Numbers.java:158) 
    clojure.lang.Numbers.divide (Numbers.java:3784) 
    user/eval8/fn--9 (NO_SOURCE_FILE:3) 
    clojure.core/filter/fn--6908 (core.clj:2790) 
    ... 
nil 

user=> (filter (fn hundred-div [x] (/ 100 x)) [100 50 0]) 
ArithmeticException Divide by zero clojure.lang.Numbers.divide (Numbers.java:158) 
user=> (pst *e) 
ArithmeticException Divide by zero 
    clojure.lang.Numbers.divide (Numbers.java:158) 
    clojure.lang.Numbers.divide (Numbers.java:3784) 
    user/eval14/hundred-div--15 (NO_SOURCE_FILE:5)  ;; <--- 
    clojure.core/filter/fn--6908 (core.clj:2790) 
    ... 

Answer 2

命名匿名函数可能是有用的，并且也通过被印有他们的名字：

user=> ((fn [] (throw (Exception. "unnamed")))) 

Exception unnamed user/eval805/fn--806 (NO_SOURCE_FILE:1) 
user=> ((fn myfn [] (throw (Exception. "named")))) 

Exception named user/eval809/myfn--810 (NO_SOURCE_FILE:1) 

Answer 3

除了是踪迹有用，我想，当你需要一个匿名函数是递归的，你可以使用它，因为这将能够调用自身。

例如：

(fn factorial[n] 
    (if (<= n 1) 
    1 
    (* n (factorial (- n 1))))) 

虽然递归这样在Clojure是有点危险，因为这有可能导致堆栈溢出。