编译Clojure*. clj到*. class，部分函数不生成

Question

我遵循这里的说明，并试图通过调用lein jar从clj源生成一个Java类。

但是，当我稍微编辑代码以添加自己的测试函数时：

(ns some.Example
  (:gen-class))

(defn -main
  [greetee]
  (println (str "Hello " greetee "!")))

(defn -foo []
  "foo bar")

.. 然后用lein jar生成一个Java类文件（我在文章末尾追加了project.clj），我发现生成的jar包含作为内部类的方法：

$ jar tvf example-1.0.0.jar 
    76 Sun Feb 17 20:56:24 EET 2013 META-INF/MANIFEST.MF
  1225 Sun Feb 17 20:56:24 EET 2013 META-INF/maven/some/example/pom.xml
    87 Sun Feb 17 20:56:24 EET 2013 META-INF/maven/some/example/pom.properties
  2697 Sun Feb 17 20:56:24 EET 2013 some/Example__init.class
  1499 Sun Feb 17 20:56:24 EET 2013 some/Example$loading__4784__auto__.class
  1035 Sun Feb 17 20:56:24 EET 2013 some/Example$_main.class
   565 Sun Feb 17 20:56:24 EET 2013 some/Example$_foo.class
  1771 Sun Feb 17 20:56:24 EET 2013 some/Example.class
   162 Sun Feb 17 18:03:12 EET 2013 project.clj
   129 Sun Feb 17 19:23:54 EET 2013 some/Example.clj

那是一些。示例类只包含main方法，不包含foo：

$ javap some.Example
public class some.Example {
  public static {};
  public some.Example();
  public java.lang.Object clone();
  public int hashCode();
  public java.lang.String toString();
  public boolean equals(java.lang.Object);
  public static void main(java.lang.String[]);
}

所以问题是：我们如何指定一个clj Clojure文件来生成一个Java类，该类包含许多静态和实例方法，目的是从Java代码中调用这些方法？

(defproject some/example "1.0.0"
  :description "A sample project"
  :dependencies [[org.clojure/clojure "1.4.0"]]
  :aot [some.Example]
  :source-paths ["."]
  )

Answer 1

你需要声明你的类将要拥有的方法：

(ns some.Example
  (:gen-class
     :methods [[foo [] String]]))

请注意，这将foo声明为非静态方法，因此它还需要使用一个this参数：

(defn -foo [this]
  "foo bar")

如果希望方法是静态的，需要附加一些元数据：

(ns some.Example
      (:gen-class
         :methods [#^{:static true}[bar [] int]]))
(defn -bar []
  3)

试着读这篇文章，它会更快地切入要点。