Index: library/xotcl/tests/speedtest.xotcl =================================================================== diff -u -r76fadfb3f603f8f96a6064f4bb5342133923ec53 -rbedb248602f8940383c0f4a10bb4f99b3a5f2c4f --- library/xotcl/tests/speedtest.xotcl (.../speedtest.xotcl) (revision 76fadfb3f603f8f96a6064f4bb5342133923ec53) +++ library/xotcl/tests/speedtest.xotcl (.../speedtest.xotcl) (revision bedb248602f8940383c0f4a10bb4f99b3a5f2c4f) @@ -187,7 +187,7 @@ #Test new -cmd {set x [llength [c info children]]} -count 1 -expected 999 Test new -cmd {llength [c info children]} -count 1 -expected $ccount Test new -cmd {set x [llength [c info children]]} -count 1 -expected $ccount -puts stderr XXX-[llength [Object info instances]]-[lsort [Object info instances]] + Test new -cmd {set x [llength [Object info instances]]} -count 1 -expected $ocount Test new -cmd {llength [Object info instances]} -count 1 -expected $ocount