Skipped content of type multipart/alternative-------------- next part --------------
MessageNotUnderstood: UndefinedObject>><=
4 December 2010 8:36:19.864 am

VM: Mac OS - Smalltalk
Image: Squeak4.2alpha [latest update: #10732]

SecurityManager state:
Restricted: false
FileAccess: true
SocketAccess: true
Working Dir /Users/edgar/imagesZip/Squeak4.2-10548-alpha
Trusted Dir /foobar/tooBar/forSqueak/bogus/
Untrusted Dir /foobar/tooBar/forSqueak/bogus/

UndefinedObject(Object)>>doesNotUnderstand: #<=
	Receiver: nil
	Arguments and temporary variables: 
		aMessage: 	<= 2
		exception: 	MessageNotUnderstood: UndefinedObject>><=
		resumeValue: 	nil
	Receiver's instance variables: 
nil
MethodContext(ContextPart)>>doPrimitive:method:receiver:args:
	Receiver: Message>>sentTo:
	Arguments and temporary variables: 
		primitiveIndex: 	100
		meth: 	(Object>>#perform:withArguments:inSuperclass: "a CompiledMethod(70)")
		receiver: 	nil
		arguments: 	{#<= . #(2) . UndefinedObject}
		value: 	nil
	Receiver's instance variables: 
		sender: 	UndefinedObject(Object)>>doesNotUnderstand: #<=
		pc: 	36
		stackp: 	1
		method: 	(Message>>#sentTo: "a CompiledMethod(14)")
		closureOrNil: 	nil
		receiver: 	<= 2

MethodContext(ContextPart)>>tryPrimitiveFor:receiver:args:
	Receiver: Message>>sentTo:
	Arguments and temporary variables: 
		method: 	(Object>>#perform:withArguments:inSuperclass: "a CompiledMethod(70)")
		receiver: 	nil
		arguments: 	{#<= . #(2) . UndefinedObject}
		primIndex: 	100
	Receiver's instance variables: 
		sender: 	UndefinedObject(Object)>>doesNotUnderstand: #<=
		pc: 	36
		stackp: 	1
		method: 	(Message>>#sentTo: "a CompiledMethod(14)")
		closureOrNil: 	nil
		receiver: 	<= 2

MethodContext(ContextPart)>>send:to:with:super:
	Receiver: Message>>sentTo:
	Arguments and temporary variables: 
		selector: 	#perform:withArguments:inSuperclass:
		rcvr: 	nil
		args: 	{#<= . #(2) . UndefinedObject}
		superFlag: 	false
		class: 	UndefinedObject
		meth: 	(Object>>#perform:withArguments:inSuperclass: "a CompiledMethod(70)")
		val: 	nil
	Receiver's instance variables: 
		sender: 	UndefinedObject(Object)>>doesNotUnderstand: #<=
		pc: 	36
		stackp: 	1
		method: 	(Message>>#sentTo: "a CompiledMethod(14)")
		closureOrNil: 	nil
		receiver: 	<= 2


--- The full stack ---
UndefinedObject(Object)>>doesNotUnderstand: #<=
MethodContext(ContextPart)>>doPrimitive:method:receiver:args:
MethodContext(ContextPart)>>tryPrimitiveFor:receiver:args:
MethodContext(ContextPart)>>send:to:with:super:
 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
MethodContext(ContextPart)>>send:super:numArgs:
MethodContext(InstructionStream)>>interpretExtension:in:for:
MethodContext(InstructionStream)>>interpretNextInstructionFor:
MethodContext(ContextPart)>>step
Process>>step
Process>>stepToHome:
Debugger>>stepIntoBlock
PluggableButtonMorphPlus(PluggableButtonMorph)>>performAction
PluggableButtonMorphPlus>>performAction
[] in PluggableButtonMorphPlus(PluggableButtonMorph)>>mouseUp:
Array(SequenceableCollection)>>do:
PluggableButtonMorphPlus(PluggableButtonMorph)>>mouseUp:
PluggableButtonMorphPlus>>mouseUp:
PluggableButtonMorphPlus(Morph)>>handleMouseUp:
MouseButtonEvent>>sentTo:
PluggableButtonMorphPlus(Morph)>>handleEvent:
PluggableButtonMorphPlus(Morph)>>handleFocusEvent:
[] in HandMorph>>sendFocusEvent:to:clear:
[] in PasteUpMorph>>becomeActiveDuring:
BlockClosure>>on:do:
PasteUpMorph>>becomeActiveDuring:
HandMorph>>sendFocusEvent:to:clear:
HandMorph>>sendEvent:focus:clear:
HandMorph>>sendMouseEvent:
HandMorph>>handleEvent:
HandMorph>>processEvents
[] in WorldState>>doOneCycleNowFor:
Array(SequenceableCollection)>>do:
WorldState>>handsDo:
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
PasteUpMorph>>doOneCycle
[] in Project class>>spawnNewProcess
[] in BlockClosure>>newProcess
-------------- next part --------------
'From Squeak4.2alpha of 2 December 2010 [latest update: #10732] on 3 December 2010 at 5:19:16 am'!

!GoferResolvedReference methodsFor: 'comparing' stamp: 'muOuser 12/3/2010 05:19:03.601'!
<= aResolvedReference
	"Sort versions according to:

		1. package name
		2. branch name, list versions without branch last
		3. version number
		4. author name
		5. repository priority"
	
	self packageName = aResolvedReference packageName
		ifFalse: [ ^ self packageName <= aResolvedReference packageName ].
	self branch = aResolvedReference branch ifFalse: [ 
		^ (self branch isEmpty or: [ aResolvedReference branch isEmpty ])
			ifTrue: [ self branch size > aResolvedReference branch size ]
			ifFalse: [ self branch <= aResolvedReference branch ] ].
		
		self versionNumber ifNil:[^true].
	self versionNumber = aResolvedReference versionNumber
		ifFalse: [ ^ self versionNumber <= aResolvedReference versionNumber ].
	self author = aResolvedReference author
		ifFalse: [ ^ self author <= aResolvedReference author ].
	self repository goferPriority = aResolvedReference repository goferPriority
		ifFalse: [ ^ self repository goferPriority <= aResolvedReference repository goferPriority ].
	^ true! !