[ Object ] respond: [ Text ]

var x := Object new.
x on: ['respond:'] do: { :a <- (a + ['!']).
}.
Pen write: x abc.
abc!