Fighting again with MC - Beginners

5 Aug 2008


      Hi all,
Is the second time I'm having  troubles with simple changes to my 
package :S, and I can't figure out what I'm doing bad.
I'm working in a little app. I did it 2 minor changes writing some 
comments on Doc side of a class, one line on a method commented and so on.
Now, I'm trying to commit to my MC repository, and I get an:
Error: Subscript Out Of Bounds: 1
Following the debugger, seems the error is in:
foreignExtensionMethodsForClass: aClass
    ^ (self foreignExtensionCategoriesForClass: aClass)
        gather: [:cat | (aClass organization listAtCategoryNamed: cat)
                          collect: [:sel | self referenceForMethod: sel 
ofClass: aClass]]
where 'cat' is nil. But I don't know wich Category is this.
Some advice?
Note: Debug Report attached. cid:part1.02090207.00060503@lordzealon.com
Error: subscript is out of bounds: 1
5 August 2008 7:07:25 pm
VM: Win32 - a SmalltalkImage
Image: Squeak3.10.2 [latest update: #7179]
SecurityManager state:
Restricted: false
FileAccess: true
SocketAccess: true
Working Dir E:\Desarrollo\Squeak3.10.2-7179-glp
Trusted Dir E:\Desarrollo\Squeak3.10.2-7179-glp\Giuseppe
Untrusted Dir C:\My Squeak\Giuseppe
ByteSymbol(Object)>>error:
    Receiver: #''
    Arguments and temporary variables: 
    	aString: 	'subscript is out of bounds: 1'
    Receiver's instance variables: 
#''
ByteSymbol(Object)>>errorSubscriptBounds:
    Receiver: #''
    Arguments and temporary variables: 
    	index: 	1
    Receiver's instance variables: 
#''
ByteSymbol(Object)>>at:
    Receiver: #''
    Arguments and temporary variables: 
    	index: 	1
    Receiver's instance variables: 
#''
ByteSymbol>>at:
    Receiver: #''
    Arguments and temporary variables: 
    	index: 	1
    Receiver's instance variables: 
#''
--- The full stack ---
ByteSymbol(Object)>>error:
ByteSymbol(Object)>>errorSubscriptBounds:
ByteSymbol(Object)>>at:
ByteSymbol>>at:
 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
ByteSymbol(SequenceableCollection)>>first
PackageInfo>>isForeignClassExtension:
[] in PackageInfo>>foreignExtensionCategoriesForClass: {[:cat | self isForeignClassExtension: cat]}
Array(SequenceableCollection)>>select:
PackageInfo>>foreignExtensionCategoriesForClass:
PackageInfo>>foreignExtensionMethodsForClass:
PackageInfo>>coreMethodsForClass:
[] in PackageInfo>>coreMethods {[:class | self coreMethodsForClass: class]}
[] in OrderedCollection(Collection)>>gather: {[:ea | stream   nextPutAll: (aBlock value: ea)]}
OrderedCollection>>do:
[] in OrderedCollection(Collection)>>gather: {[:stream | self   do: [:ea | stream     nextPutAll: (aBlock value: ea)]]}
Array class(SequenceableCollection class)>>streamContents:
OrderedCollection(Collection)>>gather:
PackageInfo>>coreMethods
PackageInfo>>methods
MCPackage>>snapshot
MCWorkingCopy>>newVersionWithName:message:
[] in MCWorkingCopy>>newVersion {[:pair | self newVersionWithName: pair first message: pair last]}
Array(Object)>>ifNotNilDo:
MCWorkingCopy>>newVersion
MCWorkingCopyBrowser>>saveVersion
PluggableButtonMorphPlus(PluggableButtonMorph)>>performAction
PluggableButtonMorphPlus>>performAction
[] in PluggableButtonMorphPlus(PluggableButtonMorph)>>mouseUp: {[:m | (m containsPoint: evt cursorPoint)   ifTrue: [m performAction]]}
Array(SequenceableCollection)>>do:
PluggableButtonMorphPlus(PluggableButtonMorph)>>mouseUp:
PluggableButtonMorphPlus>>mouseUp:
PluggableButtonMorphPlus(Morph)>>handleMouseUp:
MouseButtonEvent>>sentTo:
PluggableButtonMorphPlus(Morph)>>handleEvent:
PluggableButtonMorphPlus(Morph)>>handleFocusEvent:
[] in HandMorph>>sendFocusEvent:to:clear: {[ActiveHand := self.  ActiveEvent := anEvent.  e := anEvent     transformedB...]}
[] in PasteUpMorph>>becomeActiveDuring: {[aBlock value]}
BlockContext>>on:do:
PasteUpMorph>>becomeActiveDuring:
HandMorph>>sendFocusEvent:to:clear:
HandMorph>>sendEvent:focus:clear:
HandMorph>>sendMouseEvent:
HandMorph>>handleEvent:
HandMorph>>processEvents
[] in WorldState>>doOneCycleNowFor: {[:h |  ActiveHand := h.  h processEvents.  capturingGesture := capturingGest...]}
Array(SequenceableCollection)>>do:
WorldState>>handsDo:
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
PasteUpMorph>>doOneCycle
[] in Project class>>spawnNewProcess {[[World doOneCycle.  Processor yield.  false] whileFalse.  nil]}
[] in BlockContext>>newProcess {[self value.  Processor terminateActive]}