带有类型提示的Clojure deftype?:找不到匹配的方法,留下自动匹配的提示

时间:2014-05-20 22:30:59

标签: clojure clojure-java-interop

我得到IllegalArgumentException: Can't find matching method: render, leave off hints for auto match,但我需要类型提示来重载方法。我错过了什么......?

(defprotocol LinkRendererProtocol                                                                                                                                                                                                             
  (render                                                                                                                                                                                                                                     
    [this node]                                                                                                                                                                                                                               
    [this node text]                                                                                                                                                                                                                          
    [this node url title text]                                                                                                                                                                                                                
))                                                                                                                                                                                                                                            


(deftype LinkRenderer [handlers]                                                                                                                                                                                                              
  LinkRendererProtocol                                                                                                                                                                                                                        

  (render [this ^AutoLinkNode node]                                                                                                                                                                                                           
    (rendering :auto-link handlers node))                                                                                                                                                                                                     
  (render [this ^ExpLinkNode  node text]                                                                                                                                                                                                      
    (rendering :exp-link handlers node text))                                                                                                                                                                                                 
  (render [this ^ExpImageNode node text]                                                                                                                                                                                                      
    (rendering :exp-image-link handlers node text))                                                                                                                                                                                           
  (render [this ^MailLinkNode node]                                                                                                                                                                                                           
    (rendering :mail-link handlers node))                                                                                                                                                                                                     
  (render [this ^RefLinkNode  node url title text]                                                                                                                                                                                            
    (rendering :ref-link handlers node url title text))                                                                                                                                                                                       
  (render [this ^RefImageNode node url title alt]                                                                                                                                                                                             
    (rendering :ref-image handlers node url title alt))                                                                                                                                                                                       
  (render [this ^WikiLinkNode node]                                                                                                                                                                                                           
    (rendering :wiki-link handlers node)))                                                                                                                                                                                                    

(defn link-renderer                                                                                                                                                                                                                           
  [handlers]                                                                                                                                                                                                                                  
  (LinkRenderer. (merge default-handlers handlers)))     

1 个答案:

答案 0 :(得分:4)

协议方法不能是类型提示。即使它们支持类型提示,您也可能需要将它们放在协议方法声明本身上。

如果您希望重载方法或仅使用Object以外的参数类型,则需要将其声明为接口方法并实现该接口。您可以从Clojure(请参阅definterfacegen-interface)或仅包含一个.java文件来声明项目中的界面。 (不言而喻,必须使用互操作语法调用以这种方式声明的方法。)

请注意,重载方法是静态解析的,因此无法使用方法重载作为链式instance?检查的替代。