Index: tests/object-system.test
===================================================================
diff -u -N -r5a162b098b6a9550218646d470b274769bda8da1 -r3c1482d9e1f80f0216250f5debade5d8edb1b17e
--- tests/object-system.test	(.../object-system.test)	(revision 5a162b098b6a9550218646d470b274769bda8da1)
+++ tests/object-system.test	(.../object-system.test)	(revision 3c1482d9e1f80f0216250f5debade5d8edb1b17e)
@@ -28,13 +28,15 @@
 ? {nx::Object info superclasses} ""
 ? {nx::Object info class} ::nx::Class
 ? {nx::Object info baseclass} ::nx::Object
+? {nx::Object info baseclass} [lindex [::nx::Object info precedence] end]
 
 ? {::nsf::object::exists nx::Class} 1
 ? {::nsf::is class nx::Class} 1
 ? {::nsf::is metaclass nx::Class} 1
 ? {nx::Class info superclasses} ::nx::Object
 ? {nx::Class info class} ::nx::Class
 ? {nx::Class info baseclass} ::nx::Object
+? {nx::Class info baseclass} [lindex [::nx::Class info precedence] end]
 
 #
 # Minimal argument passing tests for early problem detection
@@ -85,6 +87,8 @@
 ? {::nsf::is metaclass o} 0
 ? {o info class} ::nx::Object
 ? {o info baseclass} ::nx::Object
+? {o info baseclass} [lindex [o info precedence] end]
+
 ? {nx::Object info instances o} ::o
 ? {nx::Object info instances ::o} ::o
 o destroy
@@ -111,6 +115,7 @@
 ? {M info superclasses} ::nx::Class
 ? {M info class} ::nx::Class
 ? {M info baseclass} ::nx::Object
+? {M info baseclass} [lindex [M info precedence] end]
 
 M create C
 ? {::nsf::object::exists C} 1