Каким образом будет реализовано соглашение о вызове() для js-объектов?

Question

Я хотел бы иметь возможность использовать (js-obj) как хэш-карту таким образом, что

(def a (js* "{'a': 1, 'b':2}")) 

(a :a) 
;=> 1 

Я попытался сделать это:

(extend-type object 
    IFn 
    (-invoke 
    ([o k] (aget o (strkey k)))) 

, но это не сработало.

Answer 1

Вы можете использовать использование reify. Обратите внимание, что означает, что вы не сможете получить доступ к свойствам непосредственно затем:

(defn convert [obj] 
    (reify 
    IFn 
    (-invoke [obj] 
     ([o k] (aget o (strkey k)))))) 

Конечно, вы могли бы написать протокол, так что вы можете получить доступ к исходному объекту, если вам нравится.