diff options
| author | dgp <dgp@users.sourceforge.net> | 2009-12-09 18:40:47 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2009-12-09 18:40:47 (GMT) |
| commit | 04598fc6cbdc102630fee4976e6afc6c2edd08bc (patch) | |
| tree | 9e5e448e98dc4b759199a82e2a82398ceb48424e /tests/oo.test | |
| parent | ae9c04930f6142e841888670b2ec1909593e36b5 (diff) | |
| download | tcl-04598fc6cbdc102630fee4976e6afc6c2edd08bc.zip tcl-04598fc6cbdc102630fee4976e6afc6c2edd08bc.tar.gz tcl-04598fc6cbdc102630fee4976e6afc6c2edd08bc.tar.bz2 | |
Revert the 1.19 -> 1.20 commit now that bug 2487771 appears fixed.
Diffstat (limited to 'tests/oo.test')
| -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 a0fbc55..e42c2ca 100644 --- a/tests/oo.test +++ b/tests/oo.test @@ -7,7 +7,7 @@ # See the file "license.terms" for information on usage and redistribution of # this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: oo.test,v 1.33 2009/11/27 07:27:53 dkf Exp $ +# RCS: @(#) $Id: oo.test,v 1.34 2009/12/09 18:40:47 dgp Exp $ package require -exact TclOO 0.6.2 ;# Must match value in generic/tclOO.h if {[lsearch [namespace children] ::tcltest] == -1} { @@ -2014,7 +2014,7 @@ test oo-22.1 {OO and info frame} -setup { list [i level] [i frames] [dict get [c frame] object] } -cleanup { c destroy -} -result {1 {{* cmd {info frame 0} method frames class ::c level 0} {* cmd {info frame 0} method frames object ::i level 0}} ::c} +} -result {1 {{type source line * file * cmd {info frame 0} method frames class ::c level 0} {type source line * file * cmd {info frame 0} method frames object ::i level 0}} ::c} # Prove that the issue in [Bug 1865054] isn't an issue any more test oo-23.1 {Self-like derivation; complex case!} -setup { |