[BUG] Smalltalk condenseChanges broken in 3.7beta

Alexander at Lazarevic.de Alexander at Lazarevic.de
Fri Apr 23 10:06:34 UTC 2004


Doing a

	Smalltalk condenseChanges.
	ChangeList browseRecentLog.

yields an error in the latest Squeak image.

Alex

##########################################################

23 April 2004 12:00:59 pm

VM: Win32 - a SmalltalkImage
Image: Squeak3.7beta [latest update: #5878]

SecurityManager state:
Restricted: false
FileAccess: true
SocketAccess: true
Working Dir C:\Dokumente und Einstellungen\Alexander Lazarevic\Eigene
Dateien\Smalltalk\Squeak
Trusted Dir C:\Dokumente und Einstellungen\Alexander Lazarevic\Eigene
Dateien\Smalltalk\Squeak\Alexander Lazarevic
Untrusted Dir C:\My Squeak\Alexander Lazarevic

UndefinedObject(Object)>>doesNotUnderstand: #isSeparator
	Receiver: nil
	Arguments and temporary variables: 
		aMessage: 	isSeparator
	Receiver's instance variables: 
nil

StandardFileStream(PositionableStream)>>skipSeparators
	Receiver: StandardFileStream: 'C:\Dokumente und Einstellungen\Alexander
Lazarevic\Eigene Dateien\Sma...etc...
	Arguments and temporary variables: 

	Receiver's instance variables: 


StandardFileStream(PositionableStream)>>nextChunk
	Receiver: StandardFileStream: 'C:\Dokumente und Einstellungen\Alexander
Lazarevic\Eigene Dateien\Sma...etc...
	Arguments and temporary variables: 
		terminator: 	$!
		out: 	a WriteStream ''
		ch: 	nil
	Receiver's instance variables: 


ChangeList class>>browseRecentLogOn:startingFrom:
	Receiver: ChangeList
	Arguments and temporary variables: 
		origChangesFile: 	StandardFileStream: 'C:\Dokumente und
Einstellungen\Alexander ...etc...
		initialPos: 	14951124
		end: 	7195305
		banners: 	an OrderedCollection()
		positions: 	an OrderedCollection()
		pos: 	14951124
		chunk: 	nil
		i: 	nil
		changesFile: 	StandardFileStream: 'C:\Dokumente und
Einstellungen\Alexander Laza...etc...
	Receiver's instance variables: 
		superclass: 	CodeHolder
		methodDict: 	a MethodDictionary(#acceptFrom:->a CompiledMethod (707)
#addItem:te...etc...
		format: 	152
		instanceVariables: 	#('changeList' 'list' 'listIndex' 'listSelections'
'file' 'l...etc...
		organization: 	('initialization-release' addItem:text:
changeListButtonSpecs ini...etc...
		subclasses: 	#(ChangeListForProjects VersionsBrowser)
		name: 	#ChangeList
		classPool: 	nil
		sharedPools: 	nil
		environment: 	nil
		category: 	nil


--- The full stack ---
UndefinedObject(Object)>>doesNotUnderstand: #isSeparator
StandardFileStream(PositionableStream)>>skipSeparators
StandardFileStream(PositionableStream)>>nextChunk
ChangeList class>>browseRecentLogOn:startingFrom:
 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
ChangeList class>>browseRecentLog
TheWorldMenu>>doMenuItem:with:
[] in MenuItemMorph>>invokeWithEvent: {[(selArgCount := selector
numArgs) = 0   ifTrue: [target perform: selector] ...]}
BlockContext>>ensure:
CursorWithMask(Cursor)>>showWhile:
MenuItemMorph>>invokeWithEvent:
MenuItemMorph>>mouseUp:
MenuItemMorph>>handleMouseUp:
MouseButtonEvent>>sentTo:
MenuItemMorph(Morph)>>handleEvent:
MorphicEventDispatcher>>dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with:
MenuItemMorph(Morph)>>processEvent:using:
MorphicEventDispatcher>>dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with:
MenuMorph(Morph)>>processEvent:using:
MenuMorph(Morph)>>processEvent:
MenuMorph>>handleFocusEvent:
[] in HandMorph>>sendFocusEvent:to:clear: {[ActiveHand := self. 
ActiveEvent := anEvent.  result := focusHolder     han...]}
[] 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]}



More information about the Squeak-dev mailing list