Error ?

[keith hodges]

In my new version of WAMagmaRepository I change it to be a subclass of 
Object... then this happens

help!

Keith

 
Subject: [BUG][] in MagmaClassIdManager(MaClassIdManager)>>idForClass: 
{[MaSoftwareError signal: aClass name , ' has no id assigned.']}

here insert explanation of what you were doing, suspect changes you've 
made and so forth.

5 September 2006 8:36:49 pm

VM: unix - a SmalltalkImage
Image: Squeak3.8 [latest update: #6665]

SecurityManager state:
Restricted: false
FileAccess: true
SocketAccess: true
Working Dir /media/hda1/squeak/3.8-dan
Trusted Dir /media/hda1/squeak/3.8-dan/secure
Untrusted Dir /media/hda1/squeak/3.8-dan/My Squeak

[] in MagmaClassIdManager(MaClassIdManager)>>idForClass: 
{[MaSoftwareError signal: aClass name , ' has no id assigned.']}
    Arguments and temporary variables:
        aClass:     WAStoreRepository

[] in MagmaClassIdManager(MaClassIdManager)>>idForClass:ifAbsent: {[self 
maMarked: 'performance'.  (index := minimumClasses indexOf: aClass) > ...]}
    Arguments and temporary variables:
        aClass:     WAStoreRepository
        aBlock:     [] in 
MagmaClassIdManager(MaClassIdManager)>>idForClass: {[MaSoftwareEr...etc...
        index:     0

Dictionary>>at:ifAbsent:
    Receiver: a Dictionary(AnObsoleteWAStoreRepository->121 Array->10 
ArrayedCollection->110 Behavior->1...etc...
    Arguments and temporary variables:
        key:     WAStoreRepository
        aBlock:     [] in 
MagmaClassIdManager(MaClassIdManager)>>idForClass:ifAbsent: {[sel...etc...
        assoc:     nil
    Receiver's instance variables:
        tally:     46
        array:     #(MaByteSequenceIndex->125 
SequenceableCollection->111 UndefinedObject->...etc...

MagmaClassIdManager(MaClassIdManager)>>idForClass:ifAbsent:
    Receiver: a MagmaClassIdManager
    Arguments and temporary variables:
        aClass:     WAStoreRepository
        aBlock:     [] in 
MagmaClassIdManager(MaClassIdManager)>>idForClass: {[MaSoftwareEr...etc...
        index:     0
    Receiver's instance variables:
        classesById:     a Dictionary(1->Metaclass 2->Class 
3->MaClassReference 4->MaClassD...etc...
        idsByClass:     a Dictionary(AnObsoleteWAStoreRepository->121 
Array->10 ArrayedColl...etc...
        nextClassId:     130
        classDefinitionsById:     a Dictionary(1->an OrderedCollection(a 
MaClassDefinition ...etc...
        inImageDefinitions:     a 
Dictionary(AnObsoleteWAStoreRepository->a MaClassDefiniti...etc...
        minimumClasses:     #(Metaclass Class MaClassReference 
MaClassDefinition Boolean Sm...etc...


--- The full stack ---
[] in MagmaClassIdManager(MaClassIdManager)>>idForClass: 
{[MaSoftwareError signal: aClass name , ' has no id assigned.']}
[] in MagmaClassIdManager(MaClassIdManager)>>idForClass:ifAbsent: {[self 
maMarked: 'performance'.  (index := minimumClasses indexOf: aClass) > ...]}
Dictionary>>at:ifAbsent:
MagmaClassIdManager(MaClassIdManager)>>idForClass:ifAbsent:
 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
MagmaClassIdManager(MaClassIdManager)>>idForClass:
MagmaClassIdManager(MaClassIdManager)>>classDefinitionsForClass:
[] in MagmaClassIdManager(MaClassIdManager)>>refreshInImageDefinition: 
{[:eachClass | (eachClass = aClass    or: [self includesIdForClass: 
eachClass...]}
WAStoreRepository class(Behavior)>>withAllSubclassesDo:
MagmaClassIdManager(MaClassIdManager)>>refreshInImageDefinition:
MagmaClassIdManager>>handleClassModification:using:
MaObjectSerializer>>handleClassModification:
MagmaSession>>handleClassModification:
WeakMessageSend>>valueWithArguments:
[] in WeakActionSequenceTrappingErrors>>valueWithArguments:startingFrom: 
{[answer := each valueWithArguments: anArray]}
BlockContext>>on:do:
WeakActionSequenceTrappingErrors>>valueWithArguments:startingFrom:
[] in WeakActionSequenceTrappingErrors>>valueWithArguments:startingFrom: 
{[:exc |  self valueWithArguments: anArray startingFrom: index + 1.  exc 
pass]}
BlockContext>>valueWithPossibleArgs:
[] in MethodContext(ContextPart)>>handleSignal: {[(self tempAt: 2)   
valueWithPossibleArgs: {exception}]}
BlockContext>>ensure:
MethodContext(ContextPart)>>handleSignal:
MaSoftwareError(Exception)>>signal
MaSoftwareError(Exception)>>signal:
MaSoftwareError class(Exception class)>>signal:
[] in MagmaClassIdManager(MaClassIdManager)>>idForClass: 
{[MaSoftwareError signal: aClass name , ' has no id assigned.']}
[] in MagmaClassIdManager(MaClassIdManager)>>idForClass:ifAbsent: {[self 
maMarked: 'performance'.  (index := minimumClasses indexOf: aClass) > ...]}
Dictionary>>at:ifAbsent:
MagmaClassIdManager(MaClassIdManager)>>idForClass:ifAbsent:
MagmaClassIdManager(MaClassIdManager)>>idForClass:
MagmaClassIdManager(MaClassIdManager)>>classDefinitionsForClass:
[] in MagmaClassIdManager(MaClassIdManager)>>refreshInImageDefinition: 
{[:eachClass | (eachClass = aClass    or: [self includesIdForClass: 
eachClass...]}
...etc...


		
___________________________________________________________ 
All New Yahoo! Mail – Tired of Vi at gr@! come-ons? Let our SpamGuard protect you. http://uk.docs.yahoo.com/nowyoucan.html