Index: library/xotcl/tests/slottest.xotcl
===================================================================
diff -u -r4c6c39cd6a1aa703a9a8cf7dc89baf7d4a58d6c5 -r45e24b34c85bf0fc3e14db5250550100bd07ff31
--- library/xotcl/tests/slottest.xotcl	(.../slottest.xotcl)	(revision 4c6c39cd6a1aa703a9a8cf7dc89baf7d4a58d6c5)
+++ library/xotcl/tests/slottest.xotcl	(.../slottest.xotcl)	(revision 45e24b34c85bf0fc3e14db5250550100bd07ff31)
@@ -3,7 +3,7 @@
 package require XOTcl 2.0; namespace import -force ::xotcl::*
 package require nx::test
 
-nx::Test parameter count 1000
+nx::test configure -count 1000
 
 # what's new:
 #   - slots instances are manager objects for slot values
@@ -146,7 +146,7 @@
 #
 ::xotcl::MetaSlot create Role -superclass Attribute -parameter {references}
 
-::nx::Test case info-slots-heritage {
+::nx::test case info-slots-heritage {
   ::xotcl::Class create C -parameter {c1 c2}
   ::xotcl::Class create D -superclass C -parameter {c2 c3}
 
@@ -372,7 +372,7 @@
 #puts [A serialize]
 
 ###################
-nx::Test case req-param {
+nx::test case req-param {
   ::xotcl::Class create C -parameter {y:required x:required}
   C instproc init args {set ::_ $args}
 
@@ -389,7 +389,7 @@
 ###################
 # Application Slots
 #
-nx::Test case app-slots
+nx::test case app-slots
 
 Class Person -slots {
   Attribute create name
@@ -475,7 +475,7 @@
 #######################################################
 # defaultcmd via slots
 #######################################################
-nx::Test case defaultcmd
+nx::test case defaultcmd
 set ::hu 0
 Class C -slots {
   Attribute create x -defaultcmd {incr ::hu; set x 101}
@@ -489,7 +489,7 @@
 #######################################################
 # nested contains
 #######################################################
-nx::Test case nested-contains
+nx::test case nested-contains
 
 Class Point -parameter {{x 100} {y 300}}
 Class Rectangle -parameter {color}
@@ -521,7 +521,7 @@
 #######################################################
 # assign via slots
 #######################################################
-nx::Test case assign-via-slots
+nx::test case assign-via-slots
 
 Class create A -slots {
   Attribute create foo -default 1 -proc  assign {domain var value} {
@@ -568,7 +568,7 @@
 x move y
 ? {y a} 4
 
-::nx::Test case slots-compat
+::nx::test case slots-compat
 #
 # Some tests covering the backward compatibility of NX/XOTcl2 hybrid
 # slots to the XOTcl1 slot API (as extracted from the XOTcl language