[ Program ] use: [ Text ]

var f := File new: (Path /tmp: ['x.ctr']).
 f write: ['☞ x ≔ 123.'].
 Program use: (Path /tmp: ['x.ctr']).
 Pen write: x, stop.