[Pharo-project] [update 1.1] #11278
11278 ----- Issue 2136: Smalltalk and SmalltalkImage (CleaningSystemDictionary.3.cs) -- Marcus Denker -- http://www.marcusdenker.de INRIA Lille -- Nord Europe. Team RMoD.
On 03/18/10 11:42, Marcus Denker wrote:
11278 -----
Issue 2136: Smalltalk and SmalltalkImage (CleaningSystemDictionary.3.cs)
After this update, attempting to "save as" the image results in a walkback and a hot loop, apparently after the image is actually saved. Launching the saved image gets into the same problem. Debug log is: THERE_BE_DRAGONS_HERE MessageNotUnderstood: SmalltalkImage>>isRisc 18 March 2010 12:16:03 pm VM: unix - i686 - linux - Squeak3.10.2 of '5 June 2008' [latest update: #7179] Image: PharoCore1.1ALPHA [Latest update: #11278] SecurityManager state: Restricted: false FileAccess: true SocketAccess: true Working Dir /mnt/caboodle1/Martin/apps/pharo/PharoCore-1.1-11268-UNSTABLE Trusted Dir /mnt/caboodle1/Martin/apps/pharo/PharoCore-1.1-11268-UNSTABLE/secure Untrusted Dir /mnt/caboodle1/Martin/apps/pharo/PharoCore-1.1-11268-UNSTABLE/My Squeak SmalltalkImage(Object)>>doesNotUnderstand: #isRisc Receiver: Smalltalk Arguments and temporary variables: t1: isRisc t2: MessageNotUnderstood: SmalltalkImage>>isRisc t3: nil Receiver's instance variables: globals: a SystemDictionary(lots of globals) RiscOSPlatform class>>isActivePlatform Receiver: RiscOSPlatform Arguments and temporary variables: Receiver's instance variables: superclass: OSPlatform methodDict: a MethodDictionary(#platformFamily->(RiscOSPlatform>>#platformFamil...etc... format: 2 instanceVariables: nil organization: ('accessing' platformFamily) subclasses: nil name: #RiscOSPlatform classPool: nil sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'System-Platforms' traitComposition: nil localSelectors: nil [] in OSPlatform class>>determineActivePlatformStartingAt: Receiver: OSPlatform Arguments and temporary variables: t3: RiscOSPlatform Receiver's instance variables: superclass: Object methodDict: a MethodDictionary(#clipboardClass->(OSPlatform>>#clipboardClass "a...etc... format: 2 instanceVariables: nil organization: ('*System-Clipboard' clipboardClass) ('accessing' platformFamily ...etc... subclasses: {MacOSXPlatform. RiscOSPlatform. UnixPlatform. Win32Platform} name: #OSPlatform classPool: a Dictionary(#Current->an UnixPlatform ) sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'System-Platforms' traitComposition: {} localSelectors: nil [] in OrderedCollection(Collection)>>detect:ifNone: Receiver: an OrderedCollection(MacOSXPlatform RiscOSPlatform UnixPlatform Win32Platform) Arguments and temporary variables: t1: RiscOSPlatform t3: [closure] in OSPlatform class>>determineActivePlatformStartingAt: Receiver's instance variables: array: {MacOSXPlatform. RiscOSPlatform. UnixPlatform. Win32Platform} firstIndex: 1 lastIndex: 4 OrderedCollection>>do: Receiver: an OrderedCollection(MacOSXPlatform RiscOSPlatform UnixPlatform Win32Platform) Arguments and temporary variables: t1: [closure] in OrderedCollection(Collection)>>detect:ifNone: t2: 2 Receiver's instance variables: array: {MacOSXPlatform. RiscOSPlatform. UnixPlatform. Win32Platform} firstIndex: 1 lastIndex: 4 OrderedCollection(Collection)>>detect:ifNone: Receiver: an OrderedCollection(MacOSXPlatform RiscOSPlatform UnixPlatform Win32Platform) Arguments and temporary variables: t1: [closure] in OSPlatform class>>determineActivePlatformStartingAt: t2: [closure] in OSPlatform class>>determineActivePlatformStartingAt: Receiver's instance variables: array: {MacOSXPlatform. RiscOSPlatform. UnixPlatform. Win32Platform} firstIndex: 1 lastIndex: 4 OSPlatform class>>determineActivePlatformStartingAt: Receiver: OSPlatform Arguments and temporary variables: t1: OSPlatform t2: nil Receiver's instance variables: superclass: Object methodDict: a MethodDictionary(#clipboardClass->(OSPlatform>>#clipboardClass "a...etc... format: 2 instanceVariables: nil organization: ('*System-Clipboard' clipboardClass) ('accessing' platformFamily ...etc... subclasses: {MacOSXPlatform. RiscOSPlatform. UnixPlatform. Win32Platform} name: #OSPlatform classPool: a Dictionary(#Current->an UnixPlatform ) sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'System-Platforms' traitComposition: {} localSelectors: nil OSPlatform class>>startUp: Receiver: OSPlatform Arguments and temporary variables: t1: false t2: nil Receiver's instance variables: superclass: Object methodDict: a MethodDictionary(#clipboardClass->(OSPlatform>>#clipboardClass "a...etc... format: 2 instanceVariables: nil organization: ('*System-Clipboard' clipboardClass) ('accessing' platformFamily ...etc... subclasses: {MacOSXPlatform. RiscOSPlatform. UnixPlatform. Win32Platform} name: #OSPlatform classPool: a Dictionary(#Current->an UnixPlatform ) sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'System-Platforms' traitComposition: {} localSelectors: nil [] in [] in SmalltalkImage>>send:toClassesNamedIn:with: Receiver: Smalltalk Arguments and temporary variables: t1: #startUp: t3: false t6: OSPlatform Receiver's instance variables: globals: a SystemDictionary(lots of globals) BlockClosure>>on:do: Receiver: [closure] in [] in SmalltalkImage>>send:toClassesNamedIn:with: Arguments and temporary variables: t1: Exception t2: [closure] in [] in SmalltalkImage>>send:toClassesNamedIn:with: t3: false Receiver's instance variables: outerContext: [] in SmalltalkImage>>send:toClassesNamedIn:with: startpc: 133 numArgs: 0 [] in SmalltalkImage>>send:toClassesNamedIn:with: Receiver: Smalltalk Arguments and temporary variables: t1: #OSPlatform t3: #startUp: t4: false t5: an OrderedCollection() t6: OSPlatform Receiver's instance variables: globals: a SystemDictionary(lots of globals) OrderedCollection>>do: Receiver: an OrderedCollection(#Delay #OSPlatform #DisplayScreen #Cursor #InputEventFetcher #Process...etc... Arguments and temporary variables: t1: [closure] in SmalltalkImage>>send:toClassesNamedIn:with: t2: 2 Receiver's instance variables: array: #(#Delay #OSPlatform #DisplayScreen #Cursor #InputEventFetcher #Processo...etc... firstIndex: 1 lastIndex: 38 SmalltalkImage>>send:toClassesNamedIn:with: Receiver: Smalltalk Arguments and temporary variables: t1: #startUp: t2: an OrderedCollection(#Delay #OSPlatform #DisplayScreen #Cursor #InputEventF...etc... t3: false t4: an OrderedCollection() Receiver's instance variables: globals: a SystemDictionary(lots of globals) SmalltalkImage>>processStartUpList: Receiver: Smalltalk Arguments and temporary variables: t1: false Receiver's instance variables: globals: a SystemDictionary(lots of globals) SmalltalkImage>>snapshot:andQuit:embedded: Receiver: Smalltalk Arguments and temporary variables: t1: true t2: false t3: false t4: false t5: '----SNAPSHOT----an Array(18 March 2010 12:16:02 pm) 11278.image priorSourc...etc... Receiver's instance variables: globals: a SystemDictionary(lots of globals) SmalltalkImage>>snapshot:andQuit: Receiver: Smalltalk Arguments and temporary variables: t1: true t2: false Receiver's instance variables: globals: a SystemDictionary(lots of globals) SmalltalkImage>>saveImageInFileNamed: Receiver: Smalltalk Arguments and temporary variables: t1: '/mnt/caboodle1/Martin/apps/pharo/PharoCore-1.1-11268-UNSTABLE/11278.image'...etc... t2: '/mnt/caboodle1/Martin/apps/pharo/PharoCore-1.1-11268-UNSTABLE/11278.image'...etc... t3: '/mnt/caboodle1/Martin/apps/pharo/PharoCore-1.1-11268-UNSTABLE/updated.imag...etc... Receiver's instance variables: globals: a SystemDictionary(lots of globals) SmalltalkImage>>saveAs: Receiver: Smalltalk Arguments and temporary variables: t1: '11278' Receiver's instance variables: globals: a SystemDictionary(lots of globals) WorldState class>>saveAs Receiver: WorldState Arguments and temporary variables: t1: '11278' t2: nil Receiver's instance variables: superclass: Object methodDict: a MethodDictionary(#activeHand->(WorldState>>#activeHand "a Compile...etc... format: 154 instanceVariables: #('hands' 'viewBox' 'canvas' 'damageRecorder' 'stepList' 'la...etc... organization: ('alarms' addAlarm:withArguments:for:at: adjustAlarmTimes: alarmS...etc... subclasses: nil name: #WorldState classPool: a Dictionary(#CanSurrenderToOS->true #DebugShowDamage->false #Deferr...etc... sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'Morphic-Worlds' traitComposition: {} localSelectors: nil [] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(1907)'Save as...' Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t3: 0 Receiver's instance variables: bounds: 169@376 corner: 314@394 owner: a MenuMorph(1782) submorphs: #() fullBounds: 169@376 corner: 314@394 color: Color black extension: a MorphExtension (4039) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'Save as...' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: WorldState selector: #saveAs arguments: #() icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil BlockClosure>>ensure: Receiver: [closure] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Arguments and temporary variables: t1: [closure] in CursorWithMask(Cursor)>>showWhile: t2: nil t3: 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: t1: [closure] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: t2: ((CursorWithMask extent: 16@16 depth: 1 fromArray: #( 2r0 2r10000000...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(1907)'Save as...' Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t2: a PasteUpMorph(1622) [world] Receiver's instance variables: bounds: 169@376 corner: 314@394 owner: a MenuMorph(1782) submorphs: #() fullBounds: 169@376 corner: 314@394 color: Color black extension: a MorphExtension (4039) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'Save as...' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: WorldState selector: #saveAs arguments: #() icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>mouseUp: Receiver: a ToggleMenuItemMorph(1907)'Save as...' Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] Receiver's instance variables: bounds: 169@376 corner: 314@394 owner: a MenuMorph(1782) submorphs: #() fullBounds: 169@376 corner: 314@394 color: Color black extension: a MorphExtension (4039) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'Save as...' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: WorldState selector: #saveAs arguments: #() icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp: Receiver: a ToggleMenuItemMorph(1907)'Save as...' Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] Receiver's instance variables: bounds: 169@376 corner: 314@394 owner: a MenuMorph(1782) submorphs: #() fullBounds: 169@376 corner: 314@394 color: Color black extension: a MorphExtension (4039) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'Save as...' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: WorldState selector: #saveAs arguments: #() icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil MouseButtonEvent>>sentTo: Receiver: [195@387 mouseUp 857540 nil] Arguments and temporary variables: t1: a ToggleMenuItemMorph(1907)'Save as...' Receiver's instance variables: timeStamp: 857540 source: a HandMorph(3216) windowIndex: nil type: #mouseUp buttons: 0 position: 195@387 handler: nil wasHandled: true whichButton: 4 ToggleMenuItemMorph(Morph)>>handleEvent: Receiver: a ToggleMenuItemMorph(1907)'Save as...' Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] Receiver's instance variables: bounds: 169@376 corner: 314@394 owner: a MenuMorph(1782) submorphs: #() fullBounds: 169@376 corner: 314@394 color: Color black extension: a MorphExtension (4039) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'Save as...' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: WorldState selector: #saveAs arguments: #() icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil MorphicEventDispatcher>>dispatchDefault:with: Receiver: a MorphicEventDispatcher Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t2: a ToggleMenuItemMorph(1907)'Save as...' t3: nil t4: 1 t5: nil t6: #() t7: true Receiver's instance variables: lastType: #mouseUp lastDispatch: #dispatchDefault:with: MorphicEventDispatcher>>dispatchEvent:with: Receiver: a MorphicEventDispatcher Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t2: a ToggleMenuItemMorph(1907)'Save as...' Receiver's instance variables: lastType: #mouseUp lastDispatch: #dispatchDefault:with: ToggleMenuItemMorph(Morph)>>processEvent:using: Receiver: a ToggleMenuItemMorph(1907)'Save as...' Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t2: a MorphicEventDispatcher Receiver's instance variables: bounds: 169@376 corner: 314@394 owner: a MenuMorph(1782) submorphs: #() fullBounds: 169@376 corner: 314@394 color: Color black extension: a MorphExtension (4039) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'Save as...' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: WorldState selector: #saveAs arguments: #() icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil MorphicEventDispatcher>>dispatchDefault:with: Receiver: a MorphicEventDispatcher Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t2: a MenuMorph(1782) t3: [195@387 mouseUp 857540 nil] t4: 13 t5: a ToggleMenuItemMorph(1907)'Save as...' t6: an Array(an AlignmentMorph(996) a ToggleMenuItemMorph(500)'System Browser' ...etc... t7: false Receiver's instance variables: lastType: #mouseUp lastDispatch: #dispatchDefault:with: MorphicEventDispatcher>>dispatchEvent:with: Receiver: a MorphicEventDispatcher Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t2: a MenuMorph(1782) Receiver's instance variables: lastType: #mouseUp lastDispatch: #dispatchDefault:with: MenuMorph(Morph)>>processEvent:using: Receiver: a MenuMorph(1782) Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t2: a MorphicEventDispatcher Receiver's instance variables: bounds: 165@171 corner: 318@436 owner: nil submorphs: an Array(an AlignmentMorph(996) a ToggleMenuItemMorph(500)'System Br...etc... fullBounds: 165@171 corner: 319@437 color: (Color r: 0.871 g: 0.871 b: 0.871) extension: a MorphExtension (1330) [other: (basicColor -> (Color r: 0.784 g: 0...etc... borderWidth: 1 borderColor: Color gray defaultTarget: nil selectedItem: a ToggleMenuItemMorph(1907)'Save as...' stayUp: false popUpOwner: nil activeSubMenu: nil activatorDockingBar: nil embeddable: nil MenuMorph(Morph)>>processEvent: Receiver: a MenuMorph(1782) Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] Receiver's instance variables: bounds: 165@171 corner: 318@436 owner: nil submorphs: an Array(an AlignmentMorph(996) a ToggleMenuItemMorph(500)'System Br...etc... fullBounds: 165@171 corner: 319@437 color: (Color r: 0.871 g: 0.871 b: 0.871) extension: a MorphExtension (1330) [other: (basicColor -> (Color r: 0.784 g: 0...etc... borderWidth: 1 borderColor: Color gray defaultTarget: nil selectedItem: a ToggleMenuItemMorph(1907)'Save as...' stayUp: false popUpOwner: nil activeSubMenu: nil activatorDockingBar: nil embeddable: nil MenuMorph>>handleFocusEvent: Receiver: a MenuMorph(1782) Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] Receiver's instance variables: bounds: 165@171 corner: 318@436 owner: nil submorphs: an Array(an AlignmentMorph(996) a ToggleMenuItemMorph(500)'System Br...etc... fullBounds: 165@171 corner: 319@437 color: (Color r: 0.871 g: 0.871 b: 0.871) extension: a MorphExtension (1330) [other: (basicColor -> (Color r: 0.784 g: 0...etc... borderWidth: 1 borderColor: Color gray defaultTarget: nil selectedItem: a ToggleMenuItemMorph(1907)'Save as...' stayUp: false popUpOwner: nil activeSubMenu: nil activatorDockingBar: nil embeddable: nil [] in HandMorph>>sendFocusEvent:to:clear: Receiver: a HandMorph(3216) Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t2: a MenuMorph(1782) t5: #(nil) Receiver's instance variables: bounds: 228@452 corner: 244@468 owner: a PasteUpMorph(1622) [world] submorphs: #() fullBounds: nil color: Color blue extension: a MorphExtension (539) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: a PluggableButtonMorph(3549) eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [228@452 mouseUp 865364 nil] targetOffset: 26@17 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 865364 228 452 0 0 0 1) lastKeyScanCode: 56 combinedChar: nil [] in PasteUpMorph>>becomeActiveDuring: Receiver: a PasteUpMorph(1622) [world] Arguments and temporary variables: t1: [closure] in HandMorph>>sendFocusEvent:to:clear: Receiver's instance variables: bounds: 0@0 corner: 808@609 owner: nil submorphs: an Array(a TaskbarMorph(3095) a PreDebugWindow(1728) an ImageMorph(9...etc... fullBounds: nil color: (Color r: 0.97 g: 0.98 b: 1.0) extension: a MorphExtension (2543) [eventHandler = an EventHandler] [other: (...etc... borderWidth: 0 borderColor: (Color r: 0.03 g: 0.02 b: 0.0) model: a MorphicModel(1926) cursor: 1 padding: 3 backgroundMorph: nil isPartsBin: nil autoLineLayout: false indicateCursor: nil resizeToFit: nil worldState: a WorldState griddingOn: nil BlockClosure>>on:do: Receiver: [closure] in PasteUpMorph>>becomeActiveDuring: Arguments and temporary variables: t1: Error t2: [closure] in PasteUpMorph>>becomeActiveDuring: t3: false Receiver's instance variables: outerContext: PasteUpMorph>>becomeActiveDuring: startpc: 67 numArgs: 0 PasteUpMorph>>becomeActiveDuring: Receiver: a PasteUpMorph(1622) [world] Arguments and temporary variables: t1: [closure] in HandMorph>>sendFocusEvent:to:clear: t2: a PasteUpMorph(1622) [world] t3: a HandMorph(3216) t4: [195@387 mouseOver red nil nil] Receiver's instance variables: bounds: 0@0 corner: 808@609 owner: nil submorphs: an Array(a TaskbarMorph(3095) a PreDebugWindow(1728) an ImageMorph(9...etc... fullBounds: nil color: (Color r: 0.97 g: 0.98 b: 1.0) extension: a MorphExtension (2543) [eventHandler = an EventHandler] [other: (...etc... borderWidth: 0 borderColor: (Color r: 0.03 g: 0.02 b: 0.0) model: a MorphicModel(1926) cursor: 1 padding: 3 backgroundMorph: nil isPartsBin: nil autoLineLayout: false indicateCursor: nil resizeToFit: nil worldState: a WorldState griddingOn: nil --- The full stack --- SmalltalkImage(Object)>>doesNotUnderstand: #isRisc RiscOSPlatform class>>isActivePlatform [] in OSPlatform class>>determineActivePlatformStartingAt: [] in OrderedCollection(Collection)>>detect:ifNone: OrderedCollection>>do: OrderedCollection(Collection)>>detect:ifNone: OSPlatform class>>determineActivePlatformStartingAt: OSPlatform class>>startUp: [] in [] in SmalltalkImage>>send:toClassesNamedIn:with: BlockClosure>>on:do: [] in SmalltalkImage>>send:toClassesNamedIn:with: OrderedCollection>>do: SmalltalkImage>>send:toClassesNamedIn:with: SmalltalkImage>>processStartUpList: SmalltalkImage>>snapshot:andQuit:embedded: SmalltalkImage>>snapshot:andQuit: SmalltalkImage>>saveImageInFileNamed: SmalltalkImage>>saveAs: WorldState class>>saveAs [] 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: [] 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 ------------------------------------------------------------
Strange it works on my mac I thought that I fixed this isRisc ->isRiscOs (probably messed up with the changeset crash) I will publish a fix now. On Mar 18, 2010, at 8:20 PM, Martin McClure wrote:
On 03/18/10 11:42, Marcus Denker wrote:
11278 -----
Issue 2136: Smalltalk and SmalltalkImage (CleaningSystemDictionary.3.cs)
After this update, attempting to "save as" the image results in a walkback and a hot loop, apparently after the image is actually saved. Launching the saved image gets into the same problem.
Debug log is:
THERE_BE_DRAGONS_HERE MessageNotUnderstood: SmalltalkImage>>isRisc 18 March 2010 12:16:03 pm
VM: unix - i686 - linux - Squeak3.10.2 of '5 June 2008' [latest update: #7179] Image: PharoCore1.1ALPHA [Latest update: #11278]
SecurityManager state: Restricted: false FileAccess: true SocketAccess: true Working Dir /mnt/caboodle1/Martin/apps/pharo/PharoCore-1.1-11268-UNSTABLE Trusted Dir /mnt/caboodle1/Martin/apps/pharo/PharoCore-1.1-11268-UNSTABLE/secure Untrusted Dir /mnt/caboodle1/Martin/apps/pharo/PharoCore-1.1-11268-UNSTABLE/My Squeak
SmalltalkImage(Object)>>doesNotUnderstand: #isRisc Receiver: Smalltalk Arguments and temporary variables: t1: isRisc t2: MessageNotUnderstood: SmalltalkImage>>isRisc t3: nil Receiver's instance variables: globals: a SystemDictionary(lots of globals)
RiscOSPlatform class>>isActivePlatform Receiver: RiscOSPlatform Arguments and temporary variables:
Receiver's instance variables: superclass: OSPlatform methodDict: a MethodDictionary(#platformFamily->(RiscOSPlatform>>#platformFamil...etc... format: 2 instanceVariables: nil organization: ('accessing' platformFamily)
subclasses: nil name: #RiscOSPlatform classPool: nil sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'System-Platforms' traitComposition: nil localSelectors: nil
[] in OSPlatform class>>determineActivePlatformStartingAt: Receiver: OSPlatform Arguments and temporary variables: t3: RiscOSPlatform Receiver's instance variables: superclass: Object methodDict: a MethodDictionary(#clipboardClass->(OSPlatform>>#clipboardClass "a...etc... format: 2 instanceVariables: nil organization: ('*System-Clipboard' clipboardClass) ('accessing' platformFamily ...etc... subclasses: {MacOSXPlatform. RiscOSPlatform. UnixPlatform. Win32Platform} name: #OSPlatform classPool: a Dictionary(#Current->an UnixPlatform ) sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'System-Platforms' traitComposition: {} localSelectors: nil
[] in OrderedCollection(Collection)>>detect:ifNone: Receiver: an OrderedCollection(MacOSXPlatform RiscOSPlatform UnixPlatform Win32Platform) Arguments and temporary variables: t1: RiscOSPlatform t3: [closure] in OSPlatform class>>determineActivePlatformStartingAt: Receiver's instance variables: array: {MacOSXPlatform. RiscOSPlatform. UnixPlatform. Win32Platform} firstIndex: 1 lastIndex: 4
OrderedCollection>>do: Receiver: an OrderedCollection(MacOSXPlatform RiscOSPlatform UnixPlatform Win32Platform) Arguments and temporary variables: t1: [closure] in OrderedCollection(Collection)>>detect:ifNone: t2: 2 Receiver's instance variables: array: {MacOSXPlatform. RiscOSPlatform. UnixPlatform. Win32Platform} firstIndex: 1 lastIndex: 4
OrderedCollection(Collection)>>detect:ifNone: Receiver: an OrderedCollection(MacOSXPlatform RiscOSPlatform UnixPlatform Win32Platform) Arguments and temporary variables: t1: [closure] in OSPlatform class>>determineActivePlatformStartingAt: t2: [closure] in OSPlatform class>>determineActivePlatformStartingAt: Receiver's instance variables: array: {MacOSXPlatform. RiscOSPlatform. UnixPlatform. Win32Platform} firstIndex: 1 lastIndex: 4
OSPlatform class>>determineActivePlatformStartingAt: Receiver: OSPlatform Arguments and temporary variables: t1: OSPlatform t2: nil Receiver's instance variables: superclass: Object methodDict: a MethodDictionary(#clipboardClass->(OSPlatform>>#clipboardClass "a...etc... format: 2 instanceVariables: nil organization: ('*System-Clipboard' clipboardClass) ('accessing' platformFamily ...etc... subclasses: {MacOSXPlatform. RiscOSPlatform. UnixPlatform. Win32Platform} name: #OSPlatform classPool: a Dictionary(#Current->an UnixPlatform ) sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'System-Platforms' traitComposition: {} localSelectors: nil
OSPlatform class>>startUp: Receiver: OSPlatform Arguments and temporary variables: t1: false t2: nil Receiver's instance variables: superclass: Object methodDict: a MethodDictionary(#clipboardClass->(OSPlatform>>#clipboardClass "a...etc... format: 2 instanceVariables: nil organization: ('*System-Clipboard' clipboardClass) ('accessing' platformFamily ...etc... subclasses: {MacOSXPlatform. RiscOSPlatform. UnixPlatform. Win32Platform} name: #OSPlatform classPool: a Dictionary(#Current->an UnixPlatform ) sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'System-Platforms' traitComposition: {} localSelectors: nil
[] in [] in SmalltalkImage>>send:toClassesNamedIn:with: Receiver: Smalltalk Arguments and temporary variables: t1: #startUp: t3: false t6: OSPlatform Receiver's instance variables: globals: a SystemDictionary(lots of globals)
BlockClosure>>on:do: Receiver: [closure] in [] in SmalltalkImage>>send:toClassesNamedIn:with: Arguments and temporary variables: t1: Exception t2: [closure] in [] in SmalltalkImage>>send:toClassesNamedIn:with: t3: false Receiver's instance variables: outerContext: [] in SmalltalkImage>>send:toClassesNamedIn:with: startpc: 133 numArgs: 0
[] in SmalltalkImage>>send:toClassesNamedIn:with: Receiver: Smalltalk Arguments and temporary variables: t1: #OSPlatform t3: #startUp: t4: false t5: an OrderedCollection() t6: OSPlatform Receiver's instance variables: globals: a SystemDictionary(lots of globals)
OrderedCollection>>do: Receiver: an OrderedCollection(#Delay #OSPlatform #DisplayScreen #Cursor #InputEventFetcher #Process...etc... Arguments and temporary variables: t1: [closure] in SmalltalkImage>>send:toClassesNamedIn:with: t2: 2 Receiver's instance variables: array: #(#Delay #OSPlatform #DisplayScreen #Cursor #InputEventFetcher #Processo...etc... firstIndex: 1 lastIndex: 38
SmalltalkImage>>send:toClassesNamedIn:with: Receiver: Smalltalk Arguments and temporary variables: t1: #startUp: t2: an OrderedCollection(#Delay #OSPlatform #DisplayScreen #Cursor #InputEventF...etc... t3: false t4: an OrderedCollection() Receiver's instance variables: globals: a SystemDictionary(lots of globals)
SmalltalkImage>>processStartUpList: Receiver: Smalltalk Arguments and temporary variables: t1: false Receiver's instance variables: globals: a SystemDictionary(lots of globals)
SmalltalkImage>>snapshot:andQuit:embedded: Receiver: Smalltalk Arguments and temporary variables: t1: true t2: false t3: false t4: false t5: '----SNAPSHOT----an Array(18 March 2010 12:16:02 pm) 11278.image priorSourc...etc... Receiver's instance variables: globals: a SystemDictionary(lots of globals)
SmalltalkImage>>snapshot:andQuit: Receiver: Smalltalk Arguments and temporary variables: t1: true t2: false Receiver's instance variables: globals: a SystemDictionary(lots of globals)
SmalltalkImage>>saveImageInFileNamed: Receiver: Smalltalk Arguments and temporary variables: t1: '/mnt/caboodle1/Martin/apps/pharo/PharoCore-1.1-11268-UNSTABLE/11278.image'...etc... t2: '/mnt/caboodle1/Martin/apps/pharo/PharoCore-1.1-11268-UNSTABLE/11278.image'...etc... t3: '/mnt/caboodle1/Martin/apps/pharo/PharoCore-1.1-11268-UNSTABLE/updated.imag...etc... Receiver's instance variables: globals: a SystemDictionary(lots of globals)
SmalltalkImage>>saveAs: Receiver: Smalltalk Arguments and temporary variables: t1: '11278' Receiver's instance variables: globals: a SystemDictionary(lots of globals)
WorldState class>>saveAs Receiver: WorldState Arguments and temporary variables: t1: '11278' t2: nil Receiver's instance variables: superclass: Object methodDict: a MethodDictionary(#activeHand->(WorldState>>#activeHand "a Compile...etc... format: 154 instanceVariables: #('hands' 'viewBox' 'canvas' 'damageRecorder' 'stepList' 'la...etc... organization: ('alarms' addAlarm:withArguments:for:at: adjustAlarmTimes: alarmS...etc... subclasses: nil name: #WorldState classPool: a Dictionary(#CanSurrenderToOS->true #DebugShowDamage->false #Deferr...etc... sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'Morphic-Worlds' traitComposition: {} localSelectors: nil
[] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(1907)'Save as...' Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t3: 0 Receiver's instance variables: bounds: 169@376 corner: 314@394 owner: a MenuMorph(1782) submorphs: #() fullBounds: 169@376 corner: 314@394 color: Color black extension: a MorphExtension (4039) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'Save as...' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: WorldState selector: #saveAs arguments: #() icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil
BlockClosure>>ensure: Receiver: [closure] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Arguments and temporary variables: t1: [closure] in CursorWithMask(Cursor)>>showWhile: t2: nil t3: 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: t1: [closure] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: t2: ((CursorWithMask extent: 16@16 depth: 1 fromArray: #( 2r0 2r10000000...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(1907)'Save as...' Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t2: a PasteUpMorph(1622) [world] Receiver's instance variables: bounds: 169@376 corner: 314@394 owner: a MenuMorph(1782) submorphs: #() fullBounds: 169@376 corner: 314@394 color: Color black extension: a MorphExtension (4039) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'Save as...' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: WorldState selector: #saveAs arguments: #() icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil
ToggleMenuItemMorph(MenuItemMorph)>>mouseUp: Receiver: a ToggleMenuItemMorph(1907)'Save as...' Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] Receiver's instance variables: bounds: 169@376 corner: 314@394 owner: a MenuMorph(1782) submorphs: #() fullBounds: 169@376 corner: 314@394 color: Color black extension: a MorphExtension (4039) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'Save as...' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: WorldState selector: #saveAs arguments: #() icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil
ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp: Receiver: a ToggleMenuItemMorph(1907)'Save as...' Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] Receiver's instance variables: bounds: 169@376 corner: 314@394 owner: a MenuMorph(1782) submorphs: #() fullBounds: 169@376 corner: 314@394 color: Color black extension: a MorphExtension (4039) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'Save as...' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: WorldState selector: #saveAs arguments: #() icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil
MouseButtonEvent>>sentTo: Receiver: [195@387 mouseUp 857540 nil] Arguments and temporary variables: t1: a ToggleMenuItemMorph(1907)'Save as...' Receiver's instance variables: timeStamp: 857540 source: a HandMorph(3216) windowIndex: nil type: #mouseUp buttons: 0 position: 195@387 handler: nil wasHandled: true whichButton: 4
ToggleMenuItemMorph(Morph)>>handleEvent: Receiver: a ToggleMenuItemMorph(1907)'Save as...' Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] Receiver's instance variables: bounds: 169@376 corner: 314@394 owner: a MenuMorph(1782) submorphs: #() fullBounds: 169@376 corner: 314@394 color: Color black extension: a MorphExtension (4039) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'Save as...' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: WorldState selector: #saveAs arguments: #() icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil
MorphicEventDispatcher>>dispatchDefault:with: Receiver: a MorphicEventDispatcher Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t2: a ToggleMenuItemMorph(1907)'Save as...' t3: nil t4: 1 t5: nil t6: #() t7: true Receiver's instance variables: lastType: #mouseUp lastDispatch: #dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with: Receiver: a MorphicEventDispatcher Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t2: a ToggleMenuItemMorph(1907)'Save as...' Receiver's instance variables: lastType: #mouseUp lastDispatch: #dispatchDefault:with:
ToggleMenuItemMorph(Morph)>>processEvent:using: Receiver: a ToggleMenuItemMorph(1907)'Save as...' Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t2: a MorphicEventDispatcher Receiver's instance variables: bounds: 169@376 corner: 314@394 owner: a MenuMorph(1782) submorphs: #() fullBounds: 169@376 corner: 314@394 color: Color black extension: a MorphExtension (4039) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'Save as...' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: WorldState selector: #saveAs arguments: #() icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil
MorphicEventDispatcher>>dispatchDefault:with: Receiver: a MorphicEventDispatcher Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t2: a MenuMorph(1782) t3: [195@387 mouseUp 857540 nil] t4: 13 t5: a ToggleMenuItemMorph(1907)'Save as...' t6: an Array(an AlignmentMorph(996) a ToggleMenuItemMorph(500)'System Browser' ...etc... t7: false Receiver's instance variables: lastType: #mouseUp lastDispatch: #dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with: Receiver: a MorphicEventDispatcher Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t2: a MenuMorph(1782) Receiver's instance variables: lastType: #mouseUp lastDispatch: #dispatchDefault:with:
MenuMorph(Morph)>>processEvent:using: Receiver: a MenuMorph(1782) Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t2: a MorphicEventDispatcher Receiver's instance variables: bounds: 165@171 corner: 318@436 owner: nil submorphs: an Array(an AlignmentMorph(996) a ToggleMenuItemMorph(500)'System Br...etc... fullBounds: 165@171 corner: 319@437 color: (Color r: 0.871 g: 0.871 b: 0.871) extension: a MorphExtension (1330) [other: (basicColor -> (Color r: 0.784 g: 0...etc... borderWidth: 1 borderColor: Color gray defaultTarget: nil selectedItem: a ToggleMenuItemMorph(1907)'Save as...' stayUp: false popUpOwner: nil activeSubMenu: nil activatorDockingBar: nil embeddable: nil
MenuMorph(Morph)>>processEvent: Receiver: a MenuMorph(1782) Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] Receiver's instance variables: bounds: 165@171 corner: 318@436 owner: nil submorphs: an Array(an AlignmentMorph(996) a ToggleMenuItemMorph(500)'System Br...etc... fullBounds: 165@171 corner: 319@437 color: (Color r: 0.871 g: 0.871 b: 0.871) extension: a MorphExtension (1330) [other: (basicColor -> (Color r: 0.784 g: 0...etc... borderWidth: 1 borderColor: Color gray defaultTarget: nil selectedItem: a ToggleMenuItemMorph(1907)'Save as...' stayUp: false popUpOwner: nil activeSubMenu: nil activatorDockingBar: nil embeddable: nil
MenuMorph>>handleFocusEvent: Receiver: a MenuMorph(1782) Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] Receiver's instance variables: bounds: 165@171 corner: 318@436 owner: nil submorphs: an Array(an AlignmentMorph(996) a ToggleMenuItemMorph(500)'System Br...etc... fullBounds: 165@171 corner: 319@437 color: (Color r: 0.871 g: 0.871 b: 0.871) extension: a MorphExtension (1330) [other: (basicColor -> (Color r: 0.784 g: 0...etc... borderWidth: 1 borderColor: Color gray defaultTarget: nil selectedItem: a ToggleMenuItemMorph(1907)'Save as...' stayUp: false popUpOwner: nil activeSubMenu: nil activatorDockingBar: nil embeddable: nil
[] in HandMorph>>sendFocusEvent:to:clear: Receiver: a HandMorph(3216) Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t2: a MenuMorph(1782) t5: #(nil) Receiver's instance variables: bounds: 228@452 corner: 244@468 owner: a PasteUpMorph(1622) [world] submorphs: #() fullBounds: nil color: Color blue extension: a MorphExtension (539) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: a PluggableButtonMorph(3549) eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [228@452 mouseUp 865364 nil] targetOffset: 26@17 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 865364 228 452 0 0 0 1) lastKeyScanCode: 56 combinedChar: nil
[] in PasteUpMorph>>becomeActiveDuring: Receiver: a PasteUpMorph(1622) [world] Arguments and temporary variables: t1: [closure] in HandMorph>>sendFocusEvent:to:clear: Receiver's instance variables: bounds: 0@0 corner: 808@609 owner: nil submorphs: an Array(a TaskbarMorph(3095) a PreDebugWindow(1728) an ImageMorph(9...etc... fullBounds: nil color: (Color r: 0.97 g: 0.98 b: 1.0) extension: a MorphExtension (2543) [eventHandler = an EventHandler] [other: (...etc... borderWidth: 0 borderColor: (Color r: 0.03 g: 0.02 b: 0.0) model: a MorphicModel(1926) cursor: 1 padding: 3 backgroundMorph: nil isPartsBin: nil autoLineLayout: false indicateCursor: nil resizeToFit: nil worldState: a WorldState griddingOn: nil
BlockClosure>>on:do: Receiver: [closure] in PasteUpMorph>>becomeActiveDuring: Arguments and temporary variables: t1: Error t2: [closure] in PasteUpMorph>>becomeActiveDuring: t3: false Receiver's instance variables: outerContext: PasteUpMorph>>becomeActiveDuring: startpc: 67 numArgs: 0
PasteUpMorph>>becomeActiveDuring: Receiver: a PasteUpMorph(1622) [world] Arguments and temporary variables: t1: [closure] in HandMorph>>sendFocusEvent:to:clear: t2: a PasteUpMorph(1622) [world] t3: a HandMorph(3216) t4: [195@387 mouseOver red nil nil] Receiver's instance variables: bounds: 0@0 corner: 808@609 owner: nil submorphs: an Array(a TaskbarMorph(3095) a PreDebugWindow(1728) an ImageMorph(9...etc... fullBounds: nil color: (Color r: 0.97 g: 0.98 b: 1.0) extension: a MorphExtension (2543) [eventHandler = an EventHandler] [other: (...etc... borderWidth: 0 borderColor: (Color r: 0.03 g: 0.02 b: 0.0) model: a MorphicModel(1926) cursor: 1 padding: 3 backgroundMorph: nil isPartsBin: nil autoLineLayout: false indicateCursor: nil resizeToFit: nil worldState: a WorldState griddingOn: nil
--- The full stack --- SmalltalkImage(Object)>>doesNotUnderstand: #isRisc RiscOSPlatform class>>isActivePlatform [] in OSPlatform class>>determineActivePlatformStartingAt: [] in OrderedCollection(Collection)>>detect:ifNone: OrderedCollection>>do: OrderedCollection(Collection)>>detect:ifNone: OSPlatform class>>determineActivePlatformStartingAt: OSPlatform class>>startUp: [] in [] in SmalltalkImage>>send:toClassesNamedIn:with: BlockClosure>>on:do: [] in SmalltalkImage>>send:toClassesNamedIn:with: OrderedCollection>>do: SmalltalkImage>>send:toClassesNamedIn:with: SmalltalkImage>>processStartUpList: SmalltalkImage>>snapshot:andQuit:embedded: SmalltalkImage>>snapshot:andQuit: SmalltalkImage>>saveImageInFileNamed: SmalltalkImage>>saveAs: WorldState class>>saveAs [] 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: [] 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 ------------------------------------------------------------
_______________________________________________ Pharo-project mailing list Pharo-project@lists.gforge.inria.fr http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project
I fixed it now this is strange that it did not break at my place...
11278
-----
Issue 2136: Smalltalk and SmalltalkImage (CleaningSystemDictionary.3.cs)
After this update, attempting to "save as" the image results in a walkback and a hot loop, apparently after the image is actually saved. Launching the saved image gets into the same problem.
Debug log is:
THERE_BE_DRAGONS_HERE MessageNotUnderstood: SmalltalkImage>>isRisc 18 March 2010 12:16:03 pm
VM: unix - i686 - linux - Squeak3.10.2 of '5 June 2008' [latest update: #7179] Image: PharoCore1.1ALPHA [Latest update: #11278]
SecurityManager state: Restricted: false FileAccess: true SocketAccess: true Working Dir /mnt/caboodle1/Martin/apps/pharo/PharoCore-1.1-11268-UNSTABLE Trusted Dir /mnt/caboodle1/Martin/apps/pharo/PharoCore-1.1-11268-UNSTABLE/secure Untrusted Dir /mnt/caboodle1/Martin/apps/pharo/PharoCore-1.1-11268-UNSTABLE/My Squeak
SmalltalkImage(Object)>>doesNotUnderstand: #isRisc Receiver: Smalltalk Arguments and temporary variables: t1: isRisc t2: MessageNotUnderstood: SmalltalkImage>>isRisc t3: nil Receiver's instance variables: globals: a SystemDictionary(lots of globals)
RiscOSPlatform class>>isActivePlatform Receiver: RiscOSPlatform Arguments and temporary variables:
Receiver's instance variables: superclass: OSPlatform methodDict: a MethodDictionary(#platformFamily->(RiscOSPlatform>>#platformFamil...etc... format: 2 instanceVariables: nil organization: ('accessing' platformFamily)
subclasses: nil name: #RiscOSPlatform classPool: nil sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'System-Platforms' traitComposition: nil localSelectors: nil
[] in OSPlatform class>>determineActivePlatformStartingAt: Receiver: OSPlatform Arguments and temporary variables: t3: RiscOSPlatform Receiver's instance variables: superclass: Object methodDict: a MethodDictionary(#clipboardClass->(OSPlatform>>#clipboardClass "a...etc... format: 2 instanceVariables: nil organization: ('*System-Clipboard' clipboardClass) ('accessing' platformFamily ...etc... subclasses: {MacOSXPlatform. RiscOSPlatform. UnixPlatform. Win32Platform} name: #OSPlatform classPool: a Dictionary(#Current->an UnixPlatform ) sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'System-Platforms' traitComposition: {} localSelectors: nil
[] in OrderedCollection(Collection)>>detect:ifNone: Receiver: an OrderedCollection(MacOSXPlatform RiscOSPlatform UnixPlatform Win32Platform) Arguments and temporary variables: t1: RiscOSPlatform t3: [closure] in OSPlatform class>>determineActivePlatformStartingAt: Receiver's instance variables: array: {MacOSXPlatform. RiscOSPlatform. UnixPlatform. Win32Platform} firstIndex: 1 lastIndex: 4
OrderedCollection>>do: Receiver: an OrderedCollection(MacOSXPlatform RiscOSPlatform UnixPlatform Win32Platform) Arguments and temporary variables: t1: [closure] in OrderedCollection(Collection)>>detect:ifNone: t2: 2 Receiver's instance variables: array: {MacOSXPlatform. RiscOSPlatform. UnixPlatform. Win32Platform} firstIndex: 1 lastIndex: 4
OrderedCollection(Collection)>>detect:ifNone: Receiver: an OrderedCollection(MacOSXPlatform RiscOSPlatform UnixPlatform Win32Platform) Arguments and temporary variables: t1: [closure] in OSPlatform class>>determineActivePlatformStartingAt: t2: [closure] in OSPlatform class>>determineActivePlatformStartingAt: Receiver's instance variables: array: {MacOSXPlatform. RiscOSPlatform. UnixPlatform. Win32Platform} firstIndex: 1 lastIndex: 4
OSPlatform class>>determineActivePlatformStartingAt: Receiver: OSPlatform Arguments and temporary variables: t1: OSPlatform t2: nil Receiver's instance variables: superclass: Object methodDict: a MethodDictionary(#clipboardClass->(OSPlatform>>#clipboardClass "a...etc... format: 2 instanceVariables: nil organization: ('*System-Clipboard' clipboardClass) ('accessing' platformFamily ...etc... subclasses: {MacOSXPlatform. RiscOSPlatform. UnixPlatform. Win32Platform} name: #OSPlatform classPool: a Dictionary(#Current->an UnixPlatform ) sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'System-Platforms' traitComposition: {} localSelectors: nil
OSPlatform class>>startUp: Receiver: OSPlatform Arguments and temporary variables: t1: false t2: nil Receiver's instance variables: superclass: Object methodDict: a MethodDictionary(#clipboardClass->(OSPlatform>>#clipboardClass "a...etc... format: 2 instanceVariables: nil organization: ('*System-Clipboard' clipboardClass) ('accessing' platformFamily ...etc... subclasses: {MacOSXPlatform. RiscOSPlatform. UnixPlatform. Win32Platform} name: #OSPlatform classPool: a Dictionary(#Current->an UnixPlatform ) sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'System-Platforms' traitComposition: {} localSelectors: nil
[] in [] in SmalltalkImage>>send:toClassesNamedIn:with: Receiver: Smalltalk Arguments and temporary variables: t1: #startUp: t3: false t6: OSPlatform Receiver's instance variables: globals: a SystemDictionary(lots of globals)
BlockClosure>>on:do: Receiver: [closure] in [] in SmalltalkImage>>send:toClassesNamedIn:with: Arguments and temporary variables: t1: Exception t2: [closure] in [] in SmalltalkImage>>send:toClassesNamedIn:with: t3: false Receiver's instance variables: outerContext: [] in SmalltalkImage>>send:toClassesNamedIn:with: startpc: 133 numArgs: 0
[] in SmalltalkImage>>send:toClassesNamedIn:with: Receiver: Smalltalk Arguments and temporary variables: t1: #OSPlatform t3: #startUp: t4: false t5: an OrderedCollection() t6: OSPlatform Receiver's instance variables: globals: a SystemDictionary(lots of globals)
OrderedCollection>>do: Receiver: an OrderedCollection(#Delay #OSPlatform #DisplayScreen #Cursor #InputEventFetcher #Process...etc... Arguments and temporary variables: t1: [closure] in SmalltalkImage>>send:toClassesNamedIn:with: t2: 2 Receiver's instance variables: array: #(#Delay #OSPlatform #DisplayScreen #Cursor #InputEventFetcher #Processo...etc... firstIndex: 1 lastIndex: 38
SmalltalkImage>>send:toClassesNamedIn:with: Receiver: Smalltalk Arguments and temporary variables: t1: #startUp: t2: an OrderedCollection(#Delay #OSPlatform #DisplayScreen #Cursor #InputEventF...etc... t3: false t4: an OrderedCollection() Receiver's instance variables: globals: a SystemDictionary(lots of globals)
SmalltalkImage>>processStartUpList: Receiver: Smalltalk Arguments and temporary variables: t1: false Receiver's instance variables: globals: a SystemDictionary(lots of globals)
SmalltalkImage>>snapshot:andQuit:embedded: Receiver: Smalltalk Arguments and temporary variables: t1: true t2: false t3: false t4: false t5: '----SNAPSHOT----an Array(18 March 2010 12:16:02 pm) 11278.image priorSourc...etc... Receiver's instance variables: globals: a SystemDictionary(lots of globals)
SmalltalkImage>>snapshot:andQuit: Receiver: Smalltalk Arguments and temporary variables: t1: true t2: false Receiver's instance variables: globals: a SystemDictionary(lots of globals)
SmalltalkImage>>saveImageInFileNamed: Receiver: Smalltalk Arguments and temporary variables: t1: '/mnt/caboodle1/Martin/apps/pharo/PharoCore-1.1-11268-UNSTABLE/11278.image'...etc... t2: '/mnt/caboodle1/Martin/apps/pharo/PharoCore-1.1-11268-UNSTABLE/11278.image'...etc... t3: '/mnt/caboodle1/Martin/apps/pharo/PharoCore-1.1-11268-UNSTABLE/updated.imag...etc... Receiver's instance variables: globals: a SystemDictionary(lots of globals)
SmalltalkImage>>saveAs: Receiver: Smalltalk Arguments and temporary variables: t1: '11278' Receiver's instance variables: globals: a SystemDictionary(lots of globals)
WorldState class>>saveAs Receiver: WorldState Arguments and temporary variables: t1: '11278' t2: nil Receiver's instance variables: superclass: Object methodDict: a MethodDictionary(#activeHand->(WorldState>>#activeHand "a Compile...etc... format: 154 instanceVariables: #('hands' 'viewBox' 'canvas' 'damageRecorder' 'stepList' 'la...etc... organization: ('alarms' addAlarm:withArguments:for:at: adjustAlarmTimes: alarmS...etc... subclasses: nil name: #WorldState classPool: a Dictionary(#CanSurrenderToOS->true #DebugShowDamage->false #Deferr...etc... sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'Morphic-Worlds' traitComposition: {} localSelectors: nil
[] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(1907)'Save as...' Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t3: 0 Receiver's instance variables: bounds: 169@376 corner: 314@394 owner: a MenuMorph(1782) submorphs: #() fullBounds: 169@376 corner: 314@394 color: Color black extension: a MorphExtension (4039) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'Save as...' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: WorldState selector: #saveAs arguments: #() icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil
BlockClosure>>ensure: Receiver: [closure] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Arguments and temporary variables: t1: [closure] in CursorWithMask(Cursor)>>showWhile: t2: nil t3: 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: t1: [closure] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: t2: ((CursorWithMask extent: 16@16 depth: 1 fromArray: #( 2r0 2r10000000...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(1907)'Save as...' Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t2: a PasteUpMorph(1622) [world] Receiver's instance variables: bounds: 169@376 corner: 314@394 owner: a MenuMorph(1782) submorphs: #() fullBounds: 169@376 corner: 314@394 color: Color black extension: a MorphExtension (4039) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'Save as...' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: WorldState selector: #saveAs arguments: #() icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil
ToggleMenuItemMorph(MenuItemMorph)>>mouseUp: Receiver: a ToggleMenuItemMorph(1907)'Save as...' Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] Receiver's instance variables: bounds: 169@376 corner: 314@394 owner: a MenuMorph(1782) submorphs: #() fullBounds: 169@376 corner: 314@394 color: Color black extension: a MorphExtension (4039) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'Save as...' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: WorldState selector: #saveAs arguments: #() icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil
ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp: Receiver: a ToggleMenuItemMorph(1907)'Save as...' Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] Receiver's instance variables: bounds: 169@376 corner: 314@394 owner: a MenuMorph(1782) submorphs: #() fullBounds: 169@376 corner: 314@394 color: Color black extension: a MorphExtension (4039) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'Save as...' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: WorldState selector: #saveAs arguments: #() icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil
MouseButtonEvent>>sentTo: Receiver: [195@387 mouseUp 857540 nil] Arguments and temporary variables: t1: a ToggleMenuItemMorph(1907)'Save as...' Receiver's instance variables: timeStamp: 857540 source: a HandMorph(3216) windowIndex: nil type: #mouseUp buttons: 0 position: 195@387 handler: nil wasHandled: true whichButton: 4
ToggleMenuItemMorph(Morph)>>handleEvent: Receiver: a ToggleMenuItemMorph(1907)'Save as...' Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] Receiver's instance variables: bounds: 169@376 corner: 314@394 owner: a MenuMorph(1782) submorphs: #() fullBounds: 169@376 corner: 314@394 color: Color black extension: a MorphExtension (4039) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'Save as...' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: WorldState selector: #saveAs arguments: #() icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil
MorphicEventDispatcher>>dispatchDefault:with: Receiver: a MorphicEventDispatcher Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t2: a ToggleMenuItemMorph(1907)'Save as...' t3: nil t4: 1 t5: nil t6: #() t7: true Receiver's instance variables: lastType: #mouseUp lastDispatch: #dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with: Receiver: a MorphicEventDispatcher Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t2: a ToggleMenuItemMorph(1907)'Save as...' Receiver's instance variables: lastType: #mouseUp lastDispatch: #dispatchDefault:with:
ToggleMenuItemMorph(Morph)>>processEvent:using: Receiver: a ToggleMenuItemMorph(1907)'Save as...' Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t2: a MorphicEventDispatcher Receiver's instance variables: bounds: 169@376 corner: 314@394 owner: a MenuMorph(1782) submorphs: #() fullBounds: 169@376 corner: 314@394 color: Color black extension: a MorphExtension (4039) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'Save as...' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: WorldState selector: #saveAs arguments: #() icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil
MorphicEventDispatcher>>dispatchDefault:with: Receiver: a MorphicEventDispatcher Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t2: a MenuMorph(1782) t3: [195@387 mouseUp 857540 nil] t4: 13 t5: a ToggleMenuItemMorph(1907)'Save as...' t6: an Array(an AlignmentMorph(996) a ToggleMenuItemMorph(500)'System Browser' ...etc... t7: false Receiver's instance variables: lastType: #mouseUp lastDispatch: #dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with: Receiver: a MorphicEventDispatcher Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t2: a MenuMorph(1782) Receiver's instance variables: lastType: #mouseUp lastDispatch: #dispatchDefault:with:
MenuMorph(Morph)>>processEvent:using: Receiver: a MenuMorph(1782) Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t2: a MorphicEventDispatcher Receiver's instance variables: bounds: 165@171 corner: 318@436 owner: nil submorphs: an Array(an AlignmentMorph(996) a ToggleMenuItemMorph(500)'System Br...etc... fullBounds: 165@171 corner: 319@437 color: (Color r: 0.871 g: 0.871 b: 0.871) extension: a MorphExtension (1330) [other: (basicColor -> (Color r: 0.784 g: 0...etc... borderWidth: 1 borderColor: Color gray defaultTarget: nil selectedItem: a ToggleMenuItemMorph(1907)'Save as...' stayUp: false popUpOwner: nil activeSubMenu: nil activatorDockingBar: nil embeddable: nil
MenuMorph(Morph)>>processEvent: Receiver: a MenuMorph(1782) Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] Receiver's instance variables: bounds: 165@171 corner: 318@436 owner: nil submorphs: an Array(an AlignmentMorph(996) a ToggleMenuItemMorph(500)'System Br...etc... fullBounds: 165@171 corner: 319@437 color: (Color r: 0.871 g: 0.871 b: 0.871) extension: a MorphExtension (1330) [other: (basicColor -> (Color r: 0.784 g: 0...etc... borderWidth: 1 borderColor: Color gray defaultTarget: nil selectedItem: a ToggleMenuItemMorph(1907)'Save as...' stayUp: false popUpOwner: nil activeSubMenu: nil activatorDockingBar: nil embeddable: nil
MenuMorph>>handleFocusEvent: Receiver: a MenuMorph(1782) Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] Receiver's instance variables: bounds: 165@171 corner: 318@436 owner: nil submorphs: an Array(an AlignmentMorph(996) a ToggleMenuItemMorph(500)'System Br...etc... fullBounds: 165@171 corner: 319@437 color: (Color r: 0.871 g: 0.871 b: 0.871) extension: a MorphExtension (1330) [other: (basicColor -> (Color r: 0.784 g: 0...etc... borderWidth: 1 borderColor: Color gray defaultTarget: nil selectedItem: a ToggleMenuItemMorph(1907)'Save as...' stayUp: false popUpOwner: nil activeSubMenu: nil activatorDockingBar: nil embeddable: nil
[] in HandMorph>>sendFocusEvent:to:clear: Receiver: a HandMorph(3216) Arguments and temporary variables: t1: [195@387 mouseUp 857540 nil] t2: a MenuMorph(1782) t5: #(nil) Receiver's instance variables: bounds: 228@452 corner: 244@468 owner: a PasteUpMorph(1622) [world] submorphs: #() fullBounds: nil color: Color blue extension: a MorphExtension (539) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: a PluggableButtonMorph(3549) eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [228@452 mouseUp 865364 nil] targetOffset: 26@17 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 865364 228 452 0 0 0 1) lastKeyScanCode: 56 combinedChar: nil
[] in PasteUpMorph>>becomeActiveDuring: Receiver: a PasteUpMorph(1622) [world] Arguments and temporary variables: t1: [closure] in HandMorph>>sendFocusEvent:to:clear: Receiver's instance variables: bounds: 0@0 corner: 808@609 owner: nil submorphs: an Array(a TaskbarMorph(3095) a PreDebugWindow(1728) an ImageMorph(9...etc... fullBounds: nil color: (Color r: 0.97 g: 0.98 b: 1.0) extension: a MorphExtension (2543) [eventHandler = an EventHandler] [other: (...etc... borderWidth: 0 borderColor: (Color r: 0.03 g: 0.02 b: 0.0) model: a MorphicModel(1926) cursor: 1 padding: 3 backgroundMorph: nil isPartsBin: nil autoLineLayout: false indicateCursor: nil resizeToFit: nil worldState: a WorldState griddingOn: nil
BlockClosure>>on:do: Receiver: [closure] in PasteUpMorph>>becomeActiveDuring: Arguments and temporary variables: t1: Error t2: [closure] in PasteUpMorph>>becomeActiveDuring: t3: false Receiver's instance variables: outerContext: PasteUpMorph>>becomeActiveDuring: startpc: 67 numArgs: 0
PasteUpMorph>>becomeActiveDuring: Receiver: a PasteUpMorph(1622) [world] Arguments and temporary variables: t1: [closure] in HandMorph>>sendFocusEvent:to:clear: t2: a PasteUpMorph(1622) [world] t3: a HandMorph(3216) t4: [195@387 mouseOver red nil nil] Receiver's instance variables: bounds: 0@0 corner: 808@609 owner: nil submorphs: an Array(a TaskbarMorph(3095) a PreDebugWindow(1728) an ImageMorph(9...etc... fullBounds: nil color: (Color r: 0.97 g: 0.98 b: 1.0) extension: a MorphExtension (2543) [eventHandler = an EventHandler] [other: (...etc... borderWidth: 0 borderColor: (Color r: 0.03 g: 0.02 b: 0.0) model: a MorphicModel(1926) cursor: 1 padding: 3 backgroundMorph: nil isPartsBin: nil autoLineLayout: false indicateCursor: nil resizeToFit: nil worldState: a WorldState griddingOn: nil
--- The full stack --- SmalltalkImage(Object)>>doesNotUnderstand: #isRisc RiscOSPlatform class>>isActivePlatform [] in OSPlatform class>>determineActivePlatformStartingAt: [] in OrderedCollection(Collection)>>detect:ifNone: OrderedCollection>>do: OrderedCollection(Collection)>>detect:ifNone: OSPlatform class>>determineActivePlatformStartingAt: OSPlatform class>>startUp: [] in [] in SmalltalkImage>>send:toClassesNamedIn:with: BlockClosure>>on:do: [] in SmalltalkImage>>send:toClassesNamedIn:with: OrderedCollection>>do: SmalltalkImage>>send:toClassesNamedIn:with: SmalltalkImage>>processStartUpList: SmalltalkImage>>snapshot:andQuit:embedded: SmalltalkImage>>snapshot:andQuit: SmalltalkImage>>saveImageInFileNamed: SmalltalkImage>>saveAs: WorldState class>>saveAs [] 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: [] 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 ------------------------------------------------------------
_______________________________________________ Pharo-project mailing list Pharo-project@lists.gforge.inria.fr http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project
On 03/18/10 13:26, Stéphane Ducasse wrote:
I fixed it now this is strange that it did not break at my place...
It finds the current platform with a #detect:, so once it finds your platform it doesn't send the other messages. Mac must have come earlier than Unix or Risc in the subclasses collection. And if it's a hashed collection based on identityHash the order could change from image to image. -Martin
Ok I see I fixed isUnix... sorry for the mess. Stef
On 03/18/10 13:26, Stéphane Ducasse wrote:
I fixed it now this is strange that it did not break at my place...
It finds the current platform with a #detect:, so once it finds your platform it doesn't send the other messages. Mac must have come earlier than Unix or Risc in the subclasses collection. And if it's a hashed collection based on identityHash the order could change from image to image.
-Martin
participants (3)
-
Marcus Denker -
Martin McClure -
Stéphane Ducasse