Index: tests/protected.xotcl =================================================================== diff -u -r73eb4eccd33d1a940e2d2ca6dccc2f74216f0576 -r210eab6d9149846d5d6a6a8e0fa74e232ca5b6de --- tests/protected.xotcl (.../protected.xotcl) (revision 73eb4eccd33d1a940e2d2ca6dccc2f74216f0576) +++ tests/protected.xotcl (.../protected.xotcl) (revision 210eab6d9149846d5d6a6a8e0fa74e232ca5b6de) @@ -5,13 +5,13 @@ Test parameter count 1 Class create C { - .alias SET ::set - .method foo {} {return [self proc]} - .method bar {} {return [self proc]} - .method bar-foo {} { + :alias SET ::set + :method foo {} {return [self proc]} + :method bar {} {return [self proc]} + :method bar-foo {} { c1 foo } - .method bar-SET {} { + :method bar-SET {} { c1 SET x 1 } }