doesNotUnderstand: aMessage [
^(Array canUnderstand: aMessage selector)
ifTrue: [aMessage sendTo: {self}]
ifFalse: [self basicDoesNotUnderstand: aMessage]
]
]
You did realize that this is also subsuming
do: aBlock [ aBlock value: self ]
didn't you? :-P
Paolo
_______________________________________________
help-smalltalk mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/help-smalltalk
