accessing
gtTextFor: aView
	<gtView>
	^ aView textEditor
		title: 'STON';
		text: [ STON toStringPretty: self ]