Example (III)

Customer>>writeOn: aStream

writeStrategy write: self on: aStream.

AsciiStrategy>>write: aCustomer on: aStream

aStream nextPutAll: ‘name: ‘;

nextPutAll: aCustomer name;

…

Previous slide

Next slide

Back to first slide

View graphic version