Trying to identify the problem made me stumble into ClassBuilder and 
looking at the core method ClassBuilder>>name: className inEnvironment: 
env subclassOf: newSuper type: type instanceVariableNames: instVarString 
classVariableNames: classVarString poolDictionaries: poolString 
category: category unsafe: unsafe.

This makes me wonder what the intend of the latest changes there were. 
They do look rather suspicious to me. Could someone with the initials 
"rw" please explain the reasoning for these changes? It's the last 
person who touched that method and unfortunately there is no method 
history any longer :-((( (the version found in 3.8 from '04 looks 
approximately correct so any changes inbetween would be interesting)

Cheers,
   - Andreas


Andreas Raab wrote:
> Klaus D. Witzel wrote:
>> on Mon, 23 Oct 2006 10:35:13 +0200, you wrote:
>>> ... Looking at TCompilingBehavior's users I find TPureBehavior; 
>>> looking at TCompilingDescription's users I find ... "an 
>>> IdentitySet(ClassDescription ClassDescription TraitDescription)". 
>>> Huh? Anyone else seeing this? An identity set with a duplicate entry?
>>
>> Confirmed, printing "array fourth == array fifth" in an inspector on 
>> TCompilingDescription => true.
> 
> And not only that. All of the following traits have duplicate users and 
> it's not limited to ClassDescription/TraitDescription either.
> 
> TAccessingMethodDictDescription users
>   an IdentitySet(ClassDescription ClassDescription TraitDescription)
> 
> TBasicCategorisingDescription users
>   an IdentitySet(ClassDescription ClassDescription TraitDescription)
> 
> TBehaviorCategorization users
>   an IdentitySet(Trait Class Class Class)
> 
> TCommentDescription users
>   an IdentitySet(ClassDescription ClassDescription TraitDescription)
> 
> TCompilingDescription users
>   an IdentitySet(ClassDescription ClassDescription TraitDescription)
> 
> TCopyingDescription users
>   an IdentitySet(ClassDescription ClassDescription TraitDescription)
> 
> TFileInOutDescription users
>   an IdentitySet(ClassDescription ClassDescription TraitDescription)
> 
> TPrintingDescription users
>   an IdentitySet(ClassDescription ClassDescription TraitDescription)
> 
> TPureBehavior users
>   an IdentitySet(TraitBehavior Behavior Behavior)
> 
> TTestingDescription users
>   an IdentitySet(ClassDescription ClassDescription TraitDescription)
> 
> TTraitsCategorisingDescription users
>   an IdentitySet(ClassDescription ClassDescription TraitDescription)
> 
>