Index: tests/parameters.tcl
===================================================================
diff -u -r3754364287df2dfdf79b81dfa69224eae19cf691 -rd9c5a4b5c33bfa0bdb33ef52bd703390d933eb98
--- tests/parameters.tcl	(.../parameters.tcl)	(revision 3754364287df2dfdf79b81dfa69224eae19cf691)
+++ tests/parameters.tcl	(.../parameters.tcl)	(revision d9c5a4b5c33bfa0bdb33ef52bd703390d933eb98)
@@ -24,6 +24,14 @@
   Class create M
   c1 mixin M
 
+  
+  ? {::nsf::isobject o1} 1
+  ? {::nsf::isobject o1000} 0
+  
+  ? {::nsf::objectproperty class C} 1
+  ? {::nsf::is C class} 1
+  ? {C info is class} 1
+
   ? {::nsf::parametercheck object o1} 1
   ? {::nsf::parametercheck -nocomplain object o1} 1
   ? {::nsf::parametercheck -nocomplain object o1000} 0
@@ -35,10 +43,8 @@
   ? {c1 info has mixin ::M} 1  
   ? {c1 info has mixin ::M1} {expected class but got "::M1" for parameter class}
   #? {::nsf::parametercheck hasmixin,arg=::M c1} 1
+
   
-  ? {::nsf::isobject o1} 1
-  ? {::nsf::isobject o1000} 0
-  
   #? {::nsf::objectproperty type c1 C} 1
   ? {c1 info has type C} 1
   ? {c1 info has type C1} {expected class but got "C1" for parameter class}