Clojure'da bir Java sınıfını aşırı yüklenmiş yöntemlerle nasıl proxy edebilirim?

Question

Örneğin, aşağıdaki gibi bir Java sınıfı verilir:

public class Foo { 
    public String bar(String x) { 
    return "string " + x; 
    } 
    public String bar(Integer x) { 
    return "integer " + x; 
    } 
} 

Foo'nun Clojure alt sınıfını nasıl alt sınıflara ayırabilirim ve yalnızca çubuk (String) yöntemini geçersiz kılabilir, ancak orijinal Foo sınıfındaki çubuğu (Tamsayı) yeniden kullanabilirim. Böyle bir şey (ama bu işe yaramaz):

(let [myFoo (proxy [Foo] [] 
       (bar [^String x] (str "my " x)))] 
    (println "with string: " (.bar myFoo "abc")) 
    (println "with integer: " (.bar myFoo 10))) 

Bu örnekte şunlar gösterilecektir:

with string: my abc 
with integer: my 10 

fakat bunun etkilerini öğrenmek istiyorum:

with string: my abc 
with integer: integer 10 

Answer 1

Ben Bunu tahmin etmek istediğinizi değil, ama bu arada, bağımsız değişkenin türünü açıkça kontrol edebilir ve Foo'daki orijinal yöntemi çağırmak için proxy-super'u kullanabilirsiniz.

(let [myFoo (proxy [Foo] [] 
       (bar [x] 
       (if (instance? String x) 
        (str "my " x) 
        (proxy-super bar x))))] 
    (println "with string: " (.bar myFoo "abc")) 
    (println "with integer: " (.bar myFoo 10)))