gistfile1.txt

cljs.user=> (def obj (js-obj {}))
cljs.user=> (def foo (fn [x] (this-as this [this x])))
cljs.user=> (set! (.-f obj) foo)
cljs.user=> (.f obj 1)
[#js {:f #object[cljs$user$foo "function cljs$user$foo(x){
var this$ = this;
return new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [this$,x], null);
}"]} 1]
cljs.user=> ((.-f obj) obj 1)
[#object[Window [object Window]] #js {:f #object[cljs$user$foo "function cljs$user$foo(x){
var this$ = this;
return new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [this$,x], null);
}"]}]