Clojure:命名匿名函数
问题描述:
在Clojure中,何时以及为什么要使用命名匿名函数?例如,Clojure:命名匿名函数
((fn add-five [x] (+ x 5)) 3))
在ClojureDocs,one example's comment说,这是在堆栈跟踪有用。能举一个例子吗?当他们把自己
答
有两个原因来命名匿名函数(或者,我已经至少有两个原因这样做)。首先是给它一个名字告诉后面的读者(也许你自己在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)
...
答
命名匿名函数可能是有用的,并且也通过被印有他们的名字:
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)
答
除了是踪迹有用,我想,当你需要一个匿名函数是递归的,你可以使用它,因为这将能够调用自身。
例如:
(fn factorial[n]
(if (<= n 1)
1
(* n (factorial (- n 1)))))
虽然递归这样在Clojure是有点危险,因为这有可能导致堆栈溢出。