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...