Index: tests/serialize.test =================================================================== diff -u -r75a621dace63d1282e9abd6f0f4da5fbe11d47c5 -r5d1617640ad71fd52b069f81cfcadbe4cbb6f2a2 --- tests/serialize.test (.../serialize.test) (revision 75a621dace63d1282e9abd6f0f4da5fbe11d47c5) +++ tests/serialize.test (.../serialize.test) (revision 5d1617640ad71fd52b069f81cfcadbe4cbb6f2a2) @@ -150,10 +150,11 @@ ? {::nsf::object::exists ::C::slot} 1 ? {::nsf::object::exists ::C::per-object-slot} 1 - ? {::nsf::method::property ::C -per-object slot slotcontainer} 1 - ? {::nsf::method::property ::C -per-object per-object-slot slotcontainer} 1 + ? {::nx::isSlotContainer ::C::slot} 1 + ? {::nx::isSlotContainer ::C::per-object-slot} 1 ? {::nsf::object::exists ::C::slot::a} 1 ? {::nsf::object::exists ::C::per-object-slot::x} 1 + ? {::nsf::object::property ::C hasperobjectslots} 1 set script [C serialize] C destroy @@ -162,10 +163,11 @@ eval $script ? {::nsf::object::exists ::C::slot} 1 ? {::nsf::object::exists ::C::per-object-slot} 1 - ? {::nsf::method::property ::C -per-object slot slotcontainer} 1 - ? {::nsf::method::property ::C -per-object per-object-slot slotcontainer} 1 + ? {::nx::isSlotContainer ::C::slot} 1 + ? {::nx::isSlotContainer ::C::per-object-slot} 1 ? {::nsf::object::exists ::C::slot::a} 1 ? {::nsf::object::exists ::C::per-object-slot::x} 1 + ? {::nsf::object::property ::C hasperobjectslots} 1 } #