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