Index: library/xotcl/tests/slottest.xotcl =================================================================== diff -u -N -r4bc60e16c10fdbbb640b3019d4bdebdc469fdf55 -racc540eae81024718461724ce69e7971fa9ddfa9 --- library/xotcl/tests/slottest.xotcl (.../slottest.xotcl) (revision 4bc60e16c10fdbbb640b3019d4bdebdc469fdf55) +++ library/xotcl/tests/slottest.xotcl (.../slottest.xotcl) (revision acc540eae81024718461724ce69e7971fa9ddfa9) @@ -619,9 +619,9 @@ ? {lsort [Person info slots]} "::Person::slot::name ::Person::slot::projects ::Person::slot::salary" -? {Person::slot::name multivalued} 0 -? {Person::slot::salary multivalued} 0 -? {Person::slot::projects multivalued} 1 +? {Person::slot::name multivalued get} 0 +? {Person::slot::salary multivalued get} 0 +? {Person::slot::projects multivalued get} 1 Person p2 -name "John Doe" ? {p2 name} "John Doe"