Pavel Krivanek wrote:
Some next interesting information: o := ((Metaclass allInstances detect: [:c | c superclass = ProtoObject class]) instVarNamed: #thisClass). 1. Smalltalk allClassesAndTraits select: [:c | o isKindOf: c] -> an OrderedCollection(Behavior Class ClassDescription Object ProtoObject) Smalltalk allClasses select: [:c | o class == c] -> an OrderedCollection() "WTF"
My gut feeling says 'o class == o' here. Also it may be interesting to see what is o class class. (o class is not inspectable, is it?) Herby
