accessing
messages
	^ array "ifNil: [ array := OrderedCollection new ]"