Index: xotcl/tests/speedtest.xotcl
===================================================================
diff -u -r2846921e448d4d4aeb3245ebbfe4381182f0e286 -r1aa7246cc8e44078c9dbd33e03992478615f314f
--- xotcl/tests/speedtest.xotcl	(.../speedtest.xotcl)	(revision 2846921e448d4d4aeb3245ebbfe4381182f0e286)
+++ xotcl/tests/speedtest.xotcl	(.../speedtest.xotcl)	(revision 1aa7246cc8e44078c9dbd33e03992478615f314f)
@@ -1,5 +1,5 @@
 #memory trace on
-# $Id: speedtest.xotcl,v 1.6 2006/09/25 08:29:04 neumann Exp $
+# $Id: speedtest.xotcl,v 1.7 2006/09/27 08:12:40 neumann Exp $
 package require XOTcl
 namespace import -force xotcl::*
 lappend auto_path [file dirname [info script]]/..
@@ -250,7 +250,7 @@
 if {[info exists xotcl_version]} {
   Test new -cmd {llength [Object info instances]} -expected 1001
 } else {
-  Test new -cmd {llength [Object info instances]} -expected 1003
+  Test new -cmd {llength [Object info instances]} -expected 1007
 }
 
 Test new -cmd {Object info instances ::c::500} -expected ::c::500