Index: tests/parameters.test
===================================================================
diff -u -r364a9eda329acd7d20173a4165d71394d3061aae -r489b8b8e5f1ce1522121dcee270f18396c380071
--- tests/parameters.test	(.../parameters.test)	(revision 364a9eda329acd7d20173a4165d71394d3061aae)
+++ tests/parameters.test	(.../parameters.test)	(revision 489b8b8e5f1ce1522121dcee270f18396c380071)
@@ -1378,11 +1378,10 @@
   }
   ? {o eval {info exists :a}} 1
 
-  ? {o a} 1
+  ? {o a} 0
   ? {o a 1} 2
   ? {o a} 2
   ? {o a 2} 3
-
   # per-class:
 
   Class create Klass
@@ -1403,13 +1402,7 @@
   Klass property {a 0} {
     set :valuechangedcmd {::nsf::var::set $obj $var [expr [list [::nsf::var::set $obj $var] + 1]]}
   }
-
-  #
-  # TODO: Right now, the per-object traces *do* fire upon setting the
-  # default value; the per-class traces won't ... this should be
-  # symmetric, either way ...
-  #
-  
+ 
   Klass create k
   ? {k eval {info exists :a}} 1
   ? {k a} 0; # should be 1, reflecting the corresponding per-object case above