diff options
author | dgp <dgp@users.sourceforge.net> | 2015-12-22 19:50:04 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2015-12-22 19:50:04 (GMT) |
commit | 2516cd875a00dd9b9f1d23f43a86342c1007bdb4 (patch) | |
tree | 6fe976dda1efa57c1d8bee8150a2c4c73a53bc66 /tests | |
parent | 1614457e38312b8180cd9ef843bffcc6a45a14cc (diff) | |
download | tcl-2516cd875a00dd9b9f1d23f43a86342c1007bdb4.zip tcl-2516cd875a00dd9b9f1d23f43a86342c1007bdb4.tar.gz tcl-2516cd875a00dd9b9f1d23f43a86342c1007bdb4.tar.bz2 |
[593baa032c] Additional fix for the mixinSubs list.
Diffstat (limited to 'tests')
-rw-r--r-- | tests/oo.test | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/oo.test b/tests/oo.test index ca5c7f9..895f7ed 100644 --- a/tests/oo.test +++ b/tests/oo.test @@ -3677,6 +3677,12 @@ test oo-35.3 {Bug 593baa032c: superclass list teardown} { oo::class create D {superclass B} namespace eval [info object namespace D] [list [namespace which B] destroy] } {} +test oo-35.4 {Bug 593baa032c: mixins list teardown} { + # Bug makes this crash, especially with mem-debugging on + oo::class create B {} + oo::class create D {mixin B} + namespace eval [info object namespace D] [list [namespace which B] destroy] +} {} cleanupTests |