diff options
author | pooryorick <com.digitalsmarties@pooryorick.com> | 2018-02-11 19:29:08 (GMT) |
---|---|---|
committer | pooryorick <com.digitalsmarties@pooryorick.com> | 2018-02-11 19:29:08 (GMT) |
commit | ad022e6d3b0857ae1266961eb07a1c3459d6e1cf (patch) | |
tree | 4d49688c2c8a44bbdcef96625ae0aeef02d0efa4 /tests | |
parent | 5765c1e39239c149fc739e8e48b3d554901318e7 (diff) | |
download | tcl-ad022e6d3b0857ae1266961eb07a1c3459d6e1cf.zip tcl-ad022e6d3b0857ae1266961eb07a1c3459d6e1cf.tar.gz tcl-ad022e6d3b0857ae1266961eb07a1c3459d6e1cf.tar.bz2 |
Remove restriction on defining the class of a TclOO object not explicitly
instantiated from ::oo::class.
Diffstat (limited to 'tests')
-rw-r--r-- | tests/oo.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/oo.test b/tests/oo.test index 61a5e01..8850ea5 100644 --- a/tests/oo.test +++ b/tests/oo.test @@ -1668,13 +1668,13 @@ test oo-13.2 {OO: changing an object's class} -body { oo::objdefine foo class oo::class } -cleanup { foo destroy -} -returnCodes 1 -result {may not change a non-class object into a class object} +} -result {} test oo-13.3 {OO: changing an object's class} -body { oo::class create foo oo::objdefine foo class oo::object } -cleanup { foo destroy -} -returnCodes 1 -result {may not change a class object into a non-class object} +} -result {} test oo-13.4 {OO: changing an object's class} -body { oo::class create foo { method m {} { |