Index: tests/disposition.test
===================================================================
diff -u -r5d1617640ad71fd52b069f81cfcadbe4cbb6f2a2 -r102a1a9f4f678f98e7bcf7648ad1714147a29a47
--- tests/disposition.test	(.../disposition.test)	(revision 5d1617640ad71fd52b069f81cfcadbe4cbb6f2a2)
+++ tests/disposition.test	(.../disposition.test)	(revision 102a1a9f4f678f98e7bcf7648ad1714147a29a47)
@@ -26,7 +26,7 @@
     #
     :public class method setObjectParams {spec} {
       :protected method __objectparameter {} [list return $spec]
-      ::nsf::invalidateobjectparameter [current]
+      ::nsf::parameter:invalidate::classcache [current]
     }
     #:class method __objectparameter {} {
     #  return ${:objectparams} 
@@ -324,7 +324,7 @@
   Class create S {
     :public class method setObjectParams {spec} {
       :protected method __objectparameter {} [list return $spec]
-      ::nsf::invalidateobjectparameter [current]
+      ::nsf::parameter:invalidate::classcache [current]
     }
     #:class method __objectparameter {} {
     #  return ${:objectparams} 
@@ -387,7 +387,7 @@
   Class create R {
      :public class method setObjectParams {spec} {
        :protected method __objectparameter {} [list return $spec]
-       ::nsf::invalidateobjectparameter [current]
+       ::nsf::parameter:invalidate::classcache [current]
     }
   }
 
@@ -451,7 +451,7 @@
   Class create Callee {
     :public class method setObjectParams {spec} {
       :protected method __objectparameter {} [list return $spec]
-      ::nsf::invalidateobjectparameter [current]
+      ::nsf::parameter:invalidate::classcache [current]
     }
   }
 
@@ -619,7 +619,7 @@
   Class create C {
     :public class method setObjectParams {spec} {
       :protected method __objectparameter {} [list return $spec]
-      ::nsf::invalidateobjectparameter [current]
+      ::nsf::parameter:invalidate::classcache [current]
     }
     :public method foo {args} {
       set :foo $args
@@ -760,7 +760,7 @@
   Class create C {
     :public class method setObjectParams {spec} {
       :protected method __objectparameter {} [list return $spec]
-      ::nsf::invalidateobjectparameter [current]
+      ::nsf::parameter:invalidate::classcache [current]
     }
   }
   
@@ -775,7 +775,7 @@
   Class create C {
     :public class method setObjectParams {spec} {
       :protected method __objectparameter {} [list return $spec]
-      ::nsf::invalidateobjectparameter [current]
+      ::nsf::parameter:invalidate::classcache [current]
     }
     :public method Residualargs args {
       puts stderr "aliased RESIDUALARGS <[llength $args]>"
@@ -865,7 +865,7 @@
   Class create C {
     :public class method setObjectParams {spec} {
       :protected method __objectparameter {} [list return $spec]
-      ::nsf::invalidateobjectparameter [current]
+      ::nsf::parameter:invalidate::classcache [current]
     }
     :method init {} {
       incr :y
@@ -886,7 +886,7 @@
   Class create C {
     :public class method setObjectParams {spec} {
       :protected method __objectparameter {} [list return $spec]
-      ::nsf::invalidateobjectparameter [current]
+      ::nsf::parameter:invalidate::classcache [current]
     }
   }
 
@@ -1086,7 +1086,7 @@
   Class create C {
     :public class method setObjectParams {spec} {
       :protected method __objectparameter {} [list return $spec]
-      ::nsf::invalidateobjectparameter [current]
+      ::nsf::parameter:invalidate::classcache [current]
     }
   }
   
@@ -1179,7 +1179,7 @@
   Class create T {
     :public class method setObjectParams {spec} {
       :protected method __objectparameter {} [list return $spec]
-      ::nsf::invalidateobjectparameter [current]
+      ::nsf::parameter:invalidate::classcache [current]
     }
   }