thanks can you let us knw the exact sequence your did? Stef
On Nov 30, 2009, at 8:30 PM, [email protected] wrote: > I got a recent dev-image and ran some tests (all CollectionTests if this > matter) and attempted to store the result. > > 30 November 2009 5:26:40 pm > > VM: Win32 - IX86 - NT - Squeak3.10.2 of '5 June 2008' [latest update: #7179] > Image: PharoCore1.0rc1 [Latest update: #10498] > > SecurityManager state: > Restricted: false > FileAccess: true > SocketAccess: true > Working Dir E:\Pharo > Trusted Dir E:\Pharo\Cesar S. Rabak > Untrusted Dir C:\Documents and Settings\Cesar S. Rabak\Meus documentos\My > Squeak > > UndefinedObject(Object)>>doesNotUnderstand: #< > Receiver: nil > Arguments and temporary variables: > aMessage: < 0 > exception: MessageNotUnderstood: receiver of "<" is nil > resumeValue: nil > Receiver's instance variables: > nil > > EncoderForV3PlusClosures(EncoderForV3)>>genPushLiteral: > Receiver: {an EncoderForV3PlusClosures} > Arguments and temporary variables: > literalIndex: nil > Receiver's instance variables: > comment: nil > pc: nil > scopeTable: a Dictionary('category'->{category} > 'classPool'->{classPool} 'envir...etc... > nTemps: 0 > supered: false > requestor: nil > class: StringTest class > selector: #lastStoredRun > literalStream: a WriteStream {#Dictionary->Dictionary. #add:. > #'->'. #passed. #...etc... > selectorSet: a Dictionary(#*->{*} #+->{+} #-->{-} > #'->'->{->} #/->{/} #'//'->{/...etc... > litIndSet: a > Dictionary(#Dictionary->Dictionary->{Dictionary} #Set->Set->{Set} ...etc... > litSet: a LiteralDictionary(size 302) > sourceRanges: a Dictionary(size 309) > globalSourceRanges: an OrderedCollection({'Dictionary'. (20 > to: 29). false} {'S...etc... > addedSelectorAndMethodClassLiterals: false > stream: {an EncoderForV3PlusClosures} > position: 0 > rootNode: lastStoredRun > ^ Dictionary new add: #passed -> (Set new add: #testAs...etc... > blockExtentsToLocals: nil > > EncoderForV3PlusClosures(BytecodeEncoder)>>sizeOpcodeSelector:withArguments: > Receiver: {an EncoderForV3PlusClosures} > Arguments and temporary variables: > genSelector: #genPushLiteral: > args: #(nil) > Receiver's instance variables: > comment: nil > pc: nil > scopeTable: a Dictionary('category'->{category} > 'classPool'->{classPool} 'envir...etc... > nTemps: 0 > supered: false > requestor: nil > class: StringTest class > selector: #lastStoredRun > literalStream: a WriteStream {#Dictionary->Dictionary. #add:. > #'->'. #passed. #...etc... > selectorSet: a Dictionary(#*->{*} #+->{+} #-->{-} > #'->'->{->} #/->{/} #'//'->{/...etc... > litIndSet: a > Dictionary(#Dictionary->Dictionary->{Dictionary} #Set->Set->{Set} ...etc... > litSet: a LiteralDictionary(size 302) > sourceRanges: a Dictionary(size 309) > globalSourceRanges: an OrderedCollection({'Dictionary'. (20 > to: 29). false} {'S...etc... > addedSelectorAndMethodClassLiterals: false > stream: {an EncoderForV3PlusClosures} > position: 0 > rootNode: lastStoredRun > ^ Dictionary new add: #passed -> (Set new add: #testAs...etc... > blockExtentsToLocals: nil > > EncoderForV3PlusClosures(BytecodeEncoder)>>sizePushLiteral: > Receiver: {an EncoderForV3PlusClosures} > Arguments and temporary variables: > literalIndex: nil > Receiver's instance variables: > comment: nil > pc: nil > scopeTable: a Dictionary('category'->{category} > 'classPool'->{classPool} 'envir...etc... > nTemps: 0 > supered: false > requestor: nil > class: StringTest class > selector: #lastStoredRun > literalStream: a WriteStream {#Dictionary->Dictionary. #add:. > #'->'. #passed. #...etc... > selectorSet: a Dictionary(#*->{*} #+->{+} #-->{-} > #'->'->{->} #/->{/} #'//'->{/...etc... > litIndSet: a > Dictionary(#Dictionary->Dictionary->{Dictionary} #Set->Set->{Set} ...etc... > litSet: a LiteralDictionary(size 302) > sourceRanges: a Dictionary(size 309) > globalSourceRanges: an OrderedCollection({'Dictionary'. (20 > to: 29). false} {'S...etc... > addedSelectorAndMethodClassLiterals: false > stream: {an EncoderForV3PlusClosures} > position: 0 > rootNode: lastStoredRun > ^ Dictionary new add: #passed -> (Set new add: #testAs...etc... > blockExtentsToLocals: nil > > LiteralNode>>sizeCodeForValue: > Receiver: {#testWithWithWithWith} > Arguments and temporary variables: > encoder: {an EncoderForV3PlusClosures} > Receiver's instance variables: > comment: nil > pc: nil > key: #testWithWithWithWith > code: -3 > index: nil > > [] in MessageNode>>sizeCodeForValue: > Receiver: { add: #testWithWithWithWith} > Arguments and temporary variables: > <<error during printing> > Receiver's instance variables: > comment: nil > pc: nil > receiver: nil > selector: {add:} > precedence: 3 > special: 0 > arguments: an OrderedCollection({#testWithWithWithWith}) > sizes: #(nil) > equalNode: nil > caseErrorNode: nil > > OrderedCollection>>collect: > Receiver: an OrderedCollection({#testWithWithWithWith}) > Arguments and temporary variables: > aBlock: [closure] in MessageNode>>sizeCodeForValue: > newCollection: an OrderedCollection() > index: 3 > Receiver's instance variables: > array: #(nil nil {#testWithWithWithWith} nil nil nil nil nil > nil nil) > firstIndex: 3 > lastIndex: 3 > > MessageNode>>sizeCodeForValue: > Receiver: { add: #testWithWithWithWith} > Arguments and temporary variables: > <<error during printing> > Receiver's instance variables: > comment: nil > pc: nil > receiver: nil > selector: {add:} > precedence: 3 > special: 0 > arguments: an OrderedCollection({#testWithWithWithWith}) > sizes: #(nil) > equalNode: nil > caseErrorNode: nil > > [] in CascadeNode>>sizeCodeForValue: > Receiver: {Set new add: #testAsArray; > add: #testAsSet; > add: #testAsSortedCollection; > add: #tes...etc... > Arguments and temporary variables: > encoder: { add: #testWithWithWithWith} > size: {an EncoderForV3PlusClosures} > aMessage: #(1506) > Receiver's instance variables: > comment: nil > pc: nil > receiver: {Set new} > messages: an OrderedCollection({ add: #testAsArray} { > add: #testAsSet} { add: #...etc... > > OrderedCollection>>do: > Receiver: an OrderedCollection({ add: #testAsArray} { add: #testAsSet} > { add: #testAsSortedCollectio...etc... > Arguments and temporary variables: > aBlock: [closure] in CascadeNode>>sizeCodeForValue: > index: 252 > Receiver's instance variables: > array: an Array({ add: #testAsArray} { add: #testAsSet} { add: > #testAsSortedCol...etc... > firstIndex: 1 > lastIndex: 294 > > CascadeNode>>sizeCodeForValue: > Receiver: {Set new add: #testAsArray; > add: #testAsSet; > add: #testAsSortedCollection; > add: #tes...etc... > Arguments and temporary variables: > encoder: {an EncoderForV3PlusClosures} > size: #(1506) > Receiver's instance variables: > comment: nil > pc: nil > receiver: {Set new} > messages: an OrderedCollection({ add: #testAsArray} { > add: #testAsSet} { add: #...etc... > > [] in MessageNode>>sizeCodeForValue: > Receiver: {#passed -> (Set new add: #testAsArray; > add: #testAsSet; > add: #testAsSortedCollectio...etc... > Arguments and temporary variables: > <<error during printing> > Receiver's instance variables: > comment: nil > pc: nil > receiver: {#passed} > selector: {->} > precedence: 2 > special: 0 > arguments: an Array({Set new add: #testAsArray; > add: #testAsSet; > add: #test...etc... > sizes: #(nil) > equalNode: nil > caseErrorNode: nil > > Array(SequenceableCollection)>>collect: > Receiver: an Array({Set new add: #testAsArray; > add: #testAsSet; > add: #testAsSortedCollection; > ...etc... > Arguments and temporary variables: > aBlock: [closure] in MessageNode>>sizeCodeForValue: > newCollection: #(nil) > index: 1 > indexLimiT: 1 > Receiver's instance variables: > an Array({Set new add: #testAsArray; > add: #testAsSet; > add: #testAsSortedCollection; > ...etc... > > MessageNode>>sizeCodeForValue: > Receiver: {#passed -> (Set new add: #testAsArray; > add: #testAsSet; > add: #testAsSortedCollectio...etc... > Arguments and temporary variables: > <<error during printing> > Receiver's instance variables: > comment: nil > pc: nil > receiver: {#passed} > selector: {->} > precedence: 2 > special: 0 > arguments: an Array({Set new add: #testAsArray; > add: #testAsSet; > add: #test...etc... > sizes: #(nil) > equalNode: nil > caseErrorNode: nil > > [] in MessageNode>>sizeCodeForValue: > Receiver: { add: #passed -> (Set new add: #testAsArray; > add: #testAsSet; > add: #testAsSortedC...etc... > Arguments and temporary variables: > <<error during printing> > Receiver's instance variables: > comment: nil > pc: nil > receiver: nil > selector: {add:} > precedence: 3 > special: 0 > arguments: an OrderedCollection({#passed -> (Set new add: > #testAsArray; > add:...etc... > sizes: #(nil) > equalNode: nil > caseErrorNode: nil > > OrderedCollection>>collect: > Receiver: an OrderedCollection({#passed -> (Set new add: #testAsArray; > add: #testAsSet; > add: #...etc... > Arguments and temporary variables: > aBlock: [closure] in MessageNode>>sizeCodeForValue: > newCollection: an OrderedCollection() > index: 3 > Receiver's instance variables: > array: an Array(nil nil {#passed -> (Set new add: #testAsArray; > add: #testAs...etc... > firstIndex: 3 > lastIndex: 3 > > MessageNode>>sizeCodeForValue: > Receiver: { add: #passed -> (Set new add: #testAsArray; > add: #testAsSet; > add: #testAsSortedC...etc... > Arguments and temporary variables: > <<error during printing> > Receiver's instance variables: > comment: nil > pc: nil > receiver: nil > selector: {add:} > precedence: 3 > special: 0 > arguments: an OrderedCollection({#passed -> (Set new add: > #testAsArray; > add:...etc... > sizes: #(nil) > equalNode: nil > caseErrorNode: nil > > [] in CascadeNode>>sizeCodeForValue: > Receiver: {Dictionary new add: #passed -> (Set new add: #testAsArray; > add: #testAsSet; > add: ...etc... > Arguments and temporary variables: > encoder: { add: #passed -> (Set new add: #testAsArray; > add: #testAsSet; > ...etc... > size: {an EncoderForV3PlusClosures} > aMessage: #(10) > Receiver's instance variables: > comment: nil > pc: nil > receiver: {Dictionary new} > messages: an OrderedCollection({ add: #passed -> (Set new > add: #testAsArray; > ...etc... > > OrderedCollection>>do: > Receiver: an OrderedCollection({ add: #passed -> (Set new add: > #testAsArray; > add: #testAsSet; > ...etc... > Arguments and temporary variables: > aBlock: [closure] in CascadeNode>>sizeCodeForValue: > index: 3 > Receiver's instance variables: > array: an Array(nil nil { add: #passed -> (Set new add: > #testAsArray; > add: ...etc... > firstIndex: 3 > lastIndex: 7 > > CascadeNode>>sizeCodeForValue: > Receiver: {Dictionary new add: #passed -> (Set new add: #testAsArray; > add: #testAsSet; > add: ...etc... > Arguments and temporary variables: > encoder: {an EncoderForV3PlusClosures} > size: #(10) > Receiver's instance variables: > comment: nil > pc: nil > receiver: {Dictionary new} > messages: an OrderedCollection({ add: #passed -> (Set new > add: #testAsArray; > ...etc... > > CascadeNode(ParseNode)>>sizeCodeForReturn: > Receiver: {Dictionary new add: #passed -> (Set new add: #testAsArray; > add: #testAsSet; > add: ...etc... > Arguments and temporary variables: > encoder: {an EncoderForV3PlusClosures} > Receiver's instance variables: > comment: nil > pc: nil > receiver: {Dictionary new} > messages: an OrderedCollection({ add: #passed -> (Set new > add: #testAsArray; > ...etc... > > ReturnNode>>sizeCodeForValue: > Receiver: {^ Dictionary new add: #passed -> (Set new add: #testAsArray; > add: #testAsSet; > add...etc... > Arguments and temporary variables: > encoder: {an EncoderForV3PlusClosures} > Receiver's instance variables: > comment: nil > pc: nil > expr: {Dictionary new add: #passed -> (Set new add: > #testAsArray; > add: #tes...etc... > > ReturnNode(ParseNode)>>sizeCodeForBlockValue: > Receiver: {^ Dictionary new add: #passed -> (Set new add: #testAsArray; > add: #testAsSet; > add...etc... > Arguments and temporary variables: > encoder: {an EncoderForV3PlusClosures} > Receiver's instance variables: > comment: nil > pc: nil > expr: {Dictionary new add: #passed -> (Set new add: > #testAsArray; > add: #tes...etc... > > BlockNode>>sizeCodeForEvaluatedValue: > Receiver: {[^ Dictionary new add: #passed -> (Set new add: #testAsArray; > add: #testAsSet; > ...etc... > Arguments and temporary variables: > encoder: {an EncoderForV3PlusClosures} > Receiver's instance variables: > comment: nil > pc: nil > arguments: #() > statements: an OrderedCollection({^ Dictionary new add: > #passed -> (Set new add...etc... > returns: true > nArgsNode: nil > size: nil > remoteCopyNode: nil > temporaries: an OrderedCollection() > optimized: false > actualScopeIfOptimized: nil > blockExtent: (0 to: 2) > remoteTempNode: nil > copiedValues: nil > closureCreationNode: nil > startOfLastStatement: 16 > > BytecodeAgnosticMethodNode>>generate: > Receiver: lastStoredRun > ^ Dictionary new add: #passed -> (Set new add: #testAsArray; > add: #tes...etc... > Arguments and temporary variables: > trailer: #(0 0 0 0) > primErrNode: nil > blkSize: nil > nLits: nil > literals: nil > stack: nil > method: nil > locals: nil > lit: nil > Receiver's instance variables: > comment: nil > pc: nil > selectorOrFalse: #lastStoredRun > precedence: 1 > arguments: #() > block: {[^ Dictionary new add: #passed -> (Set new add: > #testAsArray; > add:...etc... > primitive: 0 > encoder: {an EncoderForV3PlusClosures} > temporaries: #() > properties: an AdditionalMethodState > sourceText: 'lastStoredRun > ^ ((Dictionary new) add: (#passed->((Set new) add: ...etc... > locationCounter: 3 > localsPool: an IdentitySet() > > CompiledMethodWithNode class>>generateMethodFromNode:trailer: > Receiver: CompiledMethodWithNode > Arguments and temporary variables: > aMethodNode: lastStoredRun > ^ Dictionary new add: #passed -> (Set new add: #tes...etc... > bytes: #(0 0 0 0) > Receiver's instance variables: > superclass: Object > methodDict: a MethodDictionary(#method->a > CompiledMethod(650: CompiledMethodWit...etc... > format: 134 > instanceVariables: #('node' 'method') > organization: ('accessing' method node selector) > ('private' method: node:) > > subclasses: nil > name: #CompiledMethodWithNode > classPool: nil > sharedPools: nil > environment: Smalltalk > category: #'Compiler-Support' > traitComposition: nil > localSelectors: nil > > Metaclass(Behavior)>>compile:classified:notifying:trailer:ifFail: > Receiver: StringTest class > Arguments and temporary variables: > code: 'lastStoredRun > ^ ((Dictionary new) add: (#passed->((Set new) add: #testA...etc... > category: 'history' > requestor: nil > bytes: #(0 0 0 0) > failBlock: [closure] in > Metaclass(ClassDescription)>>compile:classified:withSta...etc... > methodNode: lastStoredRun > ^ Dictionary new add: #passed -> (Set new add: #test...etc... > Receiver's instance variables: > superclass: CollectionRootTest class > methodDict: a MethodDictionary() > format: 158 > instanceVariables: nil > organization: ('as yet unclassified') > > thisClass: StringTest > traitComposition: TIncludesTest classTrait + TCloneTest > classTrait + TCopyTest ...etc... > localSelectors: nil > > Metaclass(ClassDescription)>>compile:classified:withStamp:notifying:logSource: > Receiver: StringTest class > Arguments and temporary variables: > text: 'lastStoredRun > ^ ((Dictionary new) add: (#passed->((Set new) add: #testA...etc... > category: 'history' > changeStamp: 'CesarRabak 11/30/2009 17:26' > requestor: nil > logSource: true > methodAndNode: nil > Receiver's instance variables: > superclass: CollectionRootTest class > methodDict: a MethodDictionary() > format: 158 > instanceVariables: nil > organization: ('as yet unclassified') > > thisClass: StringTest > traitComposition: TIncludesTest classTrait + TCloneTest > classTrait + TCopyTest ...etc... > localSelectors: nil > > Metaclass(ClassDescription)>>compile:classified:withStamp:notifying: > Receiver: StringTest class > Arguments and temporary variables: > text: 'lastStoredRun > ^ ((Dictionary new) add: (#passed->((Set new) add: #testA...etc... > category: 'history' > changeStamp: 'CesarRabak 11/30/2009 17:26' > requestor: nil > Receiver's instance variables: > superclass: CollectionRootTest class > methodDict: a MethodDictionary() > format: 158 > instanceVariables: nil > organization: ('as yet unclassified') > > thisClass: StringTest > traitComposition: TIncludesTest classTrait + TCloneTest > classTrait + TCopyTest ...etc... > localSelectors: nil > > Metaclass(ClassDescription)>>compile:classified:notifying: > Receiver: StringTest class > Arguments and temporary variables: > text: 'lastStoredRun > ^ ((Dictionary new) add: (#passed->((Set new) add: #testA...etc... > category: 'history' > requestor: nil > stamp: 'CesarRabak 11/30/2009 17:26' > Receiver's instance variables: > superclass: CollectionRootTest class > methodDict: a MethodDictionary() > format: 158 > instanceVariables: nil > organization: ('as yet unclassified') > > thisClass: StringTest > traitComposition: TIncludesTest classTrait + TCloneTest > classTrait + TCopyTest ...etc... > localSelectors: nil > > Metaclass(ClassDescription)>>compile:classified: > Receiver: StringTest class > Arguments and temporary variables: > code: 'lastStoredRun > ^ ((Dictionary new) add: (#passed->((Set new) add: #testA...etc... > heading: 'history' > Receiver's instance variables: > superclass: CollectionRootTest class > methodDict: a MethodDictionary() > format: 158 > instanceVariables: nil > organization: ('as yet unclassified') > > thisClass: StringTest > traitComposition: TIncludesTest classTrait + TCloneTest > classTrait + TCopyTest ...etc... > localSelectors: nil > > StringTest class(TestCase class)>>generateLastStoredRunMethod > Receiver: StringTest > Arguments and temporary variables: > > Receiver's instance variables: > superclass: CollectionRootTest > methodDict: a MethodDictionary(size 321) > format: 158 > instanceVariables: #('string' 'emptyString' > 'elementInNonEmpty' 'notIn' 'subcol...etc... > organization: ('initialization' setUp) > ('requirements' aValue anIndex anotherEl...etc... > subclasses: nil > name: #StringTest > classPool: nil > sharedPools: nil > environment: Smalltalk > category: #'CollectionsTests-Text' > traitComposition: TIncludesTest + TCloneTest + TCopyTest > + TSetArithmetic + TIt...etc... > localSelectors: an IdentitySet(#elementNotIn > #firstIndex #replacementCollection...etc... > history: a Dictionary(#errors->a Set() #failures->a > Set() #passed->a Set(#testA...etc... > > [] in TestRunner>>storeResultIntoTestCases > Receiver: a TestRunner > Arguments and temporary variables: > testCaseCls: StringTest > Receiver's instance variables: > categories: #(#'AST-Tests' > #'AutomaticMethodCategorizer-Tests' #'AutomaticMetho...etc... > categoriesSelected: a Set(#'CollectionsTests-Support' > #'CollectionsTests-Weak' ...etc... > classes: {Base64MimeConverterTest. ByteArrayTest. > CharacterSetTest. Association...etc... > classIndex: 0 > classesSelected: a Set(TextAndTextStreamTest > WideStringTest WriteStreamTest Ide...etc... > failedList: #() > failedSelected: nil > errorList: #() > errorSelected: nil > lastUpdate: 3437054762 > result: 4978 run, 4978 passes, 0 expected failures, 0 > failures, 0 errors, 0 une...etc... > previousRun: nil > > Set>>do: > Receiver: a Set(RunArrayTest SmallDictionaryTest StringTest > WeakKeyToCollectionDictionaryTest ArrayT...etc... > Arguments and temporary variables: > aBlock: [closure] in > TestRunner>>storeResultIntoTestCases > index: 364 > each: StringTest > indexLimiT: 6638 > Receiver's instance variables: > tally: 49 > array: {nil. nil. nil. nil. nil. nil. nil. nil. nil. nil. nil. > nil. nil. nil. n...etc... > > TestRunner>>storeResultIntoTestCases > Receiver: a TestRunner > Arguments and temporary variables: > > Receiver's instance variables: > categories: #(#'AST-Tests' > #'AutomaticMethodCategorizer-Tests' #'AutomaticMetho...etc... > categoriesSelected: a Set(#'CollectionsTests-Support' > #'CollectionsTests-Weak' ...etc... > classes: {Base64MimeConverterTest. ByteArrayTest. > CharacterSetTest. Association...etc... > classIndex: 0 > classesSelected: a Set(TextAndTextStreamTest > WideStringTest WriteStreamTest Ide...etc... > failedList: #() > failedSelected: nil > errorList: #() > errorSelected: nil > lastUpdate: 3437054762 > result: 4978 run, 4978 passes, 0 expected failures, 0 > failures, 0 errors, 0 une...etc... > previousRun: nil > > TestRunner>>perform:orSendTo: > Receiver: a TestRunner > Arguments and temporary variables: > selector: #storeResultIntoTestCases > otherTarget: a PluggableTextMorphPlus(3170) > Receiver's instance variables: > categories: #(#'AST-Tests' > #'AutomaticMethodCategorizer-Tests' #'AutomaticMetho...etc... > categoriesSelected: a Set(#'CollectionsTests-Support' > #'CollectionsTests-Weak' ...etc... > classes: {Base64MimeConverterTest. ByteArrayTest. > CharacterSetTest. Association...etc... > classIndex: 0 > classesSelected: a Set(TextAndTextStreamTest > WideStringTest WriteStreamTest Ide...etc... > failedList: #() > failedSelected: nil > errorList: #() > errorSelected: nil > lastUpdate: 3437054762 > result: 4978 run, 4978 passes, 0 expected failures, 0 > failures, 0 errors, 0 une...etc... > previousRun: nil > > [] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: > Receiver: a ToggleMenuItemMorph(2690)'Store result as progress > reference' > Arguments and temporary variables: > evt: [...@67 mouseUp 21933765 nil] > selArgCount: #(2) > Receiver's instance variables: > bounds: 6...@54 corner: 8...@70 > owner: a MenuMorph(2400) > submorphs: #() > fullBounds: 6...@54 corner: 8...@70 > color: Color black > extension: a MorphExtension (2845) [other: > (layoutProperties -> a LayoutProper...etc... > font: a LogicalFont > familyName: DejaVu Sans > emphasis: nil > pointSize: 10 > rea...etc... > emphasis: 0 > contents: 'Store result as progress reference' > hasFocus: false > isEnabled: true > subMenu: nil > isSelected: false > target: a TestRunner > selector: #perform:orSendTo: > arguments: an Array(#storeResultIntoTestCases a > PluggableTextMorphPlus(3170)) > icon: nil > getStateSelector: nil > enablementSelector: nil > keyText: nil > > BlockClosure>>ensure: > Receiver: [closure] in > ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: > Arguments and temporary variables: > aBlock: [closure] in CursorWithMask(Cursor)>>showWhile: > returnValue: nil > b: nil > Receiver's instance variables: > outerContext: > ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: > startpc: 136 > numArgs: 0 > > CursorWithMask(Cursor)>>showWhile: > Receiver: ((CursorWithMask > extent: 1...@16 > depth: 1 > fromArray: #( > 2r0 > 2r10000000000000000000000...etc... > Arguments and temporary variables: > aBlock: [closure] in > ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: > 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) > > > --- The full stack --- > UndefinedObject(Object)>>doesNotUnderstand: #< > EncoderForV3PlusClosures(EncoderForV3)>>genPushLiteral: > EncoderForV3PlusClosures(BytecodeEncoder)>>sizeOpcodeSelector:withArguments: > EncoderForV3PlusClosures(BytecodeEncoder)>>sizePushLiteral: > LiteralNode>>sizeCodeForValue: > [] in MessageNode>>sizeCodeForValue: > OrderedCollection>>collect: > MessageNode>>sizeCodeForValue: > [] in CascadeNode>>sizeCodeForValue: > OrderedCollection>>do: > CascadeNode>>sizeCodeForValue: > [] in MessageNode>>sizeCodeForValue: > Array(SequenceableCollection)>>collect: > MessageNode>>sizeCodeForValue: > [] in MessageNode>>sizeCodeForValue: > OrderedCollection>>collect: > MessageNode>>sizeCodeForValue: > [] in CascadeNode>>sizeCodeForValue: > OrderedCollection>>do: > CascadeNode>>sizeCodeForValue: > CascadeNode(ParseNode)>>sizeCodeForReturn: > ReturnNode>>sizeCodeForValue: > ReturnNode(ParseNode)>>sizeCodeForBlockValue: > BlockNode>>sizeCodeForEvaluatedValue: > BytecodeAgnosticMethodNode>>generate: > CompiledMethodWithNode class>>generateMethodFromNode:trailer: > Metaclass(Behavior)>>compile:classified:notifying:trailer:ifFail: > Metaclass(ClassDescription)>>compile:classified:withStamp:notifying:logSource: > Metaclass(ClassDescription)>>compile:classified:withStamp:notifying: > Metaclass(ClassDescription)>>compile:classified:notifying: > Metaclass(ClassDescription)>>compile:classified: > StringTest class(TestCase class)>>generateLastStoredRunMethod > [] in TestRunner>>storeResultIntoTestCases > Set>>do: > TestRunner>>storeResultIntoTestCases > TestRunner>>perform:orSendTo: > [] 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: > WorldState>>doOneSubCycleFor: > PasteUpMorph>>doOneSubCycle > MenuMorph>>invokeModalAt:in:allowKeyboard: > MenuMorph>>invokeModal: > MenuMorph>>invokeModal > PluggableTextMorphPlus(PluggableTextMorph)>>yellowButtonActivity: > TextMorphForEditView>>mouseDown: > TextMorphForEditView(Morph)>>handleMouseDown: > MouseButtonEvent>>sentTo: > TextMorphForEditView(Morph)>>handleEvent: > MorphicEventDispatcher>>dispatchMouseDown:with: > MorphicEventDispatcher>>dispatchEvent:with: > TextMorphForEditView(Morph)>>processEvent:using: > MorphicEventDispatcher>>dispatchMouseDown:with: > MorphicEventDispatcher>>dispatchEvent:with: > TransformMorph(Morph)>>processEvent:using: > MorphicEventDispatcher>>dispatchMouseDown:with: > MorphicEventDispatcher>>dispatchEvent:with: > PluggableTextMorphPlus(Morph)>>processEvent:using: > MorphicEventDispatcher>>dispatchMouseDown:with: > MorphicEventDispatcher>>dispatchEvent:with: > PluggableStandardWindow(Morph)>>processEvent:using: > MorphicEventDispatcher>>dispatchMouseDown:with: > MorphicEventDispatcher>>dispatchEvent:with: > PasteUpMorph(Morph)>>processEvent:using: > PasteUpMorph>>processEvent:using: > PasteUpMorph(Morph)>>processEvent: > 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 > > -- > Cesar Rabak > > _______________________________________________ > 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
