如何在ClojureScript中使用方法和构造函数创建JS对象

时间:2012-01-26 12:49:13

标签: javascript clojure interop clojurescript

想象一下,任务是在clojurescript中创建一些实用程序库,以便可以从JS中使用它。

例如,假设我想生成等价的:

    var Foo = function(a, b, c){
      this.a = a;
      this.b = b;
      this.c = c;    
    }

    Foo.prototype.bar = function(x){
      return this.a + this.b + this.c + x;
    }

    var x = new Foo(1,2,3);

    x.bar(3);           //  >>  9    

实现这一目标的一种方法是:

    (deftype Foo [a b c])   

    (set! (.bar (.prototype Foo)) 
      (fn [x] 
        (this-as this
          (+ (.a this) (.b this) (.c this) x))))

    (def x (Foo. 1 2 3))

    (.bar x 3)     ; >> 9

问题:clojurescript中有更优雅/惯用的方法吗?

2 个答案:

答案 0 :(得分:16)

通过向deftype添加魔术“对象”协议,使用JIRA CLJS-83解决了这个问题:

(deftype Foo [a b c]
  Object
  (bar [this x] (+ a b c x)))
(def afoo (Foo. 1 2 3))
(.bar afoo 3) ; >> 9

答案 1 :(得分:11)

(defprotocol IFoo
  (bar [this x]))

(deftype Foo [a b c]
  IFoo
  (bar [_ x]
    (+ a b c x)))

(def afoo (Foo. 1 2 3))
(bar afoo 3) ; >> 9

这是否是惯用的方式。