Index: tests/destroytest.tcl =================================================================== diff -u -rc00e6abc0c78284c5aef12eb2ca80e3d852b079c -r1a67ad0bf0b5c2092e1558d13659bad489f5bb75 --- tests/destroytest.tcl (.../destroytest.tcl) (revision c00e6abc0c78284c5aef12eb2ca80e3d852b079c) +++ tests/destroytest.tcl (.../destroytest.tcl) (revision 1a67ad0bf0b5c2092e1558d13659bad489f5bb75) @@ -437,6 +437,7 @@ Object create o2 ::nsf::alias o x o2 ? {o x} ::o2 "call object via alias" + ? {o info method type x} alias ## the forwarded object needs a per-object methods o2 method info args next o2 method set args next