diff options
| author | apnadkarni <apnmbx-wits@yahoo.com> | 2023-09-17 08:24:52 (GMT) |
|---|---|---|
| committer | apnadkarni <apnmbx-wits@yahoo.com> | 2023-09-17 08:24:52 (GMT) |
| commit | b40cbe1d94812f48f744eac387c8ba7528f36c2b (patch) | |
| tree | bce5c16e6541a53afd71fc3aadac0e1771dbd14e /tests/cmdIL.test | |
| parent | 3efac837b7faf61a95ce12cb74f0253ecb21f6e4 (diff) | |
| download | tcl-b40cbe1d94812f48f744eac387c8ba7528f36c2b.zip tcl-b40cbe1d94812f48f744eac387c8ba7528f36c2b.tar.gz tcl-b40cbe1d94812f48f744eac387c8ba7528f36c2b.tar.bz2 | |
Refactor to eliminate list dup as no longer necessary
Diffstat (limited to 'tests/cmdIL.test')
| -rw-r--r-- | tests/cmdIL.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/cmdIL.test b/tests/cmdIL.test index b008742..1cb9014 100644 --- a/tests/cmdIL.test +++ b/tests/cmdIL.test @@ -753,13 +753,13 @@ test cmdIL-6.24 {lassign command - memory leak testing} -setup { rename stress {} } # Assorted shimmering problems -test cmdIL-6.25 {lassign command - shimmering protection} -body { +test cmdIL-6.25 {lassign command (compiled) - shimmering protection} -body { apply {{} { set x {a b c} list [lassign $x $x y] $x [set $x] $y }} } -result {c {a b c} a b} -test cmdIL-6.26 {lassign command - shimmering protection} -body { +test cmdIL-6.26 {lassign command (uncompiled) - shimmering protection} -body { apply {{} { set x {a b c} set lassign lassign |