我可以在Clojure中的Type AND属性上调度多方法吗?

时间:2011-01-02 08:57:11

标签: clojure multimethod

我的Clojure应用程序中有一个名为“visualize”的方法,它可以呈现我的应用程序的任何部分。我遇到的问题是我的应用程序中的一些东西是Java类,有些是哈希映射,其中字段使用clojure :: idiom在内部标记地图的类型。我知道我可以使用multimaps来调度类型或某些内部类型,但我怎么能这样做才能使同一个多方法同时工作。

1 个答案:

答案 0 :(得分:5)

创建一个调度函数,它既可以查找具有特殊标记类型的映射,也可以查找Java类。

(defn visualize-dispatch [foo]
  (if (map? foo) 
    (:type foo)
    (class foo)))

(defmulti visualize visualize-dispatch)

(defmethod visualize String [s] 
  (println "Got a string" s))

(defmethod visualize :banana [b] 
  (println "Got a banana that is" (:val b)))

然后,您可以使用任何一个Java类或类似{:type:banana:val“something”}的映射调用visualize。

user> (visualize "bikini")
Got a string bikini
user> (visualize {:type :banana :val "speckled"})
Got a banana that is speckled