gauche上の話なのですが、

(definc-syntax member
　(syntax-rules () ((_ name) (name :init-value 0))))

(define-class <test> ()
　(member X))

こうすると、どうも(member X)の展開が上手くいかないようなのです。
これを上手く展開させる方法はありますか？