Index: tests/varresolutiontest.xotcl
===================================================================
diff -u -re61fc14f5c25172a1d1f93bea03be54a772fb4b5 -r73eb4eccd33d1a940e2d2ca6dccc2f74216f0576
--- tests/varresolutiontest.xotcl	(.../varresolutiontest.xotcl)	(revision e61fc14f5c25172a1d1f93bea03be54a772fb4b5)
+++ tests/varresolutiontest.xotcl	(.../varresolutiontest.xotcl)	(revision 73eb4eccd33d1a940e2d2ca6dccc2f74216f0576)
@@ -3,16 +3,7 @@
 package require XOTcl; xotcl::use xotcl2
 package require xotcl::test
 
-proc ? {cmd expected {msg ""}} {
-  set count 1
-  if {$msg ne ""} {
-    set t [Test new -cmd $cmd -count $count -msg $msg]
-  } else {
-    set t [Test new -cmd $cmd -count $count]
-  }
-  $t expected $expected 
-  $t run
-}
+Test parameter count 1
 
 ::xotcl::alias ::xotcl2::Object eval -objscope ::eval 
 ::xotcl::alias ::xotcl2::Object array -objscope ::array