I'm using XOTcl 1.3.1.
This code:
Object instproc someFilter {args} { puts "self class = [self class]" puts "self called class = [self calledclass]" puts "self = [self]" puts "self calledproc = [self calledproc]" puts "args = $args" puts "" next }
Class TestA -parameter {{x 0}} TestA filter someFilter
TestA a a x a x 10
produces this output:
self class = ::xotcl::Object self called class = self = ::TestA self calledproc = a args =
self class = ::xotcl::Object self called class = ::xotcl::Class self = ::TestA self calledproc = unknown args = a
self class = ::xotcl::Object self called class = ::xotcl::Class self = ::TestA self calledproc = create args = a
self class = ::xotcl::Object self called class = ::xotcl::Class self = ::TestA self calledproc = alloc args = a
invalid command name "a"
Note that filtering on "TestA a" seems to prevent the creation of an obj named "a". Any ideas?