RosettaCodeData/Task/Add-a-variable-to-a-class-i.../Smalltalk/add-a-variable-to-a-class-i...

7 lines
80 B
Smalltalk

p := Point x:10 y:20.
addSlot value:p value:'z'.
p z:30.
p z.
p z:40.
p inspect