[ 物体 ] 反应: [ 文本 ]

var x := 物体 新的。
x 上: ['反应:'] 做: { :a <- (a + ['!'])。
}。
Stdout 写入: x abc。
abc!