Index: tests/accessor.test =================================================================== diff -u -rde11676923ab3b232973d0725d011e431d349beb -r4306d310fb56473d8d1481c94e6dd064a6728662 --- tests/accessor.test (.../accessor.test) (revision de11676923ab3b232973d0725d011e431d349beb) +++ tests/accessor.test (.../accessor.test) (revision 4306d310fb56473d8d1481c94e6dd064a6728662) @@ -200,7 +200,7 @@ ? {c3 c1b unset} "" # WITH incremental being set: set + add + delete are overriden by - # the slot (type-awareness must be taken care of explicitly, lost otherwise); + # the slot (Note: type-awareness must be taken care of explicitly, lost otherwise); set slotObj3 [c3 info lookup variables c1c] foreach m {value=set value=add value=delete} { ? [list $slotObj3 info lookup method $m] ${slotObj3}::$m @@ -218,13 +218,11 @@ ? {c3 c1c unset} "" ? {c3 info vars} "trace" - ? {c3 eval {expr {"value=add" in ${:trace}}}} 1 + ? {c3 eval {expr {"value=add" in ${:trace}}}} 1 ? {c3 eval {expr {"value=delete" in ${:trace}}}} 1 - ? {c3 eval {expr {"value=set" in ${:trace}}}} 0 - ? {c3 c1c set [c3]} [c3] - ? {c3 eval {expr {"value=set" in ${:trace}}}} 1 - - + ? {c3 eval {expr {"value=set" in ${:trace}}}} 0 + ? {c3 c1c set [c3]} [c3] + ? {c3 eval {expr {"value=set" in ${:trace}}}} 1 }