Index: tests/contains.test =================================================================== diff -u -rb4266efa283e86989f6f09f3938f41f173580400 -r7d197d8e8a9ad6229c2aa8a11111118f5cab26b6 --- tests/contains.test (.../contains.test) (revision b4266efa283e86989f6f09f3938f41f173580400) +++ tests/contains.test (.../contains.test) (revision 7d197d8e8a9ad6229c2aa8a11111118f5cab26b6) @@ -95,7 +95,7 @@ #puts stderr =====3 } -#puts ====NX +puts ====NX package forget nx package req nx @@ -104,10 +104,6 @@ package forget XOTcl package require XOTcl -######################################################################## -# trigger the call of "cleanup" to work via method dispatch -::xotcl::Object create o1 -o1 proc cleanup {} {return} ######################################################################## # @@ -121,6 +117,10 @@ ? {set ::errorMsg} {class "::C0" has a different object system as class "::nx::Object"} ::nx::Class create C1 -superclass ::nx::Object +# trigger the call of "cleanup" to work via method dispatch +::xotcl::Object create o1 +o1 proc cleanup {} {puts stderr "CLEANUP"; return} + #C0 create c0 #C0 create c0 C1 create c1