当 *compile-path* 设置不正确时出现的友好的 Java 转换异常

Question

当 *compile-path* 没有设置为 String，而是设置为 java.io.File（目前 boot-clj 就是这样做）。当尝试在 boot repl 中使用它时，编译器会出现转换异常。常见的观点似乎是不建议从 repl 编译，人们说不要使用 gen-class。但我认为这在想要使用 gen-class 并快速迭代的场景中是不幸的。

我没有测试所有旧版本来解决这个问题，但 git blame 显示，应该帮助这里的代码在过去10年里没有发生变化。
https://github.com/clojure/clojure/blame/master/src/clj/clojure/core.clj#L6073
https://github.com/clojure/clojure/blame/master/src/jvm/clojure/lang/Compiler.java#L7643

我的临时解决方案现在如下


(defn compile-safely [ns-name]
  (let [compile-path-class *compile-path*
        corrected-path (cond
                         (instance? java.io.File compile-path-class) (.getAbsolutePath *compile-path*)
                         (instance? String compile-path-class)       *compile-path*
                         :else
                         (throw (ex-info "不支持的类" {:class (class compile-path-class)})))]
    (binding [*compile-path* corrected-path]
      (compile ns-name))))


我建议在 'clojure.core/compile' 函数中添加类型检查。

Answer 1

评论由：jeroen 提出

参考一般见解 https://clojurians-log.clojureverse.org/clojure/2017-06-05/1496700773.347309

Answer 2

评论由：jeroen 提出

以下在 boot-clj 中有效（因为 Leiningen 和 clj cli 中的类路径问题无效）：https://gist.github.com/jeroenvandijk/8187413d24433545eeb9579538a903f7#file-repl_compile-clj-L39-L52

Answer 3

评论者：alexmiller

您能否提供一个可复现的例子？

看起来 ClassCastException 对于有错误类型的类来说非常准确。

Answer 4

_评论者：jeroen_

我已经尝试让示例尽可能简单。您是对的，ClassCastException 是完全准确的，但您是在明白了这是关于 *compile-path* 之后才意识到这一点的。这个错误报告主要关于管理对 clojure 用户的预期。



clj -A:new app example.error
cd example.error
clj

 ;; clj 已正确设置 *compile-path* 为字符串（尽管不在类路径中）
 *compile-path* ;=> "classes"
 (let [f (clojure.java.io/file "classes/foo.clj")]
   (clojure.java.io/make-parents f)
   (spit f "(ns foo) (gen-class :name my.new.Class)")
   (compile 'foo)
   (clojure.java.shell/sh "ls" "classes"))
 ; 成功，尽管您仍然无法加载类
 ; #=> {:exit 0, :out  "clojure\nfoo$fn__134.class\nfoo$fn__166.class\nfoo$fn__174.class\nfoo$loading__6549__auto____132.class\nfoo$loading__6549__auto____164.class\nfoo$loading__6549__auto____172.class\nfoo.clj\nfoo__init.class\n", :err ""}
 

 ;; 从 boot 项目
 ;; boot.user=> *compile-path*
 ;; #object[java.io.File 0x5266b1a "/var/folders/ck/9zqvs0zx5vsf2bc7rvv1pwc40000gn/T/boot-repl8170014881711480931"]
 ;; 这可以在 clj repl 中复现
 (binding [*compile-path* (clojure.java.io/file "classes")]
   (compile 'foo)
   )

 语法错误编译 fn* 在 (foo.clj:1:1)。
 原因：无法将 java.io.File 转换为 java.lang.String
 
 

Answer 5

参考：https://clojure.atlassian.net/browse/CLJ-2412（由 jeroen 报告）