7 Dec
2013
7 Dec
'13
8:34 p.m.
subclassHierarchy
| subclasses |
subclasses := OrderedCollection new.
self allSubclassesDo: [:each | subclasses add: each].
^ subclasses
to me it looks like too much thinking and this kind of API sucks.
I can understand
subclassHierarchyDepth
because it is about hierarchy but no subclasses.
Stef