Index: tests/slottest.xotcl =================================================================== diff -u -r217d826e64107056ae97176552cae3c776991b9e -r8f79347327f3c5f73faf86e87ebd6c8306265fbb --- tests/slottest.xotcl (.../slottest.xotcl) (revision 217d826e64107056ae97176552cae3c776991b9e) +++ tests/slottest.xotcl (.../slottest.xotcl) (revision 8f79347327f3c5f73faf86e87ebd6c8306265fbb) @@ -84,6 +84,7 @@ Class M Class O -mixin M +? {O mixin} ::M ? {catch {Object o -mixin check1 M}} 1 ? {O mixin} ::M Class M2