diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2012-04-04 10:51:02 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2012-04-04 10:51:02 (GMT) |
commit | 75978a26daf2595c582c0177de45b97dd19b4af8 (patch) | |
tree | 74cd0f333a41576a54897b0cd4e65d72887b713d /tests/oo.test | |
parent | 2b95a64188c3a52fd7cfdb0641558bed9e222818 (diff) | |
download | tcl-75978a26daf2595c582c0177de45b97dd19b4af8.zip tcl-75978a26daf2595c582c0177de45b97dd19b4af8.tar.gz tcl-75978a26daf2595c582c0177de45b97dd19b4af8.tar.bz2 |
Added characterisation of Bug 3514761; currently knownBug...
Diffstat (limited to 'tests/oo.test')
-rw-r--r-- | tests/oo.test | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/tests/oo.test b/tests/oo.test index 150bc97..ccea42a 100644 --- a/tests/oo.test +++ b/tests/oo.test @@ -337,6 +337,22 @@ test oo-2.6 {OO constructor and tailcall - Bug 2414858} -setup { } -cleanup { foo destroy } -result good +test oo-2.7 {construction, method calls and ensembles - Bug 3514761} -setup { + namespace eval k {} +} -constraints knownBug -body { + namespace eval k { + oo::class create s { + constructor {j} { + # nothing + } + } + namespace export s + namespace ensemble create + } + k s create X +} -returnCodes error -cleanup { + namespace delete k +} -result {wrong # args: should be "k s create X j"} test oo-3.1 {basic test of OO functionality: destructor} -setup { # This is a bit complex because it needs to run in a sub-interp as we're |