Last updated at 1:39 pm UTC on 1 September 2019
In Squeak 5.3a
ProtoObject allSubclasses size 5439
ProtoObject withAllSubclasses size 5440
Object allSubclasses size 5427
Object withAllSubclasses size 5428
The classes are counted double as the following demonstration shows
coll := Object withAllSubclasses select: [:cls | cls name beginsWith: 'Morph'].
coll := (coll collect: [:cls2 | cls2 name]) asSortedCollection.
Array with: coll first with: coll second #(#Morph 'Morph class')
Morph is for the instance side selectors, and 'Morph class' for the class side selectors.