Index: tests/object-system.test =================================================================== diff -u -N -r24724ebae83af4e0104b349a2fb582bfc71a7475 -r6ec717176dee759bf70840eabb6b5728229ed8f9 --- tests/object-system.test (.../object-system.test) (revision 24724ebae83af4e0104b349a2fb582bfc71a7475) +++ tests/object-system.test (.../object-system.test) (revision 6ec717176dee759bf70840eabb6b5728229ed8f9) @@ -160,7 +160,7 @@ o public method foo {} {return foo} o public method bar1 {} {return bar1-[:foo]} o public method bar2 {} {return bar2-[: foo]} -o public method bar3 {} {return bar3-[my foo]} +#o public method bar3 {} {return bar3-[my foo]} o public method bar4 {} {return bar4-[[self] foo]} o public method bar5 {} {return [self]::bar5} o public method bar6 {} {return [:]::bar6} @@ -170,7 +170,7 @@ ? {o foo} foo "simple method dispatch" ? {o bar1} bar1-foo "colon-methodname dispatch" ? {o bar2} bar2-foo "colon cmd dispatch" -? {o bar3} bar3-foo "my dispatch" +#? {o bar3} bar3-foo "my dispatch" ? {o bar4} bar4-foo "self dispatch" ? {o bar5} ::o::bar5 "self cmd" ? {o bar6} ::o::bar6 "colon cmd"