diff options
| author | pooryorick <com.digitalsmarties@pooryorick.com> | 2017-12-20 11:28:25 (GMT) |
|---|---|---|
| committer | pooryorick <com.digitalsmarties@pooryorick.com> | 2017-12-20 11:28:25 (GMT) |
| commit | dc40e6f7975ff3abcea929e29493bdc7e44c1843 (patch) | |
| tree | 1f32ef5a3667cc53c066e301210ac34a0cd67666 /tests/namespace.test | |
| parent | b6f5c151893702de2aa106b28e4ad8fe0e18ee43 (diff) | |
| download | tcl-dc40e6f7975ff3abcea929e29493bdc7e44c1843.zip tcl-dc40e6f7975ff3abcea929e29493bdc7e44c1843.tar.gz tcl-dc40e6f7975ff3abcea929e29493bdc7e44c1843.tar.bz2 | |
Fix for issue [ba1419303b4c]: Delete a namespace for an ensemble having a deletion
trace deletes its namespace: segmentation fault.
Diffstat (limited to 'tests/namespace.test')
| -rw-r--r-- | tests/namespace.test | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/tests/namespace.test b/tests/namespace.test index 9fa9331..b9e6ead 100644 --- a/tests/namespace.test +++ b/tests/namespace.test @@ -196,6 +196,19 @@ test namespace-7.7 {Bug 1655305} -setup { interp delete slave } -result {} +test namespace-7.8 {Bug ba1419303b4c} -setup { + namespace eval ns1 { + namespace ensemble create + } + + trace add command ns1 delete { + namespace delete ns1 + } +} -body { + # No segmentation fault given --enable-symbols=mem. + namespace delete ns1 +} -result {} + test namespace-8.1 {TclTeardownNamespace, delete global namespace} { catch {interp delete test_interp} interp create test_interp |