Exception Can'；在clojure ring应用程序中捕获异常

我正在开发我的购物应用程序，我正在尝试创建一个自定义异常处理程序，但在我访问它们之前，还有一些东西正在捕获它们

这是我的经纪人

(defn wrap-fallback-exception
    [handler]
    (fn [request]
        (try+
            (handler request)
            (catch [:type :test] {:keys [msg]}
                (println "## Test Exception:" msg))
            (catch Exception e (println "## Exception"))
            (catch Throwable e
                (println "## Throwable:" (.getMessage e) e)))))

这是我的书堆

(-> all-routes
        (wrap-anti-forgery)
        (friend/authenticate {
             :unauthorized-handler unauth-handler
             :credential-fn        (partial cred get-user)
             :workflows            [(workflows/interactive-form)]})
        (wrap-session {:store (->ShopStore )})
        (wrap-keyword-params)
        (wrap-params)
        (wrap-cookies)
        (wrap-fallback-exception)
        (run-server {:port 3000}))

我在我的一个环函数中进行了测试

(throw+ (ex-info "TEST" {:type :test}))

结果输出如下所示

Sun Apr 01 15:57:29 CEST 2018 [worker-4] ERROR - GET /user/home
clojure.lang.ExceptionInfo: TEST {:type :test}
    at clojure.core$ex_info.invokeStatic(core.clj:4739)
    at clojure.core$ex_info.invoke(core.clj:4739)
    at shop2.views.home$mk_proj_row.invokeStatic(home.clj:90)
    at shop2.views.home$mk_proj_row.invoke(home.clj:88)
    at clojure.lang.AFn.applyToHelper(AFn.java:154)
    at clojure.lang.AFn.applyTo(AFn.java:144)
    at orchestra.spec.test$spec_checking_fn$fn__1372.doInvoke(test.clj:123)
    at clojure.lang.RestFn.invoke(RestFn.java:408)
    at clojure.core$map$fn__5587.invoke(core.clj:2747)
    at clojure.lang.LazySeq.sval(LazySeq.java:40)
    at clojure.lang.LazySeq.seq(LazySeq.java:49)
    at clojure.lang.RT.seq(RT.java:528)
    at clojure.core$seq__5124.invokeStatic(core.clj:137)
    at clojure.core$print_sequential.invokeStatic(core_print.clj:53)
    at clojure.core$fn__7019.invokeStatic(core_print.clj:174)
    at clojure.core$fn__7019.invoke(core_print.clj:174)
    at clojure.lang.MultiFn.invoke(MultiFn.java:233)
    at clojure.core$pr_on.invokeStatic(core.clj:3666)
    at clojure.core$pr_on.invoke(core.clj:3660)
    at clojure.core$print_sequential.invokeStatic(core_print.clj:66)
    at clojure.core$fn__7039.invokeStatic(core_print.clj:225)
    at clojure.core$fn__7039.invoke(core_print.clj:225)
    at clojure.lang.MultiFn.invoke(MultiFn.java:233)
    at clojure.core$pr_on.invokeStatic(core.clj:3666)
    at clojure.core$pr_on.invoke(core.clj:3660)
    at clojure.core$print_sequential.invokeStatic(core_print.clj:66)
    at clojure.core$fn__7039.invokeStatic(core_print.clj:225)
    at clojure.core$fn__7039.invoke(core_print.clj:225)
    at clojure.lang.MultiFn.invoke(MultiFn.java:233)
    at clojure.core$pr_on.invokeStatic(core.clj:3666)
    at clojure.core$pr_on.invoke(core.clj:3660)
    at clojure.core$print_sequential.invokeStatic(core_print.clj:66)
    at clojure.core$fn__7039.invokeStatic(core_print.clj:225)
    at clojure.core$fn__7039.invoke(core_print.clj:225)
    at clojure.lang.MultiFn.invoke(MultiFn.java:233)
    at clojure.core$pr_on.invokeStatic(core.clj:3666)
    at clojure.core$pr_on.invoke(core.clj:3660)
    at clojure.core$print_sequential.invokeStatic(core_print.clj:66)
    at clojure.core$fn__7019.invokeStatic(core_print.clj:174)
    at clojure.core$fn__7019.invoke(core_print.clj:174)
    at clojure.lang.MultiFn.invoke(MultiFn.java:233)
    at clojure.core$pr_on.invokeStatic(core.clj:3666)
    at clojure.core$pr_on.invoke(core.clj:3660)
    at clojure.core$print_sequential.invokeStatic(core_print.clj:66)
    at clojure.core$fn__7019.invokeStatic(core_print.clj:174)
    at clojure.core$fn__7019.invoke(core_print.clj:174)
    at clojure.lang.MultiFn.invoke(MultiFn.java:233)
    at clojure.core$pr_on.invokeStatic(core.clj:3666)
    at clojure.core$pr_on.invoke(core.clj:3660)
    at clojure.core$print_sequential.invokeStatic(core_print.clj:66)
    at clojure.core$fn__7039.invokeStatic(core_print.clj:225)
    at clojure.core$fn__7039.invoke(core_print.clj:225)
    at clojure.lang.MultiFn.invoke(MultiFn.java:233)
    at clojure.core$pr_on.invokeStatic(core.clj:3666)
    at clojure.core$pr_on.invoke(core.clj:3660)
    at clojure.lang.Var.invoke(Var.java:385)
    at clojure.lang.RT.print(RT.java:1877)
    at clojure.lang.RT.printString(RT.java:1857)
    at clojure.lang.APersistentVector.toString(APersistentVector.java:26)
    at org.httpkit.HttpUtils.bodyBuffer(HttpUtils.java:112)
    at org.httpkit.HttpUtils.HttpEncode(HttpUtils.java:442)
    at org.httpkit.server.HttpHandler.run(RingHandler.java:101)
    at java.util.concurrent.Executors$RunnableAdapter.call(Executors.java:511)
    at java.util.concurrent.FutureTask.run(FutureTask.java:266)
    at java.util.concurrent.ThreadPoolExecutor.runWorker(ThreadPoolExecutor.java:1149)
    at java.util.concurrent.ThreadPoolExecutor$Worker.run(ThreadPoolExecutor.java:624)
    at java.lang.Thread.run(Thread.java:748)

我的处理程序从未捕获异常！ 我已经尝试了我能想到的所有版本，但都不走运：-( 谁在抓它？ 我怎样才能让它停止

问候

---

Soren

您的处理程序在不引发异常的情况下成功返回。它返回的值显然是一个多层深向量，其中包含一个隐藏在其内部的惰性序列。当Ring尝试打印该惰性序列时，强制该序列调用

mk proj row

，从而引发异常。重要的是，此hap在处理程序完全完成运行后执行pens，这意味着异常处理程序不再有效

我怀疑你是否真的想把一个巨大的向量串起来作为你的输出：我猜你忘了用Hiccup把它转换成HTML，或者用其他东西把它转换成JSON。你可能应该安装一些中间件，在返回到Ring之前进行转换；如果你把中间件放在

wrap回退之前，除了ion

中间件，那么惰性将不再是一个问题，因为惰性序列将在Hiccup（或其他）渲染器中实现，而不是在所有处理程序完成后通过响铃来实现