Anonymous user
Delegates: Difference between revisions
→{{header|Smalltalk}}
Line 2,425:
{{works with|Smalltalk/X}}
Definition of the thingy:
<lang smalltalk>Object
subclass:#Thingy
instanceVariableNames:''
Line 2,433 ⟶ 2,432:
^ 'thingy implementation'</lang>
Definition of the delegator:
<lang smalltalk>Object
subclass:#Delegator
instanceVariableNames:'delegate'
Line 2,446 ⟶ 2,444:
ifNotUnderstood:'default implementation'.</lang>
Sample use:
<lang smalltalk>
d := Delegator new.
d operation.
|