Just the full source code would do:

lastStoredRun
       ^ ((Dictionary new) add: (#passed->((Set new) add: #testA...etc...

Nicolas

2009/11/30 Stéphane Ducasse <[email protected]>:
> 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
>

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

Reply via email to