Index: tests/protected.test
===================================================================
diff -u -rb531a50ecc43d0c13e2432b099a436c3260c7a49 -r2872e1f0a6523c7fb44952492e05414c4f8d9c84
--- tests/protected.test	(.../protected.test)	(revision b531a50ecc43d0c13e2432b099a436c3260c7a49)
+++ tests/protected.test	(.../protected.test)	(revision 2872e1f0a6523c7fb44952492e05414c4f8d9c84)
@@ -137,7 +137,7 @@
       "redefine forward SET"
 
   # try to redefine via setter
-  ? {C property SET} \
+  ? {C property -accessor public SET} \
       {refuse to overwrite protected method 'SET'; derive e.g. a sub-class!} \
       "redefine property SET"
   
@@ -738,7 +738,7 @@
     :property -accessor private {c c1d}
     :public method bard {p} {return [: -local $p]}
     :create d1 {
-      :object property {c c1o}
+      :object property -accessor public {c c1o}
     }
   }
 
@@ -774,7 +774,7 @@
 #
 nx::Test case private-shadows-public-property {
   nx::Class create C {
-    :property {x c}
+    :property -accessor public {x c}
   }
   nx::Class create D -superclass C {
     :property -accessor private {x d}