Index: tests/aliastest.xotcl =================================================================== diff -u -r210eab6d9149846d5d6a6a8e0fa74e232ca5b6de -r48d5751e9aeb6a4f388f6531a9248c1847b22cae --- tests/aliastest.xotcl (.../aliastest.xotcl) (revision 210eab6d9149846d5d6a6a8e0fa74e232ca5b6de) +++ tests/aliastest.xotcl (.../aliastest.xotcl) (revision 48d5751e9aeb6a4f388f6531a9248c1847b22cae) @@ -4,8 +4,8 @@ Test parameter count 10 # The system methods of Object are either alias or forwarders -? {lsort [::xotcl::Slot info methods -methodtype alias]} {assign get} -? {::xotcl::Slot info method definition get} "::xotcl::Slot alias get ::xotcl::setinstvar" +? {lsort [::xotcl::ObjectParameterSlot info methods -methodtype alias]} {assign get} +? {::xotcl::ObjectParameterSlot info method definition get} "::xotcl::ObjectParameterSlot alias get ::xotcl::setinstvar" # define an alias and retrieve its definition set cmd "::xotcl2::Object alias -objscope set ::set"