diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2016-06-23 08:21:42 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2016-06-23 08:21:42 (GMT) |
commit | ae11b9d9fec0e5b9f209d370fd4bdcf356810087 (patch) | |
tree | a1782bd818ef484be2537ef6d84f6a6f11048537 /tests/dict.test | |
parent | 50e97b06460f3feb7d2d8f9385441112c513d55d (diff) | |
parent | 6a513d71d369eed56569ff3bf3e05c4f80c2ccae (diff) | |
download | tcl-ae11b9d9fec0e5b9f209d370fd4bdcf356810087.zip tcl-ae11b9d9fec0e5b9f209d370fd4bdcf356810087.tar.gz tcl-ae11b9d9fec0e5b9f209d370fd4bdcf356810087.tar.bz2 |
[d553228d9f] Stop crashes in [dict update] with low refcount dictionaries.
Diffstat (limited to 'tests/dict.test')
-rw-r--r-- | tests/dict.test | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/tests/dict.test b/tests/dict.test index d5406d0..a6b0cb4 100644 --- a/tests/dict.test +++ b/tests/dict.test @@ -2048,6 +2048,13 @@ test dict-24.25 {dict map with huge dict (compiled)} { }} 100000 } 166666666600000 +test dict-25.1 {compiled dict update with low-refcount values [Bug d553228d9f]} { + # Test crashes on failure + apply {{} { + lassign {} item + dict update item item item two two {} + }} +} {} # cleanup ::tcltest::cleanupTests |