Hi Stef,

It seems like the code you posted is more complex than it needs to be. Wouldn't the following three lines of code do the same?

Getting all super sending methods of a class:
Morph methods select: #sendsToSuper             

Getting all super sending methods of a class and its subclasses:
Morph withAllSubclasses inject: Set new into: [ :result :class |
        result addAll: (class methods select: #sendsToSuper); yourself ]

HTH,
Adrian

On Jun 20, 2008, at 11:39 , Stéphane Ducasse wrote:

it would be nice to have a better version with tests for getting method perfomring super send

Stef

We did that in a rush with alex sthis morning

<gettingSupercalls. 2.cs>_______________________________________________
Pharo-project mailing list
[email protected]
http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project


_______________________________________________
Pharo-project mailing list
[email protected]
http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project

Reply via email to