如何在Clojure gen-class方法中调用超类'方法？

Question

我正在尝试创建一个通过gen-class扩展输入流Clojure gen-class 。 如果我想调用父类的方法，我该怎么做？

Answer 1

来自(doc gen-class) ¹ ：

:exposes-methods {super-method-name exposed-name, ...}

It is sometimes necessary to call the superclass' implementation of an
overridden method.  Those methods may be exposed and referred in 
the new method implementation by a local name.

所以，为了能够调用父的fooBar方法，你会说

(ns my.custom.Foo
  (:gen-class
    ; ...
    :exposes-methods {fooBar parentFooBar}
    ; ...
    ))

然后实现fooBar ：

(defn -fooBar [this]
  (combine-appropriately (.parentFooBar this)
                         other-stuff))

---

¹除了ns表格提供的:gen-class工具之外，还有一个gen-class宏。

Answer 2

这不是你的实际问题的答案，但我有一个小库让你假装InputStream是一个接口而不是一个类（所以你根本不需要gen-class）。 查看io.core.InputStream ，它可以让你io.core.InputStreamable并获得一个自定义的InputStream。 无论您需要什么样的实例字段，都可以通过reify关闭当地人。