Как создать объект JS с методами и конструктором в ClojureScript

Представьте себе, что задача состоит в том, чтобы создать некоторую утилиту lib в 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)

Ваш ответ на вопрос