Index: tests/object-system.xotcl
===================================================================
diff -u -r55263740a08228f32691565d74188bd6bc79c153 -r98003953e8c728b105528e0c2ed7d67ee7135d64
--- tests/object-system.xotcl	(.../object-system.xotcl)	(revision 55263740a08228f32691565d74188bd6bc79c153)
+++ tests/object-system.xotcl	(.../object-system.xotcl)	(revision 98003953e8c728b105528e0c2ed7d67ee7135d64)
@@ -13,7 +13,7 @@
      puts stderr "$msg returned '$r' ne '$expected'"
      exit
    } else {
-     puts stderr "$msg - passed"
+     puts  -nonewline stderr "."
    }
 }
 
@@ -90,5 +90,6 @@
 ? {X::slot info vars} __parameter
 ? {X info parameter} {{x 1} {y 2}}
 
+puts stderr "DONE"
 
 #puts stderr ===EXIT