Index: tests/parameters.tcl
===================================================================
diff -u -ra588ad9e5d66f12c4b2a5baf9153b652932a5912 -r649c33f8bca87b389877c3e3c1b7eb8e1182c843
--- tests/parameters.tcl	(.../parameters.tcl)	(revision a588ad9e5d66f12c4b2a5baf9153b652932a5912)
+++ tests/parameters.tcl	(.../parameters.tcl)	(revision 649c33f8bca87b389877c3e3c1b7eb8e1182c843)
@@ -355,7 +355,7 @@
   ? {Foo create foo -ints {1 a 2}} {invalid value in "1 a 2": expected integer but got "a" for parameter -ints}
   
   # make slot incremental
-  Foo slot ints eval {
+  Foo::slot::ints eval {
     set :incremental 1
     :optimize
   }
@@ -807,7 +807,7 @@
   ? {ParamTest create p -u c1} {expected upper but got "c1" for parameter -u}
   ? {ParamTest create p -us {A B c}} \
       {invalid value in "A B c": expected upper but got "c" for parameter -us}
-  ParamTest slot us eval {
+  ParamTest::slot::us eval {
     set :incremental 1
     :optimize
   }