Index: tests/object-system.tcl
===================================================================
diff -u -r89376e0f64856bb395fdb4407c9646787545a08b -rd1ed482555d4d28dbb41fb9ca2723eabb5e01221
--- tests/object-system.tcl	(.../object-system.tcl)	(revision 89376e0f64856bb395fdb4407c9646787545a08b)
+++ tests/object-system.tcl	(.../object-system.tcl)	(revision d1ed482555d4d28dbb41fb9ca2723eabb5e01221)
@@ -105,8 +105,8 @@
 ? {::nsf::isobject C::slot} 1
 ? {C info children} ::C::slot
 
-
 C copy X
+puts stderr ===after
 ? {::nsf::isobject X} 1
 ? {X info vars} ""
 ? {C info vars} ""