Question

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

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

在ClojureDocs中，one example's comment表示它在堆栈跟踪中很有用。可以举个例子吗？

Answer 1

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

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

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

除了在堆栈跟踪中有用之外，我想你可以在需要匿名函数递归时使用它，因为它可以调用自己。

例如：

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

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

Answer 3

命名匿名函数在引用自己时也很有用，也可以通过名字打印：

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)

Clojure：命名匿名函数

3 个答案: