Index: tests/slottest.xotcl =================================================================== diff -u -r4ce2a0659cf44b3dbb7262f63fadb3333c968751 -r5524b83ed5dda30e55f7a02e4c22d26783688954 --- tests/slottest.xotcl (.../slottest.xotcl) (revision 4ce2a0659cf44b3dbb7262f63fadb3333c968751) +++ tests/slottest.xotcl (.../slottest.xotcl) (revision 5524b83ed5dda30e55f7a02e4c22d26783688954) @@ -34,6 +34,7 @@ # x {set x 1} # y {incr ::hu} # z {my trace add variable z read T1}} + Class C -slots { Attribute create x -initcmd {set x 1} Attribute create y -initcmd {incr ::hu}