20 Jul
2009
20 Jul
'09
12:57 p.m.
Stefan,
I was interested in case a). I was a little wrong with the syntax and was not able to build the statement right.
Thanks.
# ad a) # Class create C -slots { Attribute create a1 -proc assign args { puts "[self]->[self proc] called" next } -proc get args { puts "[self]->[self proc] called" next } }
C create c c a1 1 c a1