diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-09-27 10:23:57 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-09-27 10:23:57 (GMT) |
commit | 5f54c3fb44efbfa40563a0640295e7350b5ca679 (patch) | |
tree | 23d2ad46aa7c8cad3a4051d0c88af6534cdeef57 /tests/trace.test | |
parent | f3cb255841150f6270c05cab8324748ed71ec527 (diff) | |
parent | 524d6bb36ec16228d711b48a3806f39100e388d2 (diff) | |
download | tcl-5f54c3fb44efbfa40563a0640295e7350b5ca679.zip tcl-5f54c3fb44efbfa40563a0640295e7350b5ca679.tar.gz tcl-5f54c3fb44efbfa40563a0640295e7350b5ca679.tar.bz2 |
Merge 8.6
Diffstat (limited to 'tests/trace.test')
-rw-r--r-- | tests/trace.test | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/tests/trace.test b/tests/trace.test index c95379d..2b16e2f 100644 --- a/tests/trace.test +++ b/tests/trace.test @@ -1236,23 +1236,23 @@ test trace-18.1 {unset traces on procedure returns} { p1 foo bar set info } {0 {a x y}} -test trace-18.2 {namespace delete / trace vdelete combo} { +test trace-18.2 {namespace delete / trace remove variable combo} { namespace eval ::foo { variable x 123 } proc p1 args { - trace vdelete ::foo::x u p1 + trace remove variable ::foo::x unset p1 } trace add variable ::foo::x unset p1 namespace delete ::foo info exists ::foo::x } 0 -test trace-18.3 {namespace delete / trace vdelete combo, Bug \#1337229} { +test trace-18.3 {namespace delete / trace remove variable combo, Bug \#1337229} { namespace eval ::ns {} trace add variable ::ns::var unset {unset ::ns::var ;#} namespace delete ::ns } {} -test trace-18.4 {namespace delete / trace vdelete combo, Bug \#1338280} { +test trace-18.4 {namespace delete / trace remove variable combo, Bug \#1338280} { namespace eval ::ref {} set ::ref::var1 AAA trace add variable ::ref::var1 unset doTrace |