[Xotcl] Object mixin with passing init args ?