Java界面上的Clojure Multimethod调度

时间:2017-03-06 19:41:11

标签: clojure multimethod

假设我有一个返回某个父接口对象的Java方法。此函数返回的对象的类是未记录的,但是有一个丰富且记录良好的接口层次结构,它们都扩展了父接口。例如:

public class Person {
   public IMeal favoriteMeal() { ... }
}

public interface IBreakfast extends IMeal { ... }
public interface ILunch extends IMeal { ... }
public interface IBrunch extends IBreakfast, ILunch { ... }

如果我知道底层对象(并且对其稳定性有信心),我可以编写一个多方法来调度该方法返回的各种对象:

(defmulti place-setting class)
(defmethod place-setting Omelet [meal] ...)

但是,由于只有接口是公共的,我宁愿发送这些接口。是否有(好的)方式在接口上发送?也许就像:

(defmulti place-setting magic-interface-dispatch-fn)
(defmethod place-setting IBreakfast [meal] ...)

2 个答案:

答案 0 :(得分:4)

这已经完全正常了:

注意:

(defmulti print-stuff class)
(defmethod print-stuff Callable [x] {:callable x})
(defmethod print-stuff :default [x] :not-found)
(print-stuff :foo) ;; => :callable

然后:

isa?

注意,multimethods总是在(可能是自定义的)层次结构内部使用(isa? Keyword Callable) android:label="@string/app_name" 是真的。

答案 1 :(得分:0)

您可以使用multimethods的dispatch函数将每个接口映射到“dispatch值”,然后使用这些dispatch值将事物定向到正确的代码。这个调度函数在接口之间的隐式层次结构中定义,因此您总是最终得到代码需要的一个位置。

hello.core> (defmulti foo (fn [meal] (condp instance? meal
                                       java.util.Collection ::breakfast
                                       java.lang.Double ::lunch)))
nil
hello.core> (defmethod foo ::breakfast
              [meal]
              (count meal))
#multifn[foo 0x2b6e7712]
hello.core> (defmethod foo ::lunch
              [meal]
              meal)
#multifn[foo 0x2b6e7712]
hello.core> (foo 2.3)
2.3
hello.core> (foo [1 2 3])
3

如果在调度函数中定义层次结构很烦人,您可以切换到使用clojure's built in hierarchy feature以任意方式构建它们。