Hi.
When I try to access SqueakMap, it..er.. doesn't work. I get a debugger with a MNU while trying to read from a SmartRefStream.
I'm using 3.8#6665, a completely clean image.
Does anybody else have this problem?
Mikevdg.
----------- Dump that I found in Squeak follows: VM: unix - a SmalltalkImage Image: Squeak3.8 [latest update: #6665]
SecurityManager state: Restricted: false FileAccess: true SocketAccess: true Working Dir /home/mikevdg/squeak/maui Trusted Dir /home/mikevdg/squeak/maui/secure Untrusted Dir /home/mikevdg/squeak/maui/untrusted
UndefinedObject(Object)>>doesNotUnderstand: #do: Receiver: nil Arguments and temporary variables: aMessage: do: [] in ImageSegment>>comeFullyUpOnReload: {[:importedObject | (im...etc... Receiver's instance variables: nil
ImageSegment>>comeFullyUpOnReload: Receiver: an ImageSegment Arguments and temporary variables: smartRefStream: a SmartRefStream a ByteArray(33 13 13) mapFakeClassesToReal: an IdentityDictionary(Fake37SMSqueakMap->SMSqueakMap ) ccFixups: true receiverClasses: nil rootsToUnhiberhate: nil myProject: nil existing: nil importedObject: nil multiSymbol: nil aFake: nil Receiver's instance variables: arrayOfRoots: nil segment: a WordArrayForSegment(1929386342 358625803 3052688036 3050604417 31614...etc... outPointers: #(Fake37SMSqueakMap nil 'sm' true Dictionary SMFileCache Array UUI...etc... state: #imported segmentName: nil fileName: nil endMarker: SmartRefStream(ReferenceStream)>>next userRootCnt: 1 renamedClasses: nil
SmartRefStream(DataStream)>>next Receiver: a SmartRefStream a ByteArray(33 13 13) Arguments and temporary variables: type: 16 selector: #readShortInst anObject: an ImageSegment isARefType: true pos: nil internalObject: nil Receiver's instance variables: byteStream: a MultiByteBinaryOrTextStream a ByteArray(33 13 13) topCall: #marked basePos: 152 references: an IdentityDictionary() objects: an IdentityDictionary(size 246) currentReference: 2778 fwdRefEnds: an IdentityDictionary() blockers: an IdentityDictionary() skipping: an IdentitySet() insideASegment: false structures: a Dictionary(#Array->#(0) #ArrayedCollection->#(0) #ByteArray->#(0)...etc... steady: a Set(Integer UUID SMDocument Symbol SMCategorizableObject ByteString S...etc... reshaped: nil renamed: a Dictionary(#FlasherMorph->#Flasher ) renamedConv: a Dictionary(1->#SMSqueakMap 5->#Dictionary 6->#SMFileCache 7->#Ar...etc... superclasses: a Dictionary(#Array->#ArrayedCollection #ArrayedCollection->#Sequ...etc... progressBar: nil objCount: nil classInstVars: nil
SmartRefStream(ReferenceStream)>>next Receiver: a SmartRefStream a ByteArray(33 13 13) Arguments and temporary variables: curPosn: 2778 skipToPosn: nil haveIt: false theObject: false wasSkipping: nil Receiver's instance variables: byteStream: a MultiByteBinaryOrTextStream a ByteArray(33 13 13) topCall: #marked basePos: 152 references: an IdentityDictionary() objects: an IdentityDictionary(size 246) currentReference: 2778 fwdRefEnds: an IdentityDictionary() blockers: an IdentityDictionary() skipping: an IdentitySet() insideASegment: false structures: a Dictionary(#Array->#(0) #ArrayedCollection->#(0) #ByteArray->#(0)...etc... steady: a Set(Integer UUID SMDocument Symbol SMCategorizableObject ByteString S...etc... reshaped: nil renamed: a Dictionary(#FlasherMorph->#Flasher ) renamedConv: a Dictionary(1->#SMSqueakMap 5->#Dictionary 6->#SMFileCache 7->#Ar...etc... superclasses: a Dictionary(#Array->#ArrayedCollection #ArrayedCollection->#Sequ...etc... progressBar: nil objCount: nil classInstVars: nil
--- The full stack --- UndefinedObject(Object)>>doesNotUnderstand: #do: ImageSegment>>comeFullyUpOnReload: SmartRefStream(DataStream)>>next SmartRefStream(ReferenceStream)>>next - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - SmartRefStream>>next SmartRefStream>>scanFrom: ObjectScanner>>scanFrom: [] in MultiByteBinaryOrTextStream(PositionableStream)>>fileInAnnouncing: {[val := (self peekFor: $!) ifTrue: [(Compiler evaluate: self nextChunk l...]} BlockContext>>on:do: [] in MultiByteBinaryOrTextStream(PositionableStream)>>fileInAnnouncing: {[:bar | [self atEnd] whileFalse: [bar value: self position. self skipS...]} [] in ProgressInitiationException>>defaultMorphicAction {[result := workBlock value: progress]} BlockContext>>ensure: ProgressInitiationException>>defaultMorphicAction ...etc...