I think that the closure code shake a lot of foundation and that it  
will take some cycles to get a stable system.
Now self is indeed not a message so was a period missing in your code?

Setf

On Oct 23, 2009, at 10:27 PM, John Toohey wrote:

> I have a 4 day old image that just froze. After restarting, I tried  
> to recover the code changes since I saved my image yesterday, but  
> the list of changes in the tool are an unordered list going back to  
> February of this year. Even old code of mine from that time was in  
> the list. After about an hour I managed to manually select the  
> changes I've made since yesterday, and file them out. When I try to  
> file them back in, I get an error from the debugger, and cannot  
> continue. Anyone know what I can do to recover my source, or point  
> me in the right direction to recover from this.
>
> This is the stacktrace from the debugger :-
>
> From: [email protected]
> To: [email protected]
> Subject: [BUG]UndefinedObject(Object)>>doesNotUnderstand: #self
>
> here insert explanation of what you were doing, suspect changes  
> you've made and so forth.
>
> 23 October 2009 4:19:05 pm
>
> VM: Mac OS - intel - 1058 - Squeak3.8.1 of '28 Aug 2006' [latest  
> update: #6747] Squeak VM 4.1.1b2
> Image: Pharo1.0beta [Latest update: #10477]
>
> SecurityManager state:
> Restricted: false
> FileAccess: true
> SocketAccess: true
> Working Dir /Users/jpt/Dev/repos/Dev-Images/PharoCore-1.0-10477-BETA
> Trusted Dir /foobar/tooBar/forSqueak/bogus
> Untrusted Dir /Users/jpt/Library/Preferences/Squeak/Internet/My Squeak
>
> UndefinedObject(Object)>>doesNotUnderstand: #self
>       Receiver: nil
>       Arguments and temporary variables:
>               aMessage:       self
>               exception:      MessageNotUnderstood: receiver of "self" is nil
>               resumeValue:    nil
>       Receiver's instance variables:
> nil
>
> UndefinedObject>>DoIt
>       Receiver: nil
>       Arguments and temporary variables:
>
>       Receiver's instance variables:
> nil
>
> Compiler>>evaluate:in:to:notifying:ifFail:logged:
>       Receiver: a Compiler
>       Arguments and temporary variables:
>               textOrStream:   'publish
>       self status: #Opened
> '
>               aContext:       nil
>               receiver:       nil
>               aRequestor:     nil
>               failBlock:      [closure] in Compiler  
> class>>evaluate:for:notifying:logged:
>               logFlag:        false
>               methodNode:     DoIt
>       ^ publish self status: #Opened
>               method:         a CompiledMethod(982: UndefinedObject>>DoIt)
>               value:  nil
>               toLog:  nil
>               itsSelection:   nil
>               itsSelectionString:     nil
>       Receiver's instance variables:
>               sourceStream:   a ReadStream 'publish
>       self status: #Opened
> '
>               requestor:      nil
>               class:  UndefinedObject
>               category:       nil
>               context:        nil
>               parser:         a Parser
>
> Compiler class>>evaluate:for:notifying:logged:
>       Receiver: Compiler
>       Arguments and temporary variables:
>               textOrString:   'publish
>       self status: #Opened
> '
>               anObject:       nil
>               aController:    nil
>               logFlag:        false
>       Receiver's instance variables:
>               superclass:     Object
>               methodDict:     a MethodDictionary 
> (#compile:in:classified:notifying:ifFail:->a Comp...etc...
>               format:         142
>               instanceVariables:      #('sourceStream' 'requestor' 'class'  
> 'category' 'context' 'p...etc...
>               organization:   ('deprecated' 
> format:in:notifying:contentsSymbol:)
> ('error handli...etc...
>               subclasses:     nil
>               name:   #Compiler
>               classPool:      a Dictionary()
>               sharedPools:    nil
>               environment:    Smalltalk
>               category:       #'Compiler-Kernel'
>               traitComposition:       nil
>               localSelectors:         nil
>
> Compiler class>>evaluate:for:logged:
>       Receiver: Compiler
>       Arguments and temporary variables:
>               textOrString:   'publish
>       self status: #Opened
> '
>               anObject:       nil
>               logFlag:        false
>       Receiver's instance variables:
>               superclass:     Object
>               methodDict:     a MethodDictionary 
> (#compile:in:classified:notifying:ifFail:->a Comp...etc...
>               format:         142
>               instanceVariables:      #('sourceStream' 'requestor' 'class'  
> 'category' 'context' 'p...etc...
>               organization:   ('deprecated' 
> format:in:notifying:contentsSymbol:)
> ('error handli...etc...
>               subclasses:     nil
>               name:   #Compiler
>               classPool:      a Dictionary()
>               sharedPools:    nil
>               environment:    Smalltalk
>               category:       #'Compiler-Kernel'
>               traitComposition:       nil
>               localSelectors:         nil
>
> Compiler class>>evaluate:
>       Receiver: Compiler
>       Arguments and temporary variables:
>               textOrString:   'publish
>       self status: #Opened
> '
>       Receiver's instance variables:
>               superclass:     Object
>               methodDict:     a MethodDictionary 
> (#compile:in:classified:notifying:ifFail:->a Comp...etc...
>               format:         142
>               instanceVariables:      #('sourceStream' 'requestor' 'class'  
> 'category' 'context' 'p...etc...
>               organization:   ('deprecated' 
> format:in:notifying:contentsSymbol:)
> ('error handli...etc...
>               subclasses:     nil
>               name:   #Compiler
>               classPool:      a Dictionary()
>               sharedPools:    nil
>               environment:    Smalltalk
>               category:       #'Compiler-Kernel'
>               traitComposition:       nil
>               localSelectors:         nil
>
> [] in ChangeRecord>>fileIn
>       Receiver: a ChangeRecord
>       Arguments and temporary variables:
> <<error during printing>
>       Receiver's instance variables:
>               file:   MultiByteFileStream: '/Users/jpt/Dev/repos/Dev-Images/ 
> PharoCore-1.0-10477...etc...
>               position:       29712
>               type:   #doIt
>               class:  nil
>               category:       nil
>               meta:   nil
>               stamp:  nil
>
> BlockClosure>>ensure:
>       Receiver: [closure] in ChangeRecord>>fileIn
>       Arguments and temporary variables:
>               aBlock:         [closure] in CursorWithMask(Cursor)>>showWhile:
>               returnValue:    nil
>               b:      nil
>       Receiver's instance variables:
>               outerContext:   ChangeRecord>>fileIn
>               startpc:        107
>               numArgs:        0
>
> CursorWithMask(Cursor)>>showWhile:
>       Receiver: ((CursorWithMask
>       extent: 1...@16
>       depth: 1
>       fromArray: #(
>               2r0
>               2r0
>               2r0
>               2r10000000010...etc...
>       Arguments and temporary variables:
>               aBlock:         [closure] in ChangeRecord>>fileIn
>               oldcursor:      ((CursorWithMask
>       extent: 1...@16
>       depth: 1
>       fromArray: #(
>               2r0
>               2r1...etc...
>       Receiver's instance variables:
>               bits:   a Bitmap of length 16
>               width:  16
>               height:         16
>               depth:  1
>               offset:         -...@-1
>               maskForm:       Form(16x16x1)
>
> ChangeRecord>>fileIn
>       Receiver: a ChangeRecord
>       Arguments and temporary variables:
> <<error during printing>
>       Receiver's instance variables:
>               file:   MultiByteFileStream: '/Users/jpt/Dev/repos/Dev-Images/ 
> PharoCore-1.0-10477...etc...
>               position:       29712
>               type:   #doIt
>               class:  nil
>               category:       nil
>               meta:   nil
>               stamp:  nil
>
> [] in ChangeList>>fileInSelections
>       Receiver: a ChangeList
>       Arguments and temporary variables:
>               any:    true
>               selected:       a ChangeRecord
>               item:   #(true)
>       Receiver's instance variables:
>               dependents:     a DependentsArray(a SystemWindow(252) a  
> PluggableListMorphOfMany(33...etc...
>               contents:       ''
>               currentCompiledMethod:  nil
>               contentsSymbol:         #showDiffs
>               changeList:     an OrderedCollection(a ChangeRecord a 
> ChangeRecord a  
> ChangeRecord a...etc...
>               list:   an OrderedCollection('do it: ''From Pharo1.0beta of  
> 16...ber 2009 at 3:57...etc...
>               listIndex:      0
>               listSelections:         #(true true true true true true true 
> true true  
> true true true t...etc...
>               file:   MultiByteFileStream: '/Users/jpt/Dev/repos/Dev-Images/ 
> PharoCore-1.0-10477...etc...
>               lostMethodPointer:      nil
>               showsVersions:  nil
>
> Array(SequenceableCollection)>>with:do:
>       Receiver: #(true true true true true true true true true true true  
> true true true true true true tru...etc...
>       Arguments and temporary variables:
>               otherCollection:        an OrderedCollection(a ChangeRecord a  
> ChangeRecord a ChangeRec...etc...
>               twoArgBlock:    [closure] in ChangeList>>fileInSelections
>               index:  171
>               indexLimiT:     274
>       Receiver's instance variables:
> #(true true true true true true true true true true true true true  
> true true true true tru...etc...
>
> ChangeList>>fileInSelections
>       Receiver: a ChangeList
>       Arguments and temporary variables:
>               any:    #(true)
>       Receiver's instance variables:
>               dependents:     a DependentsArray(a SystemWindow(252) a  
> PluggableListMorphOfMany(33...etc...
>               contents:       ''
>               currentCompiledMethod:  nil
>               contentsSymbol:         #showDiffs
>               changeList:     an OrderedCollection(a ChangeRecord a 
> ChangeRecord a  
> ChangeRecord a...etc...
>               list:   an OrderedCollection('do it: ''From Pharo1.0beta of  
> 16...ber 2009 at 3:57...etc...
>               listIndex:      0
>               listSelections:         #(true true true true true true true 
> true true  
> true true true t...etc...
>               file:   MultiByteFileStream: '/Users/jpt/Dev/repos/Dev-Images/ 
> PharoCore-1.0-10477...etc...
>               lostMethodPointer:      nil
>               showsVersions:  nil
>
> PluggableButtonMorph>>performAction
>       Receiver: a PluggableButtonMorph(824)
>       Arguments and temporary variables:
>
>       Receiver's instance variables:
>               bounds:         1...@359 corner: 1...@383
>               owner:  an AlignmentMorph(3699)
>               submorphs:      an Array(an AlignmentMorph(921))
>               fullBounds:     1...@359 corner: 1...@383
>               color:  (Color r: 0.827 g: 0.827 b: 0.827)
>               extension:      a MorphExtension (1404) [balloonText]  [other:  
>  
> (layoutPolicy -> a T...etc...
>               borderWidth:    0
>               borderColor:    Color transparent
>               model:  a ChangeList
>               label:  'file in selections'
>               getStateSelector:       nil
>               actionSelector:         #fileInSelections
>               getLabelSelector:       nil
>               getMenuSelector:        nil
>               shortcutCharacter:      nil
>               askBeforeChanging:      true
>               triggerOnMouseDown:     false
>               offColor:       Color white
>               onColor:        Color white
>               feedbackColor:  nil
>               showSelectionFeedback:  false
>               allButtons:     nil
>               arguments:      #()
>               argumentsProvider:      nil
>               argumentsSelector:      nil
>
> [] in PluggableButtonMorph>>mouseUp:
>       Receiver: a PluggableButtonMorph(824)
>       Arguments and temporary variables:
> <<error during printing>
>       Receiver's instance variables:
>               bounds:         1...@359 corner: 1...@383
>               owner:  an AlignmentMorph(3699)
>               submorphs:      an Array(an AlignmentMorph(921))
>               fullBounds:     1...@359 corner: 1...@383
>               color:  (Color r: 0.827 g: 0.827 b: 0.827)
>               extension:      a MorphExtension (1404) [balloonText]  [other:  
>  
> (layoutPolicy -> a T...etc...
>               borderWidth:    0
>               borderColor:    Color transparent
>               model:  a ChangeList
>               label:  'file in selections'
>               getStateSelector:       nil
>               actionSelector:         #fileInSelections
>               getLabelSelector:       nil
>               getMenuSelector:        nil
>               shortcutCharacter:      nil
>               askBeforeChanging:      true
>               triggerOnMouseDown:     false
>               offColor:       Color white
>               onColor:        Color white
>               feedbackColor:  nil
>               showSelectionFeedback:  false
>               allButtons:     nil
>               arguments:      #()
>               argumentsProvider:      nil
>               argumentsSelector:      nil
>
> Array(SequenceableCollection)>>do:
>       Receiver: an Array(a PluggableButtonMorph(786) a  
> PluggableButtonMorph(3485) a PluggableButtonMorph(5...etc...
>       Arguments and temporary variables:
>               aBlock:         [closure] in PluggableButtonMorph>>mouseUp:
>               index:  4
>               indexLimiT:     4
>       Receiver's instance variables:
> an Array(a PluggableButtonMorph(786) a PluggableButtonMorph(3485) a  
> PluggableButtonMorph(5...etc...
>
> PluggableButtonMorph>>mouseUp:
>       Receiver: a PluggableButtonMorph(824)
>       Arguments and temporary variables:
>               evt:    [1...@375 mouseUp 3690378 nil]
>               all:    an Array(a PluggableButtonMorph(786) a 
> PluggableButtonMorph 
> (3485) a Plugga...etc...
>       Receiver's instance variables:
>               bounds:         1...@359 corner: 1...@383
>               owner:  an AlignmentMorph(3699)
>               submorphs:      an Array(an AlignmentMorph(921))
>               fullBounds:     1...@359 corner: 1...@383
>               color:  (Color r: 0.827 g: 0.827 b: 0.827)
>               extension:      a MorphExtension (1404) [balloonText]  [other:  
>  
> (layoutPolicy -> a T...etc...
>               borderWidth:    0
>               borderColor:    Color transparent
>               model:  a ChangeList
>               label:  'file in selections'
>               getStateSelector:       nil
>               actionSelector:         #fileInSelections
>               getLabelSelector:       nil
>               getMenuSelector:        nil
>               shortcutCharacter:      nil
>               askBeforeChanging:      true
>               triggerOnMouseDown:     false
>               offColor:       Color white
>               onColor:        Color white
>               feedbackColor:  nil
>               showSelectionFeedback:  false
>               allButtons:     nil
>               arguments:      #()
>               argumentsProvider:      nil
>               argumentsSelector:      nil
>
> PluggableButtonMorph(Morph)>>handleMouseUp:
>       Receiver: a PluggableButtonMorph(824)
>       Arguments and temporary variables:
>               anEvent:        [1...@375 mouseUp 3690378 nil]
>       Receiver's instance variables:
>               bounds:         1...@359 corner: 1...@383
>               owner:  an AlignmentMorph(3699)
>               submorphs:      an Array(an AlignmentMorph(921))
>               fullBounds:     1...@359 corner: 1...@383
>               color:  (Color r: 0.827 g: 0.827 b: 0.827)
>               extension:      a MorphExtension (1404) [balloonText]  [other:  
>  
> (layoutPolicy -> a T...etc...
>               borderWidth:    0
>               borderColor:    Color transparent
>               model:  a ChangeList
>               label:  'file in selections'
>               getStateSelector:       nil
>               actionSelector:         #fileInSelections
>               getLabelSelector:       nil
>               getMenuSelector:        nil
>               shortcutCharacter:      nil
>               askBeforeChanging:      true
>               triggerOnMouseDown:     false
>               offColor:       Color white
>               onColor:        Color white
>               feedbackColor:  nil
>               showSelectionFeedback:  false
>               allButtons:     nil
>               arguments:      #()
>               argumentsProvider:      nil
>               argumentsSelector:      nil
>
> MouseButtonEvent>>sentTo:
>       Receiver: [1...@375 mouseUp 3690378 nil]
>       Arguments and temporary variables:
>               anObject:       a PluggableButtonMorph(824)
>       Receiver's instance variables:
>               timeStamp:      3690378
>               source:         a HandMorph(3216)
>               windowIndex:    nil
>               type:   #mouseUp
>               buttons:        0
>               position:       1...@375
>               handler:        nil
>               wasHandled:     true
>               whichButton:    4
>
> PluggableButtonMorph(Morph)>>handleEvent:
>       Receiver: a PluggableButtonMorph(824)
>       Arguments and temporary variables:
>               anEvent:        [1...@375 mouseUp 3690378 nil]
>       Receiver's instance variables:
>               bounds:         1...@359 corner: 1...@383
>               owner:  an AlignmentMorph(3699)
>               submorphs:      an Array(an AlignmentMorph(921))
>               fullBounds:     1...@359 corner: 1...@383
>               color:  (Color r: 0.827 g: 0.827 b: 0.827)
>               extension:      a MorphExtension (1404) [balloonText]  [other:  
>  
> (layoutPolicy -> a T...etc...
>               borderWidth:    0
>               borderColor:    Color transparent
>               model:  a ChangeList
>               label:  'file in selections'
>               getStateSelector:       nil
>               actionSelector:         #fileInSelections
>               getLabelSelector:       nil
>               getMenuSelector:        nil
>               shortcutCharacter:      nil
>               askBeforeChanging:      true
>               triggerOnMouseDown:     false
>               offColor:       Color white
>               onColor:        Color white
>               feedbackColor:  nil
>               showSelectionFeedback:  false
>               allButtons:     nil
>               arguments:      #()
>               argumentsProvider:      nil
>               argumentsSelector:      nil
>
> PluggableButtonMorph(Morph)>>handleFocusEvent:
>       Receiver: a PluggableButtonMorph(824)
>       Arguments and temporary variables:
>               anEvent:        [1...@375 mouseUp 3690378 nil]
>       Receiver's instance variables:
>               bounds:         1...@359 corner: 1...@383
>               owner:  an AlignmentMorph(3699)
>               submorphs:      an Array(an AlignmentMorph(921))
>               fullBounds:     1...@359 corner: 1...@383
>               color:  (Color r: 0.827 g: 0.827 b: 0.827)
>               extension:      a MorphExtension (1404) [balloonText]  [other:  
>  
> (layoutPolicy -> a T...etc...
>               borderWidth:    0
>               borderColor:    Color transparent
>               model:  a ChangeList
>               label:  'file in selections'
>               getStateSelector:       nil
>               actionSelector:         #fileInSelections
>               getLabelSelector:       nil
>               getMenuSelector:        nil
>               shortcutCharacter:      nil
>               askBeforeChanging:      true
>               triggerOnMouseDown:     false
>               offColor:       Color white
>               onColor:        Color white
>               feedbackColor:  nil
>               showSelectionFeedback:  false
>               allButtons:     nil
>               arguments:      #()
>               argumentsProvider:      nil
>               argumentsSelector:      nil
>
> [] in HandMorph>>sendFocusEvent:to:clear:
>       Receiver: a HandMorph(3216)
>       Arguments and temporary variables:
> <<error during printing>
>       Receiver's instance variables:
>               bounds:         1...@782 corner: 1...@798
>               owner:  a PasteUpMorph(1622) [world]
>               submorphs:      #()
>               fullBounds:     1...@782 corner: 1...@798
>               color:  Color blue
>               extension:      a MorphExtension (539) [eventHandler = an 
> EventHandler]
>               mouseFocus:     nil
>               keyboardFocus:  nil
>               eventListeners:         nil
>               mouseListeners:         nil
>               keyboardListeners:      nil
>               mouseClickState:        nil
>               mouseOverHandler:       a MouseOverHandler
>               lastMouseEvent:         [1...@782 mouseUp 3788444 nil]
>               targetOffset:   9...@6
>               damageRecorder:         a DamageRecorder
>               cacheCanvas:    nil
>               cachedCanvasHasHoles:   true
>               temporaryCursor:        nil
>               temporaryCursorOffset:  nil
>               hardwareCursor:         nil
>               hasChanged:     true
>               savedPatch:     nil
>               userInitials:   ''
>               lastEventBuffer:        #(1 3788444 1661 782 0 0 0 1)
>               lastKeyScanCode:        126
>               combinedChar:   nil
>
> [] in PasteUpMorph>>becomeActiveDuring:
>       Receiver: a PasteUpMorph(1622) [world]
>       Arguments and temporary variables:
> <<error during printing>
>       Receiver's instance variables:
>               bounds:         0...@0 corner: 1...@1178
>               owner:  nil
>               submorphs:      an Array(a TaskbarMorph(3095) a 
> SystemWindow(3356) a  
> SystemWindow(25...etc...
>               fullBounds:     nil
>               color:  Color gray
>               extension:      a MorphExtension (2543) [eventHandler = an  
> EventHandler]  [other:  (...etc...
>               borderWidth:    0
>               borderColor:    (Color r: 0.5 g: 0.5 b: 0.5)
>               presenter:      a Presenter (1246)
>               model:  a MorphicModel(1926)
>               cursor:         1
>               padding:        3
>               backgroundMorph:        nil
>               isPartsBin:     nil
>               autoLineLayout:         false
>               indicateCursor:         nil
>               resizeToFit:    nil
>               wantsMouseOverHalos:    nil
>               worldState:     a WorldState
>               griddingOn:     nil
>
> BlockClosure>>on:do:
>       Receiver: [closure] in PasteUpMorph>>becomeActiveDuring:
>       Arguments and temporary variables:
>               exception:      Error
>               handlerAction:  [closure] in PasteUpMorph>>becomeActiveDuring:
>               handlerActive:  false
>       Receiver's instance variables:
>               outerContext:   PasteUpMorph>>becomeActiveDuring:
>               startpc:        67
>               numArgs:        0
>
> PasteUpMorph>>becomeActiveDuring:
>       Receiver: a PasteUpMorph(1622) [world]
>       Arguments and temporary variables:
>               aBlock:         [closure] in HandMorph>>sendFocusEvent:to:clear:
>               priorWorld:     a PasteUpMorph(1622) [world]
>               priorHand:      a HandMorph(3216)
>               priorEvent:     [1...@375 mouseOver red nil nil]
>       Receiver's instance variables:
>               bounds:         0...@0 corner: 1...@1178
>               owner:  nil
>               submorphs:      an Array(a TaskbarMorph(3095) a 
> SystemWindow(3356) a  
> SystemWindow(25...etc...
>               fullBounds:     nil
>               color:  Color gray
>               extension:      a MorphExtension (2543) [eventHandler = an  
> EventHandler]  [other:  (...etc...
>               borderWidth:    0
>               borderColor:    (Color r: 0.5 g: 0.5 b: 0.5)
>               presenter:      a Presenter (1246)
>               model:  a MorphicModel(1926)
>               cursor:         1
>               padding:        3
>               backgroundMorph:        nil
>               isPartsBin:     nil
>               autoLineLayout:         false
>               indicateCursor:         nil
>               resizeToFit:    nil
>               wantsMouseOverHalos:    nil
>               worldState:     a WorldState
>               griddingOn:     nil
>
> HandMorph>>sendFocusEvent:to:clear:
>       Receiver: a HandMorph(3216)
>       Arguments and temporary variables:
>               anEvent:        [1...@375 mouseUp 3690378 nil]
>               focusHolder:    a PluggableButtonMorph(824)
>               aBlock:         [closure] in HandMorph>>sendMouseEvent:
>               w:      a PasteUpMorph(1622) [world]
>               result:         #(nil)
>       Receiver's instance variables:
>               bounds:         1...@782 corner: 1...@798
>               owner:  a PasteUpMorph(1622) [world]
>               submorphs:      #()
>               fullBounds:     1...@782 corner: 1...@798
>               color:  Color blue
>               extension:      a MorphExtension (539) [eventHandler = an 
> EventHandler]
>               mouseFocus:     nil
>               keyboardFocus:  nil
>               eventListeners:         nil
>               mouseListeners:         nil
>               keyboardListeners:      nil
>               mouseClickState:        nil
>               mouseOverHandler:       a MouseOverHandler
>               lastMouseEvent:         [1...@782 mouseUp 3788444 nil]
>               targetOffset:   9...@6
>               damageRecorder:         a DamageRecorder
>               cacheCanvas:    nil
>               cachedCanvasHasHoles:   true
>               temporaryCursor:        nil
>               temporaryCursorOffset:  nil
>               hardwareCursor:         nil
>               hasChanged:     true
>               savedPatch:     nil
>               userInitials:   ''
>               lastEventBuffer:        #(1 3788444 1661 782 0 0 0 1)
>               lastKeyScanCode:        126
>               combinedChar:   nil
>
> HandMorph>>sendEvent:focus:clear:
>       Receiver: a HandMorph(3216)
>       Arguments and temporary variables:
>               anEvent:        [1...@375 mouseUp 3690378 nil]
>               focusHolder:    a PluggableButtonMorph(824)
>               aBlock:         [closure] in HandMorph>>sendMouseEvent:
>               result:         nil
>       Receiver's instance variables:
>               bounds:         1...@782 corner: 1...@798
>               owner:  a PasteUpMorph(1622) [world]
>               submorphs:      #()
>               fullBounds:     1...@782 corner: 1...@798
>               color:  Color blue
>               extension:      a MorphExtension (539) [eventHandler = an 
> EventHandler]
>               mouseFocus:     nil
>               keyboardFocus:  nil
>               eventListeners:         nil
>               mouseListeners:         nil
>               keyboardListeners:      nil
>               mouseClickState:        nil
>               mouseOverHandler:       a MouseOverHandler
>               lastMouseEvent:         [1...@782 mouseUp 3788444 nil]
>               targetOffset:   9...@6
>               damageRecorder:         a DamageRecorder
>               cacheCanvas:    nil
>               cachedCanvasHasHoles:   true
>               temporaryCursor:        nil
>               temporaryCursorOffset:  nil
>               hardwareCursor:         nil
>               hasChanged:     true
>               savedPatch:     nil
>               userInitials:   ''
>               lastEventBuffer:        #(1 3788444 1661 782 0 0 0 1)
>               lastKeyScanCode:        126
>               combinedChar:   nil
>
> HandMorph>>sendMouseEvent:
>       Receiver: a HandMorph(3216)
>       Arguments and temporary variables:
>               anEvent:        [1...@375 mouseUp 3690378 nil]
>       Receiver's instance variables:
>               bounds:         1...@782 corner: 1...@798
>               owner:  a PasteUpMorph(1622) [world]
>               submorphs:      #()
>               fullBounds:     1...@782 corner: 1...@798
>               color:  Color blue
>               extension:      a MorphExtension (539) [eventHandler = an 
> EventHandler]
>               mouseFocus:     nil
>               keyboardFocus:  nil
>               eventListeners:         nil
>               mouseListeners:         nil
>               keyboardListeners:      nil
>               mouseClickState:        nil
>               mouseOverHandler:       a MouseOverHandler
>               lastMouseEvent:         [1...@782 mouseUp 3788444 nil]
>               targetOffset:   9...@6
>               damageRecorder:         a DamageRecorder
>               cacheCanvas:    nil
>               cachedCanvasHasHoles:   true
>               temporaryCursor:        nil
>               temporaryCursorOffset:  nil
>               hardwareCursor:         nil
>               hasChanged:     true
>               savedPatch:     nil
>               userInitials:   ''
>               lastEventBuffer:        #(1 3788444 1661 782 0 0 0 1)
>               lastKeyScanCode:        126
>               combinedChar:   nil
>
> HandMorph>>handleEvent:
>       Receiver: a HandMorph(3216)
>       Arguments and temporary variables:
>               anEvent:        [1...@375 mouseUp 3690378 nil]
>               evt:    [1...@375 mouseUp 3690378 nil]
>               ofs:    nil
>       Receiver's instance variables:
>               bounds:         1...@782 corner: 1...@798
>               owner:  a PasteUpMorph(1622) [world]
>               submorphs:      #()
>               fullBounds:     1...@782 corner: 1...@798
>               color:  Color blue
>               extension:      a MorphExtension (539) [eventHandler = an 
> EventHandler]
>               mouseFocus:     nil
>               keyboardFocus:  nil
>               eventListeners:         nil
>               mouseListeners:         nil
>               keyboardListeners:      nil
>               mouseClickState:        nil
>               mouseOverHandler:       a MouseOverHandler
>               lastMouseEvent:         [1...@782 mouseUp 3788444 nil]
>               targetOffset:   9...@6
>               damageRecorder:         a DamageRecorder
>               cacheCanvas:    nil
>               cachedCanvasHasHoles:   true
>               temporaryCursor:        nil
>               temporaryCursorOffset:  nil
>               hardwareCursor:         nil
>               hasChanged:     true
>               savedPatch:     nil
>               userInitials:   ''
>               lastEventBuffer:        #(1 3788444 1661 782 0 0 0 1)
>               lastKeyScanCode:        126
>               combinedChar:   nil
>
> HandMorph>>processEvents
>       Receiver: a HandMorph(3216)
>       Arguments and temporary variables:
>               evt:    [1...@375 mouseUp 3690378 nil]
>               evtBuf:         #(1 3690378 1518 375 0 0 0 1)
>               type:   1
>               hadAny:         false
>       Receiver's instance variables:
>               bounds:         1...@782 corner: 1...@798
>               owner:  a PasteUpMorph(1622) [world]
>               submorphs:      #()
>               fullBounds:     1...@782 corner: 1...@798
>               color:  Color blue
>               extension:      a MorphExtension (539) [eventHandler = an 
> EventHandler]
>               mouseFocus:     nil
>               keyboardFocus:  nil
>               eventListeners:         nil
>               mouseListeners:         nil
>               keyboardListeners:      nil
>               mouseClickState:        nil
>               mouseOverHandler:       a MouseOverHandler
>               lastMouseEvent:         [1...@782 mouseUp 3788444 nil]
>               targetOffset:   9...@6
>               damageRecorder:         a DamageRecorder
>               cacheCanvas:    nil
>               cachedCanvasHasHoles:   true
>               temporaryCursor:        nil
>               temporaryCursorOffset:  nil
>               hardwareCursor:         nil
>               hasChanged:     true
>               savedPatch:     nil
>               userInitials:   ''
>               lastEventBuffer:        #(1 3788444 1661 782 0 0 0 1)
>               lastKeyScanCode:        126
>               combinedChar:   nil
>
> [] in WorldState>>doOneCycleNowFor:
>       Receiver: a WorldState
>       Arguments and temporary variables:
> <<error during printing>
>       Receiver's instance variables:
>               hands:  an Array(a HandMorph(3216))
>               viewBox:        0...@0 corner: 1...@1178
>               canvas:         a FormCanvas on: DisplayScreen(1920x1178x32)
>               damageRecorder:         a DamageRecorder
>               stepList:       a Heap(StepMessage(#stepAt: -> 3PButton 
> (#togglePrettyDiffing 247))(3P...etc...
>               lastStepTime:   3788426
>               lastStepMessage:        nil
>               lastCycleTime:  3788446
>               commandHistory:         a CommandHistory
>               alarms:         a Heap()
>               lastAlarmTime:  3788426
>
> Array(SequenceableCollection)>>do:
>       Receiver: an Array(a HandMorph(3216))
>       Arguments and temporary variables:
>               aBlock:         [closure] in WorldState>>doOneCycleNowFor:
>               index:  1
>               indexLimiT:     1
>       Receiver's instance variables:
> an Array(a HandMorph(3216))
>
> WorldState>>handsDo:
>       Receiver: a WorldState
>       Arguments and temporary variables:
>               aBlock:         [closure] in WorldState>>doOneCycleNowFor:
>       Receiver's instance variables:
>               hands:  an Array(a HandMorph(3216))
>               viewBox:        0...@0 corner: 1...@1178
>               canvas:         a FormCanvas on: DisplayScreen(1920x1178x32)
>               damageRecorder:         a DamageRecorder
>               stepList:       a Heap(StepMessage(#stepAt: -> 3PButton 
> (#togglePrettyDiffing 247))(3P...etc...
>               lastStepTime:   3788426
>               lastStepMessage:        nil
>               lastCycleTime:  3788446
>               commandHistory:         a CommandHistory
>               alarms:         a Heap()
>               lastAlarmTime:  3788426
>
> WorldState>>doOneCycleNowFor:
>       Receiver: a WorldState
>       Arguments and temporary variables:
>               aWorld:         a PasteUpMorph(1622) [world]
>       Receiver's instance variables:
>               hands:  an Array(a HandMorph(3216))
>               viewBox:        0...@0 corner: 1...@1178
>               canvas:         a FormCanvas on: DisplayScreen(1920x1178x32)
>               damageRecorder:         a DamageRecorder
>               stepList:       a Heap(StepMessage(#stepAt: -> 3PButton 
> (#togglePrettyDiffing 247))(3P...etc...
>               lastStepTime:   3788426
>               lastStepMessage:        nil
>               lastCycleTime:  3788446
>               commandHistory:         a CommandHistory
>               alarms:         a Heap()
>               lastAlarmTime:  3788426
>
> WorldState>>doOneCycleFor:
>       Receiver: a WorldState
>       Arguments and temporary variables:
>               aWorld:         a PasteUpMorph(1622) [world]
>       Receiver's instance variables:
>               hands:  an Array(a HandMorph(3216))
>               viewBox:        0...@0 corner: 1...@1178
>               canvas:         a FormCanvas on: DisplayScreen(1920x1178x32)
>               damageRecorder:         a DamageRecorder
>               stepList:       a Heap(StepMessage(#stepAt: -> 3PButton 
> (#togglePrettyDiffing 247))(3P...etc...
>               lastStepTime:   3788426
>               lastStepMessage:        nil
>               lastCycleTime:  3788446
>               commandHistory:         a CommandHistory
>               alarms:         a Heap()
>               lastAlarmTime:  3788426
>
> PasteUpMorph>>doOneCycle
>       Receiver: a PasteUpMorph(1622) [world]
>       Arguments and temporary variables:
>
>       Receiver's instance variables:
>               bounds:         0...@0 corner: 1...@1178
>               owner:  nil
>               submorphs:      an Array(a TaskbarMorph(3095) a 
> SystemWindow(3356) a  
> SystemWindow(25...etc...
>               fullBounds:     nil
>               color:  Color gray
>               extension:      a MorphExtension (2543) [eventHandler = an  
> EventHandler]  [other:  (...etc...
>               borderWidth:    0
>               borderColor:    (Color r: 0.5 g: 0.5 b: 0.5)
>               presenter:      a Presenter (1246)
>               model:  a MorphicModel(1926)
>               cursor:         1
>               padding:        3
>               backgroundMorph:        nil
>               isPartsBin:     nil
>               autoLineLayout:         false
>               indicateCursor:         nil
>               resizeToFit:    nil
>               wantsMouseOverHalos:    nil
>               worldState:     a WorldState
>               griddingOn:     nil
>
> [] in Project class>>spawnNewProcess
>       Receiver: Project
>       Arguments and temporary variables:
>
>       Receiver's instance variables:
>               superclass:     Model
>               methodDict:     a MethodDictionary(size 167)
>               format:         172
>               instanceVariables:      #('world' 'changeSet' 'transcript'  
> 'parentProject' 'previous...etc...
>               organization:   ('*Polymorph-Widgets'  
> assureTaskbarPresenceMatchesPreference crea...etc...
>               subclasses:     nil
>               name:   #Project
>               classPool:      a Dictionary(#AllProjects->an 
> OrderedCollection(a  
> Project(Juliet)) #...etc...
>               sharedPools:    nil
>               environment:    Smalltalk
>               category:       #'System-Support'
>               traitComposition:       {}
>               localSelectors:         nil
>
> [] in BlockClosure>>newProcess
>       Receiver: [closure] in Project class>>spawnNewProcess
>       Arguments and temporary variables:
>
>       Receiver's instance variables:
>               outerContext:   Project class>>spawnNewProcess
>               startpc:        53
>               numArgs:        0
>
>
> --- The full stack ---
> UndefinedObject(Object)>>doesNotUnderstand: #self
> UndefinedObject>>DoIt
> Compiler>>evaluate:in:to:notifying:ifFail:logged:
> Compiler class>>evaluate:for:notifying:logged:
> Compiler class>>evaluate:for:logged:
> Compiler class>>evaluate:
> [] in ChangeRecord>>fileIn
> BlockClosure>>ensure:
> CursorWithMask(Cursor)>>showWhile:
> ChangeRecord>>fileIn
> [] in ChangeList>>fileInSelections
> Array(SequenceableCollection)>>with:do:
> ChangeList>>fileInSelections
> PluggableButtonMorph>>performAction
> [] in PluggableButtonMorph>>mouseUp:
> Array(SequenceableCollection)>>do:
> PluggableButtonMorph>>mouseUp:
> PluggableButtonMorph(Morph)>>handleMouseUp:
> MouseButtonEvent>>sentTo:
> PluggableButtonMorph(Morph)>>handleEvent:
> PluggableButtonMorph(Morph)>>handleFocusEvent:
> [] in HandMorph>>sendFocusEvent:to:clear:
> [] in PasteUpMorph>>becomeActiveDuring:
> BlockClosure>>on:do:
> PasteUpMorph>>becomeActiveDuring:
> HandMorph>>sendFocusEvent:to:clear:
> HandMorph>>sendEvent:focus:clear:
> HandMorph>>sendMouseEvent:
> HandMorph>>handleEvent:
> HandMorph>>processEvents
> [] in WorldState>>doOneCycleNowFor:
> Array(SequenceableCollection)>>do:
> WorldState>>handsDo:
> WorldState>>doOneCycleNowFor:
> WorldState>>doOneCycleFor:
> PasteUpMorph>>doOneCycle
> [] in Project class>>spawnNewProcess
> [] in BlockClosure>>newProcess
>
>
> -- 
> -JT
>
>
> _______________________________________________
> Pharo-project mailing list
> [email protected]
> http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project


_______________________________________________
Pharo-project mailing list
[email protected]
http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project

Reply via email to