[ File ] append: [ Text ]

var x := File new: (Path /tmp: ['a.txt']).
 x write: ['123'].
 Pen write: x read, stop.
 x append: ['345'].
 Pen write: x read, stop.