Question

很多时候，当我尝试编写一些函数时，我会遇到异常。这很正常。在Java中，您可以找到异常发生的地点和原因，但在clojure异常文本中只会让我发疯。是否有一些提示如何读取clojure中的异常以及如何查找代码异常发生的位置以及原因？

例如，我将采用一些代码：

(do
 (list?)
 (list? [])
 (list? '(1 2 3))
 (list? (defn f [] (do ())))
 (list? "a"))

当我在REPL中调用此函数时，我会得到

java.lang.IllegalArgumentException: Wrong number of args (0) passed to: core$list-QMARK- (NO_SOURCE_FILE:46)

这对我在第二行找到问题没有多大帮助。在更复杂的代码中，它几乎不会提供任何信息。（当然它告诉我看一下列表？有些参数错误。）我尝试在REPL中编写代码是不对的？如何在REPL中读取异常消息？有没有办法如何在REPL中获得有关异常的更好信息？

Answer 1

您可以使用clojure.stacktrace：http://richhickey.github.com/clojure/clojure.stacktrace-api.html

用法：

(use 'clojure.stacktrace)
(/ 1 0)
(e)

输出：

java.lang.ArithmeticException: Divide by zero
 at clojure.lang.Numbers.divide (Numbers.java:156)
    clojure.lang.Numbers.divide (Numbers.java:3691)
    user$eval954.invoke (NO_SOURCE_FILE:1)
    clojure.lang.Compiler.eval (Compiler.java:6511)
    clojure.lang.Compiler.eval (Compiler.java:6477)
    clojure.core$eval.invoke (core.clj:2797)
    clojure.main$repl$read_eval_print__6405.invoke (main.clj:245)
    clojure.main$repl$fn__6410.invoke (main.clj:266)
nil

Answer 2

获取org.clojure/tools.trace。

user=> (use 'clojure.tools.trace)

让我们尝试一下dotrace（更改顺序以使事情变得更有趣）：

user=> (dotrace [list?]
  #_=> (do
  #_=>  (list? [])
  #_=>  (list? '(1 2 3))
  #_=>  (list?)
  #_=>  (list? (defn f [] (do ())))
  #_=>  (list? "a"))
  #_=> )
IllegalStateException Can't dynamically bind non-dynamic var: clojure.core/list?
  clojure.lang.Var.pushThreadBindings (Var.java:353)

嗯...

user=> (.setDynamic #'list?)
#'clojure.core/list?

让我们再试一次：

user=> (dotrace [list?]
  #_=>   (do
  #_=>   (list? [])
  #_=>   (list? '(1 2 3))
  #_=>   (list?)
  #_=>   (list? (defn f [] (do ())))
  #_=>   (list? "a")))
TRACE t1216: (list? [])
TRACE t1216: => false
TRACE t1217: (list? (1 2 3))
TRACE t1217: => true
TRACE t1218: (list?)
ArityException Wrong number of args (0) passed to: core$list-QMARK-  
  clojure.lang.AFn.throwArity (AFn.java:437)

啊哈！在例外之前将其发送到(list?)。

如何阅读REPL中的clojure异常？

2 个答案: