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:     [...@387 mouseUp 857540 nil]
                t3:     0
        Receiver's instance variables:
                bounds:         1...@376 corner: 3...@394
                owner:  a MenuMorph(1782)
                submorphs:      #()
                fullBounds:     1...@376 corner: 3...@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: 1...@16
        depth: 1
        fromArray: #(
                2r0
                2r10000000000000000000000...etc...
        Arguments and temporary variables:
                t1:     [closure] in 
ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
                t2:     ((CursorWithMask
        extent: 1...@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:     [...@387 mouseUp 857540 nil]
                t2:     a PasteUpMorph(1622) [world]
        Receiver's instance variables:
                bounds:         1...@376 corner: 3...@394
                owner:  a MenuMorph(1782)
                submorphs:      #()
                fullBounds:     1...@376 corner: 3...@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:     [...@387 mouseUp 857540 nil]
        Receiver's instance variables:
                bounds:         1...@376 corner: 3...@394
                owner:  a MenuMorph(1782)
                submorphs:      #()
                fullBounds:     1...@376 corner: 3...@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:     [...@387 mouseUp 857540 nil]
        Receiver's instance variables:
                bounds:         1...@376 corner: 3...@394
                owner:  a MenuMorph(1782)
                submorphs:      #()
                fullBounds:     1...@376 corner: 3...@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: [...@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:       1...@387
                handler:        nil
                wasHandled:     true
                whichButton:    4


ToggleMenuItemMorph(Morph)>>handleEvent:
        Receiver: a ToggleMenuItemMorph(1907)'Save as...'
        Arguments and temporary variables:
                t1:     [...@387 mouseUp 857540 nil]
        Receiver's instance variables:
                bounds:         1...@376 corner: 3...@394
                owner:  a MenuMorph(1782)
                submorphs:      #()
                fullBounds:     1...@376 corner: 3...@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:     [...@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:     [...@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:     [...@387 mouseUp 857540 nil]
                t2:     a MorphicEventDispatcher
        Receiver's instance variables:
                bounds:         1...@376 corner: 3...@394
                owner:  a MenuMorph(1782)
                submorphs:      #()
                fullBounds:     1...@376 corner: 3...@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:     [...@387 mouseUp 857540 nil]
                t2:     a MenuMorph(1782)
                t3:     [...@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:     [...@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:     [...@387 mouseUp 857540 nil]
                t2:     a MorphicEventDispatcher
        Receiver's instance variables:
                bounds:         1...@171 corner: 3...@436
                owner:  nil
submorphs: an Array(an AlignmentMorph(996) a ToggleMenuItemMorph(500)'System Br...etc...
                fullBounds:     1...@171 corner: 3...@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:     [...@387 mouseUp 857540 nil]
        Receiver's instance variables:
                bounds:         1...@171 corner: 3...@436
                owner:  nil
submorphs: an Array(an AlignmentMorph(996) a ToggleMenuItemMorph(500)'System Br...etc...
                fullBounds:     1...@171 corner: 3...@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:     [...@387 mouseUp 857540 nil]
        Receiver's instance variables:
                bounds:         1...@171 corner: 3...@436
                owner:  nil
submorphs: an Array(an AlignmentMorph(996) a ToggleMenuItemMorph(500)'System Br...etc...
                fullBounds:     1...@171 corner: 3...@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:     [...@387 mouseUp 857540 nil]
                t2:     a MenuMorph(1782)
                t5:     #(nil)
        Receiver's instance variables:
                bounds:         2...@452 corner: 2...@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:         [...@452 mouseUp 865364 nil]
                targetOffset:   2...@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: 8...@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:     [...@387 mouseOver red nil nil]
        Receiver's instance variables:
                bounds:         0...@0 corner: 8...@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
[email protected]
http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project

Reply via email to