diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2014-09-14 16:51:49 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2014-09-14 16:51:49 (GMT) |
commit | 271b5469d26171f90501fd3dc1eea1bf2bd83b08 (patch) | |
tree | 390fd760e66cc765b1400f22af69dc5ef2a00f66 /tests/oo.test | |
parent | bbf5dede141290a90faaa2bbf2e8abba59d33c04 (diff) | |
parent | 7e17c358eb7a149fbec81f4c2e5d1adefcc90bdd (diff) | |
download | tcl-271b5469d26171f90501fd3dc1eea1bf2bd83b08.zip tcl-271b5469d26171f90501fd3dc1eea1bf2bd83b08.tar.gz tcl-271b5469d26171f90501fd3dc1eea1bf2bd83b08.tar.bz2 |
merge trunk
Diffstat (limited to 'tests/oo.test')
-rw-r--r-- | tests/oo.test | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/tests/oo.test b/tests/oo.test index 8c515da..2c189ca 100644 --- a/tests/oo.test +++ b/tests/oo.test @@ -271,6 +271,16 @@ test oo-1.18.1 {Bug 75b8433707: memory leak in oo-1.18} -setup { } -cleanup { rename test-oo-1.18 {} } -result 0 +test oo-1.18.2 {Bug 21c144f0f5} -setup { + interp create slave +} -body { + slave eval { + oo::define [oo::class create foo] superclass oo::class + oo::class destroy + } +} -cleanup { + interp delete slave +} test oo-1.19 {basic test of OO functionality: teardown order} -body { oo::object create o namespace delete [info object namespace o] |