summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2013-01-03 09:22:04 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2013-01-03 09:22:04 (GMT)
commite59a5820dfdb6c77acd3497b07b8236b51bd04d8 (patch)
tree99d1350d9b02e0dce0351536547cc0c340bde3b8 /tests
parent3f4534b92ba967574dc4106bc346ccbbfed9d638 (diff)
downloadtcl-e59a5820dfdb6c77acd3497b07b8236b51bd04d8.zip
tcl-e59a5820dfdb6c77acd3497b07b8236b51bd04d8.tar.gz
tcl-e59a5820dfdb6c77acd3497b07b8236b51bd04d8.tar.bz2
test case for bug-3598580: Tcl_ListObjReplace may release deleted elements too early
Diffstat (limited to 'tests')
-rw-r--r--tests/listObj.test4
1 files changed, 4 insertions, 0 deletions
diff --git a/tests/listObj.test b/tests/listObj.test
index aa319bb..390ee64 100644
--- a/tests/listObj.test
+++ b/tests/listObj.test
@@ -181,6 +181,10 @@ test listobj-9.1 {UpdateStringOfList} {
string length [list foo\x00help]
} 8
+test listobj-11.1 {bug 3598580} {
+ testobj bug3598580
+} 123
+
# cleanup
::tcltest::cleanupTests
return