Re: [Pharo-project] Problem in OBCmdCreateCategory (and probably Rename...)

May 15, 2011

      Lukas Renggli <renggli@gmail.com> writes:
...
I cannot reproduce the problem. What image are you using?
Is Smalltalk vmVersion the right way to find it out?
 'Croquet Closure Cog VM [CoInterpreter VMMaker-oscog.35]'

This is the full  backtrace as if I tried to send a bug-report

regards
Friedrich

Subject: [BUG]Set(Object)>>doesNotUnderstand: #sorted

here insert explanation of what you were doing, suspect changes you've made and so forth.

15 May 2011 7:47:02 am

VM: unix - i686 - linux-gnu - Croquet Closure Cog VM [CoInterpreter VMMaker-oscog.35]
Image: Pharo1.2.1a [Latest update: #12343]

SecurityManager state:
Restricted: false
FileAccess: true
SocketAccess: true
Working Dir /home/frido/Smalltalks/AidaOneClickPharo1.2.app/Contents/Resources
Trusted Dir /home/frido/Smalltalks/AidaOneClickPharo1.2.app/Contents/Resources/secure
Untrusted Dir /home/frido/Smalltalks/AidaOneClickPharo1.2.app/Contents/Resources/My Squeak

Set(Object)>>doesNotUnderstand: #sorted
	Receiver: a Set('*dynamicdeadcodefinder' '*metacello-base' '*graphics-tests' '*network-mime' '*polym...etc...
	Arguments and temporary variables: 
		aMessage: 	sorted
		exception: 	MessageNotUnderstood: Set>>sorted
		resumeValue: 	nil
	Receiver's instance variables: 
		tally: 	383
		array: 	#('*dynamicdeadcodefinder' nil nil nil nil '*metacello-base' '*graphics-...etc...

OBCmdCreateMethodCategory(OBCmdCreateCategory)>>execute
	Receiver: an OBCmdCreateMethodCategory
	Arguments and temporary variables: 
		categories: 	nil
		category: 	nil
		before: 	nil
	Receiver's instance variables: 
		target: 	OBClassNode<OBCmdCreateMethodCategoryTest>
		requestor: 	an OBColumn(-- all --)

OBCmdCreateMethodCategory(OBCommand)>>perform:orSendTo:
	Receiver: an OBCmdCreateMethodCategory
	Arguments and temporary variables: 
		aSelector: 	#execute
		anObject: 	an OBPluggableListMorph(38010880)
	Receiver's instance variables: 
		target: 	OBClassNode<OBCmdCreateMethodCategoryTest>
		requestor: 	an OBColumn(-- all --)

[| selArgCount | (selArgCount := selector numArgs) = 0
		ifTrue: [target perform: selector]
		ifFalse: [selArgCount = arguments size
				ifTrue: [target perform: selector withArguments: arguments]
				ifFalse: [target
						perform: selector
						withArguments: (arguments copyWith: evt)]]] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
	Receiver: a ToggleMenuItemMorph(295174144)'Add category...'
	Arguments and temporary variables: 
		evt: 	[844@255 mouseUp 182264 nil]
		selArgCount: 	2
	Receiver's instance variables: 
		bounds: 	810@241 corner: 1007@259
		owner: 	a MenuMorph(1043333120)
		submorphs: 	#()
		fullBounds: 	810@241 corner: 1007@259
		color: 	Color black
		extension: 	a MorphExtension (297795584)
		font: 	a StrikeFont(Bitmap DejaVu Sans 9 14)
		emphasis: 	0
		contents: 	'Add category...'
		hasFocus: 	false
		isEnabled: 	true
		subMenu: 	nil
		isSelected: 	false
		target: 	an OBCmdCreateMethodCategory
		selector: 	#perform:orSendTo:
		arguments: 	an Array(#execute an OBPluggableListMorph(38010880))
		icon: 	Form(16x16x32)
		getStateSelector: 	nil
		enablementSelector: 	nil
		keyText: 	nil

BlockClosure>>ensure:
	Receiver: [| selArgCount | (selArgCount := selector numArgs) = 0
		ifTrue: [target perform: selector...etc...
	Arguments and temporary variables: 
		aBlock: 	[oldcursor show]
		complete: 	nil
		returnValue: 	nil
	Receiver's instance variables: 
		outerContext: 	ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
		startpc: 	132
		numArgs: 	0

CursorWithMask(Cursor)>>showWhile:
	Receiver: ((CursorWithMask
	extent: 16@16
	depth: 1
	fromArray: #(
		2r0
		2r10000000000000000000000...etc...
	Arguments and temporary variables: 
		aBlock: 	[| selArgCount | (selArgCount := selector numArgs) = 0
		ifTrue: [targe...etc...
		oldcursor: 	((CursorWithMask
	extent: 16@16
	depth: 1
	fromArray: #(
		2r0
		2r1...etc...
	Receiver's instance variables: 
		bits: 	a Bitmap of length 16
		width: 	16
		height: 	16
		depth: 	1
		offset: 	-1@ -1
		maskForm: 	Form(16x16x1)

ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
	Receiver: a ToggleMenuItemMorph(295174144)'Add category...'
	Arguments and temporary variables: 
		evt: 	[844@255 mouseUp 182264 nil]
		w: 	a PasteUpMorph(425197568) [world]
	Receiver's instance variables: 
		bounds: 	810@241 corner: 1007@259
		owner: 	a MenuMorph(1043333120)
		submorphs: 	#()
		fullBounds: 	810@241 corner: 1007@259
		color: 	Color black
		extension: 	a MorphExtension (297795584)
		font: 	a StrikeFont(Bitmap DejaVu Sans 9 14)
		emphasis: 	0
		contents: 	'Add category...'
		hasFocus: 	false
		isEnabled: 	true
		subMenu: 	nil
		isSelected: 	false
		target: 	an OBCmdCreateMethodCategory
		selector: 	#perform:orSendTo:
		arguments: 	an Array(#execute an OBPluggableListMorph(38010880))
		icon: 	Form(16x16x32)
		getStateSelector: 	nil
		enablementSelector: 	nil
		keyText: 	nil

ToggleMenuItemMorph(MenuItemMorph)>>mouseUp:
	Receiver: a ToggleMenuItemMorph(295174144)'Add category...'
	Arguments and temporary variables: 
		evt: 	[844@255 mouseUp 182264 nil]
	Receiver's instance variables: 
		bounds: 	810@241 corner: 1007@259
		owner: 	a MenuMorph(1043333120)
		submorphs: 	#()
		fullBounds: 	810@241 corner: 1007@259
		color: 	Color black
		extension: 	a MorphExtension (297795584)
		font: 	a StrikeFont(Bitmap DejaVu Sans 9 14)
		emphasis: 	0
		contents: 	'Add category...'
		hasFocus: 	false
		isEnabled: 	true
		subMenu: 	nil
		isSelected: 	false
		target: 	an OBCmdCreateMethodCategory
		selector: 	#perform:orSendTo:
		arguments: 	an Array(#execute an OBPluggableListMorph(38010880))
		icon: 	Form(16x16x32)
		getStateSelector: 	nil
		enablementSelector: 	nil
		keyText: 	nil

ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp:
	Receiver: a ToggleMenuItemMorph(295174144)'Add category...'
	Arguments and temporary variables: 
		anEvent: 	[844@255 mouseUp 182264 nil]
	Receiver's instance variables: 
		bounds: 	810@241 corner: 1007@259
		owner: 	a MenuMorph(1043333120)
		submorphs: 	#()
		fullBounds: 	810@241 corner: 1007@259
		color: 	Color black
		extension: 	a MorphExtension (297795584)
		font: 	a StrikeFont(Bitmap DejaVu Sans 9 14)
		emphasis: 	0
		contents: 	'Add category...'
		hasFocus: 	false
		isEnabled: 	true
		subMenu: 	nil
		isSelected: 	false
		target: 	an OBCmdCreateMethodCategory
		selector: 	#perform:orSendTo:
		arguments: 	an Array(#execute an OBPluggableListMorph(38010880))
		icon: 	Form(16x16x32)
		getStateSelector: 	nil
		enablementSelector: 	nil
		keyText: 	nil

MouseButtonEvent>>sentTo:
	Receiver: [844@255 mouseUp 182264 nil]
	Arguments and temporary variables: 
		anObject: 	a ToggleMenuItemMorph(295174144)'Add category...'
	Receiver's instance variables: 
		timeStamp: 	182264
		source: 	a HandMorph(843055104)
		windowIndex: 	nil
		type: 	#mouseUp
		buttons: 	0
		position: 	844@255
		handler: 	nil
		wasHandled: 	true
		whichButton: 	4

ToggleMenuItemMorph(Morph)>>handleEvent:
	Receiver: a ToggleMenuItemMorph(295174144)'Add category...'
	Arguments and temporary variables: 
		anEvent: 	[844@255 mouseUp 182264 nil]
	Receiver's instance variables: 
		bounds: 	810@241 corner: 1007@259
		owner: 	a MenuMorph(1043333120)
		submorphs: 	#()
		fullBounds: 	810@241 corner: 1007@259
		color: 	Color black
		extension: 	a MorphExtension (297795584)
		font: 	a StrikeFont(Bitmap DejaVu Sans 9 14)
		emphasis: 	0
		contents: 	'Add category...'
		hasFocus: 	false
		isEnabled: 	true
		subMenu: 	nil
		isSelected: 	false
		target: 	an OBCmdCreateMethodCategory
		selector: 	#perform:orSendTo:
		arguments: 	an Array(#execute an OBPluggableListMorph(38010880))
		icon: 	Form(16x16x32)
		getStateSelector: 	nil
		enablementSelector: 	nil
		keyText: 	nil

MorphicEventDispatcher>>dispatchDefault:with:
	Receiver: a MorphicEventDispatcher
	Arguments and temporary variables: 
		anEvent: 	[844@255 mouseUp 182264 nil]
		aMorph: 	a ToggleMenuItemMorph(295174144)'Add category...'
		localEvt: 	nil
		index: 	1
		child: 	nil
		morphs: 	#()
		inside: 	true
	Receiver's instance variables: 
		lastType: 	#mouseUp
		lastDispatch: 	#dispatchDefault:with:

MorphicEventDispatcher>>dispatchEvent:with:
	Receiver: a MorphicEventDispatcher
	Arguments and temporary variables: 
		anEvent: 	[844@255 mouseUp 182264 nil]
		aMorph: 	a ToggleMenuItemMorph(295174144)'Add category...'
	Receiver's instance variables: 
		lastType: 	#mouseUp
		lastDispatch: 	#dispatchDefault:with:

ToggleMenuItemMorph(Morph)>>processEvent:using:
	Receiver: a ToggleMenuItemMorph(295174144)'Add category...'
	Arguments and temporary variables: 
		anEvent: 	[844@255 mouseUp 182264 nil]
		defaultDispatcher: 	a MorphicEventDispatcher
	Receiver's instance variables: 
		bounds: 	810@241 corner: 1007@259
		owner: 	a MenuMorph(1043333120)
		submorphs: 	#()
		fullBounds: 	810@241 corner: 1007@259
		color: 	Color black
		extension: 	a MorphExtension (297795584)
		font: 	a StrikeFont(Bitmap DejaVu Sans 9 14)
		emphasis: 	0
		contents: 	'Add category...'
		hasFocus: 	false
		isEnabled: 	true
		subMenu: 	nil
		isSelected: 	false
		target: 	an OBCmdCreateMethodCategory
		selector: 	#perform:orSendTo:
		arguments: 	an Array(#execute an OBPluggableListMorph(38010880))
		icon: 	Form(16x16x32)
		getStateSelector: 	nil
		enablementSelector: 	nil
		keyText: 	nil

MorphicEventDispatcher>>dispatchDefault:with:
	Receiver: a MorphicEventDispatcher
	Arguments and temporary variables: 
		anEvent: 	[844@255 mouseUp 182264 nil]
		aMorph: 	a MenuMorph(1043333120)
		localEvt: 	[844@255 mouseUp 182264 nil]
		index: 	1
		child: 	a ToggleMenuItemMorph(295174144)'Add category...'
		morphs: 	an Array(a ToggleMenuItemMorph(295174144)'Add category...' a ToggleMenu...etc...
		inside: 	false
	Receiver's instance variables: 
		lastType: 	#mouseUp
		lastDispatch: 	#dispatchDefault:with:

MorphicEventDispatcher>>dispatchEvent:with:
	Receiver: a MorphicEventDispatcher
	Arguments and temporary variables: 
		anEvent: 	[844@255 mouseUp 182264 nil]
		aMorph: 	a MenuMorph(1043333120)
	Receiver's instance variables: 
		lastType: 	#mouseUp
		lastDispatch: 	#dispatchDefault:with:

MenuMorph(Morph)>>processEvent:using:
	Receiver: a MenuMorph(1043333120)
	Arguments and temporary variables: 
		anEvent: 	[844@255 mouseUp 182264 nil]
		defaultDispatcher: 	a MorphicEventDispatcher
	Receiver's instance variables: 
		bounds: 	805@236 corner: 1012@535
		owner: 	nil
		submorphs: 	an Array(a ToggleMenuItemMorph(295174144)'Add category...' a ToggleM...etc...
		fullBounds: 	805@236 corner: 1012@535
		color: 	(Color r: 0.848 g: 0.848 b: 0.848)
		extension: 	a MorphExtension (1047003136) [other:  (basicColor -> (Color r: 0.74...etc...
		borderWidth: 	2
		borderColor: 	(Color r: 0.595 g: 0.595 b: 0.595)
		defaultTarget: 	an OBColumn(-- all --)
		selectedItem: 	a ToggleMenuItemMorph(295174144)'Add category...'
		stayUp: 	false
		popUpOwner: 	nil
		activeSubMenu: 	nil
		activatorDockingBar: 	nil
		embeddable: 	nil
		menuItems: 	an OrderedCollection(a ToggleMenuItemMorph(295174144)'Add category.....etc...

MenuMorph(Morph)>>processEvent:
	Receiver: a MenuMorph(1043333120)
	Arguments and temporary variables: 
		anEvent: 	[844@255 mouseUp 182264 nil]
	Receiver's instance variables: 
		bounds: 	805@236 corner: 1012@535
		owner: 	nil
		submorphs: 	an Array(a ToggleMenuItemMorph(295174144)'Add category...' a ToggleM...etc...
		fullBounds: 	805@236 corner: 1012@535
		color: 	(Color r: 0.848 g: 0.848 b: 0.848)
		extension: 	a MorphExtension (1047003136) [other:  (basicColor -> (Color r: 0.74...etc...
		borderWidth: 	2
		borderColor: 	(Color r: 0.595 g: 0.595 b: 0.595)
		defaultTarget: 	an OBColumn(-- all --)
		selectedItem: 	a ToggleMenuItemMorph(295174144)'Add category...'
		stayUp: 	false
		popUpOwner: 	nil
		activeSubMenu: 	nil
		activatorDockingBar: 	nil
		embeddable: 	nil
		menuItems: 	an OrderedCollection(a ToggleMenuItemMorph(295174144)'Add category.....etc...

MenuMorph>>handleFocusEvent:
	Receiver: a MenuMorph(1043333120)
	Arguments and temporary variables: 
		evt: 	[844@255 mouseUp 182264 nil]
	Receiver's instance variables: 
		bounds: 	805@236 corner: 1012@535
		owner: 	nil
		submorphs: 	an Array(a ToggleMenuItemMorph(295174144)'Add category...' a ToggleM...etc...
		fullBounds: 	805@236 corner: 1012@535
		color: 	(Color r: 0.848 g: 0.848 b: 0.848)
		extension: 	a MorphExtension (1047003136) [other:  (basicColor -> (Color r: 0.74...etc...
		borderWidth: 	2
		borderColor: 	(Color r: 0.595 g: 0.595 b: 0.595)
		defaultTarget: 	an OBColumn(-- all --)
		selectedItem: 	a ToggleMenuItemMorph(295174144)'Add category...'
		stayUp: 	false
		popUpOwner: 	nil
		activeSubMenu: 	nil
		activatorDockingBar: 	nil
		embeddable: 	nil
		menuItems: 	an OrderedCollection(a ToggleMenuItemMorph(295174144)'Add category.....etc...

[ActiveHand := self.
	ActiveEvent := anEvent.
	result := focusHolder
				handleFocusEvent: (anEvent
						transformedBy: (focusHolder transformedFrom: self))] in HandMorph>>sendFocusEvent:to:clear:
	Receiver: a HandMorph(843055104)
	Arguments and temporary variables: 
		anEvent: 	[844@255 mouseUp 182264 nil]
		focusHolder: 	a MenuMorph(1043333120)
		result: 	#(nil)
	Receiver's instance variables: 
		bounds: 	828@636 corner: 844@652
		owner: 	a PasteUpMorph(425197568) [world]
		submorphs: 	#()
		fullBounds: 	828@636 corner: 844@652
		color: 	Color blue
		extension: 	a MorphExtension (141295616) [eventHandler = an EventHandler] 
		mouseFocus: 	nil
		keyboardFocus: 	nil
		eventListeners: 	nil
		mouseListeners: 	nil
		keyboardListeners: 	nil
		mouseClickState: 	nil
		mouseOverHandler: 	a MouseOverHandler
		lastMouseEvent: 	[828@636 mouseUp 211592 nil]
		targetOffset: 	16@11
		damageRecorder: 	a DamageRecorder
		cacheCanvas: 	nil
		cachedCanvasHasHoles: 	true
		temporaryCursor: 	nil
		temporaryCursorOffset: 	nil
		hardwareCursor: 	nil
		hasChanged: 	true
		savedPatch: 	nil
		userInitials: 	''
		lastEventBuffer: 	#(1 211592 828 636 0 0 0 1)
		lastKeyScanCode: 	101
		combinedChar: 	nil

[aBlock value] in PasteUpMorph>>becomeActiveDuring:
	Receiver: a PasteUpMorph(425197568) [world]
	Arguments and temporary variables: 
		aBlock: 	[ActiveHand := self.
	ActiveEvent := anEvent.
	result := focusHolder
		...etc...
	Receiver's instance variables: 
		bounds: 	0@0 corner: 1344@1014
		owner: 	nil
		submorphs: 	an Array(a TaskbarMorph(811335680) a SystemWindow(691011584) an OBSy...etc...
		fullBounds: 	0@0 corner: 1344@1014
		color: 	(Color r: 0.97 g: 0.98 b: 1.0)
		extension: 	a MorphExtension (666632192) [eventHandler = an EventHandler]  [othe...etc...
		borderWidth: 	0
		borderColor: 	(Color r: 0.03 g: 0.02 b: 0.0)
		backgroundMorph: 	nil
		worldState: 	a WorldState
		griddingOn: 	nil

BlockClosure>>on:do:
	Receiver: [aBlock value]
	Arguments and temporary variables: 
		exception: 	Error
		handlerAction: 	[:ex | 
ActiveWorld := priorWorld.
	ActiveEvent := priorEvent.
	...etc...
		handlerActive: 	false
	Receiver's instance variables: 
		outerContext: 	PasteUpMorph>>becomeActiveDuring:
		startpc: 	67
		numArgs: 	0

PasteUpMorph>>becomeActiveDuring:
	Receiver: a PasteUpMorph(425197568) [world]
	Arguments and temporary variables: 
		aBlock: 	[ActiveHand := self.
	ActiveEvent := anEvent.
	result := focusHolder
		...etc...
		priorWorld: 	a PasteUpMorph(425197568) [world]
		priorHand: 	a HandMorph(843055104)
		priorEvent: 	[844@255 mouseOver red nil nil]
	Receiver's instance variables: 
		bounds: 	0@0 corner: 1344@1014
		owner: 	nil
		submorphs: 	an Array(a TaskbarMorph(811335680) a SystemWindow(691011584) an OBSy...etc...
		fullBounds: 	0@0 corner: 1344@1014
		color: 	(Color r: 0.97 g: 0.98 b: 1.0)
		extension: 	a MorphExtension (666632192) [eventHandler = an EventHandler]  [othe...etc...
		borderWidth: 	0
		borderColor: 	(Color r: 0.03 g: 0.02 b: 0.0)
		backgroundMorph: 	nil
		worldState: 	a WorldState
		griddingOn: 	nil

HandMorph>>sendFocusEvent:to:clear:
	Receiver: a HandMorph(843055104)
	Arguments and temporary variables: 
		anEvent: 	[844@255 mouseUp 182264 nil]
		focusHolder: 	a MenuMorph(1043333120)
		aBlock: 	[self mouseFocus: nil]
		w: 	a PasteUpMorph(425197568) [world]
		result: 	#(nil)
	Receiver's instance variables: 
		bounds: 	828@636 corner: 844@652
		owner: 	a PasteUpMorph(425197568) [world]
		submorphs: 	#()
		fullBounds: 	828@636 corner: 844@652
		color: 	Color blue
		extension: 	a MorphExtension (141295616) [eventHandler = an EventHandler] 
		mouseFocus: 	nil
		keyboardFocus: 	nil
		eventListeners: 	nil
		mouseListeners: 	nil
		keyboardListeners: 	nil
		mouseClickState: 	nil
		mouseOverHandler: 	a MouseOverHandler
		lastMouseEvent: 	[828@636 mouseUp 211592 nil]
		targetOffset: 	16@11
		damageRecorder: 	a DamageRecorder
		cacheCanvas: 	nil
		cachedCanvasHasHoles: 	true
		temporaryCursor: 	nil
		temporaryCursorOffset: 	nil
		hardwareCursor: 	nil
		hasChanged: 	true
		savedPatch: 	nil
		userInitials: 	''
		lastEventBuffer: 	#(1 211592 828 636 0 0 0 1)
		lastKeyScanCode: 	101
		combinedChar: 	nil

HandMorph>>sendEvent:focus:clear:
	Receiver: a HandMorph(843055104)
	Arguments and temporary variables: 
		anEvent: 	[844@255 mouseUp 182264 nil]
		focusHolder: 	a MenuMorph(1043333120)
		aBlock: 	[self mouseFocus: nil]
		result: 	nil
	Receiver's instance variables: 
		bounds: 	828@636 corner: 844@652
		owner: 	a PasteUpMorph(425197568) [world]
		submorphs: 	#()
		fullBounds: 	828@636 corner: 844@652
		color: 	Color blue
		extension: 	a MorphExtension (141295616) [eventHandler = an EventHandler] 
		mouseFocus: 	nil
		keyboardFocus: 	nil
		eventListeners: 	nil
		mouseListeners: 	nil
		keyboardListeners: 	nil
		mouseClickState: 	nil
		mouseOverHandler: 	a MouseOverHandler
		lastMouseEvent: 	[828@636 mouseUp 211592 nil]
		targetOffset: 	16@11
		damageRecorder: 	a DamageRecorder
		cacheCanvas: 	nil
		cachedCanvasHasHoles: 	true
		temporaryCursor: 	nil
		temporaryCursorOffset: 	nil
		hardwareCursor: 	nil
		hasChanged: 	true
		savedPatch: 	nil
		userInitials: 	''
		lastEventBuffer: 	#(1 211592 828 636 0 0 0 1)
		lastKeyScanCode: 	101
		combinedChar: 	nil

HandMorph>>sendMouseEvent:
	Receiver: a HandMorph(843055104)
	Arguments and temporary variables: 
		anEvent: 	[844@255 mouseUp 182264 nil]
	Receiver's instance variables: 
		bounds: 	828@636 corner: 844@652
		owner: 	a PasteUpMorph(425197568) [world]
		submorphs: 	#()
		fullBounds: 	828@636 corner: 844@652
		color: 	Color blue
		extension: 	a MorphExtension (141295616) [eventHandler = an EventHandler] 
		mouseFocus: 	nil
		keyboardFocus: 	nil
		eventListeners: 	nil
		mouseListeners: 	nil
		keyboardListeners: 	nil
		mouseClickState: 	nil
		mouseOverHandler: 	a MouseOverHandler
		lastMouseEvent: 	[828@636 mouseUp 211592 nil]
		targetOffset: 	16@11
		damageRecorder: 	a DamageRecorder
		cacheCanvas: 	nil
		cachedCanvasHasHoles: 	true
		temporaryCursor: 	nil
		temporaryCursorOffset: 	nil
		hardwareCursor: 	nil
		hasChanged: 	true
		savedPatch: 	nil
		userInitials: 	''
		lastEventBuffer: 	#(1 211592 828 636 0 0 0 1)
		lastKeyScanCode: 	101
		combinedChar: 	nil

HandMorph>>handleEvent:
	Receiver: a HandMorph(843055104)
	Arguments and temporary variables: 
		anEvent: 	[844@255 mouseUp 182264 nil]
		evt: 	[844@255 mouseUp 182264 nil]
		ofs: 	nil
	Receiver's instance variables: 
		bounds: 	828@636 corner: 844@652
		owner: 	a PasteUpMorph(425197568) [world]
		submorphs: 	#()
		fullBounds: 	828@636 corner: 844@652
		color: 	Color blue
		extension: 	a MorphExtension (141295616) [eventHandler = an EventHandler] 
		mouseFocus: 	nil
		keyboardFocus: 	nil
		eventListeners: 	nil
		mouseListeners: 	nil
		keyboardListeners: 	nil
		mouseClickState: 	nil
		mouseOverHandler: 	a MouseOverHandler
		lastMouseEvent: 	[828@636 mouseUp 211592 nil]
		targetOffset: 	16@11
		damageRecorder: 	a DamageRecorder
		cacheCanvas: 	nil
		cachedCanvasHasHoles: 	true
		temporaryCursor: 	nil
		temporaryCursorOffset: 	nil
		hardwareCursor: 	nil
		hasChanged: 	true
		savedPatch: 	nil
		userInitials: 	''
		lastEventBuffer: 	#(1 211592 828 636 0 0 0 1)
		lastKeyScanCode: 	101
		combinedChar: 	nil

HandMorph>>processEvents
	Receiver: a HandMorph(843055104)
	Arguments and temporary variables: 
		evt: 	[844@255 mouseUp 182264 nil]
		evtBuf: 	#(1 182264 844 255 0 0 0 1)
		type: 	1
		hadAny: 	false
	Receiver's instance variables: 
		bounds: 	828@636 corner: 844@652
		owner: 	a PasteUpMorph(425197568) [world]
		submorphs: 	#()
		fullBounds: 	828@636 corner: 844@652
		color: 	Color blue
		extension: 	a MorphExtension (141295616) [eventHandler = an EventHandler] 
		mouseFocus: 	nil
		keyboardFocus: 	nil
		eventListeners: 	nil
		mouseListeners: 	nil
		keyboardListeners: 	nil
		mouseClickState: 	nil
		mouseOverHandler: 	a MouseOverHandler
		lastMouseEvent: 	[828@636 mouseUp 211592 nil]
		targetOffset: 	16@11
		damageRecorder: 	a DamageRecorder
		cacheCanvas: 	nil
		cachedCanvasHasHoles: 	true
		temporaryCursor: 	nil
		temporaryCursorOffset: 	nil
		hardwareCursor: 	nil
		hasChanged: 	true
		savedPatch: 	nil
		userInitials: 	''
		lastEventBuffer: 	#(1 211592 828 636 0 0 0 1)
		lastKeyScanCode: 	101
		combinedChar: 	nil

[:h | 
ActiveHand := h.
	h processEvents.
	ActiveHand := nil] in WorldState>>doOneCycleNowFor:
	Receiver: a WorldState
	Arguments and temporary variables: 
		h: 	a HandMorph(843055104)
	Receiver's instance variables: 
		hands: 	an Array(a HandMorph(843055104))
		viewBox: 	0@0 corner: 1344@1014
		canvas: 	a FormCanvas on: DisplayScreen(1344x1014x32)
		damageRecorder: 	a DamageRecorder
		stepList: 	a Heap(StepMessage(#stepAt: -> an OverflowRowMorph(348127232))(an Ove...etc...
		lastStepTime: 	211628
		lastStepMessage: 	nil
		lastCycleTime: 	211612
		alarms: 	a Heap()
		lastAlarmTime: 	211628
		menuBuilder: 	a PragmaMenuBuilder

Array(SequenceableCollection)>>do:
	Receiver: an Array(a HandMorph(843055104))
	Arguments and temporary variables: 
		aBlock: 	[:h | 
ActiveHand := h.
	h processEvents.
	ActiveHand := nil]
		index: 	1
		indexLimiT: 	1
	Receiver's instance variables: 
an Array(a HandMorph(843055104))

WorldState>>handsDo:
	Receiver: a WorldState
	Arguments and temporary variables: 
		aBlock: 	[:h | 
ActiveHand := h.
	h processEvents.
	ActiveHand := nil]
	Receiver's instance variables: 
		hands: 	an Array(a HandMorph(843055104))
		viewBox: 	0@0 corner: 1344@1014
		canvas: 	a FormCanvas on: DisplayScreen(1344x1014x32)
		damageRecorder: 	a DamageRecorder
		stepList: 	a Heap(StepMessage(#stepAt: -> an OverflowRowMorph(348127232))(an Ove...etc...
		lastStepTime: 	211628
		lastStepMessage: 	nil
		lastCycleTime: 	211612
		alarms: 	a Heap()
		lastAlarmTime: 	211628
		menuBuilder: 	a PragmaMenuBuilder

WorldState>>doOneCycleNowFor:
	Receiver: a WorldState
	Arguments and temporary variables: 
		aWorld: 	a PasteUpMorph(425197568) [world]
	Receiver's instance variables: 
		hands: 	an Array(a HandMorph(843055104))
		viewBox: 	0@0 corner: 1344@1014
		canvas: 	a FormCanvas on: DisplayScreen(1344x1014x32)
		damageRecorder: 	a DamageRecorder
		stepList: 	a Heap(StepMessage(#stepAt: -> an OverflowRowMorph(348127232))(an Ove...etc...
		lastStepTime: 	211628
		lastStepMessage: 	nil
		lastCycleTime: 	211612
		alarms: 	a Heap()
		lastAlarmTime: 	211628
		menuBuilder: 	a PragmaMenuBuilder

WorldState>>doOneCycleFor:
	Receiver: a WorldState
	Arguments and temporary variables: 
		aWorld: 	a PasteUpMorph(425197568) [world]
	Receiver's instance variables: 
		hands: 	an Array(a HandMorph(843055104))
		viewBox: 	0@0 corner: 1344@1014
		canvas: 	a FormCanvas on: DisplayScreen(1344x1014x32)
		damageRecorder: 	a DamageRecorder
		stepList: 	a Heap(StepMessage(#stepAt: -> an OverflowRowMorph(348127232))(an Ove...etc...
		lastStepTime: 	211628
		lastStepMessage: 	nil
		lastCycleTime: 	211612
		alarms: 	a Heap()
		lastAlarmTime: 	211628
		menuBuilder: 	a PragmaMenuBuilder

PasteUpMorph>>doOneCycle
	Receiver: a PasteUpMorph(425197568) [world]
	Arguments and temporary variables: 

	Receiver's instance variables: 
		bounds: 	0@0 corner: 1344@1014
		owner: 	nil
		submorphs: 	an Array(a TaskbarMorph(811335680) a SystemWindow(691011584) an OBSy...etc...
		fullBounds: 	0@0 corner: 1344@1014
		color: 	(Color r: 0.97 g: 0.98 b: 1.0)
		extension: 	a MorphExtension (666632192) [eventHandler = an EventHandler]  [othe...etc...
		borderWidth: 	0
		borderColor: 	(Color r: 0.03 g: 0.02 b: 0.0)
		backgroundMorph: 	nil
		worldState: 	a WorldState
		griddingOn: 	nil

[[World doOneCycle.
	Processor yield.
	false] whileFalse.
	nil] in Project class>>spawnNewProcess
	Receiver: Project
	Arguments and temporary variables: 

	Receiver's instance variables: 
		superclass: 	Model
		methodDict: 	a MethodDictionary(#beep->(Project>>#beep "a CompiledMethod(3997696...etc...
		format: 	144
		instanceVariables: 	#('world' 'changeSet' 'transcript' 'parentProject' 'displayD...etc...
		organization: 	('*Polymorph-Widgets' createTaskbarIfNecessary moveCollapsedWindo...etc...
		subclasses: 	nil
		name: 	#Project
		classPool: 	a Dictionary(#AllProjects->an OrderedCollection(a Project) #CurrentP...etc...
		sharedPools: 	nil
		environment: 	a SystemDictionary(lots of globals)
		category: 	#'System-Support'
		traitComposition: 	{}
		localSelectors: 	nil

[self value.
	Processor terminateActive] in BlockClosure>>newProcess
	Receiver: [[World doOneCycle.
	Processor yield.
	false] whileFalse.
	nil]
	Arguments and temporary variables: 

	Receiver's instance variables: 
		outerContext: 	Project class>>spawnNewProcess
		startpc: 	53
		numArgs: 	0

--- The full stack ---
Set(Object)>>doesNotUnderstand: #sorted
OBCmdCreateMethodCategory(OBCmdCreateCategory)>>execute
OBCmdCreateMethodCategory(OBCommand)>>perform:orSendTo:
[| selArgCount | (selArgCount := selector numArgs) = 0
		ifTrue: [target perform: selector]
		ifFalse: [selArgCount = arguments size
				ifTrue: [target perform: selector withArguments: arguments]
				ifFalse: [target
						perform: selector
						withArguments: (arguments copyWith: evt)]]] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
BlockClosure>>ensure:
CursorWithMask(Cursor)>>showWhile:
ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
ToggleMenuItemMorph(MenuItemMorph)>>mouseUp:
ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp:
MouseButtonEvent>>sentTo:
ToggleMenuItemMorph(Morph)>>handleEvent:
MorphicEventDispatcher>>dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with:
ToggleMenuItemMorph(Morph)>>processEvent:using:
MorphicEventDispatcher>>dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with:
MenuMorph(Morph)>>processEvent:using:
MenuMorph(Morph)>>processEvent:
MenuMorph>>handleFocusEvent:
[ActiveHand := self.
	ActiveEvent := anEvent.
	result := focusHolder
				handleFocusEvent: (anEvent
						transformedBy: (focusHolder transformedFrom: self))] in HandMorph>>sendFocusEvent:to:clear:
[aBlock value] in PasteUpMorph>>becomeActiveDuring:
BlockClosure>>on:do:
PasteUpMorph>>becomeActiveDuring:
HandMorph>>sendFocusEvent:to:clear:
HandMorph>>sendEvent:focus:clear:
HandMorph>>sendMouseEvent:
HandMorph>>handleEvent:
HandMorph>>processEvents
[:h | 
ActiveHand := h.
	h processEvents.
	ActiveHand := nil] in WorldState>>doOneCycleNowFor:
Array(SequenceableCollection)>>do:
WorldState>>handsDo:
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
PasteUpMorph>>doOneCycle
[[World doOneCycle.
	Processor yield.
	false] whileFalse.
	nil] in Project class>>spawnNewProcess
[self value.
	Processor terminateActive] in BlockClosure>>newProcess

-- 
Q-Software Solutions GmbH; Sitz: Bruchsal; Registergericht: Mannheim 
Registriernummer: HRB232138; Geschaeftsfuehrer: Friedrich Dominicus