diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-06-21 07:13:48 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-06-21 07:13:48 (GMT) |
| commit | 09c0f6835523794621c9bae88e5ea3b955c14878 (patch) | |
| tree | 346e19c129eb5d40a77ac2febe99a9abccd086cc /tests/link.test | |
| parent | 104527a10755e3d38008d55cc79bd8f76ce4d9e8 (diff) | |
| download | tcl-09c0f6835523794621c9bae88e5ea3b955c14878.zip tcl-09c0f6835523794621c9bae88e5ea3b955c14878.tar.gz tcl-09c0f6835523794621c9bae88e5ea3b955c14878.tar.bz2 | |
"trace variable" -> "trace add variable" in testcases (and documentation)
Diffstat (limited to 'tests/link.test')
| -rw-r--r-- | tests/link.test | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/tests/link.test b/tests/link.test index 43a85fb..6ac2277 100644 --- a/tests/link.test +++ b/tests/link.test @@ -384,11 +384,11 @@ test link-8.1 {Tcl_UpdateLinkedVar procedure} {testlink} { set x {} testlink create 1 1 1 1 1 1 1 1 1 1 1 1 1 1 testlink set 14 -2.0 0 xyzzy 995511 64 250 30000 60000 0xbeefbabe 12321 32123 3.25 1231231234 - trace var int w x + trace add var int write x testlink update 32 4.0 3 abcd 113355 65 251 30001 60001 0xbabebeef 12322 32124 3.125 12312312340 - trace vdelete int w x + trace remove var int write x return $x -} {{int {} w} 32 -2.0 0 xyzzy 995511} +} {{int {} write} 32 -2.0 0 xyzzy 995511} test link-8.2 {Tcl_UpdateLinkedVar procedure} {testlink} { proc x args { global x int real bool string wide @@ -398,9 +398,9 @@ test link-8.2 {Tcl_UpdateLinkedVar procedure} {testlink} { testlink create 1 1 1 1 1 1 1 1 1 1 1 1 1 1 testlink set 14 -2.0 0 xyzzy 995511 64 250 30000 60000 0xbeefbabe 12321 32123 3.25 1231231234 testlink delete - trace var int w x + trace add var int write x testlink update 32 4.0 6 abcd 113355 65 251 30001 60001 0xbabebeef 12322 32124 3.125 12312312340 - trace vdelete int w x + trace remove var int write x return $x } {} test link-8.3 {Tcl_UpdateLinkedVar procedure, read-only variable} {testlink} { |