在clojure.test deftest期间发生异常时，错误会通过具有:error键的clojure.test/report传递，这将会（默认情况下）打印整个调用栈。调用栈包括测试框架本身，以及（如果通过诸如lein test、clojure.main等的测试运行器调用），导致调用栈深度为约60个调用栈帧，这些都是无关紧要的噪声。
有一个动态变量clojure.test/stack-trace-depth默认为nil（全部）。这个动态变量可以在调用clojure.test运行程序周围进行绑定，以便在测试期间发生异常时查看更少的调用栈，但这既难以设置，也存在错误。
最好是从调用栈底部过滤框架噪声，并仅显示相关帧。
给定一个测试，例如
(ns foo.core-test
(:require [clojure.test :refer :all]))
(deftest a-test
(testing "FIXME, I fail."
(throw (ex-info "I suck" {:a 1}))
(is (= 0 1))))
报告的错误（这里来自lein test，但所有外部运行器都是类似的），只有前两行相关，其余都是无关的噪声
ERROR in (a-test) (core_test.clj:13)
Uncaught exception, not in assertion.
expected: nil
actual: clojure.lang.ExceptionInfo: I suck
{:a 1}
at foo.core_test$fn__364.invokeStatic (core_test.clj:13)
foo.core_test/fn (core_test.clj:11)
clojure.test$test_var$fn__9737.invoke (test.clj:717) ;; noise from here down
clojure.test$test_var.invokeStatic (test.clj:717)
clojure.test$test_var.invoke (test.clj:708)
clojure.test$test_vars$fn__9763$fn__9768.invoke (test.clj:735)
clojure.test$default_fixture.invokeStatic (test.clj:687)
clojure.test$default_fixture.invoke (test.clj:683)
clojure.test$test_vars$fn__9763.invoke (test.clj:735)
clojure.test$default_fixture.invokeStatic (test.clj:687)
clojure.test$default_fixture.invoke (test.clj:683)
clojure.test$test_vars.invokeStatic (test.clj:731)
clojure.test$test_all_vars.invokeStatic (test.clj:737)
clojure.test$test_ns.invokeStatic (test.clj:758)
clojure.test$test_ns.invoke (test.clj:743)
user$eval224$fn__287.invoke (form-init4292042596091073068.clj:1)
clojure.lang.AFn.applyToHelper (AFn.java:156)
clojure.lang.AFn.applyTo (AFn.java:144)
clojure.core$apply.invokeStatic (core.clj:667)
clojure.core$apply.invoke (core.clj:660)
leiningen.core.injected$compose_hooks$fn__154.doInvoke (form-init4292042596091073068.clj:1)
clojure.lang.RestFn.applyTo (RestFn.java:137)
clojure.core$apply.invokeStatic (core.clj:665)
clojure.core$apply.invoke (core.clj:660)
leiningen.core.injected$run_hooks.invokeStatic (form-init4292042596091073068.clj:1)
leiningen.core.injected$run_hooks.invoke (form-init4292042596091073068.clj:1)
leiningen.core.injected$prepare_for_hooks$fn__159$fn__160.doInvoke (form-init4292042596091073068.clj:1)
clojure.lang.RestFn.applyTo (RestFn.java:137)
clojure.lang.AFunction$1.doInvoke (AFunction.java:31)
clojure.lang.RestFn.invoke (RestFn.java:408)
clojure.core$map$fn__5866.invoke (core.clj:2755)
clojure.lang.LazySeq.sval (LazySeq.java:42)
clojure.lang.LazySeq.seq (LazySeq.java:51)
clojure.lang.Cons.next (Cons.java:39)
clojure.lang.RT.boundedLength (RT.java:1792)
clojure.lang.RestFn.applyTo (RestFn.java:130)
clojure.core$apply.invokeStatic (core.clj:667)
clojure.test$run_tests.invokeStatic (test.clj:768)
clojure.test$run_tests.doInvoke (test.clj:768)
clojure.lang.RestFn.applyTo (RestFn.java:137)
clojure.core$apply.invokeStatic (core.clj:665)
clojure.core$apply.invoke (core.clj:660)
user$eval224$fn__299$fn__332.invoke (form-init4292042596091073068.clj:1)
user$eval224$fn__299$fn__300.invoke (form-init4292042596091073068.clj:1)
user$eval224$fn__299.invoke (form-init4292042596091073068.clj:1)
user$eval224.invokeStatic (form-init4292042596091073068.clj:1)
user$eval224.invoke (form-init4292042596091073068.clj:1)
clojure.lang.Compiler.eval (Compiler.java:7177)
clojure.lang.Compiler.eval (Compiler.java:7167)
clojure.lang.Compiler.load (Compiler.java:7636)
clojure.lang.Compiler.loadFile (Compiler.java:7574)
clojure.main$load_script.invokeStatic (main.clj:475)
clojure.main$init_opt.invokeStatic (main.clj:477)
clojure.main$init_opt.invoke (main.clj:477)
clojure.main$initialize.invokeStatic (main.clj:508)
clojure.main$null_opt.invokeStatic (main.clj:542)
clojure.main$null_opt.invoke (main.clj:539)
clojure.main$main.invokeStatic (main.clj:664)
clojure.main$main.doInvoke (main.clj:616)
clojure.lang.RestFn.applyTo (RestFn.java:137)
clojure.lang.Var.applyTo (Var.java:705)
clojure.main.main (main.java:40)
我们正在做其他事情以过滤调用来搭，我认为过滤以改进默认体验并不困难（仍然可以是动态变量，以便在不必要时进行过滤）。
