Clojure:(with-out-str(doc catch))返回 ""

Question

我想知道这是为什么。finally 和 & 也以这种方式表现。哪些其他 Clojure 符号具有此行为以及原因？

Answer 1

我相信您在 Clojure 的 doc 实现中偶然发现了一个错误，该错误影响 &、catch 和 finally。在当前的 doc 实现中，这三个被特殊对待，并且关联的表达式似乎缺少语法引用。

以下是文档的 mod，它添加了语法引用，并且似乎按预期工作。该函数必须放置在 clojure.repl 命名空间中。

(defmacro doc2
  [name]
  (if-let [special-name ('{& fn, catch try, finally, try} name)]
    `(#'print-doc (#'special-doc '~special-name))
    (cond
     (special-doc-map name) `(#'print-doc (#'special-doc '~name))
     (find-ns name) `(#'print-doc (#'namespace-doc (find-ns '~name)))
     (resolve name) `(#'print-doc (meta (var ~name))))))

(doc catch) => { 打印 try doc 并返回 nil }

(doc2 catch) => { 打印 try doc 并返回 nil }

(with-out-str (doc catch)) => { 打印 try doc 并返回 "" }

(with-out-str (doc2 catch)) => "------------------------ --\ntry\n (try expr* catch-clause* finally-clause?)\n特殊形式\n catch-clause => (catch 类名 name expr*)\n finally-clause => (finally expr*)\n\n 捕获并处理 Java 异常。\n\n 请参阅 http://clojure.org/special_forms#try\n"

我将在 Clojure 错误跟踪器上追踪这个问题。