diff options
author | dgp <dgp@users.sourceforge.net> | 2014-07-19 16:35:59 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2014-07-19 16:35:59 (GMT) |
commit | eacbc736d923a9b9b77f628876dac58ad34dfd10 (patch) | |
tree | 856bc1201a32ad2c13a02076460fd6cf7c49ec18 /tests/oo.test | |
parent | 1bd8f407a5fc44a8b7a54bb78d8d29a2e5b0358f (diff) | |
parent | b32141b751698c59b7c8b574b52963976f3e0dd4 (diff) | |
download | tcl-eacbc736d923a9b9b77f628876dac58ad34dfd10.zip tcl-eacbc736d923a9b9b77f628876dac58ad34dfd10.tar.gz tcl-eacbc736d923a9b9b77f628876dac58ad34dfd10.tar.bz2 |
[75b8433707] Revised fix for memleak in oo instance list management.
Diffstat (limited to 'tests/oo.test')
-rw-r--r-- | tests/oo.test | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/tests/oo.test b/tests/oo.test index d63e931..fcd9818 100644 --- a/tests/oo.test +++ b/tests/oo.test @@ -258,6 +258,19 @@ test oo-1.18 {OO: create object in NS with same name as global cmd} -setup { rename test-oo-1.18 {} A destroy } -result ::C +test oo-1.18.1 {Bug 75b8433707: memory leak in oo-1.18} -setup { + proc test-oo-1.18 {} return +} -constraints memory -body { + leaktest { + oo::class create A + oo::class create B {superclass A} + oo::define B constructor {} {A create test-oo-1.18} + B create C + A destroy + } +} -cleanup { + rename test-oo-1.18 {} +} -result 0 test oo-1.19 {basic test of OO functionality: teardown order} -body { oo::object create o namespace delete [info object namespace o] |